home *** CD-ROM | disk | FTP | other *** search
- /**/
- options results
-
- address 'ArtEffect'
-
- entries = ""
- do i=128 to 1 by -1
- value = i*2-1
- entries = entries || value
- if i~=1 then entries = entries || ','
- end
-
- 'brushattr INTENSITY ' entries
- if rc~=0 then say rc2
- 'brushattr DENSITY ' entries
- if rc~=0 then say rc2
- 'brushattr ROUGHNESS ' entries
- if rc~=0 then say rc2
-
-