Home » Archimedes archive » Archimedes World » AW-1992-10.adf » AWOct92 » !AWOct92/Goodies/Logo/LogoProgs/Demo

!AWOct92/Goodies/Logo/LogoProgs/Demo

This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.

Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.

Tape/disk: Home » Archimedes archive » Archimedes World » AW-1992-10.adf » AWOct92
Filename: !AWOct92/Goodies/Logo/LogoProgs/Demo
Read OK:
File size: 1479 bytes
Load address: 0000
Exec address: 0000
File contents
/ This program gives a demo of what
/ logo can do.It uses subroutines for all the
/ letters of the alphabet, and the various
/ other shape patterns drawn.
/ To access a subroutine from the command line
/ when the program is not running, simply type
/ the subroutines name

/ MAIN PROGRAM CODE
RESTART:                / Clears the screen e.t.c.

HOME
ANGLE -60:PENCOLOUR 14
PENUP:FORWARD 500:PENDOWN:RAYS
HOME
ANGLE 60:PENCOLOUR 4
PENUP:FORWARD 500:PENDOWN:RAYS

HOME

ANGLE 270:PENUP

Forward 300:Angle 90
PENDOWN:PENCOLOUR 13:   / Army Green

ANGLE 45
W:E:L:C:O:M:E:          / Draw the letters `WELCOME`
Right 45:Space:Right 45:/ Turn through 90�

T:O:                    / Draw the letters `TO`
Space:                  / Call `SPACE`

L:O:G:O:                / Draw the letters `LOGO`
HOME:                   / Reset the turtle
PenColour 8:            / Dark Blue
PENUP:ANGLE 90:BACK 500:LEFT 90:BACK 300:RIGHT 90

PENDOWN
F:O:R:PENCOLOUR 7
Space
A:R:C:H:I:M:E:D:E:S:
Space
W:O:R:L:D:

HOME
PENDOWN:PENCOLOUR 11:   / Set up the turtle
SquarePattern:          / Call `SQUAREPATTERN`

FINISH

/ The subroutine that draws the rays

TO RAYS
PENDOWN
[30:RIGHT 12:FORWARD 100:BACK 100:]
ENDTO

/  Draws a pattern with squares   /


 / Subroutine to draw the pattern with squares

TO SQUARE
[4:FORWARD 100:RIGHT 90:]
ENDTO

TO SQUAREPATTERN
[24:RIGHT 15:SQUARE:]
ENDTO

/ Alphabet Subroutines

TO SPACE
PENUP:FORWARD 90:PENDOWN
ENDTO

TO A
LEFT 90
FORWARD 80
RIGHT 90
FORWARD 40
RIGHT 90
FORWARD 40
RIGHT 90
FORWARD 40
BACK 40
LEFT 90
FORWARD 40
PENUP:LEFT 90:FORWARD 10:PENDOWN
ENDTO

TO B
LEFT 90
FORWARD 80
RIGHT 90
FORWARD 30
RIGHT 90
FORWARD 40
LEFT 90
FORWARD 10
BACK 40
RIGHT 90
FORWARD 40
LEFT 90
FORWARD 40
LEFT 90
FORWARD 40:BACK40:RIGHT 90:PENUP:FORWARD 10:PENDOWN
ENDTO

TO C
LEFT 90
FORWARD 80
RIGHT 90
FORWARD 40
BACK 40
LEFT 90
BACK 80
RIGHT 90
FORWARD 40
PENUP:FORWARD 10:PENDOWN
ENDTO

TO D
LEFT 90
FORWARD 80
BACK 10
RIGHT 90
FORWARD 40
RIGHT 90
FORWARD 70
RIGHT 90
FORWARD 40
RIGHT 180
PENUP:FORWARD 50:PENDOWN
ENDTO

TO O
LEFT 90
FORWARD 80
RIGHT 90
FORWARD 40
RIGHT 90
FORWARD 80
RIGHT 90
FORWARD 40
RIGHT 180
FORWARD 40:PENUP:FORWARD 10:PENDOWN
ENDTO

TO E
LEFT 90
FORWARD 80
RIGHT 90
FORWARD 40
BACK 40
LEFT 90
BACK 40
RIGHT 90
FORWARD 30:BACK 30:RIGHT 90:FORWARD 40
LEFT 90
FORWARD 40
PENUP:FORWARD 10:PENDOWN
ENDTO


TO F
LEFT 90
FORWARD 80
RIGHT 90
FORWARD 40
BACK 40
LEFT 90
BACK 40
RIGHT 90
FORWARD 30:BACK 30:RIGHT 90:FORWARD 40
LEFT 90
PENUP:FORWARD 50:PENDOWN
ENDTO

TO G
LEFT 90
FORWARD 80
RIGHT 90
FORWARD 40
RIGHT 90
FORWARD 10 
PENUP:FORWARD 30:PENDOWN
RIGHT 90
FORWARD 20
BACK 20:LEFT 90
FORWARD 40
RIGHT 90
FORWARD 40
RIGHT 180
PENUP:FORWARD 50:PENDOWN
ENDTO

TO H
LEFT 90
FORWARD 80
BACK 40
RIGHT 90
FORWARD 40
LEFT 90
FORWARD 40
BACK 80
RIGHT 90
PENUP:FORWARD10:PENDOWN
ENDTO

TO I
FORWARD 40
BACK 20
LEFT 90
FORWARD 80
RIGHT 90
BACK 20
FORWARD 40
BACK 20
RIGHT 90
FORWARD 80
LEFT 90
PENUP:FORWARD 30:PENDOWN
ENDTO

TO J
FORWARD 20
LEFT 90
FORWARD 80
RIGHT 90
BACK 20
FORWARD 40
BACK 20
RIGHT 90
FORWARD 80
LEFT 90
PENUP:FORWARD 30:PENDOWN
ENDTO

TO K
LEFT 90
FORWARD 40
RIGHT 45
FORWARD 57
BACK 57
RIGHT 90
FORWARD 57
BACK 57
LEFT 135
FORWARD 40
BACK 80
RIGHT 90
PENUP:FORWARD 50:PENDOWN
ENDTO

TO L
LEFT 90
FORWARD 80
BACK 80
RIGHT 90
FORWARD 40
PENUP:FORWARD 10:PENDOWN
ENDTO

TO M
LEFT 90
FORWARD 80
RIGHT 90
FORWARD 20
RIGHT 90
FORWARD 30:BACK 30
LEFT 90
FORWARD 20
RIGHT 90
FORWARD 80
LEFT 90
PENUP:FORWARD 10:PENDOWN
ENDTO

TO N
LEFT 90
FORWARD 80
RIGHT 90
FORWARD 40
RIGHT 90
FORWARD 80
LEFT 90
PENUP:FORWARD 10:PENDOWN
ENDTO

TO P
LEFT 90
FORWARD 80
RIGHT 90
FORWARD 40
RIGHT 90
FORWARD 40
RIGHT 90
FORWARD 40
LEFT 90
FORWARD 40
LEFT 90
PENUP:FORWARD 50:PENDOWN
ENDTO

