� Assemble BallBot AI
% � Module (C) Dominic Ford 1997/8
 :
(1 � Setup variables / allocate zero-page bytes
2) �6:�=&4000:oswrch=&FFEE:osbyte=&FFF4
<M idle=&81:near=&82:searching=&83:left=&84:right=&85:steer=&86:tending=&87
FJ reving=&88:stage=&89:turbo=&8A:reverse=&8B:spincount=&8C:backspin=&8D
PH freqa=&70:freqb=&71:freqc=&72:freqd=&73:fa=&74:fb=&75:fc=&76:fd=&77
Z :
d � Start assembly
n �pass=0 � 3 � 3
x :
� � Packaging for module
� P%=&4000:[OPT pass
�6 LDA#&8C:JSRosbyte \ Select tape to make ADFS free
�. LDY#0:.text LDAwelcome,Y:CMP#&FF:BEQunzip
�* JSRoswrch:INY:JMPtext \ Hello World!!
�� .unzip LDA#(start � 256):STA&78:LDA#(start � 256):STA&79:LDY#0:STY&7A:LDA#&E:STA&7B:.movlop LDA(&78),Y:STA(&7A),Y:INY:BNEmovlop:INC&79:INC&7B:LDA&7B:CMP#&18:BNEmovlop:JMP&E00 \ Invade ADFS memory
�- .welcome EQUB 17:EQUB 0:EQUB 17:EQUB 129
�4 EQUS "BallBot AI module 6502 version [Demo]   "
�4 EQUS "Original   - Dominic Ford Sept-Dec 1997 "
�4 EQUS "Conversion - Dominic Ford Jan 1998      "
�4 EQUB 17:EQUB 1:EQUB 17:EQUB 128:EQUB &FF:.start
� ]
� :

6 � 6502 Artificial Intelligence module for BallBot

 :

  O%=P%:P%=&E00:[OPT (pass+4)

"$ JMPsetupbb:JMPai \ Entry points

, .setupbb LDA#0:STAreving:STAleft:STAright:STAsearching:STAnear:STAsteer:STAstage:STAidle:STAspincount:LDA#1:STAtending:RTS

63 .ai LDA#0:STAleft:STAright:STAturbo:STAreverse

@F LDAnear:CMP#0:BEQnotnear:LDAstage:CMP#4:BCSnotnear:JSRdonearstuff

JR .notnear LDAnear:BNEnotmov:LDAstage:CMP#1:BEQnothunt:CMP#3:BCSnothunt:JSRhunt

T? .nothunt LDAstage:CMP#4:BCSnotmov:�#1:BEQnotmov:JSRmoveout

^5 .notmov LDAstage:CMP#4:BNEnotrelease:JSRreleaseb

h� .notrelease LDA#0:STA&80:LDAleft:�#1:CLC:ADC&80:STA&80:LDAright:�#2:CLC:ADC&80:STA&80:CMP#3:BNEturnsend:LDA#0:STA&80:.turnsend LDAidle:BEQnotdead:LDA#3:STA&80

r� .notdead LDAturbo:�#4:CLC:ADC&80:STA&80:LDAreverse:�#8:CLC:ADC&80:STA&80:LDAspincount:BEQnospin:LDA&80:�A#32:STA&80:DECspincount:.nospin LDAbackspin:BEQnobackspn

|' LDA&80:�A#48:STA&80:.nobackspn RTS

�I .hunt LDAfreqa:CMP#8:BCSnothr1:LDAfa:CMP#�"B":BEQnothr1:JMPrevershnt

�K .nothr1 LDAfreqb:CMP#4:BCSnothr2:LDAfb:CMP#�"B":BEQnothr2:JMPrevershnt

�> .nothr2 LDAfreqc:CMP#4:BCSnothr3:LDAfc:CMP#�"B":BEQnothr3

�P .revershnt LDA#5:STAreving:LDA#&FF:STAreverse:STAturbo:STAleft:STAright:RTS

�t .nothr3 LDAreving:BEQnothrev:LDAfreqa:CMP#38:BCCconthrev:LDAfreqb:CMP#38:BCCconthrev:LDAfreqc:CMP#38:BCSnothrev

�@ .conthrev DECreving:LDA#&FF:STAturbo:STAleft:STAreverse:RTS

� .nothrev LDA#0:STAreving

�! \ Rotate to face ball (L310)

�L LDAfb:CMP#�"B":BNEnottendl:LDAfreqb:CMP#38:BCCnottendl:LDA#0:STAtending

�` .nottendl LDAfc:CMP#�"B":BNEnottendr:LDAfreqc:CMP#38:BCCnottendr:LDA#1:STAtending:.nottendr

� \Pick best ball to aim at

� LDAfreqa:LSR A:LSR A:STA&80:ASL A:CLC:ADC&80:PHA:CMPfreqb:BCCnothnl:LDAfb:CMP#�"B":BNEnothnl:LDAfc:CMP#�"B":BNEhnl:LDAfreqb:CMPfreqc:BCSnothnl:.hnl LDA#&FF:STAleft:STAsteer:PLA:RTS

�� .nothnl PLA:CMPfreqc:BCCnothnr:LDAfc:CMP#�"B":BNEnothnr:LDAfb:CMP#�"B":BNEhnr:LDAfreqc:CMPfreqb:BCSnothnr:.hnr LDA#&FF:STAright:LDA#1:STAsteer:RTS
< .nothnr LDAfa:CMP#�"B":BNEl370:LDX#&FF:STXleft:STXright
� LDA#0:STAsteer:LDAsearching:LSR A:STAsearching:LDX#0:LDAfreqa:CMP#25:BCCnofaadd3:LDX#&FF:.nofaadd3 STXturbo:TXA:�#&FF:�#5:STAspincount:RTS
> .l370 LDAfb:CMP#�"B":BNEl380:LDA#&FF:STAsteer:STAleft:RTS
&K .l380 LDAfc:CMP#�"B":BNEl390:LDA#1:STAsteer:LDA#&FF:STAright:RTS:.l390
0- \ If no ball in sight, continue rotation
:� INCsearching:LDA#0:STAsteer:STAturbo:STAsteer:LDAsearching:CMP#6:BCCnotturrot:LDA#&FF:STAturbo:.notturrot LDX#&FF:LDAtending:BEQtend0:STXright:JMPl430:.tend0 STXleft
D? .l430 LDAsearching:CMP#5:BNEl440:LDAtending:�#1:STAtending
N? .l440 LDAsearching:LDA#0:CMP#50:BCCl450:INCstage:.l450 RTS
X RTS
b :
l� .moveout LDAfreqa:CMP#8:BCCmovonet:LDAfreqb:CMP#8:BCCmovonet:LDAfreqc:CMP#8:BCCmovonet:LDAreving:BEQl510:LDAfreqa:CMP#19:BCCmovonet:LDAfreqb:CMP#19:BCCmovonet:LDAfreqc:CMP#19:BCSl510
v? .movonet LDA#&FF:STAreving:STAreverse:STAleft:STAright:RTS
�� .l510 LDA#0:STAreving:LDAfa:CMP#�"B":BEQgoget:LDAfb:CMP#�"B":BEQgoget:LDAfc:CMP#�"B":BNEl540:.goget DECstage:LDA#44:STAsearching:RTS
�S .l540 LDAfa:CMP#�"N":BEQmovorig:CMP#�"P":BNEl560:.movorig LDA#&FF:STAright:RTS
�F .l560 LDAfb:CMP#�"N":BEQl580:CMP#�"P":BEQl570:LDA#&FF:STAleft:RTS
�E .l570 LDAfreqb:CMP#38:BCSl580:LDA#&FF:STAright:LDA#1:STAnear:RTS
�0 .l580 LDA#&FF:STAturbo:STAleft:STAright:RTS
�T .donearstuff LDAfreqa:CMP#8:BCSl640:LDAfa:CMP#�"B":BEQl640:LDA#&FF:STAright:RTS
�T .l640 LDAnear:CMP#1:BNEl650:LDAfd:CMP#�"U":BEQl650:LDA#&FF:STAleft:STAright:RTS
�X .l650 INCnear:LDA#&FF:STAleft:STAturbo:LDAnear:�#1:BEQnearl:LDA#&FF:.nearl STAright
�` LDAnear:CMP#18:BCCnearend:LDA#0:STAnear:STAsearching:INCstage:LDA#1:STAtending:.nearend RTS
�f .releaseb LDA#&FF:STAbackspin:INCnear:LDAnear:CMP#10:BCCnearend:LDA#0:STAnear:LDA#&FF:STAidle:RTS
� ]:�
� � "SAVE DemoAI 4000 "+�~O%
�

