home *** CD-ROM | disk | FTP | other *** search
- size 18 24
- Set font psc
-
- sub turn I
- begin rotate I
- set just right
- set hei 0.7
- text ╚╬ ╥Γ \;a
- end rotate
- end sub
-
- sub Colour value$
- set hei 0.8
- rmove 0 -1
- set color value$
- text ▓╗ ═¼ ╗╥ ╢╚
- end sub
-
-
-
-
- amove 9 21
- set hei 2
- set just center
- Begin Box Fill grey20 add 0.3
- text ║║╫╓ GLE
- End Box
- Begin Box add 0.5
- text ║║╫╓ GLE
- End Box
- set hei 0.5
- set just left
- amove 8 19
- aline 12 19
- Text ┐╞╤º╗µ═╝╚φ╝■
- amove 2 15
- Set hei 1
- set just center
- Begin rotate 90
- Text ║║╫╓┐╔╥╘╚╬╥Γ│▀┤τ
- End rotate
- amove 5 15
- text ┤╙
- amove 7 15
- text ╡╜
- set hei 0.2
- amove 6 15
- text С
- amove 12 12
- set hei 8
- text ┤≤
- amove 13 7
- For I=0 To 360 STEP 30
- @turn I
- next I
- set lwidth 0.2
- Circle 3.5
- amove 5 10
- Set lwidth 0.1
-
- Begin box add 0.5
- @colour "Grey90"
- @colour "Grey80"
- @colour "Grey70"
- @colour "Grey60"
- @colour "Grey50"
- @colour "Grey40"
- @colour "Grey30"
- end box
-
- amove 1 1
- set color black
- set hei 1
- text └² 1
-