TO Q
O
PENUP:BACK 10:PENDOWN
RIGHT 180+45
FORWARD 30
BACK 30
LEFT 180+45
PENUP:FORWARD 10:PENDOWN
ENDTO

TO R
LEFT 90
FORWARD 80
RIGHT 90
FORWARD 40
RIGHT 90
FORWARD 40
RIGHT 90
FORWARD 40
LEFT 135
FORWARD 57
BACK 57
RIGHT 45
FORWARD 40
LEFT 90
PENUP:FORWARD 50:PENDOWN
ENDTO

TO S
FORWARD 40
LEFT 90
FORWARD 40
LEFT 90
FORWARD 40
RIGHT 90
FORWARD 40
RIGHT 90
FORWARD 40
RIGHT 90
PENUP
FORWARD 80
LEFT 90
FORWARD 10
PENDOWN
ENDTO

TO T
PENUP:FORWARD 20:PENDOWN
LEFT 90
FORWARD 80
RIGHT 90
FORWARD 20
BACK 40
FORWARD 20
RIGHT 90
FORWARD 80
LEFT 90
PENUP:FORWARD 30:PENDOWN
ENDTO

TO U
LEFT 90
FORWARD 80
BACK 80
RIGHT 90
FORWARD 40
LEFT 90
FORWARD 80
BACK 80
RIGHT 90
PENUP:FORWARD 10:PENDOWN
ENDTO

TO V
LEFT 90
FORWARD 80
BACK 80
RIGHT 45
FORWARD 57
LEFT 45
FORWARD 40
BACK 40
RIGHT 45
BACK 57
RIGHT 45
PENUP:FORWARD 50:PENDOWN
ENDTO

TO W
LEFT 90
FORWARD 80
BACK 80
RIGHT 90
FORWARD 20
LEFT 90
FORWARD 30
BACK 30
RIGHT 90
FORWARD 20
LEFT 90
FORWARD 80
BACK 80
RIGHT 90
PENUP:FORWARD 10:PENDOWN
ENDTO

TO X
LEFT 64
FORWARD 89:BACK 89
RIGHT 64
PENUP:FORWARD 40:PENDOWN
LEFT 180-64
FORWARD 89:BACK 89
RIGHT 180-64
PENUP:FORWARD 10:PENDOWN
ENDTO

TO Y
PENUP:FORWARD 20:LEFT 90:PENDOWN
FORWARD 40:LEFT 90
FORWARD 20:RIGHT 90:FORWARD 40:BACK 40:LEFT 90:BACK 40
RIGHT 90
FORWARD 40:BACK 40:RIGHT 90:BACK 20
LEFT 90
BACK 40
RIGHT 90
PENUP:FORWARD 30:PENDOWN
ENDTO