00000000  0d 00 0a 1a 20 f4 20 41  73 73 65 6d 62 6c 65 20  |.... . Assemble |
00000010  42 61 6c 6c 42 6f 74 20  41 49 0d 00 14 25 20 f4  |BallBot AI...% .|
00000020  20 4d 6f 64 75 6c 65 20  28 43 29 20 44 6f 6d 69  | Module (C) Domi|
00000030  6e 69 63 20 46 6f 72 64  20 31 39 39 37 2f 38 0d  |nic Ford 1997/8.|
00000040  00 1e 06 20 3a 0d 00 28  31 20 f4 20 53 65 74 75  |... :..(1 . Setu|
00000050  70 20 76 61 72 69 61 62  6c 65 73 20 2f 20 61 6c  |p variables / al|
00000060  6c 6f 63 61 74 65 20 7a  65 72 6f 2d 70 61 67 65  |locate zero-page|
00000070  20 62 79 74 65 73 0d 00  32 29 20 eb 36 3a d3 3d  | bytes..2) .6:.=|
00000080  26 34 30 30 30 3a 6f 73  77 72 63 68 3d 26 46 46  |&4000:oswrch=&FF|
00000090  45 45 3a 6f 73 62 79 74  65 3d 26 46 46 46 34 0d  |EE:osbyte=&FFF4.|
000000a0  00 3c 4d 20 69 64 6c 65  3d 26 38 31 3a 6e 65 61  |.<M idle=&81:nea|
000000b0  72 3d 26 38 32 3a 73 65  61 72 63 68 69 6e 67 3d  |r=&82:searching=|
000000c0  26 38 33 3a 6c 65 66 74  3d 26 38 34 3a 72 69 67  |&83:left=&84:rig|
000000d0  68 74 3d 26 38 35 3a 73  74 65 65 72 3d 26 38 36  |ht=&85:steer=&86|
000000e0  3a 74 65 6e 64 69 6e 67  3d 26 38 37 0d 00 46 4a  |:tending=&87..FJ|
000000f0  20 72 65 76 69 6e 67 3d  26 38 38 3a 73 74 61 67  | reving=&88:stag|
00000100  65 3d 26 38 39 3a 74 75  72 62 6f 3d 26 38 41 3a  |e=&89:turbo=&8A:|
00000110  72 65 76 65 72 73 65 3d  26 38 42 3a 73 70 69 6e  |reverse=&8B:spin|
00000120  63 6f 75 6e 74 3d 26 38  43 3a 62 61 63 6b 73 70  |count=&8C:backsp|
00000130  69 6e 3d 26 38 44 0d 00  50 48 20 66 72 65 71 61  |in=&8D..PH freqa|
00000140  3d 26 37 30 3a 66 72 65  71 62 3d 26 37 31 3a 66  |=&70:freqb=&71:f|
00000150  72 65 71 63 3d 26 37 32  3a 66 72 65 71 64 3d 26  |reqc=&72:freqd=&|
00000160  37 33 3a 66 61 3d 26 37  34 3a 66 62 3d 26 37 35  |73:fa=&74:fb=&75|
00000170  3a 66 63 3d 26 37 36 3a  66 64 3d 26 37 37 0d 00  |:fc=&76:fd=&77..|
00000180  5a 06 20 3a 0d 00 64 15  20 f4 20 53 74 61 72 74  |Z. :..d. . Start|
00000190  20 61 73 73 65 6d 62 6c  79 0d 00 6e 14 20 e3 70  | assembly..n. .p|
000001a0  61 73 73 3d 30 20 b8 20  33 20 88 20 33 0d 00 78  |ass=0 . 3 . 3..x|
000001b0  06 20 3a 0d 00 82 1b 20  f4 20 50 61 63 6b 61 67  |. :.... . Packag|
000001c0  69 6e 67 20 66 6f 72 20  6d 6f 64 75 6c 65 0d 00  |ing for module..|
000001d0  8c 17 20 50 25 3d 26 34  30 30 30 3a 5b 4f 50 54  |.. P%=&4000:[OPT|
000001e0  20 70 61 73 73 0d 00 96  36 20 4c 44 41 23 26 38  | pass...6 LDA#&8|
000001f0  43 3a 4a 53 52 6f 73 62  79 74 65 20 5c 20 53 65  |C:JSRosbyte \ Se|
00000200  6c 65 63 74 20 74 61 70  65 20 74 6f 20 6d 61 6b  |lect tape to mak|
00000210  65 20 41 44 46 53 20 66  72 65 65 0d 00 a0 2e 20  |e ADFS free.... |
00000220  4c 44 59 23 30 3a 2e 74  65 78 74 20 4c 44 41 77  |LDY#0:.text LDAw|
00000230  65 6c 63 6f 6d 65 2c 59  3a 43 4d 50 23 26 46 46  |elcome,Y:CMP#&FF|
00000240  3a 42 45 51 75 6e 7a 69  70 0d 00 aa 2a 20 4a 53  |:BEQunzip...* JS|
00000250  52 6f 73 77 72 63 68 3a  49 4e 59 3a 4a 4d 50 74  |Roswrch:INY:JMPt|
00000260  65 78 74 20 5c 20 48 65  6c 6c 6f 20 57 6f 72 6c  |ext \ Hello Worl|
00000270  64 21 21 0d 00 b4 c8 20  2e 75 6e 7a 69 70 20 4c  |d!!.... .unzip L|
00000280  44 41 23 28 73 74 61 72  74 20 83 20 32 35 36 29  |DA#(start . 256)|
00000290  3a 53 54 41 26 37 38 3a  4c 44 41 23 28 73 74 61  |:STA&78:LDA#(sta|
000002a0  72 74 20 81 20 32 35 36  29 3a 53 54 41 26 37 39  |rt . 256):STA&79|
000002b0  3a 4c 44 59 23 30 3a 53  54 59 26 37 41 3a 4c 44  |:LDY#0:STY&7A:LD|
000002c0  41 23 26 45 3a 53 54 41  26 37 42 3a 2e 6d 6f 76  |A#&E:STA&7B:.mov|
000002d0  6c 6f 70 20 4c 44 41 28  26 37 38 29 2c 59 3a 53  |lop LDA(&78),Y:S|
000002e0  54 41 28 26 37 41 29 2c  59 3a 49 4e 59 3a 42 4e  |TA(&7A),Y:INY:BN|
000002f0  45 6d 6f 76 6c 6f 70 3a  49 4e 43 26 37 39 3a 49  |Emovlop:INC&79:I|
00000300  4e 43 26 37 42 3a 4c 44  41 26 37 42 3a 43 4d 50  |NC&7B:LDA&7B:CMP|
00000310  23 26 31 38 3a 42 4e 45  6d 6f 76 6c 6f 70 3a 4a  |#&18:BNEmovlop:J|
00000320  4d 50 26 45 30 30 20 5c  20 49 6e 76 61 64 65 20  |MP&E00 \ Invade |
00000330  41 44 46 53 20 6d 65 6d  6f 72 79 0d 00 be 2d 20  |ADFS memory...- |
00000340  2e 77 65 6c 63 6f 6d 65  20 45 51 55 42 20 31 37  |.welcome EQUB 17|
00000350  3a 45 51 55 42 20 30 3a  45 51 55 42 20 31 37 3a  |:EQUB 0:EQUB 17:|
00000360  45 51 55 42 20 31 32 39  0d 00 c8 34 20 45 51 55  |EQUB 129...4 EQU|
00000370  53 20 22 42 61 6c 6c 42  6f 74 20 41 49 20 6d 6f  |S "BallBot AI mo|
00000380  64 75 6c 65 20 36 35 30  32 20 76 65 72 73 69 6f  |dule 6502 versio|
00000390  6e 20 5b 44 65 6d 6f 5d  20 20 20 22 0d 00 d2 34  |n [Demo]   "...4|
000003a0  20 45 51 55 53 20 22 4f  72 69 67 69 6e 61 6c 20  | EQUS "Original |
000003b0  20 20 2d 20 44 6f 6d 69  6e 69 63 20 46 6f 72 64  |  - Dominic Ford|
000003c0  20 53 65 70 74 2d 44 65  63 20 31 39 39 37 20 22  | Sept-Dec 1997 "|
000003d0  0d 00 dc 34 20 45 51 55  53 20 22 43 6f 6e 76 65  |...4 EQUS "Conve|
000003e0  72 73 69 6f 6e 20 2d 20  44 6f 6d 69 6e 69 63 20  |rsion - Dominic |
000003f0  46 6f 72 64 20 4a 61 6e  20 31 39 39 38 20 20 20  |Ford Jan 1998   |
00000400  20 20 20 22 0d 00 e6 34  20 45 51 55 42 20 31 37  |   "...4 EQUB 17|
00000410  3a 45 51 55 42 20 31 3a  45 51 55 42 20 31 37 3a  |:EQUB 1:EQUB 17:|
00000420  45 51 55 42 20 31 32 38  3a 45 51 55 42 20 26 46  |EQUB 128:EQUB &F|
00000430  46 3a 2e 73 74 61 72 74  0d 00 f0 06 20 5d 0d 00  |F:.start.... ]..|
00000440  fa 06 20 3a 0d 01 04 36  20 f4 20 36 35 30 32 20  |.. :...6 . 6502 |
00000450  41 72 74 69 66 69 63 69  61 6c 20 49 6e 74 65 6c  |Artificial Intel|
00000460  6c 69 67 65 6e 63 65 20  6d 6f 64 75 6c 65 20 66  |ligence module f|
00000470  6f 72 20 42 61 6c 6c 42  6f 74 0d 01 0e 06 20 3a  |or BallBot.... :|
00000480  0d 01 18 20 20 4f 25 3d  50 25 3a 50 25 3d 26 45  |...  O%=P%:P%=&E|
00000490  30 30 3a 5b 4f 50 54 20  28 70 61 73 73 2b 34 29  |00:[OPT (pass+4)|
000004a0  0d 01 22 24 20 4a 4d 50  73 65 74 75 70 62 62 3a  |.."$ JMPsetupbb:|
000004b0  4a 4d 50 61 69 20 5c 20  45 6e 74 72 79 20 70 6f  |JMPai \ Entry po|
000004c0  69 6e 74 73 0d 01 2c 7f  20 2e 73 65 74 75 70 62  |ints..,. .setupb|
000004d0  62 20 4c 44 41 23 30 3a  53 54 41 72 65 76 69 6e  |b LDA#0:STArevin|
000004e0  67 3a 53 54 41 6c 65 66  74 3a 53 54 41 72 69 67  |g:STAleft:STArig|
000004f0  68 74 3a 53 54 41 73 65  61 72 63 68 69 6e 67 3a  |ht:STAsearching:|
00000500  53 54 41 6e 65 61 72 3a  53 54 41 73 74 65 65 72  |STAnear:STAsteer|
00000510  3a 53 54 41 73 74 61 67  65 3a 53 54 41 69 64 6c  |:STAstage:STAidl|
00000520  65 3a 53 54 41 73 70 69  6e 63 6f 75 6e 74 3a 4c  |e:STAspincount:L|
00000530  44 41 23 31 3a 53 54 41  74 65 6e 64 69 6e 67 3a  |DA#1:STAtending:|
00000540  52 54 53 0d 01 36 33 20  2e 61 69 20 4c 44 41 23  |RTS..63 .ai LDA#|
00000550  30 3a 53 54 41 6c 65 66  74 3a 53 54 41 72 69 67  |0:STAleft:STArig|
00000560  68 74 3a 53 54 41 74 75  72 62 6f 3a 53 54 41 72  |ht:STAturbo:STAr|
00000570  65 76 65 72 73 65 0d 01  40 46 20 4c 44 41 6e 65  |everse..@F LDAne|
00000580  61 72 3a 43 4d 50 23 30  3a 42 45 51 6e 6f 74 6e  |ar:CMP#0:BEQnotn|
00000590  65 61 72 3a 4c 44 41 73  74 61 67 65 3a 43 4d 50  |ear:LDAstage:CMP|
000005a0  23 34 3a 42 43 53 6e 6f  74 6e 65 61 72 3a 4a 53  |#4:BCSnotnear:JS|
000005b0  52 64 6f 6e 65 61 72 73  74 75 66 66 0d 01 4a 52  |Rdonearstuff..JR|
000005c0  20 2e 6e 6f 74 6e 65 61  72 20 4c 44 41 6e 65 61  | .notnear LDAnea|
000005d0  72 3a 42 4e 45 6e 6f 74  6d 6f 76 3a 4c 44 41 73  |r:BNEnotmov:LDAs|
000005e0  74 61 67 65 3a 43 4d 50  23 31 3a 42 45 51 6e 6f  |tage:CMP#1:BEQno|
000005f0  74 68 75 6e 74 3a 43 4d  50 23 33 3a 42 43 53 6e  |thunt:CMP#3:BCSn|
00000600  6f 74 68 75 6e 74 3a 4a  53 52 68 75 6e 74 0d 01  |othunt:JSRhunt..|
00000610  54 3f 20 2e 6e 6f 74 68  75 6e 74 20 4c 44 41 73  |T? .nothunt LDAs|
00000620  74 61 67 65 3a 43 4d 50  23 34 3a 42 43 53 6e 6f  |tage:CMP#4:BCSno|
00000630  74 6d 6f 76 3a 80 23 31  3a 42 45 51 6e 6f 74 6d  |tmov:.#1:BEQnotm|
00000640  6f 76 3a 4a 53 52 6d 6f  76 65 6f 75 74 0d 01 5e  |ov:JSRmoveout..^|
00000650  35 20 2e 6e 6f 74 6d 6f  76 20 4c 44 41 73 74 61  |5 .notmov LDAsta|
00000660  67 65 3a 43 4d 50 23 34  3a 42 4e 45 6e 6f 74 72  |ge:CMP#4:BNEnotr|
00000670  65 6c 65 61 73 65 3a 4a  53 52 72 65 6c 65 61 73  |elease:JSRreleas|
00000680  65 62 0d 01 68 a3 20 2e  6e 6f 74 72 65 6c 65 61  |eb..h. .notrelea|
00000690  73 65 20 4c 44 41 23 30  3a 53 54 41 26 38 30 3a  |se LDA#0:STA&80:|
000006a0  4c 44 41 6c 65 66 74 3a  80 23 31 3a 43 4c 43 3a  |LDAleft:.#1:CLC:|
000006b0  41 44 43 26 38 30 3a 53  54 41 26 38 30 3a 4c 44  |ADC&80:STA&80:LD|
000006c0  41 72 69 67 68 74 3a 80  23 32 3a 43 4c 43 3a 41  |Aright:.#2:CLC:A|
000006d0  44 43 26 38 30 3a 53 54  41 26 38 30 3a 43 4d 50  |DC&80:STA&80:CMP|
000006e0  23 33 3a 42 4e 45 74 75  72 6e 73 65 6e 64 3a 4c  |#3:BNEturnsend:L|
000006f0  44 41 23 30 3a 53 54 41  26 38 30 3a 2e 74 75 72  |DA#0:STA&80:.tur|
00000700  6e 73 65 6e 64 20 4c 44  41 69 64 6c 65 3a 42 45  |nsend LDAidle:BE|
00000710  51 6e 6f 74 64 65 61 64  3a 4c 44 41 23 33 3a 53  |Qnotdead:LDA#3:S|
00000720  54 41 26 38 30 0d 01 72  a6 20 2e 6e 6f 74 64 65  |TA&80..r. .notde|
00000730  61 64 20 4c 44 41 74 75  72 62 6f 3a 80 23 34 3a  |ad LDAturbo:.#4:|
00000740  43 4c 43 3a 41 44 43 26  38 30 3a 53 54 41 26 38  |CLC:ADC&80:STA&8|
00000750  30 3a 4c 44 41 72 65 76  65 72 73 65 3a 80 23 38  |0:LDAreverse:.#8|
00000760  3a 43 4c 43 3a 41 44 43  26 38 30 3a 53 54 41 26  |:CLC:ADC&80:STA&|
00000770  38 30 3a 4c 44 41 73 70  69 6e 63 6f 75 6e 74 3a  |80:LDAspincount:|
00000780  42 45 51 6e 6f 73 70 69  6e 3a 4c 44 41 26 38 30  |BEQnospin:LDA&80|
00000790  3a 84 41 23 33 32 3a 53  54 41 26 38 30 3a 44 45  |:.A#32:STA&80:DE|
000007a0  43 73 70 69 6e 63 6f 75  6e 74 3a 2e 6e 6f 73 70  |Cspincount:.nosp|
000007b0  69 6e 20 4c 44 41 62 61  63 6b 73 70 69 6e 3a 42  |in LDAbackspin:B|
000007c0  45 51 6e 6f 62 61 63 6b  73 70 6e 0d 01 7c 27 20  |EQnobackspn..|' |
000007d0  4c 44 41 26 38 30 3a 84  41 23 34 38 3a 53 54 41  |LDA&80:.A#48:STA|
000007e0  26 38 30 3a 2e 6e 6f 62  61 63 6b 73 70 6e 20 52  |&80:.nobackspn R|
000007f0  54 53 0d 01 86 49 20 2e  68 75 6e 74 20 4c 44 41  |TS...I .hunt LDA|
00000800  66 72 65 71 61 3a 43 4d  50 23 38 3a 42 43 53 6e  |freqa:CMP#8:BCSn|
00000810  6f 74 68 72 31 3a 4c 44  41 66 61 3a 43 4d 50 23  |othr1:LDAfa:CMP#|
00000820  97 22 42 22 3a 42 45 51  6e 6f 74 68 72 31 3a 4a  |."B":BEQnothr1:J|
00000830  4d 50 72 65 76 65 72 73  68 6e 74 0d 01 90 4b 20  |MPrevershnt...K |
00000840  2e 6e 6f 74 68 72 31 20  4c 44 41 66 72 65 71 62  |.nothr1 LDAfreqb|
00000850  3a 43 4d 50 23 34 3a 42  43 53 6e 6f 74 68 72 32  |:CMP#4:BCSnothr2|
00000860  3a 4c 44 41 66 62 3a 43  4d 50 23 97 22 42 22 3a  |:LDAfb:CMP#."B":|
00000870  42 45 51 6e 6f 74 68 72  32 3a 4a 4d 50 72 65 76  |BEQnothr2:JMPrev|
00000880  65 72 73 68 6e 74 0d 01  9a 3e 20 2e 6e 6f 74 68  |ershnt...> .noth|
00000890  72 32 20 4c 44 41 66 72  65 71 63 3a 43 4d 50 23  |r2 LDAfreqc:CMP#|
000008a0  34 3a 42 43 53 6e 6f 74  68 72 33 3a 4c 44 41 66  |4:BCSnothr3:LDAf|
000008b0  63 3a 43 4d 50 23 97 22  42 22 3a 42 45 51 6e 6f  |c:CMP#."B":BEQno|
000008c0  74 68 72 33 0d 01 a4 50  20 2e 72 65 76 65 72 73  |thr3...P .revers|
000008d0  68 6e 74 20 4c 44 41 23  35 3a 53 54 41 72 65 76  |hnt LDA#5:STArev|
000008e0  69 6e 67 3a 4c 44 41 23  26 46 46 3a 53 54 41 72  |ing:LDA#&FF:STAr|
000008f0  65 76 65 72 73 65 3a 53  54 41 74 75 72 62 6f 3a  |everse:STAturbo:|
00000900  53 54 41 6c 65 66 74 3a  53 54 41 72 69 67 68 74  |STAleft:STAright|
00000910  3a 52 54 53 0d 01 ae 74  20 2e 6e 6f 74 68 72 33  |:RTS...t .nothr3|
00000920  20 4c 44 41 72 65 76 69  6e 67 3a 42 45 51 6e 6f  | LDAreving:BEQno|
00000930  74 68 72 65 76 3a 4c 44  41 66 72 65 71 61 3a 43  |threv:LDAfreqa:C|
00000940  4d 50 23 33 38 3a 42 43  43 63 6f 6e 74 68 72 65  |MP#38:BCCconthre|
00000950  76 3a 4c 44 41 66 72 65  71 62 3a 43 4d 50 23 33  |v:LDAfreqb:CMP#3|
00000960  38 3a 42 43 43 63 6f 6e  74 68 72 65 76 3a 4c 44  |8:BCCconthrev:LD|
00000970  41 66 72 65 71 63 3a 43  4d 50 23 33 38 3a 42 43  |Afreqc:CMP#38:BC|
00000980  53 6e 6f 74 68 72 65 76  0d 01 b8 40 20 2e 63 6f  |Snothrev...@ .co|
00000990  6e 74 68 72 65 76 20 44  45 43 72 65 76 69 6e 67  |nthrev DECreving|
000009a0  3a 4c 44 41 23 26 46 46  3a 53 54 41 74 75 72 62  |:LDA#&FF:STAturb|
000009b0  6f 3a 53 54 41 6c 65 66  74 3a 53 54 41 72 65 76  |o:STAleft:STArev|
000009c0  65 72 73 65 3a 52 54 53  0d 01 c2 1d 20 2e 6e 6f  |erse:RTS.... .no|
000009d0  74 68 72 65 76 20 4c 44  41 23 30 3a 53 54 41 72  |threv LDA#0:STAr|
000009e0  65 76 69 6e 67 0d 01 cc  21 20 5c 20 52 6f 74 61  |eving...! \ Rota|
000009f0  74 65 20 74 6f 20 66 61  63 65 20 62 61 6c 6c 20  |te to face ball |
00000a00  28 4c 33 31 30 29 0d 01  d6 4c 20 4c 44 41 66 62  |(L310)...L LDAfb|
00000a10  3a 43 4d 50 23 97 22 42  22 3a 42 4e 45 6e 6f 74  |:CMP#."B":BNEnot|
00000a20  74 65 6e 64 6c 3a 4c 44  41 66 72 65 71 62 3a 43  |tendl:LDAfreqb:C|
00000a30  4d 50 23 33 38 3a 42 43  43 6e 6f 74 74 65 6e 64  |MP#38:BCCnottend|
00000a40  6c 3a 4c 44 41 23 30 3a  53 54 41 74 65 6e 64 69  |l:LDA#0:STAtendi|
00000a50  6e 67 0d 01 e0 60 20 2e  6e 6f 74 74 65 6e 64 6c  |ng...` .nottendl|
00000a60  20 4c 44 41 66 63 3a 43  4d 50 23 97 22 42 22 3a  | LDAfc:CMP#."B":|
00000a70  42 4e 45 6e 6f 74 74 65  6e 64 72 3a 4c 44 41 66  |BNEnottendr:LDAf|
00000a80  72 65 71 63 3a 43 4d 50  23 33 38 3a 42 43 43 6e  |reqc:CMP#38:BCCn|
00000a90  6f 74 74 65 6e 64 72 3a  4c 44 41 23 31 3a 53 54  |ottendr:LDA#1:ST|
00000aa0  41 74 65 6e 64 69 6e 67  3a 2e 6e 6f 74 74 65 6e  |Atending:.notten|
00000ab0  64 72 0d 01 ea 1e 20 5c  50 69 63 6b 20 62 65 73  |dr.... \Pick bes|
00000ac0  74 20 62 61 6c 6c 20 74  6f 20 61 69 6d 20 61 74  |t ball to aim at|
00000ad0  0d 01 f4 b9 20 4c 44 41  66 72 65 71 61 3a 4c 53  |.... LDAfreqa:LS|
00000ae0  52 20 41 3a 4c 53 52 20  41 3a 53 54 41 26 38 30  |R A:LSR A:STA&80|
00000af0  3a 41 53 4c 20 41 3a 43  4c 43 3a 41 44 43 26 38  |:ASL A:CLC:ADC&8|
00000b00  30 3a 50 48 41 3a 43 4d  50 66 72 65 71 62 3a 42  |0:PHA:CMPfreqb:B|
00000b10  43 43 6e 6f 74 68 6e 6c  3a 4c 44 41 66 62 3a 43  |CCnothnl:LDAfb:C|
00000b20  4d 50 23 97 22 42 22 3a  42 4e 45 6e 6f 74 68 6e  |MP#."B":BNEnothn|
00000b30  6c 3a 4c 44 41 66 63 3a  43 4d 50 23 97 22 42 22  |l:LDAfc:CMP#."B"|
00000b40  3a 42 4e 45 68 6e 6c 3a  4c 44 41 66 72 65 71 62  |:BNEhnl:LDAfreqb|
00000b50  3a 43 4d 50 66 72 65 71  63 3a 42 43 53 6e 6f 74  |:CMPfreqc:BCSnot|
00000b60  68 6e 6c 3a 2e 68 6e 6c  20 4c 44 41 23 26 46 46  |hnl:.hnl LDA#&FF|
00000b70  3a 53 54 41 6c 65 66 74  3a 53 54 41 73 74 65 65  |:STAleft:STAstee|
00000b80  72 3a 50 4c 41 3a 52 54  53 0d 01 fe 97 20 2e 6e  |r:PLA:RTS.... .n|
00000b90  6f 74 68 6e 6c 20 50 4c  41 3a 43 4d 50 66 72 65  |othnl PLA:CMPfre|
00000ba0  71 63 3a 42 43 43 6e 6f  74 68 6e 72 3a 4c 44 41  |qc:BCCnothnr:LDA|
00000bb0  66 63 3a 43 4d 50 23 97  22 42 22 3a 42 4e 45 6e  |fc:CMP#."B":BNEn|
00000bc0  6f 74 68 6e 72 3a 4c 44  41 66 62 3a 43 4d 50 23  |othnr:LDAfb:CMP#|
00000bd0  97 22 42 22 3a 42 4e 45  68 6e 72 3a 4c 44 41 66  |."B":BNEhnr:LDAf|
00000be0  72 65 71 63 3a 43 4d 50  66 72 65 71 62 3a 42 43  |reqc:CMPfreqb:BC|
00000bf0  53 6e 6f 74 68 6e 72 3a  2e 68 6e 72 20 4c 44 41  |Snothnr:.hnr LDA|
00000c00  23 26 46 46 3a 53 54 41  72 69 67 68 74 3a 4c 44  |#&FF:STAright:LD|
00000c10  41 23 31 3a 53 54 41 73  74 65 65 72 3a 52 54 53  |A#1:STAsteer:RTS|
00000c20  0d 02 08 3c 20 2e 6e 6f  74 68 6e 72 20 4c 44 41  |...< .nothnr LDA|
00000c30  66 61 3a 43 4d 50 23 97  22 42 22 3a 42 4e 45 6c  |fa:CMP#."B":BNEl|
00000c40  33 37 30 3a 4c 44 58 23  26 46 46 3a 53 54 58 6c  |370:LDX#&FF:STXl|
00000c50  65 66 74 3a 53 54 58 72  69 67 68 74 0d 02 12 8f  |eft:STXright....|
00000c60  20 4c 44 41 23 30 3a 53  54 41 73 74 65 65 72 3a  | LDA#0:STAsteer:|
00000c70  4c 44 41 73 65 61 72 63  68 69 6e 67 3a 4c 53 52  |LDAsearching:LSR|
00000c80  20 41 3a 53 54 41 73 65  61 72 63 68 69 6e 67 3a  | A:STAsearching:|
00000c90  4c 44 58 23 30 3a 4c 44  41 66 72 65 71 61 3a 43  |LDX#0:LDAfreqa:C|
00000ca0  4d 50 23 32 35 3a 42 43  43 6e 6f 66 61 61 64 64  |MP#25:BCCnofaadd|
00000cb0  33 3a 4c 44 58 23 26 46  46 3a 2e 6e 6f 66 61 61  |3:LDX#&FF:.nofaa|
00000cc0  64 64 33 20 53 54 58 74  75 72 62 6f 3a 54 58 41  |dd3 STXturbo:TXA|
00000cd0  3a 82 23 26 46 46 3a 80  23 35 3a 53 54 41 73 70  |:.#&FF:.#5:STAsp|
00000ce0  69 6e 63 6f 75 6e 74 3a  52 54 53 0d 02 1c 3e 20  |incount:RTS...> |
00000cf0  2e 6c 33 37 30 20 4c 44  41 66 62 3a 43 4d 50 23  |.l370 LDAfb:CMP#|
00000d00  97 22 42 22 3a 42 4e 45  6c 33 38 30 3a 4c 44 41  |."B":BNEl380:LDA|
00000d10  23 26 46 46 3a 53 54 41  73 74 65 65 72 3a 53 54  |#&FF:STAsteer:ST|
00000d20  41 6c 65 66 74 3a 52 54  53 0d 02 26 4b 20 2e 6c  |Aleft:RTS..&K .l|
00000d30  33 38 30 20 4c 44 41 66  63 3a 43 4d 50 23 97 22  |380 LDAfc:CMP#."|
00000d40  42 22 3a 42 4e 45 6c 33  39 30 3a 4c 44 41 23 31  |B":BNEl390:LDA#1|
00000d50  3a 53 54 41 73 74 65 65  72 3a 4c 44 41 23 26 46  |:STAsteer:LDA#&F|
00000d60  46 3a 53 54 41 72 69 67  68 74 3a 52 54 53 3a 2e  |F:STAright:RTS:.|
00000d70  6c 33 39 30 0d 02 30 2d  20 5c 20 49 66 20 6e 6f  |l390..0- \ If no|
00000d80  20 62 61 6c 6c 20 69 6e  20 73 69 67 68 74 2c 20  | ball in sight, |
00000d90  63 6f 6e 74 69 6e 75 65  20 72 6f 74 61 74 69 6f  |continue rotatio|
00000da0  6e 0d 02 3a aa 20 49 4e  43 73 65 61 72 63 68 69  |n..:. INCsearchi|
00000db0  6e 67 3a 4c 44 41 23 30  3a 53 54 41 73 74 65 65  |ng:LDA#0:STAstee|
00000dc0  72 3a 53 54 41 74 75 72  62 6f 3a 53 54 41 73 74  |r:STAturbo:STAst|
00000dd0  65 65 72 3a 4c 44 41 73  65 61 72 63 68 69 6e 67  |eer:LDAsearching|
00000de0  3a 43 4d 50 23 36 3a 42  43 43 6e 6f 74 74 75 72  |:CMP#6:BCCnottur|
00000df0  72 6f 74 3a 4c 44 41 23  26 46 46 3a 53 54 41 74  |rot:LDA#&FF:STAt|
00000e00  75 72 62 6f 3a 2e 6e 6f  74 74 75 72 72 6f 74 20  |urbo:.notturrot |
00000e10  4c 44 58 23 26 46 46 3a  4c 44 41 74 65 6e 64 69  |LDX#&FF:LDAtendi|
00000e20  6e 67 3a 42 45 51 74 65  6e 64 30 3a 53 54 58 72  |ng:BEQtend0:STXr|
00000e30  69 67 68 74 3a 4a 4d 50  6c 34 33 30 3a 2e 74 65  |ight:JMPl430:.te|
00000e40  6e 64 30 20 53 54 58 6c  65 66 74 0d 02 44 3f 20  |nd0 STXleft..D? |
00000e50  2e 6c 34 33 30 20 4c 44  41 73 65 61 72 63 68 69  |.l430 LDAsearchi|
00000e60  6e 67 3a 43 4d 50 23 35  3a 42 4e 45 6c 34 34 30  |ng:CMP#5:BNEl440|
00000e70  3a 4c 44 41 74 65 6e 64  69 6e 67 3a 82 23 31 3a  |:LDAtending:.#1:|
00000e80  53 54 41 74 65 6e 64 69  6e 67 0d 02 4e 3f 20 2e  |STAtending..N? .|
00000e90  6c 34 34 30 20 4c 44 41  73 65 61 72 63 68 69 6e  |l440 LDAsearchin|
00000ea0  67 3a 4c 44 41 23 30 3a  43 4d 50 23 35 30 3a 42  |g:LDA#0:CMP#50:B|
00000eb0  43 43 6c 34 35 30 3a 49  4e 43 73 74 61 67 65 3a  |CCl450:INCstage:|
00000ec0  2e 6c 34 35 30 20 52 54  53 0d 02 58 08 20 52 54  |.l450 RTS..X. RT|
00000ed0  53 0d 02 62 06 20 3a 0d  02 6c bb 20 2e 6d 6f 76  |S..b. :..l. .mov|
00000ee0  65 6f 75 74 20 4c 44 41  66 72 65 71 61 3a 43 4d  |eout LDAfreqa:CM|
00000ef0  50 23 38 3a 42 43 43 6d  6f 76 6f 6e 65 74 3a 4c  |P#8:BCCmovonet:L|
00000f00  44 41 66 72 65 71 62 3a  43 4d 50 23 38 3a 42 43  |DAfreqb:CMP#8:BC|
00000f10  43 6d 6f 76 6f 6e 65 74  3a 4c 44 41 66 72 65 71  |Cmovonet:LDAfreq|
00000f20  63 3a 43 4d 50 23 38 3a  42 43 43 6d 6f 76 6f 6e  |c:CMP#8:BCCmovon|
00000f30  65 74 3a 4c 44 41 72 65  76 69 6e 67 3a 42 45 51  |et:LDAreving:BEQ|
00000f40  6c 35 31 30 3a 4c 44 41  66 72 65 71 61 3a 43 4d  |l510:LDAfreqa:CM|
00000f50  50 23 31 39 3a 42 43 43  6d 6f 76 6f 6e 65 74 3a  |P#19:BCCmovonet:|
00000f60  4c 44 41 66 72 65 71 62  3a 43 4d 50 23 31 39 3a  |LDAfreqb:CMP#19:|
00000f70  42 43 43 6d 6f 76 6f 6e  65 74 3a 4c 44 41 66 72  |BCCmovonet:LDAfr|
00000f80  65 71 63 3a 43 4d 50 23  31 39 3a 42 43 53 6c 35  |eqc:CMP#19:BCSl5|
00000f90  31 30 0d 02 76 3f 20 2e  6d 6f 76 6f 6e 65 74 20  |10..v? .movonet |
00000fa0  4c 44 41 23 26 46 46 3a  53 54 41 72 65 76 69 6e  |LDA#&FF:STArevin|
00000fb0  67 3a 53 54 41 72 65 76  65 72 73 65 3a 53 54 41  |g:STAreverse:STA|
00000fc0  6c 65 66 74 3a 53 54 41  72 69 67 68 74 3a 52 54  |left:STAright:RT|
00000fd0  53 0d 02 80 89 20 2e 6c  35 31 30 20 4c 44 41 23  |S.... .l510 LDA#|
00000fe0  30 3a 53 54 41 72 65 76  69 6e 67 3a 4c 44 41 66  |0:STAreving:LDAf|
00000ff0  61 3a 43 4d 50 23 97 22  42 22 3a 42 45 51 67 6f  |a:CMP#."B":BEQgo|
00001000  67 65 74 3a 4c 44 41 66  62 3a 43 4d 50 23 97 22  |get:LDAfb:CMP#."|
00001010  42 22 3a 42 45 51 67 6f  67 65 74 3a 4c 44 41 66  |B":BEQgoget:LDAf|
00001020  63 3a 43 4d 50 23 97 22  42 22 3a 42 4e 45 6c 35  |c:CMP#."B":BNEl5|
00001030  34 30 3a 2e 67 6f 67 65  74 20 44 45 43 73 74 61  |40:.goget DECsta|
00001040  67 65 3a 4c 44 41 23 34  34 3a 53 54 41 73 65 61  |ge:LDA#44:STAsea|
00001050  72 63 68 69 6e 67 3a 52  54 53 0d 02 8a 53 20 2e  |rching:RTS...S .|
00001060  6c 35 34 30 20 4c 44 41  66 61 3a 43 4d 50 23 97  |l540 LDAfa:CMP#.|
00001070  22 4e 22 3a 42 45 51 6d  6f 76 6f 72 69 67 3a 43  |"N":BEQmovorig:C|
00001080  4d 50 23 97 22 50 22 3a  42 4e 45 6c 35 36 30 3a  |MP#."P":BNEl560:|
00001090  2e 6d 6f 76 6f 72 69 67  20 4c 44 41 23 26 46 46  |.movorig LDA#&FF|
000010a0  3a 53 54 41 72 69 67 68  74 3a 52 54 53 0d 02 94  |:STAright:RTS...|
000010b0  46 20 2e 6c 35 36 30 20  4c 44 41 66 62 3a 43 4d  |F .l560 LDAfb:CM|
000010c0  50 23 97 22 4e 22 3a 42  45 51 6c 35 38 30 3a 43  |P#."N":BEQl580:C|
000010d0  4d 50 23 97 22 50 22 3a  42 45 51 6c 35 37 30 3a  |MP#."P":BEQl570:|
000010e0  4c 44 41 23 26 46 46 3a  53 54 41 6c 65 66 74 3a  |LDA#&FF:STAleft:|
000010f0  52 54 53 0d 02 9e 45 20  2e 6c 35 37 30 20 4c 44  |RTS...E .l570 LD|
00001100  41 66 72 65 71 62 3a 43  4d 50 23 33 38 3a 42 43  |Afreqb:CMP#38:BC|
00001110  53 6c 35 38 30 3a 4c 44  41 23 26 46 46 3a 53 54  |Sl580:LDA#&FF:ST|
00001120  41 72 69 67 68 74 3a 4c  44 41 23 31 3a 53 54 41  |Aright:LDA#1:STA|
00001130  6e 65 61 72 3a 52 54 53  0d 02 a8 30 20 2e 6c 35  |near:RTS...0 .l5|
00001140  38 30 20 4c 44 41 23 26  46 46 3a 53 54 41 74 75  |80 LDA#&FF:STAtu|
00001150  72 62 6f 3a 53 54 41 6c  65 66 74 3a 53 54 41 72  |rbo:STAleft:STAr|
00001160  69 67 68 74 3a 52 54 53  0d 02 b2 54 20 2e 64 6f  |ight:RTS...T .do|
00001170  6e 65 61 72 73 74 75 66  66 20 4c 44 41 66 72 65  |nearstuff LDAfre|
00001180  71 61 3a 43 4d 50 23 38  3a 42 43 53 6c 36 34 30  |qa:CMP#8:BCSl640|
00001190  3a 4c 44 41 66 61 3a 43  4d 50 23 97 22 42 22 3a  |:LDAfa:CMP#."B":|
000011a0  42 45 51 6c 36 34 30 3a  4c 44 41 23 26 46 46 3a  |BEQl640:LDA#&FF:|
000011b0  53 54 41 72 69 67 68 74  3a 52 54 53 0d 02 bc 54  |STAright:RTS...T|
000011c0  20 2e 6c 36 34 30 20 4c  44 41 6e 65 61 72 3a 43  | .l640 LDAnear:C|
000011d0  4d 50 23 31 3a 42 4e 45  6c 36 35 30 3a 4c 44 41  |MP#1:BNEl650:LDA|
000011e0  66 64 3a 43 4d 50 23 97  22 55 22 3a 42 45 51 6c  |fd:CMP#."U":BEQl|
000011f0  36 35 30 3a 4c 44 41 23  26 46 46 3a 53 54 41 6c  |650:LDA#&FF:STAl|
00001200  65 66 74 3a 53 54 41 72  69 67 68 74 3a 52 54 53  |eft:STAright:RTS|
00001210  0d 02 c6 58 20 2e 6c 36  35 30 20 49 4e 43 6e 65  |...X .l650 INCne|
00001220  61 72 3a 4c 44 41 23 26  46 46 3a 53 54 41 6c 65  |ar:LDA#&FF:STAle|
00001230  66 74 3a 53 54 41 74 75  72 62 6f 3a 4c 44 41 6e  |ft:STAturbo:LDAn|
00001240  65 61 72 3a 80 23 31 3a  42 45 51 6e 65 61 72 6c  |ear:.#1:BEQnearl|
00001250  3a 4c 44 41 23 26 46 46  3a 2e 6e 65 61 72 6c 20  |:LDA#&FF:.nearl |
00001260  53 54 41 72 69 67 68 74  0d 02 d0 60 20 4c 44 41  |STAright...` LDA|
00001270  6e 65 61 72 3a 43 4d 50  23 31 38 3a 42 43 43 6e  |near:CMP#18:BCCn|
00001280  65 61 72 65 6e 64 3a 4c  44 41 23 30 3a 53 54 41  |earend:LDA#0:STA|
00001290  6e 65 61 72 3a 53 54 41  73 65 61 72 63 68 69 6e  |near:STAsearchin|
000012a0  67 3a 49 4e 43 73 74 61  67 65 3a 4c 44 41 23 31  |g:INCstage:LDA#1|
000012b0  3a 53 54 41 74 65 6e 64  69 6e 67 3a 2e 6e 65 61  |:STAtending:.nea|
000012c0  72 65 6e 64 20 52 54 53  0d 02 da 66 20 2e 72 65  |rend RTS...f .re|
000012d0  6c 65 61 73 65 62 20 4c  44 41 23 26 46 46 3a 53  |leaseb LDA#&FF:S|
000012e0  54 41 62 61 63 6b 73 70  69 6e 3a 49 4e 43 6e 65  |TAbackspin:INCne|
000012f0  61 72 3a 4c 44 41 6e 65  61 72 3a 43 4d 50 23 31  |ar:LDAnear:CMP#1|
00001300  30 3a 42 43 43 6e 65 61  72 65 6e 64 3a 4c 44 41  |0:BCCnearend:LDA|
00001310  23 30 3a 53 54 41 6e 65  61 72 3a 4c 44 41 23 26  |#0:STAnear:LDA#&|
00001320  46 46 3a 53 54 41 69 64  6c 65 3a 52 54 53 0d 02  |FF:STAidle:RTS..|
00001330  e4 08 20 5d 3a ed 0d 02  ee 1f 20 ff 20 22 53 41  |.. ]:..... . "SA|
00001340  56 45 20 44 65 6d 6f 41  49 20 34 30 30 30 20 22  |VE DemoAI 4000 "|
00001350  2b c3 7e 4f 25 0d ff                              |+.~O%..|
00001357