� SMILER
!� FROM ELECTRON USER MAGAZINE
3� AUTHOR OF LIMERICK WISHES TO REMAIN ANONYMOUS
(�1
2�1
<�0,2
F�23,1,0;0;0;0;0
P�CIRCLE(600,550,400,5)
Z�SEMI(600,600,300,7)
d�SEMI(600,600,297,5)
n�CIRCLE(400,650,30,7)
x�CIRCLE(800,650,30,7)
�-�5,25)"There was a young man from Licks"
�2�3,26)"Who was bored with life in the sticks"
�!�9,27)"So he sat by his Elk"
�"�9,28)"And loosened his belt"
�&�8,29)"And enjoyed reading EUG36"
��13,15)"PRESS SPACE"
��:� �(-99)
�Z%=0
��"MENU"
�� �CIRCLE(X,Y,R,D)
�	� I,J
�� I=Y+R � Y-R � -4
�J=� (� (R*R-(I-Y)*(I-Y)))
�� X-J,I
�
� D,X+J,I

�

	� X,Y

�

"� �SEMI(X,Y,R,D)

,	� I,J

6� I=(Y+R)/2 � Y-R � -4

@J=� (� (R*R-(I-Y)*(I-Y)))

J� X-J,I

T
� D,X+J,I

h�

r	� X,Y

|�
�

00000000  0d 00 0a 0c f4 20 53 4d  49 4c 45 52 0d 00 14 21  |..... SMILER...!|
00000010  f4 20 46 52 4f 4d 20 45  4c 45 43 54 52 4f 4e 20  |. FROM ELECTRON |
00000020  55 53 45 52 20 4d 41 47  41 5a 49 4e 45 0d 00 1e  |USER MAGAZINE...|
00000030  33 f4 20 41 55 54 48 4f  52 20 4f 46 20 4c 49 4d  |3. AUTHOR OF LIM|
00000040  45 52 49 43 4b 20 57 49  53 48 45 53 20 54 4f 20  |ERICK WISHES TO |
00000050  52 45 4d 41 49 4e 20 41  4e 4f 4e 59 4d 4f 55 53  |REMAIN ANONYMOUS|
00000060  0d 00 28 06 eb 31 0d 00  32 06 fb 31 0d 00 3c 08  |..(..1..2..1..<.|
00000070  e6 30 2c 32 0d 00 46 13  ef 32 33 2c 31 2c 30 3b  |.0,2..F..23,1,0;|
00000080  30 3b 30 3b 30 3b 30 0d  00 50 1a f2 43 49 52 43  |0;0;0;0..P..CIRC|
00000090  4c 45 28 36 30 30 2c 35  35 30 2c 34 30 30 2c 35  |LE(600,550,400,5|
000000a0  29 0d 00 5a 18 f2 53 45  4d 49 28 36 30 30 2c 36  |)..Z..SEMI(600,6|
000000b0  30 30 2c 33 30 30 2c 37  29 0d 00 64 18 f2 53 45  |00,300,7)..d..SE|
000000c0  4d 49 28 36 30 30 2c 36  30 30 2c 32 39 37 2c 35  |MI(600,600,297,5|
000000d0  29 0d 00 6e 19 f2 43 49  52 43 4c 45 28 34 30 30  |)..n..CIRCLE(400|
000000e0  2c 36 35 30 2c 33 30 2c  37 29 0d 00 78 19 f2 43  |,650,30,7)..x..C|
000000f0  49 52 43 4c 45 28 38 30  30 2c 36 35 30 2c 33 30  |IRCLE(800,650,30|
00000100  2c 37 29 0d 00 a0 2d f1  8a 35 2c 32 35 29 22 54  |,7)...-..5,25)"T|
00000110  68 65 72 65 20 77 61 73  20 61 20 79 6f 75 6e 67  |here was a young|
00000120  20 6d 61 6e 20 66 72 6f  6d 20 4c 69 63 6b 73 22  | man from Licks"|
00000130  0d 00 a2 32 f1 8a 33 2c  32 36 29 22 57 68 6f 20  |...2..3,26)"Who |
00000140  77 61 73 20 62 6f 72 65  64 20 77 69 74 68 20 6c  |was bored with l|
00000150  69 66 65 20 69 6e 20 74  68 65 20 73 74 69 63 6b  |ife in the stick|
00000160  73 22 0d 00 a4 21 f1 8a  39 2c 32 37 29 22 53 6f  |s"...!..9,27)"So|
00000170  20 68 65 20 73 61 74 20  62 79 20 68 69 73 20 45  | he sat by his E|
00000180  6c 6b 22 0d 00 a6 22 f1  8a 39 2c 32 38 29 22 41  |lk"..."..9,28)"A|
00000190  6e 64 20 6c 6f 6f 73 65  6e 65 64 20 68 69 73 20  |nd loosened his |
000001a0  62 65 6c 74 22 0d 00 a7  26 f1 8a 38 2c 32 39 29  |belt"...&..8,29)|
000001b0  22 41 6e 64 20 65 6e 6a  6f 79 65 64 20 72 65 61  |"And enjoyed rea|
000001c0  64 69 6e 67 20 45 55 47  33 36 22 0d 00 a8 19 f1  |ding EUG36".....|
000001d0  8a 31 33 2c 31 35 29 22  50 52 45 53 53 20 53 50  |.13,15)"PRESS SP|
000001e0  41 43 45 22 0d 00 aa 0e  f5 3a fd 20 a6 28 2d 39  |ACE".....:. .(-9|
000001f0  39 29 0d 00 af 08 5a 25  3d 30 0d 00 b4 0b d7 22  |9)....Z%=0....."|
00000200  4d 45 4e 55 22 0d 00 be  16 dd 20 f2 43 49 52 43  |MENU"..... .CIRC|
00000210  4c 45 28 58 2c 59 2c 52  2c 44 29 0d 00 c8 09 ea  |LE(X,Y,R,D).....|
00000220  20 49 2c 4a 0d 00 d2 16  e3 20 49 3d 59 2b 52 20  | I,J..... I=Y+R |
00000230  b8 20 59 2d 52 20 88 20  2d 34 0d 00 dc 1d 4a 3d  |. Y-R . -4....J=|
00000240  b6 20 28 94 20 28 52 2a  52 2d 28 49 2d 59 29 2a  |. (. (R*R-(I-Y)*|
00000250  28 49 2d 59 29 29 29 0d  00 e6 0b ec 20 58 2d 4a  |(I-Y)))..... X-J|
00000260  2c 49 0d 00 f0 0d f0 20  44 2c 58 2b 4a 2c 49 0d  |,I..... D,X+J,I.|
00000270  01 04 05 ed 0d 01 0e 09  ec 20 58 2c 59 0d 01 18  |......... X,Y...|
00000280  05 e1 0d 01 22 14 dd 20  f2 53 45 4d 49 28 58 2c  |....".. .SEMI(X,|
00000290  59 2c 52 2c 44 29 0d 01  2c 09 ea 20 49 2c 4a 0d  |Y,R,D)..,.. I,J.|
000002a0  01 36 1a e3 20 49 3d 28  59 2b 52 29 2f 32 20 b8  |.6.. I=(Y+R)/2 .|
000002b0  20 59 2d 52 20 88 20 2d  34 0d 01 40 1d 4a 3d b6  | Y-R . -4..@.J=.|
000002c0  20 28 94 20 28 52 2a 52  2d 28 49 2d 59 29 2a 28  | (. (R*R-(I-Y)*(|
000002d0  49 2d 59 29 29 29 0d 01  4a 0b ec 20 58 2d 4a 2c  |I-Y)))..J.. X-J,|
000002e0  49 0d 01 54 0d f0 20 44  2c 58 2b 4a 2c 49 0d 01  |I..T.. D,X+J,I..|
000002f0  68 05 ed 0d 01 72 09 ec  20 58 2c 59 0d 01 7c 05  |h....r.. X,Y..|.|
00000300  e1 0d ff                                          |...|
00000303