TO Z
LEFT 64:FORWARD 89:BACK 89
LEFT 90-64
PENUP:FORWARD 80:RIGHT 90:PENDOWN
FORWARD 40
RIGHT 90
PENUP:FORWARD 80:LEFT 90:PENDOWN
BACK 40:PENUP:FORWARD 50:PENDOWN
ENDTO
00000000  2f 20 54 68 69 73 20 70  72 6f 67 72 61 6d 20 67  |/ This program g|
00000010  69 76 65 73 20 61 20 64  65 6d 6f 20 6f 66 20 77  |ives a demo of w|
00000020  68 61 74 0a 2f 20 6c 6f  67 6f 20 63 61 6e 20 64  |hat./ logo can d|
00000030  6f 2e 49 74 20 75 73 65  73 20 73 75 62 72 6f 75  |o.It uses subrou|
00000040  74 69 6e 65 73 20 66 6f  72 20 61 6c 6c 20 74 68  |tines for all th|
00000050  65 0a 2f 20 6c 65 74 74  65 72 73 20 6f 66 20 74  |e./ letters of t|
00000060  68 65 20 61 6c 70 68 61  62 65 74 2c 20 61 6e 64  |he alphabet, and|
00000070  20 74 68 65 20 76 61 72  69 6f 75 73 0a 2f 20 6f  | the various./ o|
00000080  74 68 65 72 20 73 68 61  70 65 20 70 61 74 74 65  |ther shape patte|
00000090  72 6e 73 20 64 72 61 77  6e 2e 0a 2f 20 54 6f 20  |rns drawn../ To |
000000a0  61 63 63 65 73 73 20 61  20 73 75 62 72 6f 75 74  |access a subrout|
000000b0  69 6e 65 20 66 72 6f 6d  20 74 68 65 20 63 6f 6d  |ine from the com|
000000c0  6d 61 6e 64 20 6c 69 6e  65 0a 2f 20 77 68 65 6e  |mand line./ when|
000000d0  20 74 68 65 20 70 72 6f  67 72 61 6d 20 69 73 20  | the program is |
000000e0  6e 6f 74 20 72 75 6e 6e  69 6e 67 2c 20 73 69 6d  |not running, sim|
000000f0  70 6c 79 20 74 79 70 65  0a 2f 20 74 68 65 20 73  |ply type./ the s|
00000100  75 62 72 6f 75 74 69 6e  65 73 20 6e 61 6d 65 0a  |ubroutines name.|
00000110  0a 2f 20 4d 41 49 4e 20  50 52 4f 47 52 41 4d 20  |./ MAIN PROGRAM |
00000120  43 4f 44 45 0a 52 45 53  54 41 52 54 3a 20 20 20  |CODE.RESTART:   |
00000130  20 20 20 20 20 20 20 20  20 20 20 20 20 2f 20 43  |             / C|
00000140  6c 65 61 72 73 20 74 68  65 20 73 63 72 65 65 6e  |lears the screen|
00000150  20 65 2e 74 2e 63 2e 0a  0a 48 4f 4d 45 0a 41 4e  | e.t.c...HOME.AN|
00000160  47 4c 45 20 2d 36 30 3a  50 45 4e 43 4f 4c 4f 55  |GLE -60:PENCOLOU|
00000170  52 20 31 34 0a 50 45 4e  55 50 3a 46 4f 52 57 41  |R 14.PENUP:FORWA|
00000180  52 44 20 35 30 30 3a 50  45 4e 44 4f 57 4e 3a 52  |RD 500:PENDOWN:R|
00000190  41 59 53 0a 48 4f 4d 45  0a 41 4e 47 4c 45 20 36  |AYS.HOME.ANGLE 6|
000001a0  30 3a 50 45 4e 43 4f 4c  4f 55 52 20 34 0a 50 45  |0:PENCOLOUR 4.PE|
000001b0  4e 55 50 3a 46 4f 52 57  41 52 44 20 35 30 30 3a  |NUP:FORWARD 500:|
000001c0  50 45 4e 44 4f 57 4e 3a  52 41 59 53 0a 0a 48 4f  |PENDOWN:RAYS..HO|
000001d0  4d 45 0a 0a 41 4e 47 4c  45 20 32 37 30 3a 50 45  |ME..ANGLE 270:PE|
000001e0  4e 55 50 0a 0a 46 6f 72  77 61 72 64 20 33 30 30  |NUP..Forward 300|
000001f0  3a 41 6e 67 6c 65 20 39  30 0a 50 45 4e 44 4f 57  |:Angle 90.PENDOW|
00000200  4e 3a 50 45 4e 43 4f 4c  4f 55 52 20 31 33 3a 20  |N:PENCOLOUR 13: |
00000210  20 20 2f 20 41 72 6d 79  20 47 72 65 65 6e 0a 0a  |  / Army Green..|
00000220  41 4e 47 4c 45 20 34 35  0a 57 3a 45 3a 4c 3a 43  |ANGLE 45.W:E:L:C|
00000230  3a 4f 3a 4d 3a 45 3a 20  20 20 20 20 20 20 20 20  |:O:M:E:         |
00000240  20 2f 20 44 72 61 77 20  74 68 65 20 6c 65 74 74  | / Draw the lett|
00000250  65 72 73 20 60 57 45 4c  43 4f 4d 45 60 0a 52 69  |ers `WELCOME`.Ri|
00000260  67 68 74 20 34 35 3a 53  70 61 63 65 3a 52 69 67  |ght 45:Space:Rig|
00000270  68 74 20 34 35 3a 2f 20  54 75 72 6e 20 74 68 72  |ht 45:/ Turn thr|
00000280  6f 75 67 68 20 39 30 b0  0a 0a 54 3a 4f 3a 20 20  |ough 90...T:O:  |
00000290  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000002a0  20 20 2f 20 44 72 61 77  20 74 68 65 20 6c 65 74  |  / Draw the let|
000002b0  74 65 72 73 20 60 54 4f  60 0a 53 70 61 63 65 3a  |ters `TO`.Space:|
000002c0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000002d0  20 20 2f 20 43 61 6c 6c  20 60 53 50 41 43 45 60  |  / Call `SPACE`|
000002e0  0a 0a 4c 3a 4f 3a 47 3a  4f 3a 20 20 20 20 20 20  |..L:O:G:O:      |
000002f0  20 20 20 20 20 20 20 20  20 20 2f 20 44 72 61 77  |          / Draw|
00000300  20 74 68 65 20 6c 65 74  74 65 72 73 20 60 4c 4f  | the letters `LO|
00000310  47 4f 60 0a 48 4f 4d 45  3a 20 20 20 20 20 20 20  |GO`.HOME:       |
00000320  20 20 20 20 20 20 20 20  20 20 20 20 2f 20 52 65  |            / Re|
00000330  73 65 74 20 74 68 65 20  74 75 72 74 6c 65 0a 50  |set the turtle.P|
00000340  65 6e 43 6f 6c 6f 75 72  20 38 3a 20 20 20 20 20  |enColour 8:     |
00000350  20 20 20 20 20 20 20 2f  20 44 61 72 6b 20 42 6c  |       / Dark Bl|
00000360  75 65 0a 50 45 4e 55 50  3a 41 4e 47 4c 45 20 39  |ue.PENUP:ANGLE 9|
00000370  30 3a 42 41 43 4b 20 35  30 30 3a 4c 45 46 54 20  |0:BACK 500:LEFT |
00000380  39 30 3a 42 41 43 4b 20  33 30 30 3a 52 49 47 48  |90:BACK 300:RIGH|
00000390  54 20 39 30 0a 0a 50 45  4e 44 4f 57 4e 0a 46 3a  |T 90..PENDOWN.F:|
000003a0  4f 3a 52 3a 50 45 4e 43  4f 4c 4f 55 52 20 37 0a  |O:R:PENCOLOUR 7.|
000003b0  53 70 61 63 65 0a 41 3a  52 3a 43 3a 48 3a 49 3a  |Space.A:R:C:H:I:|
000003c0  4d 3a 45 3a 44 3a 45 3a  53 3a 0a 53 70 61 63 65  |M:E:D:E:S:.Space|
000003d0  0a 57 3a 4f 3a 52 3a 4c  3a 44 3a 0a 0a 48 4f 4d  |.W:O:R:L:D:..HOM|
000003e0  45 0a 50 45 4e 44 4f 57  4e 3a 50 45 4e 43 4f 4c  |E.PENDOWN:PENCOL|
000003f0  4f 55 52 20 31 31 3a 20  20 20 2f 20 53 65 74 20  |OUR 11:   / Set |
00000400  75 70 20 74 68 65 20 74  75 72 74 6c 65 0a 53 71  |up the turtle.Sq|
00000410  75 61 72 65 50 61 74 74  65 72 6e 3a 20 20 20 20  |uarePattern:    |
00000420  20 20 20 20 20 20 2f 20  43 61 6c 6c 20 60 53 51  |      / Call `SQ|
00000430  55 41 52 45 50 41 54 54  45 52 4e 60 0a 0a 46 49  |UAREPATTERN`..FI|
00000440  4e 49 53 48 0a 0a 2f 20  54 68 65 20 73 75 62 72  |NISH../ The subr|
00000450  6f 75 74 69 6e 65 20 74  68 61 74 20 64 72 61 77  |outine that draw|
00000460  73 20 74 68 65 20 72 61  79 73 0a 0a 54 4f 20 52  |s the rays..TO R|
00000470  41 59 53 0a 50 45 4e 44  4f 57 4e 0a 5b 33 30 3a  |AYS.PENDOWN.[30:|
00000480  52 49 47 48 54 20 31 32  3a 46 4f 52 57 41 52 44  |RIGHT 12:FORWARD|
00000490  20 31 30 30 3a 42 41 43  4b 20 31 30 30 3a 5d 0a  | 100:BACK 100:].|
000004a0  45 4e 44 54 4f 0a 0a 2f  20 20 44 72 61 77 73 20  |ENDTO../  Draws |
000004b0  61 20 70 61 74 74 65 72  6e 20 77 69 74 68 20 73  |a pattern with s|
000004c0  71 75 61 72 65 73 20 20  20 2f 0a 0a 0a 20 2f 20  |quares   /... / |
000004d0  53 75 62 72 6f 75 74 69  6e 65 20 74 6f 20 64 72  |Subroutine to dr|
000004e0  61 77 20 74 68 65 20 70  61 74 74 65 72 6e 20 77  |aw the pattern w|
000004f0  69 74 68 20 73 71 75 61  72 65 73 0a 0a 54 4f 20  |ith squares..TO |
00000500  53 51 55 41 52 45 0a 5b  34 3a 46 4f 52 57 41 52  |SQUARE.[4:FORWAR|
00000510  44 20 31 30 30 3a 52 49  47 48 54 20 39 30 3a 5d  |D 100:RIGHT 90:]|
00000520  0a 45 4e 44 54 4f 0a 0a  54 4f 20 53 51 55 41 52  |.ENDTO..TO SQUAR|
00000530  45 50 41 54 54 45 52 4e  0a 5b 32 34 3a 52 49 47  |EPATTERN.[24:RIG|
00000540  48 54 20 31 35 3a 53 51  55 41 52 45 3a 5d 0a 45  |HT 15:SQUARE:].E|
00000550  4e 44 54 4f 0a 0a 2f 20  41 6c 70 68 61 62 65 74  |NDTO../ Alphabet|
00000560  20 53 75 62 72 6f 75 74  69 6e 65 73 0a 0a 54 4f  | Subroutines..TO|
00000570  20 53 50 41 43 45 0a 50  45 4e 55 50 3a 46 4f 52  | SPACE.PENUP:FOR|
00000580  57 41 52 44 20 39 30 3a  50 45 4e 44 4f 57 4e 0a  |WARD 90:PENDOWN.|
00000590  45 4e 44 54 4f 0a 0a 54  4f 20 41 0a 4c 45 46 54  |ENDTO..TO A.LEFT|
000005a0  20 39 30 0a 46 4f 52 57  41 52 44 20 38 30 0a 52  | 90.FORWARD 80.R|
000005b0  49 47 48 54 20 39 30 0a  46 4f 52 57 41 52 44 20  |IGHT 90.FORWARD |
000005c0  34 30 0a 52 49 47 48 54  20 39 30 0a 46 4f 52 57  |40.RIGHT 90.FORW|
000005d0  41 52 44 20 34 30 0a 52  49 47 48 54 20 39 30 0a  |ARD 40.RIGHT 90.|
000005e0  46 4f 52 57 41 52 44 20  34 30 0a 42 41 43 4b 20  |FORWARD 40.BACK |
000005f0  34 30 0a 4c 45 46 54 20  39 30 0a 46 4f 52 57 41  |40.LEFT 90.FORWA|
00000600  52 44 20 34 30 0a 50 45  4e 55 50 3a 4c 45 46 54  |RD 40.PENUP:LEFT|
00000610  20 39 30 3a 46 4f 52 57  41 52 44 20 31 30 3a 50  | 90:FORWARD 10:P|
00000620  45 4e 44 4f 57 4e 0a 45  4e 44 54 4f 0a 0a 54 4f  |ENDOWN.ENDTO..TO|
00000630  20 42 0a 4c 45 46 54 20  39 30 0a 46 4f 52 57 41  | B.LEFT 90.FORWA|
00000640  52 44 20 38 30 0a 52 49  47 48 54 20 39 30 0a 46  |RD 80.RIGHT 90.F|
00000650  4f 52 57 41 52 44 20 33  30 0a 52 49 47 48 54 20  |ORWARD 30.RIGHT |
00000660  39 30 0a 46 4f 52 57 41  52 44 20 34 30 0a 4c 45  |90.FORWARD 40.LE|
00000670  46 54 20 39 30 0a 46 4f  52 57 41 52 44 20 31 30  |FT 90.FORWARD 10|
00000680  0a 42 41 43 4b 20 34 30  0a 52 49 47 48 54 20 39  |.BACK 40.RIGHT 9|
00000690  30 0a 46 4f 52 57 41 52  44 20 34 30 0a 4c 45 46  |0.FORWARD 40.LEF|
000006a0  54 20 39 30 0a 46 4f 52  57 41 52 44 20 34 30 0a  |T 90.FORWARD 40.|
000006b0  4c 45 46 54 20 39 30 0a  46 4f 52 57 41 52 44 20  |LEFT 90.FORWARD |
000006c0  34 30 3a 42 41 43 4b 34  30 3a 52 49 47 48 54 20  |40:BACK40:RIGHT |
000006d0  39 30 3a 50 45 4e 55 50  3a 46 4f 52 57 41 52 44  |90:PENUP:FORWARD|
000006e0  20 31 30 3a 50 45 4e 44  4f 57 4e 0a 45 4e 44 54  | 10:PENDOWN.ENDT|
000006f0  4f 0a 0a 54 4f 20 43 0a  4c 45 46 54 20 39 30 0a  |O..TO C.LEFT 90.|
00000700  46 4f 52 57 41 52 44 20  38 30 0a 52 49 47 48 54  |FORWARD 80.RIGHT|
00000710  20 39 30 0a 46 4f 52 57  41 52 44 20 34 30 0a 42  | 90.FORWARD 40.B|
00000720  41 43 4b 20 34 30 0a 4c  45 46 54 20 39 30 0a 42  |ACK 40.LEFT 90.B|
00000730  41 43 4b 20 38 30 0a 52  49 47 48 54 20 39 30 0a  |ACK 80.RIGHT 90.|
00000740  46 4f 52 57 41 52 44 20  34 30 0a 50 45 4e 55 50  |FORWARD 40.PENUP|
00000750  3a 46 4f 52 57 41 52 44  20 31 30 3a 50 45 4e 44  |:FORWARD 10:PEND|
00000760  4f 57 4e 0a 45 4e 44 54  4f 0a 0a 54 4f 20 44 0a  |OWN.ENDTO..TO D.|
00000770  4c 45 46 54 20 39 30 0a  46 4f 52 57 41 52 44 20  |LEFT 90.FORWARD |
00000780  38 30 0a 42 41 43 4b 20  31 30 0a 52 49 47 48 54  |80.BACK 10.RIGHT|
00000790  20 39 30 0a 46 4f 52 57  41 52 44 20 34 30 0a 52  | 90.FORWARD 40.R|
000007a0  49 47 48 54 20 39 30 0a  46 4f 52 57 41 52 44 20  |IGHT 90.FORWARD |
000007b0  37 30 0a 52 49 47 48 54  20 39 30 0a 46 4f 52 57  |70.RIGHT 90.FORW|
000007c0  41 52 44 20 34 30 0a 52  49 47 48 54 20 31 38 30  |ARD 40.RIGHT 180|
000007d0  0a 50 45 4e 55 50 3a 46  4f 52 57 41 52 44 20 35  |.PENUP:FORWARD 5|
000007e0  30 3a 50 45 4e 44 4f 57  4e 0a 45 4e 44 54 4f 0a  |0:PENDOWN.ENDTO.|
000007f0  0a 54 4f 20 4f 0a 4c 45  46 54 20 39 30 0a 46 4f  |.TO O.LEFT 90.FO|
00000800  52 57 41 52 44 20 38 30  0a 52 49 47 48 54 20 39  |RWARD 80.RIGHT 9|
00000810  30 0a 46 4f 52 57 41 52  44 20 34 30 0a 52 49 47  |0.FORWARD 40.RIG|
00000820  48 54 20 39 30 0a 46 4f  52 57 41 52 44 20 38 30  |HT 90.FORWARD 80|
00000830  0a 52 49 47 48 54 20 39  30 0a 46 4f 52 57 41 52  |.RIGHT 90.FORWAR|
00000840  44 20 34 30 0a 52 49 47  48 54 20 31 38 30 0a 46  |D 40.RIGHT 180.F|
00000850  4f 52 57 41 52 44 20 34  30 3a 50 45 4e 55 50 3a  |ORWARD 40:PENUP:|
00000860  46 4f 52 57 41 52 44 20  31 30 3a 50 45 4e 44 4f  |FORWARD 10:PENDO|
00000870  57 4e 0a 45 4e 44 54 4f  0a 0a 54 4f 20 45 0a 4c  |WN.ENDTO..TO E.L|
00000880  45 46 54 20 39 30 0a 46  4f 52 57 41 52 44 20 38  |EFT 90.FORWARD 8|
00000890  30 0a 52 49 47 48 54 20  39 30 0a 46 4f 52 57 41  |0.RIGHT 90.FORWA|
000008a0  52 44 20 34 30 0a 42 41  43 4b 20 34 30 0a 4c 45  |RD 40.BACK 40.LE|
000008b0  46 54 20 39 30 0a 42 41  43 4b 20 34 30 0a 52 49  |FT 90.BACK 40.RI|
000008c0  47 48 54 20 39 30 0a 46  4f 52 57 41 52 44 20 33  |GHT 90.FORWARD 3|
000008d0  30 3a 42 41 43 4b 20 33  30 3a 52 49 47 48 54 20  |0:BACK 30:RIGHT |
000008e0  39 30 3a 46 4f 52 57 41  52 44 20 34 30 0a 4c 45  |90:FORWARD 40.LE|
000008f0  46 54 20 39 30 0a 46 4f  52 57 41 52 44 20 34 30  |FT 90.FORWARD 40|
00000900  0a 50 45 4e 55 50 3a 46  4f 52 57 41 52 44 20 31  |.PENUP:FORWARD 1|
00000910  30 3a 50 45 4e 44 4f 57  4e 0a 45 4e 44 54 4f 0a  |0:PENDOWN.ENDTO.|
00000920  0a 0a 54 4f 20 46 0a 4c  45 46 54 20 39 30 0a 46  |..TO F.LEFT 90.F|
00000930  4f 52 57 41 52 44 20 38  30 0a 52 49 47 48 54 20  |ORWARD 80.RIGHT |
00000940  39 30 0a 46 4f 52 57 41  52 44 20 34 30 0a 42 41  |90.FORWARD 40.BA|
00000950  43 4b 20 34 30 0a 4c 45  46 54 20 39 30 0a 42 41  |CK 40.LEFT 90.BA|
00000960  43 4b 20 34 30 0a 52 49  47 48 54 20 39 30 0a 46  |CK 40.RIGHT 90.F|
00000970  4f 52 57 41 52 44 20 33  30 3a 42 41 43 4b 20 33  |ORWARD 30:BACK 3|
00000980  30 3a 52 49 47 48 54 20  39 30 3a 46 4f 52 57 41  |0:RIGHT 90:FORWA|
00000990  52 44 20 34 30 0a 4c 45  46 54 20 39 30 0a 50 45  |RD 40.LEFT 90.PE|
000009a0  4e 55 50 3a 46 4f 52 57  41 52 44 20 35 30 3a 50  |NUP:FORWARD 50:P|
000009b0  45 4e 44 4f 57 4e 0a 45  4e 44 54 4f 0a 0a 54 4f  |ENDOWN.ENDTO..TO|
000009c0  20 47 0a 4c 45 46 54 20  39 30 0a 46 4f 52 57 41  | G.LEFT 90.FORWA|
000009d0  52 44 20 38 30 0a 52 49  47 48 54 20 39 30 0a 46  |RD 80.RIGHT 90.F|
000009e0  4f 52 57 41 52 44 20 34  30 0a 52 49 47 48 54 20  |ORWARD 40.RIGHT |
000009f0  39 30 0a 46 4f 52 57 41  52 44 20 31 30 20 0a 50  |90.FORWARD 10 .P|
00000a00  45 4e 55 50 3a 46 4f 52  57 41 52 44 20 33 30 3a  |ENUP:FORWARD 30:|
00000a10  50 45 4e 44 4f 57 4e 0a  52 49 47 48 54 20 39 30  |PENDOWN.RIGHT 90|
00000a20  0a 46 4f 52 57 41 52 44  20 32 30 0a 42 41 43 4b  |.FORWARD 20.BACK|
00000a30  20 32 30 3a 4c 45 46 54  20 39 30 0a 46 4f 52 57  | 20:LEFT 90.FORW|
00000a40  41 52 44 20 34 30 0a 52  49 47 48 54 20 39 30 0a  |ARD 40.RIGHT 90.|
00000a50  46 4f 52 57 41 52 44 20  34 30 0a 52 49 47 48 54  |FORWARD 40.RIGHT|
00000a60  20 31 38 30 0a 50 45 4e  55 50 3a 46 4f 52 57 41  | 180.PENUP:FORWA|
00000a70  52 44 20 35 30 3a 50 45  4e 44 4f 57 4e 0a 45 4e  |RD 50:PENDOWN.EN|
00000a80  44 54 4f 0a 0a 54 4f 20  48 0a 4c 45 46 54 20 39  |DTO..TO H.LEFT 9|
00000a90  30 0a 46 4f 52 57 41 52  44 20 38 30 0a 42 41 43  |0.FORWARD 80.BAC|
00000aa0  4b 20 34 30 0a 52 49 47  48 54 20 39 30 0a 46 4f  |K 40.RIGHT 90.FO|
00000ab0  52 57 41 52 44 20 34 30  0a 4c 45 46 54 20 39 30  |RWARD 40.LEFT 90|
00000ac0  0a 46 4f 52 57 41 52 44  20 34 30 0a 42 41 43 4b  |.FORWARD 40.BACK|
00000ad0  20 38 30 0a 52 49 47 48  54 20 39 30 0a 50 45 4e  | 80.RIGHT 90.PEN|
00000ae0  55 50 3a 46 4f 52 57 41  52 44 31 30 3a 50 45 4e  |UP:FORWARD10:PEN|
00000af0  44 4f 57 4e 0a 45 4e 44  54 4f 0a 0a 54 4f 20 49  |DOWN.ENDTO..TO I|
00000b00  0a 46 4f 52 57 41 52 44  20 34 30 0a 42 41 43 4b  |.FORWARD 40.BACK|
00000b10  20 32 30 0a 4c 45 46 54  20 39 30 0a 46 4f 52 57  | 20.LEFT 90.FORW|
00000b20  41 52 44 20 38 30 0a 52  49 47 48 54 20 39 30 0a  |ARD 80.RIGHT 90.|
00000b30  42 41 43 4b 20 32 30 0a  46 4f 52 57 41 52 44 20  |BACK 20.FORWARD |
00000b40  34 30 0a 42 41 43 4b 20  32 30 0a 52 49 47 48 54  |40.BACK 20.RIGHT|
00000b50  20 39 30 0a 46 4f 52 57  41 52 44 20 38 30 0a 4c  | 90.FORWARD 80.L|
00000b60  45 46 54 20 39 30 0a 50  45 4e 55 50 3a 46 4f 52  |EFT 90.PENUP:FOR|
00000b70  57 41 52 44 20 33 30 3a  50 45 4e 44 4f 57 4e 0a  |WARD 30:PENDOWN.|
00000b80  45 4e 44 54 4f 0a 0a 54  4f 20 4a 0a 46 4f 52 57  |ENDTO..TO J.FORW|
00000b90  41 52 44 20 32 30 0a 4c  45 46 54 20 39 30 0a 46  |ARD 20.LEFT 90.F|
00000ba0  4f 52 57 41 52 44 20 38  30 0a 52 49 47 48 54 20  |ORWARD 80.RIGHT |
00000bb0  39 30 0a 42 41 43 4b 20  32 30 0a 46 4f 52 57 41  |90.BACK 20.FORWA|
00000bc0  52 44 20 34 30 0a 42 41  43 4b 20 32 30 0a 52 49  |RD 40.BACK 20.RI|
00000bd0  47 48 54 20 39 30 0a 46  4f 52 57 41 52 44 20 38  |GHT 90.FORWARD 8|
00000be0  30 0a 4c 45 46 54 20 39  30 0a 50 45 4e 55 50 3a  |0.LEFT 90.PENUP:|
00000bf0  46 4f 52 57 41 52 44 20  33 30 3a 50 45 4e 44 4f  |FORWARD 30:PENDO|
00000c00  57 4e 0a 45 4e 44 54 4f  0a 0a 54 4f 20 4b 0a 4c  |WN.ENDTO..TO K.L|
00000c10  45 46 54 20 39 30 0a 46  4f 52 57 41 52 44 20 34  |EFT 90.FORWARD 4|
00000c20  30 0a 52 49 47 48 54 20  34 35 0a 46 4f 52 57 41  |0.RIGHT 45.FORWA|
00000c30  52 44 20 35 37 0a 42 41  43 4b 20 35 37 0a 52 49  |RD 57.BACK 57.RI|
00000c40  47 48 54 20 39 30 0a 46  4f 52 57 41 52 44 20 35  |GHT 90.FORWARD 5|
00000c50  37 0a 42 41 43 4b 20 35  37 0a 4c 45 46 54 20 31  |7.BACK 57.LEFT 1|
00000c60  33 35 0a 46 4f 52 57 41  52 44 20 34 30 0a 42 41  |35.FORWARD 40.BA|
00000c70  43 4b 20 38 30 0a 52 49  47 48 54 20 39 30 0a 50  |CK 80.RIGHT 90.P|
00000c80  45 4e 55 50 3a 46 4f 52  57 41 52 44 20 35 30 3a  |ENUP:FORWARD 50:|
00000c90  50 45 4e 44 4f 57 4e 0a  45 4e 44 54 4f 0a 0a 54  |PENDOWN.ENDTO..T|
00000ca0  4f 20 4c 0a 4c 45 46 54  20 39 30 0a 46 4f 52 57  |O L.LEFT 90.FORW|
00000cb0  41 52 44 20 38 30 0a 42  41 43 4b 20 38 30 0a 52  |ARD 80.BACK 80.R|
00000cc0  49 47 48 54 20 39 30 0a  46 4f 52 57 41 52 44 20  |IGHT 90.FORWARD |
00000cd0  34 30 0a 50 45 4e 55 50  3a 46 4f 52 57 41 52 44  |40.PENUP:FORWARD|
00000ce0  20 31 30 3a 50 45 4e 44  4f 57 4e 0a 45 4e 44 54  | 10:PENDOWN.ENDT|
00000cf0  4f 0a 0a 54 4f 20 4d 0a  4c 45 46 54 20 39 30 0a  |O..TO M.LEFT 90.|
00000d00  46 4f 52 57 41 52 44 20  38 30 0a 52 49 47 48 54  |FORWARD 80.RIGHT|
00000d10  20 39 30 0a 46 4f 52 57  41 52 44 20 32 30 0a 52  | 90.FORWARD 20.R|
00000d20  49 47 48 54 20 39 30 0a  46 4f 52 57 41 52 44 20  |IGHT 90.FORWARD |
00000d30  33 30 3a 42 41 43 4b 20  33 30 0a 4c 45 46 54 20  |30:BACK 30.LEFT |
00000d40  39 30 0a 46 4f 52 57 41  52 44 20 32 30 0a 52 49  |90.FORWARD 20.RI|
00000d50  47 48 54 20 39 30 0a 46  4f 52 57 41 52 44 20 38  |GHT 90.FORWARD 8|
00000d60  30 0a 4c 45 46 54 20 39  30 0a 50 45 4e 55 50 3a  |0.LEFT 90.PENUP:|
00000d70  46 4f 52 57 41 52 44 20  31 30 3a 50 45 4e 44 4f  |FORWARD 10:PENDO|
00000d80  57 4e 0a 45 4e 44 54 4f  0a 0a 54 4f 20 4e 0a 4c  |WN.ENDTO..TO N.L|
00000d90  45 46 54 20 39 30 0a 46  4f 52 57 41 52 44 20 38  |EFT 90.FORWARD 8|
00000da0  30 0a 52 49 47 48 54 20  39 30 0a 46 4f 52 57 41  |0.RIGHT 90.FORWA|
00000db0  52 44 20 34 30 0a 52 49  47 48 54 20 39 30 0a 46  |RD 40.RIGHT 90.F|
00000dc0  4f 52 57 41 52 44 20 38  30 0a 4c 45 46 54 20 39  |ORWARD 80.LEFT 9|
00000dd0  30 0a 50 45 4e 55 50 3a  46 4f 52 57 41 52 44 20  |0.PENUP:FORWARD |
00000de0  31 30 3a 50 45 4e 44 4f  57 4e 0a 45 4e 44 54 4f  |10:PENDOWN.ENDTO|
00000df0  0a 0a 54 4f 20 50 0a 4c  45 46 54 20 39 30 0a 46  |..TO P.LEFT 90.F|
00000e00  4f 52 57 41 52 44 20 38  30 0a 52 49 47 48 54 20  |ORWARD 80.RIGHT |
00000e10  39 30 0a 46 4f 52 57 41  52 44 20 34 30 0a 52 49  |90.FORWARD 40.RI|
00000e20  47 48 54 20 39 30 0a 46  4f 52 57 41 52 44 20 34  |GHT 90.FORWARD 4|
00000e30  30 0a 52 49 47 48 54 20  39 30 0a 46 4f 52 57 41  |0.RIGHT 90.FORWA|
00000e40  52 44 20 34 30 0a 4c 45  46 54 20 39 30 0a 46 4f  |RD 40.LEFT 90.FO|
00000e50  52 57 41 52 44 20 34 30  0a 4c 45 46 54 20 39 30  |RWARD 40.LEFT 90|
00000e60  0a 50 45 4e 55 50 3a 46  4f 52 57 41 52 44 20 35  |.PENUP:FORWARD 5|
00000e70  30 3a 50 45 4e 44 4f 57  4e 0a 45 4e 44 54 4f 0a  |0:PENDOWN.ENDTO.|
00000e80  0a 54 4f 20 51 0a 4f 0a  50 45 4e 55 50 3a 42 41  |.TO Q.O.PENUP:BA|
00000e90  43 4b 20 31 30 3a 50 45  4e 44 4f 57 4e 0a 52 49  |CK 10:PENDOWN.RI|
00000ea0  47 48 54 20 31 38 30 2b  34 35 0a 46 4f 52 57 41  |GHT 180+45.FORWA|
00000eb0  52 44 20 33 30 0a 42 41  43 4b 20 33 30 0a 4c 45  |RD 30.BACK 30.LE|
00000ec0  46 54 20 31 38 30 2b 34  35 0a 50 45 4e 55 50 3a  |FT 180+45.PENUP:|
00000ed0  46 4f 52 57 41 52 44 20  31 30 3a 50 45 4e 44 4f  |FORWARD 10:PENDO|
00000ee0  57 4e 0a 45 4e 44 54 4f  0a 0a 54 4f 20 52 0a 4c  |WN.ENDTO..TO R.L|
00000ef0  45 46 54 20 39 30 0a 46  4f 52 57 41 52 44 20 38  |EFT 90.FORWARD 8|
00000f00  30 0a 52 49 47 48 54 20  39 30 0a 46 4f 52 57 41  |0.RIGHT 90.FORWA|
00000f10  52 44 20 34 30 0a 52 49  47 48 54 20 39 30 0a 46  |RD 40.RIGHT 90.F|
00000f20  4f 52 57 41 52 44 20 34  30 0a 52 49 47 48 54 20  |ORWARD 40.RIGHT |
00000f30  39 30 0a 46 4f 52 57 41  52 44 20 34 30 0a 4c 45  |90.FORWARD 40.LE|
00000f40  46 54 20 31 33 35 0a 46  4f 52 57 41 52 44 20 35  |FT 135.FORWARD 5|
00000f50  37 0a 42 41 43 4b 20 35  37 0a 52 49 47 48 54 20  |7.BACK 57.RIGHT |
00000f60  34 35 0a 46 4f 52 57 41  52 44 20 34 30 0a 4c 45  |45.FORWARD 40.LE|
00000f70  46 54 20 39 30 0a 50 45  4e 55 50 3a 46 4f 52 57  |FT 90.PENUP:FORW|
00000f80  41 52 44 20 35 30 3a 50  45 4e 44 4f 57 4e 0a 45  |ARD 50:PENDOWN.E|
00000f90  4e 44 54 4f 0a 0a 54 4f  20 53 0a 46 4f 52 57 41  |NDTO..TO S.FORWA|
00000fa0  52 44 20 34 30 0a 4c 45  46 54 20 39 30 0a 46 4f  |RD 40.LEFT 90.FO|
00000fb0  52 57 41 52 44 20 34 30  0a 4c 45 46 54 20 39 30  |RWARD 40.LEFT 90|
00000fc0  0a 46 4f 52 57 41 52 44  20 34 30 0a 52 49 47 48  |.FORWARD 40.RIGH|
00000fd0  54 20 39 30 0a 46 4f 52  57 41 52 44 20 34 30 0a  |T 90.FORWARD 40.|
00000fe0  52 49 47 48 54 20 39 30  0a 46 4f 52 57 41 52 44  |RIGHT 90.FORWARD|
00000ff0  20 34 30 0a 52 49 47 48  54 20 39 30 0a 50 45 4e  | 40.RIGHT 90.PEN|
00001000  55 50 0a 46 4f 52 57 41  52 44 20 38 30 0a 4c 45  |UP.FORWARD 80.LE|
00001010  46 54 20 39 30 0a 46 4f  52 57 41 52 44 20 31 30  |FT 90.FORWARD 10|
00001020  0a 50 45 4e 44 4f 57 4e  0a 45 4e 44 54 4f 0a 0a  |.PENDOWN.ENDTO..|
00001030  54 4f 20 54 0a 50 45 4e  55 50 3a 46 4f 52 57 41  |TO T.PENUP:FORWA|
00001040  52 44 20 32 30 3a 50 45  4e 44 4f 57 4e 0a 4c 45  |RD 20:PENDOWN.LE|
00001050  46 54 20 39 30 0a 46 4f  52 57 41 52 44 20 38 30  |FT 90.FORWARD 80|
00001060  0a 52 49 47 48 54 20 39  30 0a 46 4f 52 57 41 52  |.RIGHT 90.FORWAR|
00001070  44 20 32 30 0a 42 41 43  4b 20 34 30 0a 46 4f 52  |D 20.BACK 40.FOR|
00001080  57 41 52 44 20 32 30 0a  52 49 47 48 54 20 39 30  |WARD 20.RIGHT 90|
00001090  0a 46 4f 52 57 41 52 44  20 38 30 0a 4c 45 46 54  |.FORWARD 80.LEFT|
000010a0  20 39 30 0a 50 45 4e 55  50 3a 46 4f 52 57 41 52  | 90.PENUP:FORWAR|
000010b0  44 20 33 30 3a 50 45 4e  44 4f 57 4e 0a 45 4e 44  |D 30:PENDOWN.END|
000010c0  54 4f 0a 0a 54 4f 20 55  0a 4c 45 46 54 20 39 30  |TO..TO U.LEFT 90|
000010d0  0a 46 4f 52 57 41 52 44  20 38 30 0a 42 41 43 4b  |.FORWARD 80.BACK|
000010e0  20 38 30 0a 52 49 47 48  54 20 39 30 0a 46 4f 52  | 80.RIGHT 90.FOR|
000010f0  57 41 52 44 20 34 30 0a  4c 45 46 54 20 39 30 0a  |WARD 40.LEFT 90.|
00001100  46 4f 52 57 41 52 44 20  38 30 0a 42 41 43 4b 20  |FORWARD 80.BACK |
00001110  38 30 0a 52 49 47 48 54  20 39 30 0a 50 45 4e 55  |80.RIGHT 90.PENU|
00001120  50 3a 46 4f 52 57 41 52  44 20 31 30 3a 50 45 4e  |P:FORWARD 10:PEN|
00001130  44 4f 57 4e 0a 45 4e 44  54 4f 0a 0a 54 4f 20 56  |DOWN.ENDTO..TO V|
00001140  0a 4c 45 46 54 20 39 30  0a 46 4f 52 57 41 52 44  |.LEFT 90.FORWARD|
00001150  20 38 30 0a 42 41 43 4b  20 38 30 0a 52 49 47 48  | 80.BACK 80.RIGH|
00001160  54 20 34 35 0a 46 4f 52  57 41 52 44 20 35 37 0a  |T 45.FORWARD 57.|
00001170  4c 45 46 54 20 34 35 0a  46 4f 52 57 41 52 44 20  |LEFT 45.FORWARD |
00001180  34 30 0a 42 41 43 4b 20  34 30 0a 52 49 47 48 54  |40.BACK 40.RIGHT|
00001190  20 34 35 0a 42 41 43 4b  20 35 37 0a 52 49 47 48  | 45.BACK 57.RIGH|
000011a0  54 20 34 35 0a 50 45 4e  55 50 3a 46 4f 52 57 41  |T 45.PENUP:FORWA|
000011b0  52 44 20 35 30 3a 50 45  4e 44 4f 57 4e 0a 45 4e  |RD 50:PENDOWN.EN|
000011c0  44 54 4f 0a 0a 54 4f 20  57 0a 4c 45 46 54 20 39  |DTO..TO W.LEFT 9|
000011d0  30 0a 46 4f 52 57 41 52  44 20 38 30 0a 42 41 43  |0.FORWARD 80.BAC|
000011e0  4b 20 38 30 0a 52 49 47  48 54 20 39 30 0a 46 4f  |K 80.RIGHT 90.FO|
000011f0  52 57 41 52 44 20 32 30  0a 4c 45 46 54 20 39 30  |RWARD 20.LEFT 90|
00001200  0a 46 4f 52 57 41 52 44  20 33 30 0a 42 41 43 4b  |.FORWARD 30.BACK|
00001210  20 33 30 0a 52 49 47 48  54 20 39 30 0a 46 4f 52  | 30.RIGHT 90.FOR|
00001220  57 41 52 44 20 32 30 0a  4c 45 46 54 20 39 30 0a  |WARD 20.LEFT 90.|
00001230  46 4f 52 57 41 52 44 20  38 30 0a 42 41 43 4b 20  |FORWARD 80.BACK |
00001240  38 30 0a 52 49 47 48 54  20 39 30 0a 50 45 4e 55  |80.RIGHT 90.PENU|
00001250  50 3a 46 4f 52 57 41 52  44 20 31 30 3a 50 45 4e  |P:FORWARD 10:PEN|
00001260  44 4f 57 4e 0a 45 4e 44  54 4f 0a 0a 54 4f 20 58  |DOWN.ENDTO..TO X|
00001270  0a 4c 45 46 54 20 36 34  0a 46 4f 52 57 41 52 44  |.LEFT 64.FORWARD|
00001280  20 38 39 3a 42 41 43 4b  20 38 39 0a 52 49 47 48  | 89:BACK 89.RIGH|
00001290  54 20 36 34 0a 50 45 4e  55 50 3a 46 4f 52 57 41  |T 64.PENUP:FORWA|
000012a0  52 44 20 34 30 3a 50 45  4e 44 4f 57 4e 0a 4c 45  |RD 40:PENDOWN.LE|
000012b0  46 54 20 31 38 30 2d 36  34 0a 46 4f 52 57 41 52  |FT 180-64.FORWAR|
000012c0  44 20 38 39 3a 42 41 43  4b 20 38 39 0a 52 49 47  |D 89:BACK 89.RIG|
000012d0  48 54 20 31 38 30 2d 36  34 0a 50 45 4e 55 50 3a  |HT 180-64.PENUP:|
000012e0  46 4f 52 57 41 52 44 20  31 30 3a 50 45 4e 44 4f  |FORWARD 10:PENDO|
000012f0  57 4e 0a 45 4e 44 54 4f  0a 0a 54 4f 20 59 0a 50  |WN.ENDTO..TO Y.P|
00001300  45 4e 55 50 3a 46 4f 52  57 41 52 44 20 32 30 3a  |ENUP:FORWARD 20:|
00001310  4c 45 46 54 20 39 30 3a  50 45 4e 44 4f 57 4e 0a  |LEFT 90:PENDOWN.|
00001320  46 4f 52 57 41 52 44 20  34 30 3a 4c 45 46 54 20  |FORWARD 40:LEFT |
00001330  39 30 0a 46 4f 52 57 41  52 44 20 32 30 3a 52 49  |90.FORWARD 20:RI|
00001340  47 48 54 20 39 30 3a 46  4f 52 57 41 52 44 20 34  |GHT 90:FORWARD 4|
00001350  30 3a 42 41 43 4b 20 34  30 3a 4c 45 46 54 20 39  |0:BACK 40:LEFT 9|
00001360  30 3a 42 41 43 4b 20 34  30 0a 52 49 47 48 54 20  |0:BACK 40.RIGHT |
00001370  39 30 0a 46 4f 52 57 41  52 44 20 34 30 3a 42 41  |90.FORWARD 40:BA|
00001380  43 4b 20 34 30 3a 52 49  47 48 54 20 39 30 3a 42  |CK 40:RIGHT 90:B|
00001390  41 43 4b 20 32 30 0a 4c  45 46 54 20 39 30 0a 42  |ACK 20.LEFT 90.B|
000013a0  41 43 4b 20 34 30 0a 52  49 47 48 54 20 39 30 0a  |ACK 40.RIGHT 90.|
000013b0  50 45 4e 55 50 3a 46 4f  52 57 41 52 44 20 33 30  |PENUP:FORWARD 30|
000013c0  3a 50 45 4e 44 4f 57 4e  0a 45 4e 44 54 4f 0a 0a  |:PENDOWN.ENDTO..|
000013d0  54 4f 20 5a 0a 4c 45 46  54 20 36 34 3a 46 4f 52  |TO Z.LEFT 64:FOR|
000013e0  57 41 52 44 20 38 39 3a  42 41 43 4b 20 38 39 0a  |WARD 89:BACK 89.|
000013f0  4c 45 46 54 20 39 30 2d  36 34 0a 50 45 4e 55 50  |LEFT 90-64.PENUP|
00001400  3a 46 4f 52 57 41 52 44  20 38 30 3a 52 49 47 48  |:FORWARD 80:RIGH|
00001410  54 20 39 30 3a 50 45 4e  44 4f 57 4e 0a 46 4f 52  |T 90:PENDOWN.FOR|
00001420  57 41 52 44 20 34 30 0a  52 49 47 48 54 20 39 30  |WARD 40.RIGHT 90|
00001430  0a 50 45 4e 55 50 3a 46  4f 52 57 41 52 44 20 38  |.PENUP:FORWARD 8|
00001440  30 3a 4c 45 46 54 20 39  30 3a 50 45 4e 44 4f 57  |0:LEFT 90:PENDOW|
00001450  4e 0a 42 41 43 4b 20 34  30 3a 50 45 4e 55 50 3a  |N.BACK 40:PENUP:|
00001460  46 4f 52 57 41 52 44 20  35 30 3a 50 45 4e 44 4f  |FORWARD 50:PENDO|
00001470  57 4e 0a 45 4e 44 54 4f  0a                       |WN.ENDTO.|
00001479