{ BLOCK 0000 } C6 Q ]+]p ]+]q A]eQ!@g7mRz MB Return Stack Fulls}!< C+ !B C | c3 b6 0e 51 00 ff ff ff dd 2b dd 70 00 dd 2b dd 71 00 c1 dd e5 d1 21 40 e7 b7 ed 52 fa a0 00 cd 42 08 11 52 65 74 75 72 6e 20 53 74 61 63 6b 20 46 75 6c 6c f3 fd 21 3c 00 c3 2b 0a 21 42 00 c3 C Terse 14-Mar-79 Hello .;.]N ]#]F ]#]e | 43 08 19 0d 0a 54 65 72 73 65 20 20 31 34 2d 4d 61 72 2d 37 39 0d 0a 48 65 6c 6c 6f ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 03 2e 3b 2e dd 4e 00 dd 23 dd 46 00 dd 23 dd e5 Q!$g7mRr MB Return Stack Empty}i o gi CONSTANTOt 9 I M I | d1 21 a4 e7 b7 ed 52 f2 a0 00 cd 42 08 12 52 65 74 75 72 6e 20 53 74 61 63 6b 20 45 6d 70 74 79 fd e9 0a 03 6f 0a 03 67 e9 00 00 08 43 4f 4e 53 54 41 4e 54 cf 74 06 39 0d 49 03 cd 00 02 06 49 Q Q Q t ) consta^#Vke!x 9 @_mRR MB Stack FullI 0MQ q 1MQ | 03 d1 00 d1 05 d1 05 74 00 a9 00 05 63 6f 6e 73 74 e1 5e 23 56 eb e5 21 f8 ff 39 11 40 df ed 52 d2 a0 00 cd 42 08 0a 53 74 61 63 6b 20 46 75 6c 6c c9 00 01 30 cd d1 00 00 00 f1 00 01 31 cd d1 z toffMQ 'g shiMQ W VARIABLEOt 9 I M I Q Q [ y Q " | 00 01 00 fa 00 04 74 6f 66 66 cd d1 00 a7 e7 03 01 03 73 68 69 cd d1 00 d7 00 0f 01 08 56 41 52 49 41 42 4c 45 cf 74 06 39 0d 49 03 cd 00 02 06 49 03 d1 00 d1 05 5b 01 0b 03 79 02 d1 05 22 03 I [ z t DPMQ `J VPTRMQ `T BASEMQ `` LASTMQ `l STATE | 49 03 02 00 5b 01 7a 03 74 00 1a 01 02 44 50 cd d1 00 00 e0 4a 01 04 56 50 54 52 cd d1 00 02 e0 54 01 04 42 41 53 45 cd d1 00 04 e0 60 01 04 4c 41 53 54 cd d1 00 06 e0 6c 01 05 53 54 41 54 45 MQ `x SCRMQ ` IOFFMQ ` E.OMQ ` E.BMQ `' EMPTYMQ `2 | cd d1 00 08 e0 78 01 03 53 43 52 cd d1 00 0a e0 85 01 04 49 4f 46 46 cd d1 00 0c e0 90 01 03 45 2e 4f cd d1 00 0e e0 9c 01 03 45 2e 42 cd d1 00 10 e0 a7 01 05 45 4d 50 54 59 cd d1 00 12 e0 b2 DPRECMQ `? DGTSMQ `L DELIMMQ `X BPTRMQ `e prevMQ `q | 01 05 44 50 52 45 43 cd d1 00 14 e0 bf 01 04 44 47 54 53 cd d1 00 16 e0 cc 01 05 44 45 4c 49 4d cd d1 00 18 e0 d8 01 04 42 50 54 52 cd d1 00 1a e0 e5 01 04 70 72 65 76 cd d1 00 1c e0 f1 01 03 FLDMQ `} TFLAGMQ ` GETMQ "` PUTMQ $` HERE* `CV + jzero | 46 4c 44 cd d1 00 1e e0 fd 01 05 54 46 4c 41 47 cd d1 00 20 e0 08 02 03 47 45 54 cd d1 00 22 e0 15 02 03 50 55 54 cd d1 00 24 e0 20 02 04 48 45 52 45 2a 00 e0 c3 d6 00 2b 02 05 6a 7a 65 72 6f a|5Jk ! 9 @gkmRR MB Stack Empty8 jump _ GK}id DUPaeCV s | e1 7c b5 ca 6b 02 03 03 21 00 00 39 11 40 e7 eb ed 52 d2 a0 00 cd 42 08 0b 53 74 61 63 6b 20 45 6d 70 74 79 38 02 04 6a 75 6d 70 0a 5f 03 0a 47 4b fd e9 64 02 03 44 55 50 e1 e5 c3 d6 00 73 02 2DUPaQUeUCV ~ DROPaCH 2DROPaa}i R>]n ]#]f ]#e]eQ!@g7mRzW | 04 32 44 55 50 e1 d1 d5 e5 d5 c3 d6 00 7e 02 04 44 52 4f 50 e1 c3 48 02 8d 02 05 32 44 52 4f 50 e1 e1 fd e9 98 02 02 52 3e dd 6e 00 dd 23 dd 66 00 dd 23 e5 dd e5 d1 21 40 e7 b7 ed 52 fa d7 00 MB R<0$ >Ra]+]t ]+]u C G SWAPQaUe}iZ 2SWAPYQaAcUeEY}ig SP@ | cd 42 08 03 52 3c 30 a4 02 02 3e 52 e1 dd 2b dd 74 00 dd 2b dd 75 00 c3 13 00 c7 02 04 53 57 41 50 d1 e1 d5 e5 fd e9 da 02 05 32 53 57 41 50 d9 d1 e1 c1 e3 d5 e5 c5 d9 fd e9 e7 02 03 53 50 40 ! 9CV z @a^#VU}i B@an& e}i !aQs#rCH B!aQsCH * ZEROa/w# | 21 00 00 39 c3 d6 00 fa 02 01 40 e1 5e 23 56 d5 fd e9 07 03 02 42 40 e1 6e 26 00 e5 fd e9 12 03 01 21 e1 d1 73 23 72 c3 48 02 1e 03 02 42 21 e1 d1 73 c3 48 02 2a 03 04 5a 45 52 4f e1 af 77 23 w}i5 LIT o gCV C DLIT o geCI R MINUSQ! 7mRCV c +!YaQN#F | 77 fd e9 35 03 03 4c 49 54 0a 03 6f 0a 03 67 c3 d6 00 43 03 04 44 4c 49 54 0a 03 6f 0a 03 67 e5 c3 49 03 52 03 05 4d 49 4e 55 53 d1 21 00 00 b7 ed 52 c3 d6 00 63 03 02 2b 21 d9 e1 d1 4e 23 46 k kr+sYCH u +Qa eCH -Qa7mReCH 1-a+e}i" 1+a#e}i, 2+a##e} | eb 09 eb 72 2b 73 d9 c3 48 02 75 03 01 2b d1 e1 19 e5 c3 48 02 8a 03 01 2d d1 e1 b7 ed 52 e5 c3 48 02 95 03 02 31 2d e1 2b e5 fd e9 a2 03 02 31 2b e1 23 e5 fd e9 ac 03 02 32 2b e1 23 23 e5 fd i6 *YQA! K8K 0 x1( K#K CK eY}iA /MODYAaM eUY}ia 2*a)e}is | e9 b6 03 01 2a d9 d1 c1 21 00 00 cb 38 cb 19 30 01 19 78 b1 28 07 cb 23 cb 12 c3 cb 03 e5 d9 fd e9 c1 03 04 2f 4d 4f 44 d9 c1 e1 cd 0a 04 e5 d5 d9 fd e9 e1 03 02 32 2a e1 29 e5 fd e9 f3 03 02 { BLOCK 0001 } 2/aK,K e}ix1(Wx,u,K J x/Gy/O K|J* |/g}/o#> Kx K!K aQC S s#r> S #" `7mrZH MB Dictionary FullM | 02 79 02 17 03 8e 03 2f 03 2b 0d 74 00 a9 05 01 2c d1 2a 00 e0 3e 02 d3 ff 73 23 72 3e 03 d3 ff 23 22 00 e0 b7 ed 72 da 48 02 cd 42 08 0f 44 69 63 74 69 6f 6e 61 72 79 20 46 75 6c 6c cd 05 02 B,OQ 2 ~ O " t } BMOVEYAQax1( m0YCH t L 5 1 5 ' O: @ g | 42 2c cf d1 05 32 02 fe 00 99 03 4f 01 22 03 74 00 fd 05 05 42 4d 4f 56 45 d9 c1 d1 e1 78 b1 28 02 ed b0 d9 c3 48 02 74 06 cc 06 0c 07 35 06 31 07 05 08 35 06 01 27 06 cf ba 01 0b 03 40 02 67 @ Q I i # : < < R I P ~ ~ " t OK WORDO } Y> | 06 10 02 17 03 40 02 51 06 49 03 69 06 90 08 a3 08 ba 01 3c 03 97 01 3c 03 d2 08 49 03 50 00 fe 08 fe 00 10 02 22 03 74 00 03 20 4f 4b 11 06 04 57 4f 52 44 cf 8b 01 0b 03 89 0a 7d 06 d9 3e 02 S QU* ` : `>#J +O k* `# 8( 9( w#C Um[ `7mR} aQ7mR" `> 2 `> S | d3 ff d1 d5 2a 0c e0 19 3a 18 e0 be 23 ca 8b 06 2b 4f 06 0d eb 2a 00 e0 23 1a b8 28 09 13 b9 28 05 77 23 c3 99 06 d5 ed 5b 00 e0 37 ed 52 7d 12 e1 d1 b7 ed 52 22 0c e0 3e 20 32 18 e0 3e 03 d3 YCt m FINDY* `k* `e##~f G 8Bo 7( # >Bo wY}ia^#V{2( * `kCT Y | ff d9 c3 74 00 6d 06 04 46 49 4e 44 d9 2a 00 e0 eb 2a 06 e0 e5 23 23 7e e6 7f 47 1a b8 c2 ef 06 b7 28 09 23 13 1a be c2 ef 06 10 f7 d9 fd e9 e1 5e 23 56 7b b2 28 07 2a 00 e0 eb c3 d4 06 d9 03 }iE EXECa##~n W: ` uK?_ #q8 ieCQ NUMBER! " `" `Y | 03 03 03 fd e9 c5 06 04 45 58 45 43 e1 23 23 7e ee 80 57 3a 08 e0 0f 82 f5 cb bf 5f 16 00 19 23 f1 38 01 e9 e5 c3 d1 05 05 07 06 4e 55 4d 42 45 52 21 00 00 22 16 e0 22 14 e0 d9 01 00 00 11 00 Y* `: `_V # J9 ~V0z! ~ 8 V ~ Zu ;Ru {Y! }! K/0 } mJZa K#K K | 00 d9 2a 00 e0 3a 04 e0 5f 56 14 23 15 ca b9 07 7e d6 30 fa a1 07 fe 0a 38 07 d6 07 fe 0a da f5 07 bb d2 f5 07 08 7b d9 21 00 00 fd 21 00 00 cb 2f 30 07 fd 19 ed 4a da e1 07 cb 23 cb 12 cb 11 K Za 7Bo _} mJDM}eQ! `4YCK ~|Zu ~~B/ /2 `: `<2 `CK Y* `#~~ | cb 10 da e1 07 b7 c2 6f 07 01 00 00 16 00 08 5f fd 19 ed 4a 44 4d fd e5 d1 21 16 e0 34 d9 c3 4b 07 fe fc da f5 07 fe fe c2 af 07 af 32 16 e0 3a 14 e0 3c 32 14 e0 c3 4b 07 d9 2a 00 e0 23 7e fe -BW ! `5! 7mRe! mBe UEY}!" CW MB Number too large* `CC ( LI | 2d c2 d7 07 21 14 e0 35 21 00 00 b7 ed 52 e5 21 00 00 ed 42 e5 18 02 d5 c5 d9 fd 21 a2 00 c3 d7 00 cd 42 08 10 4e 75 6d 62 65 72 20 74 6f 6f 20 6c 61 72 67 65 2a 00 e0 c3 43 08 28 07 07 4c 49 { BLOCK 0002 } TERALO @ , G @ I Y Q k & I I Q Q t G @ 6 t t { ABO | 54 45 52 41 4c cf 80 01 0b 03 40 02 2c 08 c7 01 0b 03 40 02 20 08 49 03 59 03 d1 05 6b 02 26 08 94 02 49 03 49 03 d1 05 d1 05 74 00 c7 01 0b 03 40 02 36 08 74 00 94 02 74 00 fb 07 05 41 42 4f RTa}!" ]!$g1@g> S e* `" `* `" `! " `! " `+" `" ` w }i # I | 52 54 e1 fd 21 a2 00 dd 21 a4 e7 31 40 e7 3e 03 d3 ff e5 2a 0a e0 22 10 e0 2a 0c e0 22 0e e0 21 20 00 22 18 e0 21 01 00 22 12 e0 2b 22 0a e0 22 08 e0 01 77 08 fd e9 90 08 a3 08 49 03 85 08 90 # 5 ? : COUNTa~#eoK=& CV TYPEOy @ > ~ a y q 1 a k $ | 08 a3 08 35 06 02 3f 07 3a 08 05 43 4f 55 4e 54 e1 7e 23 e5 6f cb bd 26 00 c3 d6 00 88 08 04 54 59 50 45 cf 79 02 40 02 be 08 fe 00 99 03 e1 02 79 02 17 03 f1 08 b1 03 e1 02 6b 02 a4 08 a0 02 t ! " `}iB CROY q q t M GETC*"`i_ PUTC*$`ij EXPECTOI | 74 00 9c 08 80 21 01 00 22 12 e0 fd e9 c2 08 02 43 52 cf 59 03 0a 00 0d 00 f1 08 f1 08 74 00 cd 08 04 47 45 54 43 2a 22 e0 e9 df 08 04 50 55 54 43 2a 24 e0 e9 ea 08 06 45 58 50 45 43 54 cf 49 &g/ < f y I (g / y I - @ 3 I q t y I - @ g | 03 a6 e7 2f 03 0a 01 0a 01 3c 03 94 02 e6 08 79 02 0a 01 17 03 49 03 a8 e7 8e 03 2f 03 79 02 49 03 0d 00 ad 04 40 02 33 09 94 02 49 03 20 00 f1 08 74 00 79 02 49 03 7f 00 ad 04 40 02 67 09 0a ' y u @ W u k _ I 3 # / k y I - @ { ? < k y I | 01 17 03 a7 03 79 02 f5 00 99 04 40 02 57 09 94 02 f5 00 6b 02 5f 09 49 03 b3 09 90 08 a3 08 0a 01 2f 03 6b 02 0b 09 79 02 49 03 18 00 ad 04 40 02 7b 09 bf 09 3c 03 6b 02 0b 09 79 02 49 03 12 - @ ? # k y 1 y / a q I &g J @ t .sharp.O | 00 ad 04 40 02 91 09 bf 09 90 08 a3 08 6b 02 0b 09 79 02 0a 01 17 03 b1 03 79 02 0a 01 2f 03 e1 02 f1 08 49 03 a6 e7 17 03 99 04 ca 04 40 02 0b 09 74 00 03 08 20 08 07 2e 73 68 61 72 70 2e cf I # q R t u CINMW [aKO(z[`f o& CV L COUTMW aa}EJm@K@(z myA~ | 49 03 23 00 f1 08 d2 08 0a 01 74 00 f5 08 03 43 49 4e cd d7 00 db e1 cb 4f 28 fa db e0 e6 7f 6f 26 00 c3 d6 00 cc 09 04 43 4f 55 54 cd d7 00 16 e1 e1 7d c5 4a ed 40 cb 40 28 fa 0d ed 79 c1 fe 8 /2 `CH e LOUTMW [cK z c S ERASE-COREY!xg" ` yg 6 m0!|k" | 20 38 04 af 32 20 e0 c3 48 02 e5 09 04 4c 4f 55 54 cd d7 00 db e3 cb 7f 20 fa 16 e3 18 d3 0a 0a 0a 45 52 41 53 45 2d 43 4f 52 45 d9 21 f8 e7 22 1a e0 11 f9 e7 01 08 08 36 00 ed b0 21 fc eb 22 xgY}i LOADO) L L L u " " t E ;SO) ) " ) " L t | f8 e7 d9 fd e9 1e 0a 04 4c 4f 41 44 cf a9 02 8b 01 0b 03 cc 02 97 01 0b 03 cc 02 cc 02 f5 00 97 01 22 03 8b 01 22 03 74 00 45 0a 02 3b 53 cf a9 02 a9 02 97 01 22 03 a9 02 8b 01 22 03 cc 02 74 i BLOCKOy @ , = @ $ T ; " a 8 q ; ; t I (gt .search.Ol | 00 69 0a 05 42 4c 4f 43 4b cf 79 02 40 02 ac 0a bd 0a 40 02 a4 0a 54 0b 85 02 bb 03 22 03 e1 02 94 02 38 0c f1 0a bb 03 bb 03 74 00 94 02 49 03 a8 e7 74 00 08 2e 73 65 61 72 63 68 2e cf ec 01 y @ f y x " ; | - @ @ a u t ~ t .link.Oy x " y l | 79 02 0b 03 40 02 e6 0a 79 02 f8 01 22 03 0b 03 85 02 bb 03 0b 03 7c 04 ad 04 40 02 c0 0a e1 02 94 02 f5 00 74 00 fe 00 74 00 06 2e 6c 69 6e 6b 2e cf 79 02 0b 03 f8 01 0b 03 22 03 79 02 ec 01 a " y l " t UPDATEOl ; y | k a " t FLUSHOl T y @ | 0b 03 e1 02 22 03 79 02 ec 01 22 03 74 00 81 0a 06 55 50 44 41 54 45 cf ec 01 0b 03 bb 03 79 02 0b 03 7c 04 6b 03 e1 02 22 03 74 00 0e 0b 05 46 4c 55 53 48 cf ec 01 0b 03 54 0b 79 02 0b 03 40 G k 7 t .flush1.Oy ; u @ s y ; y | a " J t .blk.Oy ; | 02 47 0b 6b 02 37 0b 94 02 74 00 08 2e 66 6c 75 73 68 31 2e cf 79 02 bb 03 0b 03 f5 00 99 04 40 02 73 0b 79 02 bb 03 79 02 0b 03 7c 04 e1 02 22 03 4a 0c 74 00 05 2e 62 6c 6b 2e cf 79 02 bb 03 I I 4 h I } / I h I ~ / 1 I / 9 y ; ; t .blk2.YmF> S | 0b 03 49 03 01 00 99 03 49 03 34 01 e8 03 49 03 fd ff 2f 03 49 03 04 00 e8 03 49 03 fe ff 2f 03 b1 03 49 03 ff ff 2f 03 b9 0b 79 02 bb 03 bb 03 74 00 06 2e 62 6c 6b 32 2e d9 ed 46 3e 05 d3 0e :} ~ 8 MB Drive out of rangev Sq[fG:~ /8J' Sd>aSg{v[g/K KG uf | 3a fd ff fe 02 38 16 cd 42 08 12 44 72 69 76 65 20 6f 75 74 20 6f 66 20 72 61 6e 67 65 f6 04 d3 f1 db e6 47 3a fe ff 2f b8 ca 27 0c d3 e4 3e e1 d3 e7 fb 76 db e7 2f cb 7f 20 1a cb 47 20 f5 e6 { BLOCK 0003 } ($>}SgMB Seek ErrorMB Disc not ready: /SeY}i .dread.O{ _ S t | 18 28 24 3e fd d3 e7 cd 42 08 0a 53 65 65 6b 20 45 72 72 6f 72 cd 42 08 0e 44 69 73 63 20 6e 6f 74 20 72 65 61 64 79 3a ff ff 2f d3 e5 d9 fd e9 07 2e 64 72 65 61 64 2e cf 7b 0b 5f 0c 53 0c 74 .dwrite.O{ S t /Sq}i .read.Ya d >s Sg{vm" z Bj [g/f Y}iMB | 00 08 2e 64 77 72 69 74 65 2e cf 7b 0b 94 0c 53 0c 74 00 af d3 f1 fd e9 06 2e 72 65 61 64 2e d9 e1 01 e4 00 3e 73 16 04 d3 e7 fb 76 ed a2 20 fa 15 c2 6a 0c db e7 2f e6 9c 20 03 d9 fd e9 cd 42 Read Error .write.Ya d >S Sg{vm# z B [g/f|B4 Y}iMB Write Er | 08 0a 52 65 61 64 20 45 72 72 6f 72 07 2e 77 72 69 74 65 2e d9 e1 01 e4 00 3e 53 16 04 d3 e7 fb 76 ed a3 20 fa 15 c2 9f 0c db e7 2f e6 fc c2 b4 0c d9 fd e9 cd 42 08 0b 57 72 69 74 65 20 45 72 ror, CODEOt 9 t C NEXTOI }iQ t Q :OJ I O ~ " x t O s ; | 72 6f 72 2c 0b 04 43 4f 44 45 cf 74 06 39 0d 74 00 c3 0c 04 4e 45 58 54 cf 49 03 fd e9 d1 05 74 00 d1 0c 01 3a cf ca 0c 49 03 cf 00 02 06 fe 00 80 01 22 03 f8 0c 74 00 cf 1e 0d 73 01 0b 03 bb 1 y I a / + t a UNPROT> S }i PROT> S }i$ ENTERY> S * | 03 b1 03 79 02 17 03 49 03 80 00 10 05 e1 02 2f 03 2b 0d 74 00 e1 0c 06 55 4e 50 52 4f 54 3e 02 d3 ff fd e9 15 0d 04 50 52 4f 54 3e 03 d3 ff fd e9 24 0d 05 45 4e 54 45 52 d9 3e 02 d3 ff 2a 00 `~f O T] mS ` m8#m[ `" `s#r> S Y}i1 ;OI t Q < x t g BEG | e0 7e e6 7f 4f 06 00 09 03 54 5d 13 13 13 ed 53 00 e0 1b ed b8 23 ed 5b 06 e0 22 06 e0 73 23 72 3e 03 d3 ff d9 fd e9 31 0d 81 3b cf 49 03 74 00 d1 05 80 01 3c 03 f8 0c 74 00 67 0d 85 42 45 47 INC2 z ENDOI @ Q Q t IFOI @ Q 2 I , Q t . MB Bad conditiona | 49 4e c3 32 02 7a 0d 83 45 4e 44 cf 49 03 40 02 d1 05 d1 05 74 00 85 0d 82 49 46 cf 49 03 40 02 d1 05 32 02 49 03 ac 0d d1 05 74 00 ae 0d cd 42 08 16 42 61 64 20 63 6f 6e 64 69 74 69 6f 6e 61 l branch ELSEOI k Q 2 I l Q a 2 a " + t n MB Bad unconditio | 6c 20 62 72 61 6e 63 68 96 0d 84 45 4c 53 45 cf 49 03 6b 02 d1 05 32 02 49 03 ec 0d d1 05 e1 02 32 02 e1 02 1e 0d 22 03 2b 0d 74 00 ee 0d cd 42 08 18 42 61 64 20 75 6e 63 6f 6e 64 69 74 69 6f nal branchH THENO2 a " + t DO z ] aQ]u ]t ]s ]r ]q ]p C | 6e 61 6c 20 62 72 61 6e 63 68 c8 0d 84 54 48 45 4e cf 32 02 e1 02 1e 0d 22 03 2b 0d 74 00 0a 0e 02 44 4f 11 fa ff dd 19 e1 d1 dd 75 00 dd 74 01 dd 73 02 dd 72 03 dd 71 04 dd 70 05 c3 13 00 1e LOOP]n ]f #e]^ ]V /mRaRi ]u ]t ]N ]F }i ] C~ ? +LOOPa|]^ ]V | 0e 04 4c 4f 4f 50 dd 6e 00 dd 66 01 23 e5 dd 5e 02 dd 56 03 af ed 52 e1 d2 69 0e dd 75 00 dd 74 01 dd 4e 04 dd 46 05 fd e9 11 06 00 dd 19 c3 7e 00 3f 0e 05 2b 4c 4f 4f 50 e1 7c dd 5e 00 dd 56 ]u ]t ]^ ]V K B 7mRza Ci 7mRzi Ca q (OI ) ` " t t !6 " `!&`" | 01 19 dd 75 00 dd 74 01 dd 5e 02 dd 56 03 cb 7f c2 9c 0e b7 ed 52 fa 61 0e c3 69 0e b7 ed 52 fa 69 0e c3 61 0e 71 0e 81 28 cf 49 03 29 00 e0 01 22 03 74 06 74 00 21 b6 0e 22 00 e0 21 26 e0 22 `!% " `! " `! " `! " `!U ""`!o "$` c @.!'Nmx 0{mQmYmami mxm | 02 e0 21 a5 0e 22 06 e0 21 0a 00 22 04 e0 21 06 00 22 1e e0 21 00 00 22 20 e0 21 d5 09 22 22 e0 21 ef 09 22 24 e0 01 e3 02 11 40 ae 21 27 4e ed 78 1f 30 fb ed 51 ed 59 ed 61 ed 69 0d ed 78 ed x k!4 " C | 78 0d 10 eb 21 34 00 22 01 00 c3 00 00 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff { BLOCK 0004 } ( SYSTEM LOAD ROUTINE ) 16 BASE ! | 28 20 53 59 53 54 45 4d 20 4c 4f 41 44 20 52 4f 55 54 49 4e 45 20 29 20 31 36 20 42 41 53 45 20 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE I 6EDD , 00 B, 66DD , 01 B, E5 B, NEXT | 43 4f 44 45 20 49 20 36 45 44 44 20 2c 20 30 30 20 42 2c 20 36 36 44 44 20 2c 20 30 31 20 42 2c 20 45 35 20 42 2c 20 4e 45 58 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE UNMAP 0AF B, 0F8D3 , 0F9D3 , 0FF3E , 0FAD3 , NEXT | 43 4f 44 45 20 55 4e 4d 41 50 20 30 41 46 20 42 2c 20 30 46 38 44 33 20 2c 20 30 46 39 44 33 20 2c 20 30 46 46 33 45 20 2c 20 30 46 41 44 33 20 2c 20 4e 45 58 54 20 20 20 20 20 20 20 20 20 20 HERE CONSTANT .eot ( end of TERSE ) | 48 45 52 45 20 43 4f 4e 53 54 41 4e 54 20 2e 65 6f 74 20 28 20 65 6e 64 20 6f 66 20 54 45 52 53 45 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 VARIABLE .o ( #blks .eot - 4000 ) 0 VARIABLE .dp | 20 20 20 30 20 56 41 52 49 41 42 4c 45 20 2e 6f 20 20 20 28 20 23 62 6c 6b 73 20 2e 65 6f 74 20 2d 20 34 30 30 30 20 29 20 30 20 56 41 52 49 41 42 4c 45 20 2e 64 70 20 20 20 20 20 20 20 20 20 0 VARIABLE .t ( #blks 4000 - 8000 ) 0 VARIABLE .vp | 20 20 20 30 20 56 41 52 49 41 42 4c 45 20 2e 74 20 20 20 28 20 23 62 6c 6b 73 20 34 30 30 30 20 2d 20 38 30 30 30 20 29 20 30 20 56 41 52 49 41 42 4c 45 20 2e 76 70 20 20 20 20 20 20 20 20 20 0 VARIABLE .h ( #blks 8000 - HERE ) 0 VARIABLE .la | 20 20 20 30 20 56 41 52 49 41 42 4c 45 20 2e 68 20 20 20 28 20 23 62 6c 6b 73 20 38 30 30 30 20 2d 20 48 45 52 45 20 29 20 30 20 56 41 52 49 41 42 4c 45 20 2e 6c 61 20 20 20 20 20 20 20 20 20 1 VARIABLE .f ( #blks F000 - FFFF ) | 20 20 20 31 20 56 41 52 49 41 42 4c 45 20 2e 66 20 20 20 28 20 23 62 6c 6b 73 20 46 30 30 30 20 2d 20 46 46 46 46 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 : bload ( from-blk to-addr #blks --- next-blk ) | 3a 20 62 6c 6f 61 64 20 28 20 66 72 6f 6d 2d 62 6c 6b 20 74 6f 2d 61 64 64 72 20 23 62 6c 6b 73 20 2d 2d 2d 20 6e 65 78 74 2d 62 6c 6b 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DUP >R 0 DO 2DUP DROP I + BLOCK 2DUP DROP | 20 20 44 55 50 20 3e 52 20 30 20 44 4f 20 32 44 55 50 20 44 52 4f 50 20 49 20 2b 20 42 4c 4f 43 4b 20 32 44 55 50 20 44 52 4f 50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 I 400 * + 400 UNPROT BMOVE PROT LOOP DROP R> + ; | 20 20 49 20 34 30 30 20 2a 20 2b 20 34 30 30 20 55 4e 50 52 4f 54 20 42 4d 4f 56 45 20 50 52 4f 54 20 4c 4f 4f 50 20 44 52 4f 50 20 52 3e 20 2b 20 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 : boot .o 1 bload .eot .o @ bload | 3a 20 62 6f 6f 74 20 2e 6f 20 31 20 62 6c 6f 61 64 20 2e 65 6f 74 20 2e 6f 20 40 20 62 6c 6f 61 64 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4000 .t @ bload 8000 .h @ bload F000 .f @ bload | 20 20 34 30 30 30 20 2e 74 20 40 20 62 6c 6f 61 64 20 38 30 30 30 20 2e 68 20 40 20 62 6c 6f 61 64 20 46 30 30 30 20 2e 66 20 40 20 62 6c 6f 61 64 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .dp @ DP ! .vp @ VPTR ! .la @ LAST ! ; | 20 20 2e 64 70 20 40 20 44 50 20 21 20 2e 76 70 20 40 20 56 50 54 52 20 21 20 2e 6c 61 20 40 20 4c 41 53 54 20 21 20 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 UNMAP SCR @ 1+ boot DECIMAL ." 03-18-80" . fast OK ;S | 55 4e 4d 41 50 20 53 43 52 20 40 20 31 2b 20 62 6f 6f 74 20 44 45 43 49 4d 41 4c 20 2e 22 20 30 33 2d 31 38 2d 38 30 22 20 2e 20 66 61 73 74 20 4f 4b 20 3b 53 20 20 20 20 20 20 20 20 20 20 20 0A BASE ! ;S | 30 41 20 42 41 53 45 20 21 20 3b 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0005 } a N d d 'N N - d @ 0 PTR 0 | 07 00 00 80 0a 00 10 e1 01 00 4e 1e 01 00 64 00 8b 64 90 27 4e 1e 4e 1e 91 2d 00 00 01 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 64 00 03 00 40 00 30 20 50 54 52 20 30 20 VARIABLE XC 0 VARIABLE YC 0 VARIABLE LIMIT | 56 41 52 49 41 42 4c 45 20 58 43 20 30 20 56 41 52 49 41 42 4c 45 20 59 43 20 30 20 56 41 52 49 41 42 4c 45 20 4c 49 4d 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 01 00 37 00 01 00 " @g g + X , 1 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 a2 00 00 00 40 e7 9c e7 00 00 00 00 02 00 1e 2b 00 00 00 00 00 00 00 00 00 00 00 00 00 d8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 01 31 01 00 W ' . C ' : 3 y y | 00 00 7f 00 80 80 7f d7 04 27 7f ae 04 00 00 00 00 11 00 01 00 01 00 01 00 01 00 86 01 06 00 00 00 00 00 00 00 00 00 00 00 82 00 81 01 c3 03 a7 00 8a 00 3a 00 14 01 0f 02 b3 01 00 01 f9 00 f9 % ` XX XXXXXXXXXX | 01 0e 03 25 04 9a 04 60 04 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 58 58 00 00 01 00 01 00 00 00 58 58 58 58 58 58 58 58 58 58 XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX | 58 58 58 58 58 58 58 58 58 58 58 58 58 58 58 58 58 58 58 58 58 58 58 58 58 58 58 58 58 58 58 58 58 58 58 58 58 58 58 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 20 20 20 20 @ @ 2 | 20 20 20 20 20 20 20 20 20 20 20 20 20 00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 40 00 40 00 00 00 00 00 00 00 32 00 0a 00 00 00 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 i \ | 01 00 00 00 00 00 00 00 00 00 00 00 00 00 69 02 5c 00 00 00 00 00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 20 20 20 20 | 20 20 20 20 20 20 20 00 20 20 20 20 20 00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 9 - | 20 20 20 20 20 20 20 20 39 00 00 00 00 00 00 00 2d 00 08 00 00 00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 20 20 20 20 64 0 DO 32 15 aline I + B! LOOP UPDA | 20 20 20 20 20 20 20 20 20 20 20 20 20 00 20 20 20 20 20 20 20 20 20 00 20 20 20 20 36 34 20 30 20 44 4f 20 33 32 20 31 35 20 61 6c 69 6e 65 20 49 20 2b 20 42 21 20 4c 4f 4f 50 20 55 50 44 41 TE ; 9 h 9 9 9 9 9 9 9 9 9 9 9 9 9 | 54 45 20 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 39 00 00 00 01 00 02 00 68 00 00 00 00 00 39 00 39 00 39 00 39 00 39 00 39 00 39 00 39 00 39 00 39 00 39 00 39 00 39 00 9 9 9 9 9 9 9 9 9 : : : : : : : : : : : : : : ; : : : : : : | 39 00 39 00 39 00 39 00 39 00 7f 00 39 00 39 00 7f 00 39 00 39 00 00 3a 00 3a 00 3a 00 3a 00 3a 00 3a 00 3a 00 3a 00 3a 00 3a 00 3a 00 3a 00 3a 00 3a 00 3b 00 3a 00 3a 00 3a 00 3a 00 3a 18 3a { BLOCK 0006 } C .eotMQ V V .oMQ &`b .dpMQ (`l .tMQ *`w .vpMQ ,` .hMQ .` | c3 0e 04 2e 65 6f 74 cd d1 00 d6 0e d6 0e 02 2e 6f cd d1 00 26 e0 e2 0e 03 2e 64 70 cd d1 00 28 e0 ec 0e 02 2e 74 cd d1 00 2a e0 f7 0e 03 2e 76 70 cd d1 00 2c e0 01 0f 02 2e 68 cd d1 00 2e e0 .laMQ 0` .fMQ 2`! bloadOy L u # : : I E I | 0c 0f 03 2e 6c 61 cd d1 00 30 e0 16 0f 02 2e 66 cd d1 00 32 e0 21 0f 05 62 6c 6f 61 64 cf 79 02 cc 02 f5 00 23 0e 85 02 94 02 ba 0e 8e 03 89 0a 85 02 94 02 ba 0e 49 03 00 04 c5 03 8e 03 49 03 + F ) t + bootOg ~ 3 ] g 3 I @| 3 I 3 I p | 00 04 1e 0d 19 06 2b 0d 46 0e 94 02 a9 02 8e 03 74 00 2b 0f 04 62 6f 6f 74 cf e7 0e fe 00 33 0f dd 0e e7 0e 0b 03 33 0f 49 03 00 40 fc 0e 0b 03 33 0f 49 03 00 80 11 0f 0b 03 33 0f 49 03 00 f0 & 3 r O " [ " s " t h DP+!O2 O " t 6 editMQ . H | 26 0f 0b 03 33 0f f2 0e 0b 03 4f 01 22 03 07 0f 0b 03 5b 01 22 03 1c 0f 0b 03 73 01 22 03 74 00 68 0f 04 44 50 2b 21 cf 32 02 8e 03 4f 01 22 03 74 00 b6 0f 04 65 64 69 74 cd d1 00 2e 00 c8 0f asmMQ T debugMQ : _ HEXOI g " t l DECIMALOI g " t } O | 03 61 73 6d cd d1 00 20 00 d4 0f 05 64 65 62 75 67 cd d1 00 3a 00 df 0f 03 48 45 58 cf 49 03 10 00 67 01 22 03 74 00 ec 0f 07 44 45 43 49 4d 41 4c cf 49 03 0a 00 67 01 22 03 74 00 fd 0f 05 4f CTALOI g " t IMMEDO s ; y I a / + t % COPYOa I | 43 54 41 4c cf 49 03 08 00 67 01 22 03 74 00 12 10 05 49 4d 4d 45 44 cf 1e 0d 73 01 0b 03 bb 03 79 02 17 03 49 03 80 00 8e 03 e1 02 2f 03 2b 0d 74 00 25 10 04 43 4f 50 59 cf e1 02 89 0a 49 03 " 4 t H +BLOCKO t b CONTINUEDO " < t t -->O~ k | 02 00 99 03 22 03 17 0b 34 0b 74 00 48 10 06 2b 42 4c 4f 43 4b cf 8b 01 0b 03 8e 03 74 00 62 10 09 43 4f 4e 54 49 4e 55 45 44 cf 8b 01 22 03 97 01 3c 03 74 00 74 10 83 2d 2d 3e cf fe 00 6b 10 t BUFFEROk 4 l ; y L " ) ; t LINELOADO) L L L | 80 10 74 00 8b 10 06 42 55 46 46 45 52 cf 6b 03 34 0b ec 01 0b 03 bb 03 79 02 cc 02 22 03 a9 02 bb 03 74 00 9a 10 08 4c 49 4e 45 4c 4f 41 44 cf a9 02 8b 01 0b 03 cc 02 97 01 0b 03 cc 02 cc 02 " I @ E " t : J]n ]f e}if K]n ]f e}is I+]n ]f Q e}i J+] | 8b 01 22 03 49 03 40 00 c5 03 97 01 22 03 74 00 ba 10 01 4a dd 6e 06 dd 66 07 e5 fd e9 e6 10 01 4b dd 6e 0c dd 66 0d e5 fd e9 f3 10 02 49 2b dd 6e 00 dd 66 01 d1 19 e5 fd e9 00 11 02 4a 2b dd n ]f Q e}i K+]n ]f Q e}i SWABQbS\U}i0 ROTQacUe}i> BYE/S~S | 6e 06 dd 66 07 d1 19 e5 fd e9 10 11 02 4b 2b dd 6e 0c dd 66 0d d1 19 e5 fd e9 20 11 04 53 57 41 42 d1 62 53 5c d5 fd e9 30 11 03 52 4f 54 d1 e1 e3 d5 e5 fd e9 3e 11 03 42 59 45 af d3 fe d3 ff C pK INPYA mHEY}i] OUTPYAamiY}im 2-a++e}i| SKIP }i L | 00 00 00 00 c3 00 f0 4b 11 03 49 4e 50 d9 c1 06 00 ed 48 c5 d9 fd e9 5d 11 04 4f 55 54 50 d9 c1 e1 ed 69 d9 fd e9 6d 11 02 32 2d e1 2b 2b e5 fd e9 7c 11 04 53 4b 49 50 03 03 fd e9 87 11 05 4c EAVE]~ ]w ]~ ]w }i ICE/S~S 1 |C p( OVERO t = 1+!Oy | 45 41 56 45 dd 7e 00 dd 77 02 dd 7e 01 dd 77 03 fd e9 92 11 03 49 43 45 af d3 fe d3 ff 00 00 00 00 31 20 fc c3 18 f0 a8 11 04 4f 56 45 52 cf 85 02 94 02 74 00 bd 11 03 31 2b 21 cf 79 02 0b 03 1 a " t K 1-!Oy ' a " t ^ 0Ou t } MAXO @ | b1 03 e1 02 22 03 74 00 cb 11 03 31 2d 21 cf 79 02 0b 03 a7 03 e1 02 22 03 74 00 de 11 02 30 3c cf f5 00 99 04 74 00 f1 11 02 30 3e cf f5 00 90 04 74 00 fd 11 03 4d 41 58 cf 85 02 99 04 40 02 a t MINO @ / a t <>O- J t 3 MODOh t ? /Oh a | 1a 12 e1 02 94 02 74 00 09 12 03 4d 49 4e cf 85 02 90 04 40 02 2f 12 e1 02 94 02 74 00 1e 12 02 3c 3e cf ad 04 ca 04 74 00 33 12 03 4d 4f 44 cf e8 03 94 02 74 00 3f 12 01 2f cf e8 03 e1 02 94 t L NANDOm ] t Y NORO~ ] t g PICKOx t t GOODBYEO4 Q t | 02 74 00 4c 12 04 4e 41 4e 44 cf ed 04 dd 04 74 00 59 12 03 4e 4f 52 cf fe 04 dd 04 74 00 67 12 04 50 49 43 4b cf f8 03 00 03 8e 03 0b 03 74 00 74 12 07 47 4f 4f 44 42 59 45 cf 34 0b 51 11 74 MOVEOx t CCALCO; t % .ABORTOB t 6 ABORTO2 B t D | 00 86 12 04 4d 4f 56 45 cf f8 03 19 06 74 00 97 12 05 43 43 41 4c 43 cf bb 03 90 08 8e 03 74 00 a5 12 06 2e 41 42 4f 52 54 cf 42 08 74 00 b6 12 05 41 42 4f 52 54 cf 32 02 42 08 74 00 c4 12 02 { BLOCK 0007 } U!O " + t S BU!O / + t a STYPEO # t p [O < t ]O~ " t | 55 21 cf 1e 0d 22 03 2b 0d 74 00 d3 12 03 42 55 21 cf 1e 0d 2f 03 2b 0d 74 00 e1 12 05 53 54 59 50 45 cf 90 08 a3 08 74 00 f0 12 81 5b cf 80 01 3c 03 74 00 ff 12 81 5d cf fe 00 80 01 22 03 74 jzeroOY @ , a t jumpOY k l a t * WHILEO Q 2 a Q t < RE | 00 0a 13 05 6a 7a 65 72 6f cf 59 03 40 02 ac 0d e1 02 74 00 17 13 04 6a 75 6d 70 cf 59 03 6b 02 ec 0d e1 02 74 00 2a 13 85 57 48 49 4c 45 cf 1f 13 d1 05 32 02 e1 02 d1 05 74 00 3c 13 86 52 45 PEATO1 Q a Q 2 a X t N tickO- u t Q 'Ot L t L t F" x"O) | 50 45 41 54 cf 31 13 d1 05 94 02 e1 02 d1 05 32 02 e1 02 d8 12 74 00 4e 1e 04 74 69 63 6b cf ad 12 f5 00 05 08 74 00 51 13 81 27 cf 74 06 cc 06 74 13 8e 11 cc 12 74 00 c6 22 02 78 22 cf a9 02 y x L t } ."OI Q I " ` " t 2 @ L 1 = k T I ~ = x t | 79 02 f8 12 90 08 8e 03 cc 02 74 00 7d 13 82 2e 22 cf 49 03 93 13 d1 05 49 03 22 00 e0 01 22 03 74 06 32 02 80 01 0b 03 40 02 cc 13 17 03 b1 03 bd 0f 6b 02 d4 13 49 03 fe ff bd 0f f8 12 74 00 m ystr E o& DM}i" A"OI ] Q I " ` " t 2 1 = t h BELLOI q | 6d 13 04 79 73 74 72 0a c5 03 6f 26 00 09 44 4d fd e9 a2 13 82 41 22 cf 49 03 dd 13 d1 05 49 03 22 00 e0 01 22 03 74 06 32 02 17 03 b1 03 bd 0f 74 00 e8 13 04 42 45 4c 4c cf 49 03 07 00 f1 08 t PAGEOI q t SPACEOI q t ( OKO Q t 9 SPACESOy @ a u | 74 00 08 14 04 50 41 47 45 cf 49 03 0c 00 f1 08 74 00 18 14 05 53 50 41 43 45 cf 49 03 20 00 f1 08 74 00 28 14 02 4f 4b cf 10 02 d1 11 74 00 39 14 06 53 50 41 43 45 53 cf 79 02 40 02 61 14 f5 # 0 F k c t E .LISTO & " t e .NLISTOR l & " t v BLKMOVEO | 00 23 0e 30 14 46 0e 6b 02 63 14 94 02 74 00 45 14 05 2e 4c 49 53 54 cf 11 0a 26 02 22 03 74 00 65 14 06 2e 4e 4c 49 53 54 cf d2 08 ec 09 26 02 22 03 74 00 76 14 07 42 4c 4b 4d 4f 56 45 cf 03 L I " D D @ 9 D u ~ k E D ' u a I D D # D D : a | 02 0b 03 cc 02 49 03 04 00 03 02 22 03 44 11 44 11 85 02 90 04 40 02 b9 14 44 11 f5 00 fe 00 6b 02 c5 14 44 11 a7 03 f5 00 e1 02 49 03 ff ff 44 11 44 11 23 0e 44 11 44 11 85 02 ba 0e 8e 03 e1 : y a y O D y y ) " > t ccO- Q t [COMPILE]Ot | 02 ba 0e 8e 03 79 02 20 05 e1 02 79 02 20 05 4f 10 44 11 79 02 79 0e a0 02 94 02 a9 02 03 02 22 03 3e 14 74 00 8e 13 02 63 63 cf ad 12 d1 05 74 00 8a 14 89 5b 43 4f 4d 50 49 4c 45 5d cf 74 06 L L t B:OI 4 t BLKMQ 4`. LINEOI @ E 4 t 9 SP | cc 06 00 15 8e 11 cc 12 74 00 07 15 02 42 3a cf 49 03 34 01 8e 03 74 00 20 15 03 42 4c 4b cd d1 00 34 e0 2e 15 04 4c 49 4e 45 cf 49 03 40 00 c5 03 34 15 0b 03 89 0a 8e 03 74 00 39 15 07 53 50 ACES?Ou I ? # y I - @ I y u k ) ) ) 1 t Q LISTO4 | 41 43 45 53 3f cf f5 00 49 03 3f 00 23 0e 79 02 05 11 17 03 49 03 20 00 ad 04 40 02 80 15 49 03 ff ff 79 0e f5 00 6b 02 8a 15 a9 02 a9 02 a9 02 a0 02 b1 03 74 00 51 15 04 4c 49 53 54 cf 34 15 " I " I u # R : I | q : @ [ # F R " t SHOWOR | 22 03 03 02 0b 03 49 03 02 00 03 02 22 03 49 03 10 00 f5 00 23 0e d2 08 ba 0e 20 05 49 03 7c 00 f1 08 ba 0e 40 15 5b 15 a3 08 46 0e d2 08 03 02 22 03 74 00 8c 15 04 53 48 4f 57 cf d2 08 93 13 BLOCK y y 1 y f y I - @ y 1 I I @ R | 06 42 4c 4f 43 4b 20 79 02 20 05 79 02 93 15 b1 03 79 02 89 0a 94 02 e6 08 79 02 49 03 0d 00 ad 04 40 02 0b 16 94 02 81 11 79 02 b1 03 89 0a 94 02 49 03 20 00 49 03 20 00 99 03 40 02 d2 15 94 > t J FILECOPYO I " R D 1 D # : : % O : F " t DI | 02 3e 14 74 00 ca 15 08 46 49 4c 45 43 4f 50 59 cf 03 02 0b 03 49 03 04 00 03 02 22 03 d2 08 44 11 b1 03 44 11 23 0e ba 0e ba 0e 25 15 4f 10 ba 0e 20 05 46 0e 03 02 22 03 74 00 1b 16 08 44 49 SKCOPYOI 4 ~ & t Q SYSCOPYOI c ~ & t g HELPOs R I P u # y @ | 53 4b 43 4f 50 59 cf 49 03 34 01 fe 00 26 16 74 00 51 16 07 53 59 53 43 4f 50 59 cf 49 03 63 00 fe 00 26 16 74 00 67 16 04 48 45 4c 50 cf 73 01 0b 03 d2 08 49 03 50 00 f5 00 23 0e 79 02 40 02 6 y ; I m # I | N F y @ D f k F u I @ > t | b6 16 79 02 bb 03 90 08 49 03 7f 00 ed 04 85 02 a3 08 49 03 14 00 99 03 7c 04 4e 14 94 02 0b 03 46 0e 79 02 40 02 c4 16 e6 08 6b 02 c6 16 f5 00 49 03 20 00 99 03 40 02 88 16 94 02 3e 14 74 00 { BLOCK 0008 } V tellOR 2 x not forgotten> t | IFENDOt y OTHERWISEOt L - | d6 13 04 74 65 6c 6c cf d2 08 32 02 f8 12 93 13 0e 20 6e 6f 74 20 66 6f 72 67 6f 74 74 65 6e 3e 14 74 00 7c 16 05 49 46 45 4e 44 cf 74 00 f9 16 09 4f 54 48 45 52 57 49 53 45 cf 74 06 cc 06 ad u I - @ t IFTRUEOJ @ W t L - u y I - a I - ~ @ 7 | 12 8e 11 f5 00 49 03 01 17 ad 04 40 02 11 17 74 00 04 17 06 49 46 54 52 55 45 cf ca 04 40 02 57 17 74 06 cc 06 ad 12 8e 11 f5 00 79 02 49 03 10 17 ad 04 e1 02 49 03 01 17 ad 04 fe 04 40 02 37 t ' BASE?Og ' t Y H.OL u ) g r < D I u # y I | 17 74 00 27 17 05 42 41 53 45 3f cf 67 01 0b 03 a7 03 20 05 74 00 59 17 02 48 2e cf cc 02 f5 00 8e 03 a9 02 67 01 0b 03 03 02 0b 03 f2 0f 03 02 3c 03 44 11 49 03 04 00 f5 00 23 0e 79 02 49 03 m a F " g " t l [[O) L L t : ]]O) a | 0f 00 ed 04 e1 02 02 04 02 04 02 04 02 04 46 0e 94 02 20 05 20 05 20 05 20 05 03 02 22 03 67 01 22 03 74 00 6c 17 02 5b 5b cf a9 02 97 01 0b 03 cc 02 cc 02 74 00 ba 17 02 5d 5d cf a9 02 e1 02 @ b ) k l ) y L " L t L WHEREOR - 4 " " | I @ h @ I @ | 40 02 e2 17 a9 02 94 02 6b 02 ec 17 a9 02 79 02 cc 02 97 01 22 03 cc 02 74 00 cc 17 05 57 48 45 52 45 cf d2 08 ad 01 0b 03 34 15 22 03 a2 01 0b 03 81 11 7c 04 49 03 40 00 e8 03 40 15 49 03 40 # R N ^R Block=- k Line=" I @ P t V linedumpO | 00 a3 08 d2 08 4e 14 93 13 01 5e d2 08 93 13 06 42 6c 6f 63 6b 3d ad 01 6b 05 93 13 06 20 4c 69 6e 65 3d a2 01 0b 03 49 03 40 00 50 12 20 05 74 00 d6 16 08 6c 69 6e 65 64 75 6d 70 cf 03 02 0b L I " r :y y y I a # : F /y I a # : y | 03 cc 02 49 03 03 00 03 02 22 03 f2 0f 93 13 01 3a 79 02 79 02 79 02 49 03 10 00 8e 03 e1 02 23 0e ba 0e 17 03 20 05 46 0e 93 13 02 20 2f 79 02 49 03 10 00 8e 03 e1 02 23 0e ba 0e 17 03 79 02 I I m I ^ @ 2 I . q F /I ) " t p HEXLISTOg | 49 03 20 00 99 03 49 03 ff 7f ed 04 49 03 5e 00 90 04 40 02 b2 18 94 02 49 03 2e 00 f1 08 46 0e 93 13 01 2f 49 03 10 00 8e 03 a9 02 03 02 22 03 74 00 f0 17 07 48 45 58 4c 49 53 54 cf 67 01 0b L I i a # R ----BLOCK : ----u a I a # R : q j : | 03 cc 02 49 03 69 02 e1 02 23 0e 07 10 d2 08 93 13 0a 2d 2d 2d 2d 42 4c 4f 43 4b 20 ba 0e 20 05 93 13 04 2d 2d 2d 2d f5 00 e1 02 49 03 00 04 e1 02 23 0e d2 08 ba 0e 71 17 ea 10 89 0a ba 0e 8e R f y I - @ / k = I 8 @ = J I y @ I u F ) g " > | 03 52 18 94 02 e6 08 79 02 49 03 20 00 ad 04 40 02 2f 19 94 02 6b 02 3d 19 9a 11 49 03 0d 00 38 12 40 02 3d 19 ca 04 49 03 10 00 79 0e 40 02 49 19 9a 11 f5 00 46 0e 94 02 a9 02 67 01 22 03 3e t H HEXSHOWOu a R t Y DUMPOg L I @ u # R y q R I y f I | 14 74 00 c8 18 07 48 45 58 53 48 4f 57 cf f5 00 e1 02 d2 18 74 00 59 19 04 44 55 4d 50 cf 67 01 0b 03 cc 02 49 03 40 00 f5 00 23 0e d2 08 79 02 71 17 52 18 49 03 10 00 79 0e e6 08 49 03 20 00 @ z ) g " > t G .ba.a~#foQ e}i( .ar.a~#foQk) e}i`! .bt.aQ | 99 03 40 02 7a 19 94 02 a9 02 67 01 22 03 3e 14 74 00 47 18 04 2e 62 61 2e e1 7e 23 66 6f d1 19 e5 fd e9 a8 19 04 2e 61 72 2e e1 7e 23 66 6f d1 eb 29 19 e5 fd e9 e0 21 04 2e 62 74 2e e1 d1 19 e}i9 .ta.aQk) e}il thereMQ 6`h otherMQ 8`u bootscrMQ bd | e5 fd e9 b9 19 04 2e 74 61 2e e1 d1 eb 29 19 e5 fd e9 6c 19 05 74 68 65 72 65 cd d1 00 36 e0 e8 19 05 6f 74 68 65 72 cd d1 00 38 e0 f5 19 07 62 6f 6f 74 73 63 72 cd d1 00 05 00 02 1a 05 62 64 umpOy v @ $ J I P 1 y L u # : I E a : y # I F | 75 6d 70 cf 79 02 f6 11 40 02 24 1a ca 04 49 03 00 04 50 12 b1 03 79 02 cc 02 f5 00 23 0e 85 02 ba 0e 49 03 00 04 c5 03 8e 03 e1 02 ba 0e 8e 03 79 02 20 05 a3 10 49 03 00 04 19 06 17 0b 46 0e ) y D a t sysaveO D O K y ; 2 r " [ " s " ] } | 94 02 a9 02 79 02 44 11 8e 03 e1 02 74 00 11 1a 06 73 79 73 61 76 65 cf 0c 1a c4 11 4f 10 cb 0e 79 02 bb 03 32 02 f2 0e 22 03 5b 01 0b 03 07 0f 22 03 73 01 0b 03 1c 0f 22 03 dd 0e fd 19 0b 03 D g " I @p D | " I 2 D " t d SYSAVEOm a 1 g | c4 11 99 03 19 1a e7 0e 22 03 49 03 00 40 f0 19 0b 03 c4 11 99 03 19 1a fc 0e 22 03 49 03 00 80 32 02 c4 11 99 03 19 1a 11 0f 22 03 74 00 64 1a 06 53 59 53 41 56 45 cf 6d 1a e1 02 b1 03 e7 0e { BLOCK 0009 } I 4 t D SFSAVEOm I pI & " a 1 g I 4 t d P | 49 03 ff 03 19 1a a0 02 20 05 34 0b 74 00 c4 1a 06 53 46 53 41 56 45 cf 6d 1a 49 03 00 f0 49 03 ff 0f 19 1a 26 0f 22 03 e1 02 b1 03 e7 0e 49 03 ff 03 19 1a a0 02 20 05 34 0b 74 00 e4 1a 05 50 OLLCOI a c I m @ 1 f k 3 u t DIROa 1 a # : y I ( - @ j | 4f 4c 4c 43 cf 49 03 e1 00 63 11 49 03 02 00 ed 04 40 02 31 1b e6 08 6b 02 33 1b f5 00 74 00 12 1b 03 44 49 52 cf e1 02 b1 03 e1 02 23 0e ba 0e 89 0a 79 02 0b 03 49 03 28 20 ad 04 40 02 6a 1b R : I | q [ # k l @ v f F t 5 PRINTOUTO R ; u D 1 D | d2 08 ba 0e 20 05 49 03 7c 00 f1 08 5b 15 a3 08 6b 02 6c 1b 94 02 1a 1b 40 02 76 1b e6 08 94 02 46 0e 74 00 35 1b 08 50 52 49 4e 54 4f 55 54 cf 85 02 d2 08 1f 14 3b 1b f5 00 44 11 b1 03 44 11 # : I ( - @ c y I E J @ : R +--------Block : - | 23 0e ba 0e 89 0a 17 03 49 03 28 00 ad 04 40 02 e3 1b 79 02 49 03 03 00 45 12 ca 04 40 02 ba 1b d2 08 1f 14 93 13 11 20 20 2b 2d 2d 2d 2d 2d 2d 2d 2d 42 6c 6f 63 6b 20 ba 0e 20 05 93 13 08 2d -------: 1 F R > t z CURRENTMQ :`s CONTEXTMQ <`L la | 2d 2d 2d 2d 2d 2d 2d ba 0e 93 15 b1 03 46 0e 94 02 1f 14 1f 14 d2 08 7f 14 3e 14 74 00 7a 1b 07 43 55 52 52 45 4e 54 cd d1 00 3a e0 f3 1b 07 43 4f 4e 54 45 58 54 cd d1 00 3c e0 cc 19 07 6c 61 stvocMQ >`\ .va"<`" `}i ] t F Os } X 5 t BUILDO J % t linkvocO2 | 97 01 22 03 74 00 80 1c 06 62 75 69 6c 64 3e cf 73 01 0b 03 fd 1b 0b 03 d8 12 35 1c 74 00 9c 1c 05 42 55 49 4c 44 cf 87 1c ca 0c a5 1c 74 00 20 1c 07 6c 69 6e 6b 76 6f 63 cf 32 02 1b 1c 0b 03 Q " t 4 VOCABULARYO2 < I M I % Q } Q ] .tov.I u # y : | d1 05 1b 1c 22 03 74 00 b4 1c 0a 56 4f 43 41 42 55 4c 41 52 59 cf 32 02 bc 1c 49 03 cd 00 02 06 49 03 25 1c d1 05 fd 1b 0b 03 d1 05 dd 13 05 2e 74 6f 76 2e 49 03 06 00 f5 00 23 0e 79 02 ba 0e F X Q O t ^ DEFINITIONSO } " t ( CONSTANTO 4 % t A | 8e 03 17 03 02 06 46 0e 94 02 d8 0c d1 05 cf 1c 74 00 de 1c 0b 44 45 46 49 4e 49 54 49 4f 4e 53 cf 0c 1c 0b 03 fd 1b 22 03 74 00 28 1d 08 43 4f 4e 53 54 41 4e 54 cf 87 1c b4 00 a5 1c 74 00 41 TABLEO< I M I ` Q t U BTABLEO< I M I S Q t n ARRAYO< I M | 1d 05 54 41 42 4c 45 cf bc 1c 49 03 cd 00 02 06 49 03 e0 19 d1 05 74 00 55 1d 06 42 54 41 42 4c 45 cf bc 1c 49 03 cd 00 02 06 49 03 d3 19 d1 05 74 00 6e 1d 05 41 52 52 41 59 cf bc 1c 49 03 cd I @ Q [ Q x [ z t BARRAYO< I M I / Q [ Q [ z t - DA | 00 02 06 49 03 c0 19 d1 05 5b 01 0b 03 d1 05 f8 03 5b 01 7a 03 74 00 88 1d 06 42 41 52 52 41 59 cf bc 1c 49 03 cd 00 02 06 49 03 af 19 d1 05 5b 01 0b 03 d1 05 5b 01 7a 03 74 00 ad 1d 04 44 41 TAO< I M I Q Q 2 ; Q t Q VARIABLEO % % t o BVARIABLEOz [ d | 54 41 cf bc 1c 49 03 cd 00 02 06 49 03 d1 00 d1 05 32 02 bb 03 d1 05 74 00 d1 1d 08 56 41 52 49 41 42 4c 45 cf 87 1c 25 01 a5 1c 74 00 ef 1d 09 42 56 41 52 49 41 42 4c 45 cf fa 1d 5b 01 e4 11 t IMMEDOO - % t *! xOO k % t :O e % t 6 TERSEM% s' .tov. | 74 00 03 1e 05 49 4d 4d 45 44 cf 4f 1c 2d 10 a5 1c 74 00 2a 21 01 78 cf 4f 1c 6b 0d a5 1c 74 00 18 1e 01 3a cf 87 1c e5 0c a5 1c 74 00 36 1e 05 54 45 52 53 45 cd 25 1c 73 27 05 2e 74 6f 76 2e }iC C ;O- t \ {O) } L L L K t e }O) ) y " s " ) } " | fd e9 43 1e 00 00 43 1e 81 3b cf 2d 1e 74 00 5c 1e 81 7b cf a9 02 fd 1b 0b 03 cc 02 0c 1c 0b 03 cc 02 cc 02 4b 1e 74 00 65 1e 81 7d cf a9 02 a9 02 79 02 0c 1c 22 03 73 01 22 03 a9 02 fd 1b 22 L t ~ CODEO< t ASMM% V .tov.}i' Z ' ASMOK - t > CODEOK E | 03 cc 02 74 00 7e 1e 04 43 4f 44 45 cf bc 1c 74 00 9b 1e 03 41 53 4d cd 25 1c 14 56 05 2e 74 6f 76 2e fd e9 a7 1e 5a 1e a7 1e 03 41 53 4d cf cb 0e ad 1e 74 00 be 1e 04 43 4f 44 45 cf cb 0e 45 { BLOCK 0010 } Ct K .OPSOK Bt Y .NOPSOK (Bt g SUBROK Ut v FORWARDOK =Ut | 43 74 00 cb 1e 04 2e 4f 50 53 cf cb 0e 15 42 74 00 d9 1e 05 2e 4e 4f 50 53 cf cb 0e 28 42 74 00 e7 1e 04 53 55 42 52 cf cb 0e 9a 55 74 00 f6 1e 07 46 4f 52 57 41 52 44 cf cb 0e bd 55 74 00 04 (OK @t a find?OL ~ L t LEARNOt ( - @ r D D | 1f 81 28 cf cb 0e 95 40 74 00 61 20 05 66 69 6e 64 3f cf cc 06 fe 00 8e 11 cc 12 94 02 74 00 15 1f 05 4c 45 41 52 4e cf 74 06 28 1f 0c 1c 0b 03 85 02 0b 03 ad 04 40 02 72 1f c4 11 0b 03 c4 11 X y } a X } X ~ k v u @ F t 5 U<=aQ/mR! Z #e}i| >= | d8 12 94 02 79 02 fd 1b 0b 03 0b 03 e1 02 d8 12 fd 1b 0b 03 d8 12 fe 00 6b 02 76 1f 0b 03 f5 00 40 02 46 1f 74 00 35 1f 03 55 3c 3d e1 d1 af ed 52 21 00 00 da 8e 1f 23 e5 fd e9 7c 1f 02 3e 3d Qa> *W> ,gC <=aQC # O( J t 8 U>=QaC C UO J t killemO @ y y a X k y J @ p | ca 04 74 00 ce 1f 02 55 3e cf 82 1f ca 04 74 00 18 20 06 6b 69 6c 6c 65 6d cf 85 02 0b 03 82 1f 40 02 0a 20 79 02 79 02 0b 03 0b 03 e1 02 d8 12 6b 02 0c 20 0b 03 79 02 ca 04 40 02 f0 1f 94 02 t xxxOK 6 o y L I o ) y J @ + O " t Z FORGETOt | 74 00 20 1f 03 78 78 78 cf 4b 1e 36 1d 1b 1c ef 1f 1b 1c 0b 03 79 02 cc 02 49 03 0c 00 99 03 ef 1f a9 02 0b 03 79 02 ca 04 40 02 2b 20 94 02 4f 01 22 03 74 00 da 1f 06 46 4f 52 47 45 54 cf 74 L ] t ) vnameO - ; ; x t K WHEREO" | I E " " - | | 06 cc 06 1e 20 8e 11 dd 16 74 00 29 1e 05 76 6e 61 6d 65 cf 0b 03 ad 12 bb 03 0b 03 bb 03 f8 12 74 00 4b 20 05 57 48 45 52 45 cf a2 01 0b 03 7c 04 49 03 00 04 45 12 a2 01 22 03 ad 01 0b 03 7c I h E y - " @ ) x R } CURRENT=i 0 CONTEXT=i t x DLISTO | 04 49 03 68 02 45 12 79 02 ad 01 22 03 40 02 a9 20 f8 17 d2 08 fd 1b 93 13 08 43 55 52 52 45 4e 54 3d 69 20 30 14 0c 1c 93 13 08 43 4f 4e 54 45 58 54 3d 69 20 74 00 78 20 05 44 4c 49 53 54 cf R y ; I m # I | N 0 y q 0 y - q R y J @ !u k | d2 08 0c 1c 0b 03 79 02 bb 03 90 08 49 03 7f 00 ed 04 85 02 a3 08 49 03 13 00 99 03 7c 04 4e 14 94 02 30 14 79 02 71 17 30 14 79 02 ad 12 71 17 d2 08 0b 03 79 02 ca 04 40 02 18 21 f5 00 6b 02 !f I @ \ > t E .fork. _ W aK%K BKk7mRZQ!JQ! o gi}iM | 1a 21 e6 08 49 03 20 00 99 03 40 02 dc 20 94 02 3e 14 74 00 c5 1c 06 2e 66 6f 72 6b 2e 0a 5f 03 0a 57 03 e1 cb 25 cb 14 09 42 4b eb b7 ed 52 da 51 21 ca 51 21 1a 6f 13 1a 67 e9 fd e9 cd 20 85 O2 a X t j! CHAINO] .tov.2 I | 3c 46 4f 52 4b cf 49 03 33 21 d1 05 32 02 f5 00 d1 05 74 00 53 21 85 46 4f 52 4b 3e cf 32 02 e1 02 d8 12 74 00 6a 21 05 43 48 41 49 4e cf dd 13 05 2e 74 6f 76 2e 32 02 49 03 06 00 1e 0d 19 06 + 5 s y s " ( a s " s - @ B!~ k F! u @ 2!a t ( - I | 2b 0d 35 1c 73 01 0b 03 79 02 0b 03 73 01 22 03 28 1f e1 02 73 01 22 03 73 01 0b 03 85 02 0b 03 ad 04 40 02 c2 21 fe 00 6b 02 c6 21 0b 03 f5 00 40 02 b2 21 e1 02 94 02 74 06 28 1f ad 12 49 03 a X t g$ .cent.a}~ Br!}ieC {! .CENOI i!& " t v! POLLC! [aK | 03 00 8e 03 e1 02 d8 12 74 00 67 24 06 2e 63 65 6e 74 2e e1 7d fe 0d c2 f2 21 fd e9 e5 c3 14 0a 7b 21 04 2e 43 45 4e cf 49 03 e9 21 26 02 22 03 74 00 f6 21 05 50 4f 4c 4c 43 21 00 00 db e1 cb OJ "[`f oe}i?$ offlOl & " ] PRINTER off line? t "" .houa &~ B | 4f ca 1f 22 db e0 e6 7f 6f e5 fd e9 bf 24 04 6f 66 66 6c cf ec 09 26 02 22 03 dd 13 10 50 52 49 4e 54 45 52 20 6f 66 66 20 6c 69 6e 65 bf 12 74 00 22 22 04 2e 68 6f 75 e1 11 00 00 26 fe 1c c2 c" Bc"$Bc"C)"[cK Jl"KGJT"}Sb}i " .HOUOI N"& " t t" .LISTO{"t " | 63 22 14 c2 63 22 24 c2 63 22 c3 29 22 db e3 cb 7f ca 6c 22 cb 47 ca 54 22 7d d3 e2 fd e9 08 22 04 2e 48 4f 55 cf 49 03 4e 22 26 02 22 03 74 00 74 22 05 2e 4c 49 53 54 cf 7b 22 74 00 86 22 03 MAPOI p I x t I I y t I I z t I ? I { t K t R" sflgMQ R`o" b | 4d 41 50 cf 49 03 f0 00 49 03 f8 00 74 11 49 03 00 00 49 03 f9 00 74 11 49 03 0f 00 49 03 fa 00 74 11 49 03 3f 00 49 03 fb 00 74 11 4b 1e 74 00 d2 22 04 73 66 6c 67 cd d1 00 52 e0 ef 22 04 62 { BLOCK 0011 } flgMQ T` " -DUPa}4Jl"ee}iG" scrlistOg @ @ )#Y" @ #R B | 66 6c 67 cd d1 00 54 e0 93 22 04 2d 44 55 50 e1 7d b4 ca ec 22 e5 e5 fd e9 47 22 07 73 63 72 6c 69 73 74 cf 67 01 0b 03 07 10 15 40 0b 03 40 02 29 23 d9 22 0b 03 40 02 1d 23 d2 08 93 13 04 42 LK=D M" @ )#D g " t ^" .BLK#OY"Q t 1# .NBLK#OY"< t @# .SC | 4c 4b 3d c4 11 20 05 cd 22 0b 03 40 02 29 23 c4 11 93 15 67 01 22 03 94 02 74 00 de 22 05 2e 42 4c 4b 23 cf d9 22 d1 11 74 00 31 23 06 2e 4e 42 4c 4b 23 cf d9 22 3c 03 74 00 40 23 04 2e 53 43 ROM"Q 9#t P# .NSCROM"< I#t `# CONTINUEDOy y" t q# LOADOy y") a | 52 cf cd 22 d1 11 39 23 74 00 50 23 05 2e 4e 53 43 52 cf cd 22 3c 03 49 23 74 00 60 23 09 43 4f 4e 54 49 4e 55 45 44 cf 79 02 f9 22 80 10 74 00 71 23 04 4c 4f 41 44 cf 79 02 f9 22 a9 02 e1 02 L L t # LINELOADOy y") D D E L t # -->O y"t 8# OI y#Q I O | 4f 1c 74 06 39 0d a5 1c 49 03 cd 00 02 06 32 02 cc 02 f5 00 d1 05 cc 02 74 00 fb 14 06 2e 64 6f 65 73 2e cf a9 02 a9 02 d8 12 74 00 c9 23 85 44 4f 45 53 3e cf 49 03 f9 23 d1 05 49 03 cf 00 02 t $ <>O) ) 1 ) @ U$) k c$) | 06 74 00 02 24 02 3c 3c cf e1 02 a9 02 97 01 0b 03 cc 02 e1 02 cc 02 e1 02 cc 02 cc 02 74 00 19 24 02 3e 3e cf a9 02 a9 02 b1 03 a9 02 85 02 96 1f 40 02 55 24 a9 02 94 02 a0 02 6b 02 63 24 a9 y " L L L L t f .case.aQ7mRB|$ }i o GMU}i5$ CASEOI p$Q 2 | 02 79 02 97 01 22 03 cc 02 cc 02 cc 02 cc 02 74 00 e6 1f 06 2e 63 61 73 65 2e e1 d1 b7 ed 52 c2 7c 24 03 03 fd e9 0a 6f 03 0a 47 4d d5 fd e9 35 24 84 43 41 53 45 cf 49 03 70 24 d1 05 32 02 1f Q t $ DOVERBO2 I D H I2 ; WAt findY* `F#N* `^#V#~f | 13 94 02 d1 05 74 00 85 24 06 44 4f 56 45 52 42 cf 32 02 49 03 06 00 8e 03 09 44 13 48 81 13 0c 49 32 02 bb 03 d7 41 74 00 11 1c 04 66 69 6e 64 d9 2a 00 e0 46 23 4e 2a 06 e0 5e 23 56 23 7e e6 8B %7Be$++eY}i#~9B %eUEm[ ` >B % B %aaa+++eY}i #C %/Bs$AQak|5B | 7f b8 c2 12 25 b7 c2 e5 24 2b 2b e5 d9 fd e9 23 7e b9 c2 12 25 e5 d5 c5 ed 5b 00 e0 13 1a be c2 0b 25 05 c2 06 25 e1 e1 e1 2b 2b 2b e5 d9 fd e9 13 23 c3 0c 25 af c2 f3 24 c1 d1 e1 eb 7c b5 c2 P$Y }i $ fastOI CI L X I F$I L ; X t % smarkMQ V`?% am{V`QmSV`)9y}ih% PARAMa)m[V` e}i % L | 56 e0 e3 ed 73 56 e0 29 eb 2a 56 e0 b7 ed 52 f9 fd e9 4c 25 06 46 52 41 4d 45 3e e1 ed 7b 56 e0 d1 ed 53 56 e0 29 39 f9 fd e9 68 25 05 50 41 52 41 4d e1 29 ed 5b 56 e0 19 e5 fd e9 80 25 05 4c OCALa)m[V`k7mRe}i % BLKSHIFTOu U%I % I % ~ % I % | 4f 43 41 4c e1 29 ed 5b 56 e0 eb b7 ed 52 e5 fd e9 92 25 08 42 4c 4b 53 48 49 46 54 cf f5 00 55 25 49 03 03 00 88 25 0b 03 49 03 03 00 88 25 0b 03 fe 00 88 25 0b 03 8e 03 49 03 02 00 88 25 0b I % 1 I q%t '% SEARCHPYa}Aam1B &+e! C &! eBK}im% .d | 03 49 03 03 00 88 25 0b 03 99 03 b1 03 94 14 49 03 03 00 71 25 74 00 a7 25 06 53 45 41 52 43 48 50 59 e1 7d c1 e1 ed b1 c2 09 26 2b e5 21 01 00 c3 0c 26 21 00 00 e5 42 4b fd e9 ed 25 06 2e 64 ata.Q o ge7mB|`G}iOm0A}i & DATA>O2 a X t 0& O2 a X t z& O s& - @ 0's&" g " k ['R *** STACK PARITY ERROR ***R q 0 u | 3e cf 00 03 f3 26 0b 03 ad 04 40 02 30 27 f3 26 22 03 67 01 22 03 6b 02 5b 27 d2 08 93 13 1a 2a 2a 2a 20 53 54 41 43 4b 20 50 41 52 49 54 59 20 45 52 52 4f 52 20 2a 2a 2a d2 08 71 17 30 14 f5 @ Q't ' 1-B!a5}i]' 1+B!a4}ih' DEBUGM% N .tov.}is'\&N $DFMQ l | 00 40 02 51 27 74 00 10 27 04 31 2d 42 21 e1 35 fd e9 5d 27 04 31 2b 42 21 e1 34 fd e9 68 27 05 44 45 42 55 47 cd 25 1c 4e 1e 05 2e 74 6f 76 2e fd e9 73 27 dc 26 4e 1e 03 24 44 46 cd d1 00 ec ` ' $BCMQ n` ' $DCMQ p`"' $SBCMQ r`-' $SIYMQ t`9' SCTMQ v`E' SXO | e0 8c 27 03 24 42 43 cd d1 00 ee e0 97 27 03 24 44 43 cd d1 00 f0 e0 a2 27 04 24 53 42 43 cd d1 00 f2 e0 ad 27 04 24 53 49 59 cd d1 00 f4 e0 b9 27 03 53 43 54 cd d1 00 f6 e0 c5 27 02 53 58 cf I q t P' .CONT.MQ ^' .EXIT.MQ l' GETIY}e}iz' TRUEO~ a " t | 49 03 20 00 f1 08 74 00 d0 27 06 2e 43 4f 4e 54 2e cd d1 00 00 00 de 27 06 2e 45 58 49 54 2e cd d1 00 01 00 ec 27 05 47 45 54 49 59 fd e5 fd e9 fa 27 04 54 52 55 45 cf fe 00 e1 02 22 03 74 00 ( FALSEOu a " t ( EXITO) t '( VERBO ' (~ u ('" y I m I | 06 28 05 46 41 4c 53 45 cf f5 00 e1 02 22 03 74 00 16 28 04 45 58 49 54 cf a9 02 94 02 74 00 27 28 04 56 45 52 42 cf 92 27 1e 28 fe 00 99 03 f5 00 a8 27 22 03 79 02 17 03 49 03 7f 00 ed 04 49 1 @ g( ' (k k(~ (' ~ ('" (' I < ' ~ @ K(x U't 5( DI | 03 10 00 b1 1f 40 02 67 28 92 27 0d 28 6b 02 6b 28 fe 00 99 03 a8 27 0b 03 fe 00 8e 03 a8 27 22 03 a8 27 0b 03 49 03 10 00 bc 1f 92 27 0b 03 fe 04 40 02 4b 28 f8 12 d5 27 74 00 35 28 04 44 49 SPO ' <(t ( $PSMQ x`#( $RSMQ z`.( $SSPMQ |`9( XCNTMQ ~`E( PS | 53 50 cf 9d 27 0b 03 0b 03 3c 28 74 00 91 28 03 24 50 53 cd d1 00 f8 e0 a3 28 03 24 52 53 cd d1 00 fa e0 ae 28 04 24 53 53 50 cd d1 00 fc e0 b9 28 04 58 43 4e 54 cd d1 00 fe e0 c5 28 02 50 53 ! 9e}iQ( RS]e}i]( SBASEOV()(" b(I 4(" t f( RSDUMPO4( y b(- | 21 00 00 39 e5 fd e9 d1 28 02 52 53 dd e5 fd e9 dd 28 05 53 42 41 53 45 cf d6 28 a9 28 22 03 e2 28 49 03 02 00 8e 03 b4 28 22 03 74 00 e6 28 06 52 53 44 55 4d 50 cf b4 28 0b 03 79 02 e2 28 ad @ #) ~ k 9)y I U'I u @ )t ) PSDUMPOV(@(" )( y @ | 04 40 02 23 29 94 02 fe 00 6b 02 39 29 79 02 49 03 02 00 8e 03 0b 03 20 05 d5 27 49 03 02 00 99 03 f5 00 40 02 11 29 74 00 03 29 06 50 53 44 55 4d 50 cf d6 28 c0 28 22 03 a9 28 0b 03 79 02 c0 ( - @ g) ~ k })y I U'I u @ S)t ?) RSDO RS= )R t | 28 0b 03 ad 04 40 02 67 29 94 02 fe 00 6b 02 7d 29 79 02 49 03 02 00 99 03 0b 03 20 05 d5 27 49 03 02 00 99 03 f5 00 40 02 53 29 74 00 3f 29 03 52 53 44 cf 93 13 03 52 53 3d 0c 29 d2 08 74 00 ) PSDO PS=H)R t ) LDISPOI q [ H) ] VERB= ( [ I=b( | 83 29 03 50 53 44 cf 93 13 03 50 53 3d 48 29 d2 08 74 00 96 29 05 4c 44 49 53 50 cf 49 03 13 00 f1 08 93 13 02 5b 20 48 29 93 13 09 20 5d 20 56 45 52 42 3d 20 98 28 93 13 04 5b 20 49 3d e2 28 I ]t )) DFGMQ ag) $SMQ ar) BPNTMQ a|) $BRKMQ a * | 49 03 06 00 8e 03 0b 03 20 05 93 13 02 20 5d 74 00 a9 29 03 44 46 47 cd d1 00 00 e1 e7 29 02 24 53 cd d1 00 02 e1 f2 29 04 42 50 4e 54 cd d1 00 04 e1 fc 29 04 24 42 52 4b cd d1 00 06 e1 08 2a BMMQ a * BRKO *" ~ *" t * CLRBRKOu *" t 1* DTESTOm) ~ - @ | 02 42 4d cd d1 00 08 e1 14 2a 03 42 52 4b cf 03 2a 22 03 fe 00 0f 2a 22 03 74 00 1e 2a 06 43 4c 52 42 52 4b cf f5 00 0f 2a 22 03 74 00 31 2a 05 44 54 45 53 54 cf ed 29 0b 03 fe 00 ad 04 40 02 ^* (k n*m) I - @ n*1)t C* SGO]N ]#]F ]#* aip* SCNTO * ~ - @ | 5e 2a 98 28 6b 02 6e 2a ed 29 0b 03 49 03 02 00 ad 04 40 02 6e 2a b1 29 74 00 43 2a 03 53 47 4f dd 4e 00 dd 23 dd 46 00 dd 23 2a 02 e1 e9 70 2a 04 53 43 4e 54 cf 0f 2a 0b 03 fe 00 ad 04 40 02 B* ' * - @ <*K*R * ~ - @ 8*v*k >*v*k b*K*K' A @ R*k b*R K' | c2 2a 9d 27 0b 03 03 2a 0b 03 ad 04 40 02 bc 2a 4b 2a d2 08 19 2a 0b 03 fe 00 ad 04 40 02 b8 2a 76 2a 6b 02 be 2a 76 2a 6b 02 e2 2a 4b 2a cb 27 0b 03 c1 04 40 02 d2 2a 6b 02 e2 2a d2 08 cb 27 { BLOCK 0013 } N crflgMQ @` @ pass#MQ B` @ twidMQ @ opsflgMQ D`&@ oldioffMQ | 4e 1e 05 63 72 66 6c 67 cd d1 00 40 e0 00 40 05 70 61 73 73 23 cd d1 00 42 e0 0d 40 04 74 77 69 64 cd d1 00 19 00 1a 40 06 6f 70 73 66 6c 67 cd d1 00 44 e0 26 40 07 6f 6c 64 69 6f 66 66 cd d1 F`4@ posMQ H`C@ comvirMQ J`N@ pos+OI I@ u 1 t \@ rstO | 00 46 e0 34 40 03 70 6f 73 cd d1 00 48 e0 43 40 06 63 6f 6d 76 69 72 cd d1 00 4a e0 4e 40 04 70 6f 73 2b cf 49 03 0c 00 49 40 0b 03 99 03 8e 03 f5 00 0f 12 b1 03 74 00 5c 40 03 72 73 74 cf 97 >@" @Q W@< t x@ (OI ) ` " t /@ @ T@ @ @ T@W@ @ :@R ( | 01 0b 03 3e 40 22 03 08 40 d1 11 57 40 3c 03 74 00 78 40 81 28 cf 49 03 29 00 e0 01 22 03 74 06 2f 40 0b 03 40 02 d4 40 15 40 0b 03 40 02 d4 40 57 40 0b 03 40 02 ba 40 d2 08 93 13 03 20 28 20 2 x )W@Q >@" t @ ioffpO>@ @ {@a !@$ k A - @ | 32 02 f8 12 93 13 01 29 57 40 d1 11 97 01 0b 03 3e 40 22 03 74 00 91 40 05 69 6f 66 66 70 cf 3e 40 0b 03 97 01 0b 03 85 02 99 04 40 02 fb 40 e1 02 99 03 21 40 24 12 6b 02 13 41 85 02 ad 04 40 A u k Aa !@$ y !@a c@N y a a # t V@ cr?O @ | 02 0b 41 a0 02 f5 00 6b 02 13 41 e1 02 94 02 21 40 24 12 79 02 21 40 e1 02 99 03 63 40 4e 14 79 02 8b 01 0b 03 89 0a 97 01 0b 03 8e 03 e1 02 99 03 e1 02 a3 08 74 00 d6 40 03 63 72 3f cf 08 40 @ VAR 2 q 0 @< I@< t 7A pO/@ @ sA @ @ sA=A^@~@t XA B,O/@ @ | 0b 03 40 02 56 41 d2 08 32 02 71 17 30 14 08 40 3c 03 49 40 3c 03 74 00 37 41 01 70 cf 2f 40 0b 03 40 02 73 41 15 40 0b 03 40 02 73 41 3d 41 de 40 7e 40 74 00 58 41 02 42 2c cf 2f 40 0b 03 40 OA @ @ OA=Ay g I " r I I@z I@ I 0 J @ =A @Q D I | 02 cf 41 15 40 0b 03 40 02 cf 41 3d 41 79 02 03 02 0b 03 67 01 0b 03 49 03 03 00 03 02 22 03 f2 0f 49 03 03 00 49 40 7a 03 49 40 0b 03 49 03 30 00 99 04 ca 04 40 02 bd 41 08 40 d1 11 44 11 49 m g " " t uA ,Oy zA7 zAt SA pO\A @ sAf t bA ,pOWAfAt | 03 ff 00 ed 04 20 05 67 01 22 03 03 02 22 03 02 06 74 00 75 41 01 2c cf 79 02 7a 41 37 11 7a 41 74 00 d3 41 01 70 cf 5c 41 1a 1b 40 02 f3 41 e6 08 94 02 74 00 e2 41 02 2c 70 cf d7 41 e6 41 74 uA B,pOzAfAt B .OPSO~@~ /@" t B .NOPSO/@< t B bkspOI y u | 00 f5 41 03 42 2c 70 cf 7a 41 e6 41 74 00 01 42 04 2e 4f 50 53 cf 7e 40 fe 00 2f 40 22 03 74 00 0e 42 05 2e 4e 4f 50 53 cf 2f 40 3c 03 74 00 20 42 04 62 6b 73 70 cf 49 03 02 00 99 03 79 02 f5 a # : I 8 @ aB' k cB I y t /B prntO/@ @ m @ S | 00 e1 02 23 0e 8b 01 0b 03 89 0a ba 0e 8e 03 17 03 49 03 20 00 38 12 40 02 61 42 a7 03 6b 02 63 42 9a 11 49 03 ff ff 79 0e 74 00 2f 42 04 70 72 6e 74 cf 2f 40 0b 03 15 40 0b 03 ed 04 40 02 d3 BR y @ By ~ - @ BR k By N 6B1 D a a # | 42 d2 08 79 02 40 02 9d 42 79 02 fe 00 ad 04 40 02 99 42 d2 08 6b 02 9d 42 79 02 4e 14 94 02 97 01 0b 03 36 42 b1 03 97 01 0b 03 c4 11 99 03 e1 02 8b 01 0b 03 89 0a 8e 03 e1 02 a3 08 97 01 0b t 2 # ~@ " k UB t kB 3LBa)))e}iWB RDIOa ]B~ zAt dB RDIpOjBf | 03 74 06 32 02 90 08 a3 08 7e 40 97 01 22 03 6b 02 d5 42 94 02 74 00 6b 42 03 33 4c 42 e1 29 29 29 e5 fd e9 d7 42 03 52 44 49 cf e1 02 dd 42 fe 04 7a 41 74 00 e4 42 04 52 44 49 70 cf ea 42 e6 At uB IMIOzAzAt C RSIpO~ zAfAt C 16IpOzAWAfAt C IMIpO CfAt 0C | 41 74 00 f5 42 03 49 4d 49 cf 7a 41 7a 41 74 00 03 43 04 52 53 49 70 cf fe 04 7a 41 e6 41 74 00 10 43 04 31 36 49 70 cf 7a 41 d7 41 e6 41 74 00 20 43 04 49 4d 49 70 cf 09 43 e6 41 74 00 30 43 CODEO~ rB" D t >C ostM@ L`PC sclrOu VC< ~ VC< t [C e?Oa @ CbCR | 04 43 4f 44 45 cf fe 00 72 42 a2 1e c4 1e 74 00 3e 43 03 6f 73 74 cd c0 19 4c e0 50 43 04 73 63 6c 72 cf f5 00 56 43 3c 03 fe 00 56 43 3c 03 74 00 5b 43 02 65 3f cf e1 02 40 02 94 43 62 43 d2 x ] OPERAND? k C t qC e0?O] EXTRAvCt C e2?O] MISSINGvCt | 08 f8 12 dd 13 08 20 4f 50 45 52 41 4e 44 bf 12 6b 02 96 43 94 02 74 00 71 43 03 65 30 3f cf dd 13 05 45 58 54 52 41 76 43 74 00 98 43 03 65 32 3f cf dd 13 07 4d 49 53 53 49 4e 47 76 43 74 00 +C opOu VC J @ \Cu VC" k vC~ VC J @ rC~ VC" k vC~ Ct @C AOI | ab 43 02 6f 70 cf f5 00 56 43 0b 03 ca 04 40 02 dc 43 f5 00 56 43 22 03 6b 02 f6 43 fe 00 56 43 0b 03 ca 04 40 02 f2 43 fe 00 56 43 22 03 6b 02 f6 43 fe 00 9e 43 74 00 c0 43 01 41 cf 49 03 07 { BLOCK 0014 } ECt xC BOI ECt D COI ECt D DOI ECt D EOI ECt ,D HOI | 00 c5 43 74 00 f8 43 01 42 cf 49 03 00 01 c5 43 74 00 05 44 01 43 cf 49 03 01 02 c5 43 74 00 12 44 01 44 cf 49 03 02 03 c5 43 74 00 1f 44 01 45 cf 49 03 03 04 c5 43 74 00 2c 44 01 48 cf 49 03 ECt 9D LOI ECt FD MOI ECt SD XOI ECt `D YOI ECt mD SPO | 04 05 c5 43 74 00 39 44 01 4c cf 49 03 05 06 c5 43 74 00 46 44 01 4d cf 49 03 06 07 c5 43 74 00 53 44 01 58 cf 49 03 80 08 c5 43 74 00 60 44 01 59 cf 49 03 a0 09 c5 43 74 00 6d 44 02 53 50 cf I ECt zD PSWOI ECt D .rtM` @ D .ttM` | 49 03 06 0a c5 43 74 00 7a 44 03 50 53 57 cf 49 03 06 0b c5 43 74 00 88 44 03 2e 72 74 cd e0 19 01 00 02 00 04 00 08 00 10 00 20 00 40 00 80 00 00 01 00 02 00 04 00 08 97 44 03 2e 74 74 cd e0 * * 8D grOy VC 7 I m D D >D ] m ] ILLEGALvCV | 19 7f 00 ff 00 00 03 0a 00 2a 04 2a 08 0a 05 0a 06 b8 44 02 67 72 cf 79 02 56 43 0b 03 37 11 49 03 ff 00 ed 04 9d 44 0b 03 44 11 be 44 0b 03 dd 04 ed 04 dd 13 07 49 4c 4c 45 47 41 4c 76 43 56 C I m t QD go1O~ VC J 1C~ VD~ VC< t E go0O~ VC Cu VC J 1 | 43 0b 03 49 03 ff 00 ed 04 74 00 d1 44 03 67 6f 31 cf fe 00 56 43 0b 03 ca 04 b1 43 fe 00 d6 44 fe 00 56 43 3c 03 74 00 0b 45 03 67 6f 30 cf fe 00 56 43 0b 03 9e 43 f5 00 56 43 0b 03 ca 04 b1 Cu VDbCt (E 0gOu .Et IE 1gO~ .Et UE 2gOI .Et aE 3gOI .Et oE | 43 f5 00 d6 44 62 43 74 00 28 45 02 30 67 cf f5 00 2e 45 74 00 49 45 02 31 67 cf fe 00 2e 45 74 00 55 45 02 32 67 cf 49 03 02 00 2e 45 74 00 61 45 02 33 67 cf 49 03 03 00 2e 45 74 00 6f 45 02 4gOI .Et }E 5gOI .Et E MOV,O~ E~ .Ea ]B~ I @ ~ Bt E NOP, | 34 67 cf 49 03 04 00 2e 45 74 00 7d 45 02 35 67 cf 49 03 05 00 2e 45 74 00 8b 45 04 4d 4f 56 2c cf fe 00 11 45 fe 00 2e 45 e1 02 dd 42 fe 04 49 03 40 00 fe 04 07 42 74 00 99 45 04 4e 4f 50 2c Ou Bt 9E HLT,OI v Bt GE MVI,OZEI jB Bt WE LDAX,OtEI |Bt kE | cf f5 00 07 42 74 00 b9 45 04 48 4c 54 2c cf 49 03 76 00 07 42 74 00 c7 45 04 4d 56 49 2c cf 5a 45 49 03 06 00 ea 42 07 42 74 00 d7 45 05 4c 44 41 58 2c cf 74 45 49 03 0a 00 fc 42 74 00 eb 45 STAX,OtEI |Bt ~E XCHG,OI k Bt F ADD,OZEI Ct "F ADI,OI F | 05 53 54 41 58 2c cf 74 45 49 03 02 00 fc 42 74 00 fe 45 05 58 43 48 47 2c cf 49 03 eb 00 07 42 74 00 11 46 04 41 44 44 2c cf 5a 45 49 03 80 00 17 43 74 00 22 46 04 41 44 49 2c cf 49 03 c6 00 7Ct 4F ADC,OZEI Ct DF ACI,OI N 7Ct VF SUB,OZEI Ct fF SUI,O | 37 43 74 00 34 46 04 41 44 43 2c cf 5a 45 49 03 88 00 17 43 74 00 44 46 04 41 43 49 2c cf 49 03 ce 00 37 43 74 00 56 46 04 53 55 42 2c cf 5a 45 49 03 90 00 17 43 74 00 66 46 04 53 55 49 2c cf I V 7Ct xF SBB,OZEI Ct F SBI,OI ^ 7Ct F INR,OZEI |Bt *F D | 49 03 d6 00 37 43 74 00 78 46 04 53 42 42 2c cf 5a 45 49 03 98 00 17 43 74 00 88 46 04 53 42 49 2c cf 49 03 de 00 37 43 74 00 9a 46 04 49 4e 52 2c cf 5a 45 49 03 04 00 fc 42 74 00 aa 46 04 44 CR,OZEI |Bt | 41 49 03 26 00 07 42 74 00 ec 4b 05 53 52 41 58 2c cf 66 45 b0 4a 49 03 cb 00 7a 41 7a 41 49 03 2e 00 07 42 74 00 09 4c 05 53 52 4c 58 2c cf 66 45 b0 4a 49 03 cb 00 7a 41 7a 41 49 03 3e 00 07 Bt &L PUSHX,OfE0JI e Bt CL POPX,OfE0JI a Bt YL BITX,OfE0JI K | 42 74 00 26 4c 06 50 55 53 48 58 2c cf 66 45 b0 4a 49 03 e5 00 07 42 74 00 43 4c 05 50 4f 50 58 2c cf 66 45 b0 4a 49 03 e1 00 07 42 74 00 59 4c 05 42 49 54 58 2c cf 66 45 b0 4a 49 03 cb 00 09 CI F |Bt nL SETX,OfE0JI K CI F |Bt L RESX,OfE0JI K CI |Bt $ | 43 49 03 46 00 fc 42 74 00 6e 4c 05 53 45 54 58 2c cf 66 45 b0 4a 49 03 cb 00 09 43 49 03 c6 00 fc 42 74 00 89 4c 05 52 45 53 58 2c cf 66 45 b0 4a 49 03 cb 00 09 43 49 03 86 00 fc 42 74 00 a4 L DADX,OI .Ey I - @ fL I ])WAk vLI ] zA]BI ~ zAfAt ?L DAD | 4c 05 44 41 44 58 2c cf 49 03 06 00 2e 45 79 02 49 03 80 00 ad 04 40 02 e6 4c 94 02 49 03 dd 29 d7 41 6b 02 f6 4c 49 03 dd 00 7a 41 dd 42 49 03 09 00 fe 04 7a 41 e6 41 74 00 bf 4c 05 44 41 44 Y,OI .Ey I - @ !M I })WAk 1MI } zA]BI ~ zAfAt zL ADCX,OfE | 59 2c cf 49 03 07 00 2e 45 79 02 49 03 a0 00 ad 04 40 02 21 4d 94 02 49 03 fd 29 d7 41 6b 02 31 4d 49 03 fd 00 7a 41 dd 42 49 03 09 00 fe 04 7a 41 e6 41 74 00 fa 4c 05 41 44 43 58 2c cf 66 45 0JI zA Bt 5M SUBX,OfE0JI zA Bt LM SBBX,OfE0JI zA Bt cM ANA | b0 4a 49 03 8e 00 7a 41 07 42 74 00 35 4d 05 53 55 42 58 2c cf 66 45 b0 4a 49 03 96 00 7a 41 07 42 74 00 4c 4d 05 53 42 42 58 2c cf 66 45 b0 4a 49 03 9e 00 7a 41 07 42 74 00 63 4d 05 41 4e 41 X,OfE0JI & zA Bt zM ORAX,OfE0JI 6 zA Bt M XRAX,OfE0JI . zA Bt ( | 58 2c cf 66 45 b0 4a 49 03 a6 00 7a 41 07 42 74 00 7a 4d 05 4f 52 41 58 2c cf 66 45 b0 4a 49 03 b6 00 7a 41 07 42 74 00 91 4d 05 58 52 41 58 2c cf 66 45 b0 4a 49 03 ae 00 7a 41 07 42 74 00 a8 M CMPX,OfE0JI > zA Bt ?M INRX,OfE0JI 4 zA Bt VM DCRX,OfE0JI 5 zA | 4d 05 43 4d 50 58 2c cf 66 45 b0 4a 49 03 be 00 7a 41 07 42 74 00 bf 4d 05 49 4e 52 58 2c cf 66 45 b0 4a 49 03 34 00 7a 41 07 42 74 00 d6 4d 05 44 43 52 58 2c cf 66 45 b0 4a 49 03 35 00 7a 41 Bt mM LDAI,OI mWzAt N LDAR,OI m_zAt N STAI,OI mGzAt &N STAR,O | 07 42 74 00 ed 4d 05 4c 44 41 49 2c cf 49 03 ed 57 fa 41 74 00 04 4e 05 4c 44 41 52 2c cf 49 03 ed 5f fa 41 74 00 15 4e 05 53 54 41 49 2c cf 49 03 ed 47 fa 41 74 00 26 4e 05 53 54 41 52 2c cf I mOzAt 7N LBCD,OI m zAI K 'Ct HN LDED,OI m zAI [ 'Ct _N LSPD,OI | 49 03 ed 4f fa 41 74 00 37 4e 05 4c 42 43 44 2c cf 49 03 ed 00 7a 41 49 03 4b 00 27 43 74 00 48 4e 05 4c 44 45 44 2c cf 49 03 ed 00 7a 41 49 03 5b 00 27 43 74 00 5f 4e 05 4c 53 50 44 2c cf 49 m zAI { 'Ct vN LIXD,OI ] zAI * 'Ct N LIYD,OI } zAI * 'Ct $N SB | 03 ed 00 7a 41 49 03 7b 00 27 43 74 00 76 4e 05 4c 49 58 44 2c cf 49 03 dd 00 7a 41 49 03 2a 00 27 43 74 00 8d 4e 05 4c 49 59 44 2c cf 49 03 fd 00 7a 41 49 03 2a 00 27 43 74 00 a4 4e 05 53 42 CD,OI m zAI C 'Ct ;N SDED,OI m zAI S 'Ct RN SSPD,OI m zAI s 'Ct | 43 44 2c cf 49 03 ed 00 7a 41 49 03 43 00 27 43 74 00 bb 4e 05 53 44 45 44 2c cf 49 03 ed 00 7a 41 49 03 53 00 27 43 74 00 d2 4e 05 53 53 50 44 2c cf 49 03 ed 00 7a 41 49 03 73 00 27 43 74 00 iN SIXD,OI ] zAI " 'Ct O SIYD,OI } zAI " 'Ct O SPIX,OI ]yzAt . | e9 4e 05 53 49 58 44 2c cf 49 03 dd 00 7a 41 49 03 22 00 27 43 74 00 00 4f 05 53 49 59 44 2c cf 49 03 fd 00 7a 41 49 03 22 00 27 43 74 00 17 4f 05 53 50 49 58 2c cf 49 03 dd f9 fa 41 74 00 2e O SPIY,OI }yzAt ?O EXAF,OI Bt PO EXX,OI Y Bt aO XTIX,OI ]czA | 4f 05 53 50 49 59 2c cf 49 03 fd f9 fa 41 74 00 3f 4f 05 45 58 41 46 2c cf 49 03 08 00 07 42 74 00 50 4f 04 45 58 58 2c cf 49 03 d9 00 07 42 74 00 61 4f 05 58 54 49 58 2c cf 49 03 dd e3 fa 41 t qO XTIY,OI }czAt O LDI,OI m zAt O LDIR,OI m0zAt #O LDD,OI m( | 74 00 71 4f 05 58 54 49 59 2c cf 49 03 fd e3 fa 41 74 00 82 4f 04 4c 44 49 2c cf 49 03 ed a0 fa 41 74 00 93 4f 05 4c 44 49 52 2c cf 49 03 ed b0 fa 41 74 00 a3 4f 04 4c 44 44 2c cf 49 03 ed a8 zAt 4O LDDR,OI m8zAt DO CCI,OI m!zAt UO CCIR,OI m1zAt eO CCD,OI | fa 41 74 00 b4 4f 05 4c 44 44 52 2c cf 49 03 ed b8 fa 41 74 00 c4 4f 04 43 43 49 2c cf 49 03 ed a1 fa 41 74 00 d5 4f 05 43 43 49 52 2c cf 49 03 ed b1 fa 41 74 00 e5 4f 04 43 43 44 2c cf 49 03 { BLOCK 0017 } m)zAt vO CCDR,OI m9zAt P NEG,OI mDzAt P IM0,OI mFzAt 'P IM1,OI | ed a9 fa 41 74 00 f6 4f 05 43 43 44 52 2c cf 49 03 ed b9 fa 41 74 00 06 50 04 4e 45 47 2c cf 49 03 ed 44 fa 41 74 00 17 50 04 49 4d 30 2c cf 49 03 ed 46 fa 41 74 00 27 50 04 49 4d 31 2c cf 49 mVzAt 7P DADC,O EI m zAI J |Bt GP DSBC,O EI m zAI B |Bt `P RLCR | 03 ed 56 fa 41 74 00 37 50 05 44 41 44 43 2c cf 82 45 49 03 ed 00 7a 41 49 03 4a 00 fc 42 74 00 47 50 05 44 53 42 43 2c cf 82 45 49 03 ed 00 7a 41 49 03 42 00 fc 42 74 00 60 50 05 52 4c 43 52 ,OZEI K zAu Ct yP RALR,OZEI K zAI Ct P RRCR,OZEI K zAI C | 2c cf 5a 45 49 03 cb 00 7a 41 f5 00 17 43 74 00 79 50 05 52 41 4c 52 2c cf 5a 45 49 03 cb 00 7a 41 49 03 10 00 17 43 74 00 90 50 05 52 52 43 52 2c cf 5a 45 49 03 cb 00 7a 41 49 03 08 00 17 43 t )P RARR,OZEI K zAI Ct BP SLAR,OZEI K zAI Ct [P SRAR,OZEI | 74 00 a9 50 05 52 41 52 52 2c cf 5a 45 49 03 cb 00 7a 41 49 03 18 00 17 43 74 00 c2 50 05 53 4c 41 52 2c cf 5a 45 49 03 cb 00 7a 41 49 03 20 00 17 43 74 00 db 50 05 53 52 41 52 2c cf 5a 45 49 K zAI ( Ct tP SRLR,OZEI K zAI 8 Ct Q RLD,OI mozAt &Q RRD,OI | 03 cb 00 7a 41 49 03 28 00 17 43 74 00 f4 50 05 53 52 4c 52 2c cf 5a 45 49 03 cb 00 7a 41 49 03 38 00 17 43 74 00 0d 51 04 52 4c 44 2c cf 49 03 ed 6f fa 41 74 00 26 51 04 52 52 44 2c cf 49 03 mgzAt 6Q BIT,OZEI K zAa ]B~ I @ ~ Bt FQ SET,OZEI K zAa ]B~ I @ | ed 67 fa 41 74 00 36 51 04 42 49 54 2c cf 5a 45 49 03 cb 00 7a 41 e1 02 dd 42 fe 04 49 03 40 00 fe 04 07 42 74 00 46 51 04 53 45 54 2c cf 5a 45 49 03 cb 00 7a 41 e1 02 dd 42 fe 04 49 03 c0 00 ~ Bt fQ RES,OZEI K zAa ]B~ I ~ Bt Q PCIX,OI ]izAt &Q PCIY,O | fe 04 07 42 74 00 66 51 04 52 45 53 2c cf 5a 45 49 03 cb 00 7a 41 e1 02 dd 42 fe 04 49 03 80 00 fe 04 07 42 74 00 86 51 05 50 43 49 58 2c cf 49 03 dd e9 fa 41 74 00 a6 51 05 50 43 49 59 2c cf I }izAt 7Q RETI,OI mMzAt HQ RETN,OI mEzAt YQ IM2,OI m^zAt jQ INP | 49 03 fd e9 fa 41 74 00 b7 51 05 52 45 54 49 2c cf 49 03 ed 4d fa 41 74 00 c8 51 05 52 45 54 4e 2c cf 49 03 ed 45 fa 41 74 00 d9 51 04 49 4d 32 2c cf 49 03 ed 5e fa 41 74 00 ea 51 04 49 4e 50 ,ONEI m zAI @ |Bt zQ OUTP,ONEI m zAI A |Bt R INI,OI m"zAt +R IN | 2c cf 4e 45 49 03 ed 00 7a 41 49 03 40 00 fc 42 74 00 fa 51 05 4f 55 54 50 2c cf 4e 45 49 03 ed 00 7a 41 49 03 41 00 fc 42 74 00 12 52 04 49 4e 49 2c cf 49 03 ed a2 fa 41 74 00 2b 52 05 49 4e IR,OI m2zAt ;R IND,OI m*zAt LR INDR,OI m:zAt \R OUTD,OI m+zAt mR | 49 52 2c cf 49 03 ed b2 fa 41 74 00 3b 52 04 49 4e 44 2c cf 49 03 ed aa fa 41 74 00 4c 52 05 49 4e 44 52 2c cf 49 03 ed ba fa 41 74 00 5c 52 05 4f 55 54 44 2c cf 49 03 ed ab fa 41 74 00 6d 52 OUTI,OI m#zAt ~R OUTIR,OI m3zAt R OUTDR,OI m8zAt !R rckO @ @ | 05 4f 55 54 49 2c cf 49 03 ed a3 fa 41 74 00 7e 52 06 4f 55 54 49 52 2c cf 49 03 ed b3 fa 41 74 00 8f 52 06 4f 55 54 44 52 2c cf 49 03 ed b8 fa 41 74 00 a1 52 03 72 63 6b cf 15 40 0b 03 40 02 oRy I a I m J @ kR] out of range? k qR t 3R RLJpOzA2 | ef 52 79 02 49 03 81 ff 90 04 e1 02 49 03 80 00 99 04 ed 04 ca 04 40 02 eb 52 dd 13 0c 6f 75 74 20 6f 66 20 72 61 6e 67 65 bf 12 6b 02 f1 52 94 02 74 00 b3 52 04 52 4c 4a 70 cf 7a 41 32 02 99 ' y zAfA9Rt sR JRNZ,OI zRt S JRZ,OI ( zRt S JRNC,OI 0 zRt . | 03 a7 03 79 02 7a 41 e6 41 b9 52 74 00 f3 52 05 4a 52 4e 5a 2c cf 49 03 20 00 fa 52 74 00 0d 53 04 4a 52 5a 2c cf 49 03 28 00 fa 52 74 00 1e 53 05 4a 52 4e 43 2c cf 49 03 30 00 fa 52 74 00 2e S JRC,OI 8 zRt ?S JMPR,OI zRt OS DJNZ,OI zRt `S roaMQ P`qS . | 53 04 4a 52 43 2c cf 49 03 38 00 fa 52 74 00 3f 53 05 4a 4d 50 52 2c cf 49 03 18 00 fa 52 74 00 4f 53 05 44 4a 4e 5a 2c cf 49 03 10 00 fa 52 74 00 60 53 03 72 6f 61 cd d1 00 50 e0 71 53 04 2e ABSOwS< t |S .RELOwSQ t S fckOy I @ AS] flag not relative? | 41 42 53 cf 77 53 3c 03 74 00 7c 53 04 2e 52 45 4c cf 77 53 d1 11 74 00 8a 53 03 66 63 6b cf 79 02 49 03 03 00 90 04 40 02 c1 53 dd 13 11 66 6c 61 67 20 6e 6f 74 20 72 65 6c 61 74 69 76 65 bf t S IF,OwS @ hS S]BI ~ zA2 u Bk xS]BI B ~ zA2 u zAt CS THE | 12 74 00 98 53 03 49 46 2c cf 77 53 0b 03 40 02 e8 53 9e 53 dd 42 49 03 20 00 fe 04 7a 41 32 02 f5 00 07 42 6b 02 f8 53 dd 42 49 03 c2 00 fe 04 7a 41 32 02 f5 00 fa 41 74 00 c3 53 05 54 48 45 { BLOCK 0018 } N,OwS @ #Ty 2 a ' y 9Ra g fAk +T2 a X fAt zS ELSE,OwS @ RTI | 4e 2c cf 77 53 0b 03 40 02 23 54 79 02 32 02 e1 02 99 03 a7 03 79 02 b9 52 e1 02 e7 12 e6 41 6b 02 2b 54 32 02 e1 02 d8 12 e6 41 74 00 fa 53 05 45 4c 53 45 2c cf 77 53 0b 03 40 02 52 54 49 03 zA2 u zAa Tk bTI C zA2 u WAa Tt -T BEGIN,O2 fAt dT WHILE,OIS | 18 00 7a 41 32 02 f5 00 7a 41 e1 02 02 54 6b 02 62 54 49 03 c3 00 7a 41 32 02 f5 00 d7 41 e1 02 02 54 74 00 2d 54 06 42 45 47 49 4e 2c cf 32 02 e6 41 74 00 64 54 06 57 48 49 4c 45 2c cf c9 53 t tT END,OwS @ "T S]BI ~ zRk .T]BI B ~ zAzAt T DO,O D^E2 t 0 | 74 00 74 54 04 45 4e 44 2c cf 77 53 0b 03 40 02 a2 54 9e 53 dd 42 49 03 20 00 fe 04 fa 52 6b 02 ae 54 dd 42 49 03 c2 00 fe 04 7a 41 fa 41 74 00 82 54 03 44 4f 2c cf 09 44 de 45 32 02 74 00 b0 T LOOP,OhSt ?T REPEAT,Oa wS @ gTWSk iT I Tt LT 0=,MQ mT 0<>,M | 54 05 4c 4f 4f 50 2c cf 68 53 74 00 bf 54 07 52 45 50 45 41 54 2c cf e1 02 77 53 0b 03 40 02 e7 54 57 53 6b 02 e9 54 0c 49 02 54 74 00 cc 54 03 30 3d 2c cd d1 00 00 00 ed 54 04 30 3c 3e 2c cd Q xT =,MQ U <>,MQ U <,MQ U >=,MQ #U CY,MQ .U CY~, | d1 00 01 00 f8 54 02 3d 2c cd d1 00 00 00 04 55 03 3c 3e 2c cd d1 00 01 00 0e 55 02 3c 2c cd d1 00 02 00 19 55 03 3e 3d 2c cd d1 00 03 00 23 55 03 43 59 2c cd d1 00 02 00 2e 55 04 43 59 7e 2c MQ 9U PE,MQ EU PO,MQ PU V,MQ [U V~,MQ eU 0<,MQ pU 0> | cd d1 00 03 00 39 55 03 50 45 2c cd d1 00 04 00 45 55 03 50 4f 2c cd d1 00 05 00 50 55 02 56 2c cd d1 00 04 00 5b 55 03 56 7e 2c cd d1 00 05 00 65 55 03 30 3c 2c cd d1 00 06 00 70 55 04 30 3e =,MQ {U NEXTO?Qt U SUBRO~ rBu L 2 2 I X D t U FORWARDO | 3d 2c cd d1 00 07 00 7b 55 04 4e 45 58 54 cf bf 51 74 00 87 55 04 53 55 42 52 cf fe 00 72 42 f5 00 4c 1d 32 02 32 02 49 03 02 00 99 03 d8 12 c4 1e 74 00 93 55 07 46 4f 52 57 41 52 44 cf 0c 1c I L " t 3U LABELOI rB2 I X t NU O) @ @ /Vk GV) " ) " ) O " | 0b 03 cc 02 97 01 0b 03 cc 02 15 40 3c 03 c4 1e cc 02 74 00 eb 55 09 41 53 53 45 4d 42 4c 45 3e cf a9 02 15 40 0b 03 40 02 2f 56 6b 02 47 56 a9 02 97 01 22 03 a9 02 8b 01 22 03 a9 02 4f 01 22 ~ @" L t N cblkMQ X`KV clineMQ Z`WV ccharMQ \`dV ebufM/ ^`qV | 03 fe 00 15 40 22 03 cc 02 74 00 4e 1e 04 63 62 6c 6b cd d1 00 58 e0 4b 56 05 63 6c 69 6e 65 cd d1 00 5a e0 57 56 05 63 63 68 61 72 cd d1 00 5c e0 64 56 04 65 62 75 66 cd af 19 5e e0 71 56 05 ebuf2M/ `}V echarMQ b` V spornotMQ d` V evirgOI @ u # I : xV/ | 65 62 75 66 32 cd af 19 a0 e0 7d 56 05 65 63 68 61 72 cd d1 00 e2 e0 8a 56 07 73 70 6f 72 6e 6f 74 cd d1 00 e4 e0 97 56 05 65 76 69 72 67 cf 49 03 40 00 f5 00 23 0e 49 03 20 00 ba 0e 78 56 2f F V< t &V alineOI @ E RV t IV getlineO_V QVt bV VOR B | 03 46 0e 92 56 3c 03 74 00 a6 56 05 61 6c 69 6e 65 cf 49 03 40 00 c5 03 52 56 0b 03 89 0a 8e 03 74 00 c9 56 07 67 65 74 6c 69 6e 65 cf 5f 56 0b 03 d1 56 74 00 e2 56 01 56 cf d2 08 93 13 04 42 LK=RV I " I u # R : _V |: QV[ # F R " t u | 4c 4b 3d 52 56 0b 03 20 05 03 02 0b 03 49 03 03 00 03 02 22 03 49 03 10 00 f5 00 23 0e d2 08 ba 0e 5f 56 0b 03 99 03 20 05 93 13 01 7c ba 0e d1 56 5b 15 a3 08 46 0e d2 08 03 02 22 03 74 00 f5 V overlayOR ~ " I @ u # : I E @ pW0 k zW: I P F R I | 56 07 6f 76 65 72 6c 61 79 cf d2 08 03 02 0b 03 fe 00 03 02 22 03 49 03 40 00 f5 00 23 0e ba 0e 49 03 0a 00 45 12 40 02 70 57 30 14 6b 02 7a 57 ba 0e 49 03 0a 00 50 12 20 05 46 0e d2 08 49 03 @ u # : I E F " R t ?W virginO_V< lV< t W rbmoveO V xVu | 40 00 f5 00 23 0e ba 0e 49 03 0a 00 45 12 20 05 46 0e 03 02 22 03 d2 08 74 00 3f 57 06 76 69 72 67 69 6e cf 5f 56 3c 03 6c 56 3c 03 74 00 9a 57 06 72 62 6d 6f 76 65 cf 92 56 0b 03 78 56 f5 00 VI @ V u V V xV1 I ? V t .W incharO V I @ 1 @ X | 85 56 49 03 40 00 92 56 0b 03 99 03 19 06 f5 00 85 56 92 56 0b 03 78 56 b1 03 49 03 3f 00 92 56 0b 03 99 03 19 06 74 00 ae 57 06 69 6e 63 68 61 72 cf 92 56 0b 03 49 03 40 00 b1 1f 40 02 16 58 { BLOCK 0019 } y q 7W V xV/ VQ k X t hW copycharOlV y I @ 1 @ FXlV lVQ | 79 02 f1 08 b7 57 92 56 0b 03 78 56 2f 03 92 56 d1 11 6b 02 18 58 94 02 74 00 e8 57 08 63 6f 70 79 63 68 61 72 cf 6c 56 0b 03 79 02 49 03 40 00 b1 1f 40 02 46 58 ec 56 8e 03 17 03 6c 56 d1 11 qWk HX t X copywordO~ I @ lV # lVlV I - D @ X !V | f1 57 6b 02 48 58 94 02 74 00 1a 58 08 63 6f 70 79 77 6f 72 64 cf fe 00 49 03 40 00 6c 56 0b 03 23 0e ec 56 6c 56 0b 03 8e 03 17 03 49 03 20 00 ad 04 c4 11 10 05 40 02 8a 58 9a 11 a1 56 0b 03 @ X%Xk X%XF J y @ XX t JX copyrestOlV I @ 1 @ BXI @ lV # %X | 40 02 86 58 25 58 6b 02 8c 58 25 58 46 0e ca 04 79 02 40 02 58 58 94 02 74 00 4a 58 08 63 6f 70 79 72 65 73 74 cf 6c 56 0b 03 49 03 40 00 b1 1f 40 02 c2 58 49 03 40 00 6c 56 0b 03 23 0e 25 58 F t X eolO V I ? < @ iX V< |R u k kX~ t DX eracharO V @ | 46 0e 74 00 9a 58 03 65 6f 6c cf 92 56 0b 03 49 03 3f 00 bc 1f 40 02 e9 58 92 56 3c 03 93 13 01 7c d2 08 f5 00 6b 02 eb 58 fe 00 74 00 c4 58 07 65 72 61 63 68 61 72 cf 92 56 0b 03 02 12 40 02 >YI q I q I q I @ V # : xV : ' xV/ F I I ? xV/ Vd t | 3e 59 49 03 08 00 f1 08 49 03 20 00 f1 08 49 03 08 00 f1 08 49 03 40 00 92 56 0b 03 23 0e ba 0e 78 56 17 03 ba 0e a7 03 78 56 2f 03 46 0e 49 03 20 00 49 03 3f 00 78 56 2f 03 92 56 e4 11 74 00 mX erawordO~ u V # : ' xV I - D @ qY k sYwXI y J y @ M | ed 58 07 65 72 61 77 6f 72 64 cf fe 00 f5 00 92 56 0b 03 23 0e ba 0e a7 03 78 56 17 03 49 03 20 00 ad 04 c4 11 10 05 40 02 71 59 9a 11 6b 02 73 59 f7 58 49 03 ff ff 79 0e ca 04 79 02 40 02 4d Y t @Y passcharOJX@ %Y V xV q VQ t Y passchar?O V I @ 1 @ | 59 94 02 74 00 40 59 08 70 61 73 73 63 68 61 72 cf ca 58 40 02 a5 59 92 56 0b 03 78 56 17 03 f1 08 92 56 d1 11 74 00 85 59 09 70 61 73 73 63 68 61 72 3f cf 92 56 0b 03 49 03 40 00 b1 1f 40 02 DY Yt 'Y passwordOJX@ Z~ I @ V # : xV I - D @ Z !V @ | c4 59 90 59 74 00 a7 59 08 70 61 73 73 77 6f 72 64 cf ca 58 40 02 16 5a fe 00 49 03 40 00 92 56 0b 03 23 0e ba 0e 78 56 17 03 49 03 20 00 ad 04 c4 11 10 05 40 02 08 5a 9a 11 a1 56 0b 03 40 02 Z3Yk Z3YF J y @ ZY t FY overlineOI @ V # I : xV/ F u xVlV | 04 5a b3 59 6b 02 0a 5a b3 59 46 0e ca 04 79 02 40 02 da 59 94 02 74 00 c6 59 08 6f 76 65 72 6c 69 6e 65 cf 49 03 40 00 92 56 0b 03 23 0e 49 03 20 00 ba 0e 78 56 2f 03 46 0e f5 00 78 56 ec 56 I @ t Z linetypeOR lVI @ # |R t JZ felonO illegal li | 49 03 40 00 19 06 17 0b 74 00 18 5a 08 6c 69 6e 65 74 79 70 65 cf d2 08 ec 56 49 03 40 00 a3 08 93 13 01 7c d2 08 74 00 4a 5a 05 66 65 6c 6f 6e cf 0f 14 93 13 0c 69 6c 6c 65 67 61 6c 20 6c 69 net hZ newlO_V y I $ u _V" y v a I < ~ @ 6ZpZlV< t Z n | 6e 65 74 00 68 5a 04 6e 65 77 6c cf 5f 56 0b 03 8e 03 79 02 49 03 0f 00 24 12 f5 00 0f 12 5f 56 22 03 79 02 f6 11 e1 02 49 03 0f 00 bc 1f fe 04 40 02 b6 5a 70 5a 6c 56 3c 03 74 00 84 5a 07 6e ewlineO ZUZt \#ZyV | 86 5c 9a 11 ca 04 46 0e 92 56 0b 03 49 03 3f 00 bc 1f fe 04 40 02 64 5c 49 03 0a 00 59 5b 40 02 aa 5c 23 5a fe 00 c6 5a ae 56 49 03 1b 00 59 5b 40 02 c6 5c 92 56 0b 03 40 02 be 5c 23 5a f9 56 a J a I Y[@ T\~ FZI Y[@ d\I FZI Y[@ r\u FZI Y[@ ~\4 I | e1 02 ca 04 e1 02 49 03 04 00 59 5b 40 02 d4 5c fe 00 c6 5a 49 03 15 00 59 5b 40 02 e4 5c 49 03 ff ff c6 5a 49 03 14 00 59 5b 40 02 f2 5c f5 00 c6 5a 49 03 06 00 59 5b 40 02 fe 5c 34 0b 49 03 Y[@ ] YI Y[@ .]lVu xVI @ I @ V" j[u FZI Y[@ ^]_V y I | 0c 00 59 5b 40 02 0a 5d 90 59 49 03 19 00 59 5b 40 02 2e 5d ec 56 f5 00 78 56 49 03 40 00 19 06 49 03 40 00 92 56 22 03 6a 5b f5 00 c6 5a 49 03 0d 00 59 5b 40 02 5e 5d 5f 56 0b 03 79 02 49 03 < @ P]pZ k ^]1 UZ~ Z#ZUZ.VI Y[@ x]_V UZ#Z u FZ.VI Y[@ | 0e 00 bc 1f 40 02 50 5d 70 5a 94 02 6b 02 5e 5d b1 03 d5 5a fe 00 8b 5a 23 5a 55 5a ae 56 49 03 02 00 59 5b 40 02 78 5d 5f 56 0b 03 d5 5a 23 5a 17 0b f5 00 c6 5a ae 56 49 03 18 00 59 5b 40 02 ].VR I Y[@ ]R a J a I Y[@ $]"[I Y[@ 0]=[I Y[@ <]IWI | 86 5d ae 56 d2 08 49 03 11 00 59 5b 40 02 98 5d d2 08 e1 02 ca 04 e1 02 49 03 0e 00 59 5b 40 02 a4 5d 22 5b 49 03 10 00 59 5b 40 02 b0 5d 3d 5b 49 03 0f 00 59 5b 40 02 bc 5d 49 57 49 03 09 00 Y[@ \]I qW V I E J @ F]I Y[@ p]!V J !V" @ B[ Q t 6[ f | 59 5b 40 02 dc 5d 49 03 20 00 f1 57 92 56 0b 03 49 03 08 00 45 12 ca 04 40 02 c6 5d 49 03 07 00 59 5b 40 02 f0 5d a1 56 0b 03 ca 04 a1 56 22 03 94 02 40 02 c2 5b 10 02 d1 11 74 00 b6 5b 06 66 sflagMQ f`|] B@1+Oy 1 a t ^ match?O~ ^" 2 u # ^D ^D 8 @ | 73 66 6c 61 67 cd d1 00 e6 e0 fc 5d 04 42 40 31 2b cf 79 02 b1 03 e1 02 17 03 74 00 0a 5e 06 6d 61 74 63 68 3f cf fe 00 05 5e 22 03 32 02 90 08 f5 00 23 0e 11 5e 44 11 11 5e 44 11 38 12 40 02 H^ ^< F t ^ searchO ^< I \ ` " t 2 1 lV I @ @ ^lV< _V | 48 5e 05 5e 3c 03 9a 11 46 0e a0 02 74 00 1c 5e 06 73 65 61 72 63 68 cf 05 5e 3c 03 49 03 5c 00 e0 01 22 03 74 06 32 02 b1 03 17 03 6c 56 0b 03 49 03 40 00 96 1f 40 02 82 5e 6c 56 3c 03 5f 56 Q _V I 1 @ _I _V # : QVlV I @ lV D v%@ x^y D lV | d1 11 5f 56 0b 03 49 03 10 00 b1 1f 40 02 18 5f 49 03 10 00 5f 56 0b 03 23 0e ba 0e d1 56 6c 56 0b 03 8e 03 85 02 49 03 40 00 6c 56 0b 03 99 03 44 11 f6 25 40 02 f8 5e 79 02 44 11 99 03 6c 56 z %^ ^ @ Z^2 lVz ~ k t^lVy Q I ? < @ r^~ k t^u k _ ~ lV< | 7a 03 25 5e 05 5e 0b 03 40 02 da 5e 32 02 17 03 6c 56 7a 03 fe 00 6b 02 f4 5e 6c 56 79 02 d1 11 0b 03 49 03 3f 00 bc 1f 40 02 f2 5e fe 00 6b 02 f4 5e f5 00 6b 02 00 5f 94 02 fe 00 6c 56 3c 03 @ ^ ^ @ _: _V" F t N^ curstypO ^ @ =_UZlV N ^k L_ | 40 02 9a 5e 05 5e 0b 03 40 02 14 5f ba 0e 5f 56 22 03 9a 11 46 0e 94 02 74 00 4e 5e 07 63 75 72 73 74 79 70 cf 05 5e 0b 03 40 02 3d 5f 55 5a 6c 56 0b 03 4e 14 93 13 01 5e 6b 02 4c 5f 93 13 0a not found#Wt _ SOW^$_t N_ sucknewO I \ - @ _u 2 | 20 6e 6f 74 20 66 6f 75 6e 64 a3 57 74 00 1a 5f 01 53 cf 57 5e 24 5f 74 00 4e 5f 07 73 75 63 6b 6e 65 77 cf 8b 01 0b 03 89 0a 97 01 0b 03 8e 03 17 03 49 03 5c 00 ad 04 40 02 8a 5f f5 00 32 02 X Q k _I \ ` " t t Y_ replaceO.VlV 2 V" lVu xV V lV | d8 12 97 01 d1 11 6b 02 94 5f 49 03 5c 00 e0 01 22 03 74 06 74 00 59 5f 07 72 65 70 6c 61 63 65 cf ae 56 6c 56 0b 03 32 02 17 03 99 03 92 56 22 03 ec 56 f5 00 78 56 92 56 0b 03 19 06 6c 56 0b I @ 1 @ e_lVlV V xVI @ lV c_2 y @ #`u # 7W2 1 : | 03 49 03 40 00 b1 1f 40 02 e5 5f ec 56 6c 56 0b 03 8e 03 92 56 0b 03 78 56 49 03 40 00 6c 56 0b 03 99 03 19 06 63 5f 32 02 17 03 79 02 40 02 23 60 f5 00 23 0e b7 57 32 02 b1 03 ba 0e 8e 03 17 { BLOCK 0021 } | 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 | 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 | 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 | 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 | 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 | 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 | 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 | 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 | 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 | 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 | 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 | 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 | 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 | 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 | 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 | 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 { BLOCK 0022 } k jdI p$ d>a ~ Qbu k jdI p$4d>a ~ Qbu k jdI p$TdI x | 00 6b 02 6a 64 49 03 0e 00 70 24 1c 64 be 61 0b 03 fe 00 8e 03 d1 62 f5 00 6b 02 6a 64 49 03 10 00 70 24 34 64 be 61 0b 03 fe 00 99 03 d1 62 f5 00 6b 02 6a 64 49 03 0d 00 70 24 54 64 49 03 78 XaI q I q u k jdy I - @ fd I q u @ Vct Nc SEDOQbUct pd | 00 d8 61 49 03 0d 00 f1 08 49 03 0a 00 f1 08 f5 00 6b 02 6a 64 79 02 49 03 7f 00 ad 04 40 02 66 64 94 02 49 03 08 00 f1 08 f5 00 40 02 d6 63 74 00 ce 63 03 53 45 44 cf d1 62 d5 63 74 00 70 64 SEO>a vdt !Peret !PereSEMQ ) d VOLTIMERMQ * d MCTRACKERMQ | 02 53 45 cf be 61 0b 03 76 64 74 00 01 21 50 65 72 65 74 00 01 21 50 65 72 65 53 45 cd d1 00 29 00 8d 64 08 56 4f 4c 54 49 4d 45 52 cd d1 00 2a 00 a0 64 09 4d 43 54 52 41 43 4b 45 52 cd d1 00 + 0d SYNCMOMQ , Ad STARTMCMQ - Od NOTETIMERMQ . ^d MSTMQ / od EN | 2b 00 b0 64 06 53 59 4e 43 4d 4f cd d1 00 2c 00 c1 64 07 53 54 41 52 54 4d 43 cd d1 00 2d 00 cf 64 09 4e 4f 54 45 54 49 4d 45 52 cd d1 00 2e 00 de 64 03 4d 53 54 cd d1 00 2f 00 ef 64 09 45 4e DMUSRAMMQ 0 zd COMPTBMQ e MB1Ou ( t e MB2Ou > t &e MASTEROI | 44 4d 55 53 52 41 4d cd d1 00 30 00 fa 64 06 43 4f 4d 50 54 42 cd d1 00 80 00 0b 65 03 4d 42 31 cf f5 00 a8 88 74 00 19 65 03 4d 42 32 cf f5 00 be 88 74 00 26 65 06 4d 41 53 54 45 52 cf 49 03 zAzAt 3e ATONEOI zAzAt Ge BTONEOI zAzAt Ze CTONEOI zAzAt | 10 00 7a 41 7a 41 74 00 33 65 05 41 54 4f 4e 45 cf 49 03 11 00 7a 41 7a 41 74 00 47 65 05 42 54 4f 4e 45 cf 49 03 12 00 7a 41 7a 41 74 00 5a 65 05 43 54 4f 4e 45 cf 49 03 13 00 7a 41 7a 41 74 me VIBSOI zAzAt e ABVOLSOI zAzAt e MCVOLSOI zAzAt &e NO | 00 6d 65 04 56 49 42 53 cf 49 03 14 00 7a 41 7a 41 74 00 80 65 06 41 42 56 4f 4c 53 cf 49 03 16 00 7a 41 7a 41 74 00 92 65 06 4d 43 56 4f 4c 53 cf 49 03 15 00 7a 41 7a 41 74 00 a6 65 05 4e 4f ISEOI zAzAt :e RDRNDNTEOu zAzAzAzAt Me RRNDNTEOu zAzAu zAzAt e | 49 53 45 cf 49 03 17 00 7a 41 7a 41 74 00 ba 65 08 52 44 52 4e 44 4e 54 45 cf f5 00 7a 41 7a 41 7a 41 7a 41 74 00 cd 65 07 52 52 4e 44 4e 54 45 cf f5 00 7a 41 7a 41 f5 00 7a 41 7a 41 74 00 e5 e RNDNTEOu zAzAu zAI zAt ~e DURATIONO~ zAzAt f PLAYOI zAt . | 65 06 52 4e 44 4e 54 45 cf f5 00 7a 41 7a 41 f5 00 7a 41 49 03 ff 00 7a 41 74 00 fe 65 08 44 55 52 41 54 49 4f 4e cf fe 00 7a 41 7a 41 74 00 1a 66 04 50 4c 41 59 cf 49 03 03 00 7a 41 74 00 2e f LDPCCOI zAWAt >f ANOTEOOe%ft Qf BNOTEObe%ft `f CNOTEOue%ft o | 66 05 4c 44 50 43 43 cf 49 03 02 00 7a 41 d7 41 74 00 3e 66 05 41 4e 4f 54 45 cf 4f 65 25 66 74 00 51 66 05 42 4e 4f 54 45 cf 62 65 25 66 74 00 60 66 05 43 4e 4f 54 45 cf 75 65 25 66 74 00 6f f TONESOuebeOet ~f NOTESO f%ft f QUIETOI zAt f RAMBLEOI zA | 66 05 54 4f 4e 45 53 cf 75 65 62 65 4f 65 74 00 7e 66 05 4e 4f 54 45 53 cf 86 66 25 66 74 00 8f 66 05 51 55 49 45 54 cf 49 03 04 00 7a 41 74 00 9e 66 06 52 41 4d 42 4c 45 cf 49 03 05 00 7a 41 zAzAzAzAt /f RAMPOI zAzAzAzAzAt If GENMUSICOI zAzAzAt af RER | 7a 41 7a 41 7a 41 7a 41 74 00 af 66 04 52 41 4d 50 cf 49 03 06 00 7a 41 7a 41 7a 41 7a 41 7a 41 74 00 c9 66 08 47 45 4e 4d 55 53 49 43 cf 49 03 07 00 7a 41 7a 41 7a 41 74 00 e1 66 08 52 45 52 AMBLEOI zAt yf STOPRAMBLEOI zAt g COUNTLIMITSOI zAzAt #g | 41 4d 42 4c 45 cf 49 03 08 00 7a 41 74 00 f9 66 0a 53 54 4f 50 52 41 4d 42 4c 45 cf 49 03 09 00 7a 41 74 00 0d 67 0b 43 4f 55 4e 54 4c 49 4d 49 54 53 cf 49 03 0a 00 7a 41 7a 41 74 00 23 67 08 MOVESTEPOI zAzAzAzAt | 30 43 20 43 3d 20 4d 41 47 49 43 20 20 31 39 20 43 3d 20 58 50 41 4e 44 20 20 38 20 43 3d 20 49 4e 54 53 54 20 20 30 45 20 43 3d 20 56 45 52 41 46 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0030 } ( COIN RAM-*WRITE PROTECT* , RAM ORDER CAN BE CRUCIAL ) HEX | 28 20 43 4f 49 4e 20 52 41 4d 2d 2a 57 52 49 54 45 20 50 52 4f 54 45 43 54 2a 20 2c 20 52 41 4d 20 4f 52 44 45 52 20 43 41 4e 20 42 45 20 43 52 55 43 49 41 4c 20 29 20 48 45 58 20 20 20 20 20 RAMBASE C= WPRAMSTART RAMBASE 1+ VPTR ! | 52 41 4d 42 41 53 45 20 43 3d 20 57 50 52 41 4d 53 54 41 52 54 20 52 41 4d 42 41 53 45 20 31 2b 20 56 50 54 52 20 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 BV= DEMOMODE ( GAME OVER MODE FLAG ) | 30 20 42 56 3d 20 44 45 4d 4f 4d 4f 44 45 20 28 20 47 41 4d 45 20 4f 56 45 52 20 4d 4f 44 45 20 46 4c 41 47 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 BV= COINFRAC 0 BV= COINSIN | 30 20 42 56 3d 20 43 4f 49 4e 46 52 41 43 20 30 20 42 56 3d 20 43 4f 49 4e 53 49 4e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 BV= COINCOUNTERR ( holds # of ticks to hold counter1 on ) | 30 20 42 56 3d 20 43 4f 49 4e 43 4f 55 4e 54 45 52 52 20 28 20 68 6f 6c 64 73 20 23 20 6f 66 20 74 69 63 6b 73 20 74 6f 20 68 6f 6c 64 20 63 6f 75 6e 74 65 72 31 20 6f 6e 20 29 20 20 20 20 20 0 BV= COINBACKLOGR ( holds # of coins owed to right counter ) | 30 20 42 56 3d 20 43 4f 49 4e 42 41 43 4b 4c 4f 47 52 20 28 20 68 6f 6c 64 73 20 23 20 6f 66 20 63 6f 69 6e 73 20 6f 77 65 64 20 74 6f 20 72 69 67 68 74 20 63 6f 75 6e 74 65 72 20 29 20 20 20 0 BV= COINCOUNTERL ( holds # of ticks to hold counter2 on ) | 30 20 42 56 3d 20 43 4f 49 4e 43 4f 55 4e 54 45 52 4c 20 28 20 68 6f 6c 64 73 20 23 20 6f 66 20 74 69 63 6b 73 20 74 6f 20 68 6f 6c 64 20 63 6f 75 6e 74 65 72 32 20 6f 6e 20 29 20 20 20 20 20 0 BV= COINBACKLOGL 0 BV= COUNTERBITS | 30 20 42 56 3d 20 43 4f 49 4e 42 41 43 4b 4c 4f 47 4c 20 30 20 42 56 3d 20 43 4f 55 4e 54 45 52 42 49 54 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 BV= COINS? 0 BV= SLAM? ( flags for COINS and SLAM events ) | 30 20 42 56 3d 20 43 4f 49 4e 53 3f 20 30 20 42 56 3d 20 53 4c 41 4d 3f 20 28 20 66 6c 61 67 73 20 66 6f 72 20 43 4f 49 4e 53 20 61 6e 64 20 53 4c 41 4d 20 65 76 65 6e 74 73 20 29 20 20 20 20 0 BV= OLDCREDITS ( old reading from coin port 10H ) | 30 20 42 56 3d 20 4f 4c 44 43 52 45 44 49 54 53 20 28 20 6f 6c 64 20 72 65 61 64 69 6e 67 20 66 72 6f 6d 20 63 6f 69 6e 20 70 6f 72 74 20 31 30 48 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 3 BA= P1SCR 0 BV= P1HSP 0F BA= HISCR2 : HS2 0 HISCR2 ; | 33 20 42 41 3d 20 50 31 53 43 52 20 30 20 42 56 3d 20 50 31 48 53 50 20 30 46 20 42 41 3d 20 48 49 53 43 52 32 20 3a 20 48 53 32 20 30 20 48 49 53 43 52 32 20 3b 20 20 20 20 20 20 20 20 20 20 3 BA= P2SCR 0 BV= P2HSP 0F BA= HISCR4 : HS4 0 HISCR4 ; | 33 20 42 41 3d 20 50 32 53 43 52 20 30 20 42 56 3d 20 50 32 48 53 50 20 30 46 20 42 41 3d 20 48 49 53 43 52 34 20 3a 20 48 53 34 20 30 20 48 49 53 43 52 34 20 3b 20 20 20 20 20 20 20 20 20 20 0 BV= P1FBCTR 0 BV= P2FBCTR 0 BV= RIP 0 BV= MISSION | 30 20 42 56 3d 20 50 31 46 42 43 54 52 20 30 20 42 56 3d 20 50 32 46 42 43 54 52 20 30 20 42 56 3d 20 52 49 50 20 30 20 42 56 3d 20 4d 49 53 53 49 4f 4e 20 20 20 20 20 20 20 20 20 20 20 20 20 0 BV= MISSIONCTR 0 BV= SKILLFACTOR 0 BV= PLAYERUP | 30 20 42 56 3d 20 4d 49 53 53 49 4f 4e 43 54 52 20 30 20 42 56 3d 20 53 4b 49 4c 4c 46 41 43 54 4f 52 20 30 20 42 56 3d 20 50 4c 41 59 45 52 55 50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 BV= NPLAYERS 0 BV= INITFB 0 BV= COCKTAIL 0 BV= CRASHCTR | 30 20 42 56 3d 20 4e 50 4c 41 59 45 52 53 20 30 20 42 56 3d 20 49 4e 49 54 46 42 20 30 20 42 56 3d 20 43 4f 43 4b 54 41 49 4c 20 30 20 42 56 3d 20 43 52 41 53 48 43 54 52 20 20 20 20 20 20 20 0 V= COMBO2 3 BA= CRBASES 0 V= COMBO1 --> | 30 20 56 3d 20 43 4f 4d 42 4f 32 20 33 20 42 41 3d 20 43 52 42 41 53 45 53 20 30 20 56 3d 20 43 4f 4d 42 4f 31 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0031 } ( UNPROTECTED UNCLEARED MEMORY AREA ) HEX | 28 20 55 4e 50 52 4f 54 45 43 54 45 44 20 55 4e 43 4c 45 41 52 45 44 20 4d 45 4d 4f 52 59 20 41 52 45 41 20 29 20 48 45 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 P1SCR C= p1s 0 P2SCR C= p2s 80 C= WPSIZE | 30 20 50 31 53 43 52 20 43 3d 20 70 31 73 20 30 20 50 32 53 43 52 20 43 3d 20 70 32 73 20 38 30 20 43 3d 20 57 50 53 49 5a 45 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 RAMBASE 80 + VPTR ! | 52 41 4d 42 41 53 45 20 38 30 20 2b 20 56 50 54 52 20 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3 BA= rellink 3 BA= fflink 0 rellink C= relabs | 33 20 42 41 3d 20 72 65 6c 6c 69 6e 6b 20 33 20 42 41 3d 20 66 66 6c 69 6e 6b 20 30 20 72 65 6c 6c 69 6e 6b 20 43 3d 20 72 65 6c 61 62 73 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 fflink C= ffrelabs 0 V= MUTHAX 0 V= MUTHAY 0 BV= HARDNESS | 30 20 66 66 6c 69 6e 6b 20 43 3d 20 66 66 72 65 6c 61 62 73 20 30 20 56 3d 20 4d 55 54 48 41 58 20 30 20 56 3d 20 4d 55 54 48 41 59 20 30 20 42 56 3d 20 48 41 52 44 4e 45 53 53 20 20 20 20 20 0 BV= GOYFLAG 4 BARRAY vqhead : NILVQ 0 0 vqhead ! 0 2 vqhead ! | 30 20 42 56 3d 20 47 4f 59 46 4c 41 47 20 34 20 42 41 52 52 41 59 20 76 71 68 65 61 64 20 3a 20 4e 49 4c 56 51 20 30 20 30 20 76 71 68 65 61 64 20 21 20 30 20 32 20 76 71 68 65 61 64 20 21 20 ; 0 BV= INTDOG ( INTERRUPT HAS HAPPENED FLAG FOR WATCHDOG ) | 3b 20 30 20 42 56 3d 20 49 4e 54 44 4f 47 20 28 20 49 4e 54 45 52 52 55 50 54 20 48 41 53 20 48 41 50 50 45 4e 45 44 20 46 4c 41 47 20 46 4f 52 20 57 41 54 43 48 44 4f 47 20 29 20 20 20 20 20 0 V= BGWINDOW ( # OF LINES FOR BACKGROUND TIME SLICE ) | 30 20 56 3d 20 42 47 57 49 4e 44 4f 57 20 28 20 23 20 4f 46 20 4c 49 4e 45 53 20 46 4f 52 20 42 41 43 4b 47 52 4f 55 4e 44 20 54 49 4d 45 20 53 4c 49 43 45 20 29 20 20 20 20 20 20 20 20 20 20 0 V= BGTLMT ( BACKGROUND MINUMUM SERVICE FREQUENCY ) | 30 20 56 3d 20 42 47 54 4c 4d 54 20 28 20 42 41 43 4b 47 52 4f 55 4e 44 20 4d 49 4e 55 4d 55 4d 20 53 45 52 56 49 43 45 20 46 52 45 51 55 45 4e 43 59 20 29 20 20 20 20 20 20 20 20 20 20 20 20 0 V= BACKGROUNDRUNNING 0 V= LOCKOUTCOUNTER 0 V= BGTIMER | 30 20 56 3d 20 42 41 43 4b 47 52 4f 55 4e 44 52 55 4e 4e 49 4e 47 20 30 20 56 3d 20 4c 4f 43 4b 4f 55 54 43 4f 55 4e 54 45 52 20 30 20 56 3d 20 42 47 54 49 4d 45 52 20 20 20 20 20 20 20 20 20 0 V= LPYC 0 V= LPFLAG | 30 20 56 3d 20 4c 50 59 43 20 30 20 56 3d 20 4c 50 46 4c 41 47 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 V= TIMER0 0 V= TIMER1 0 V= TIMER2 0 V= TIMER3 0 V= BLINKTIMER | 30 20 56 3d 20 54 49 4d 45 52 30 20 30 20 56 3d 20 54 49 4d 45 52 31 20 30 20 56 3d 20 54 49 4d 45 52 32 20 30 20 56 3d 20 54 49 4d 45 52 33 20 30 20 56 3d 20 42 4c 49 4e 4b 54 49 4d 45 52 20 0 V= GAMTMR RAMBASE 340 + C= FIRSTRAMADDR | 30 20 56 3d 20 47 41 4d 54 4d 52 20 52 41 4d 42 41 53 45 20 33 34 30 20 2b 20 43 3d 20 46 49 52 53 54 52 41 4d 41 44 44 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 FIRSTRAMADDR C= 1STCLRADDR | 46 49 52 53 54 52 41 4d 41 44 44 52 20 43 3d 20 31 53 54 43 4c 52 41 44 44 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HEX 1STCLRADDR 3FF + FC00 AND C= 1STFASTADDR | 48 45 58 20 31 53 54 43 4c 52 41 44 44 52 20 33 46 46 20 2b 20 46 43 30 30 20 41 4e 44 20 43 3d 20 31 53 54 46 41 53 54 41 44 44 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 1STFASTADDR 1STCLRADDR - 1+ C= SLOWCLRSIZE DECIMAL --> | 31 53 54 46 41 53 54 41 44 44 52 20 31 53 54 43 4c 52 41 44 44 52 20 2d 20 31 2b 20 43 3d 20 53 4c 4f 57 43 4c 52 53 49 5a 45 20 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 { BLOCK 0032 } ( EQUATES for COINS, DOORS, PORTS, BITS ) DECIMAL | 28 20 45 51 55 41 54 45 53 20 66 6f 72 20 43 4f 49 4e 53 2c 20 44 4f 4f 52 53 2c 20 50 4f 52 54 53 2c 20 42 49 54 53 20 29 20 44 45 43 49 4d 41 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 10 C= COINTICKS ( how long to hold counters up and down ) | 31 30 20 43 3d 20 43 4f 49 4e 54 49 43 4b 53 20 28 20 68 6f 77 20 6c 6f 6e 67 20 74 6f 20 68 6f 6c 64 20 63 6f 75 6e 74 65 72 73 20 75 70 20 61 6e 64 20 64 6f 77 6e 20 29 20 20 20 20 20 20 20 HEX 5B C= RIGHTPORT A5 C= RIGHTVALUE ( WPRAM STUFF ) | 48 45 58 20 35 42 20 43 3d 20 52 49 47 48 54 50 4f 52 54 20 41 35 20 43 3d 20 52 49 47 48 54 56 41 4c 55 45 20 28 20 57 50 52 41 4d 20 53 54 55 46 46 20 29 20 20 20 20 20 20 20 20 20 20 20 20 10 C= COINPORT | 31 30 20 43 3d 20 43 4f 49 4e 50 4f 52 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2 C= TESTBIT ( TEST ) 3 C= SLAMBIT ( doorslam ) | 32 20 43 3d 20 54 45 53 54 42 49 54 20 28 20 54 45 53 54 20 29 20 33 20 43 3d 20 53 4c 41 4d 42 49 54 20 28 20 64 6f 6f 72 73 6c 61 6d 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 C= COINBITR 1 C= COINBITL ( coin doors ) | 30 20 43 3d 20 43 4f 49 4e 42 49 54 52 20 31 20 43 3d 20 43 4f 49 4e 42 49 54 4c 20 28 20 63 6f 69 6e 20 64 6f 6f 72 73 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 12 C= BUTTS ( buttons, 12 = coctail 2nd player ) | 31 32 20 43 3d 20 42 55 54 54 53 20 28 20 62 75 74 74 6f 6e 73 2c 20 31 32 20 3d 20 63 6f 63 74 61 69 6c 20 32 6e 64 20 70 6c 61 79 65 72 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 13 C= SETTINGS ( SETTING SWITCH ) | 31 33 20 43 3d 20 53 45 54 54 49 4e 47 53 20 28 20 53 45 54 54 49 4e 47 20 53 57 49 54 43 48 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 15 C= CCMISC ( COIN COUNTER/MISC ) | 31 35 20 43 3d 20 43 43 4d 49 53 43 20 28 20 43 4f 49 4e 20 43 4f 55 4e 54 45 52 2f 4d 49 53 43 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL | 44 45 43 49 4d 41 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0033 } ( RAM ORIGIN AND SPECIAL VGS VERBS ) | 28 20 52 41 4d 20 4f 52 49 47 49 4e 20 41 4e 44 20 53 50 45 43 49 41 4c 20 56 47 53 20 56 45 52 42 53 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HEX | 48 45 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE DI DI, NEXT ( disable interrupts ) | 43 4f 44 45 20 44 49 20 44 49 2c 20 4e 45 58 54 20 28 20 64 69 73 61 62 6c 65 20 69 6e 74 65 72 72 75 70 74 73 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE EI EI, NEXT ( enable interrupts ) | 43 4f 44 45 20 45 49 20 45 49 2c 20 4e 45 58 54 20 28 20 65 6e 61 62 6c 65 20 69 6e 74 65 72 72 75 70 74 73 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE XDI DI, A XRA, INMOD OUT, NEXT | 43 4f 44 45 20 58 44 49 20 44 49 2c 20 41 20 58 52 41 2c 20 49 4e 4d 4f 44 20 4f 55 54 2c 20 4e 45 58 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 : MS 0 DO 4 0 DO LOOP LOOP ; | 3a 20 4d 53 20 30 20 44 4f 20 34 20 30 20 44 4f 20 4c 4f 4f 50 20 4c 4f 4f 50 20 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CC? IFTRUE | 43 43 3f 20 49 46 54 52 55 45 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 : ROMIT DP @ other @ DP ! ; : TIMOR DP @ other ! DP ! ; | 3a 20 52 4f 4d 49 54 20 44 50 20 40 20 6f 74 68 65 72 20 40 20 44 50 20 21 20 3b 20 3a 20 54 49 4d 4f 52 20 44 50 20 40 20 6f 74 68 65 72 20 21 20 44 50 20 21 20 3b 20 20 20 20 20 20 20 20 20 : DP @ there ! DP ! TERSE DEFINITIONS ; | 3a 20 4f 4e 53 43 52 3e 20 44 50 20 40 20 74 68 65 72 65 20 21 20 44 50 20 21 20 54 45 52 53 45 20 44 45 46 49 4e 49 54 49 4f 4e 53 20 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ROMIT | 52 4f 4d 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 IFEND | 49 46 45 4e 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0034 } ( VGS random, ranger ) | 28 20 56 47 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 72 61 6e 64 6f 6d 2c 20 72 61 6e 67 65 72 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2 A= RND# ( you must seed RND# !!!!!!!!! ) | 32 20 41 3d 20 52 4e 44 23 20 20 20 20 20 20 28 20 79 6f 75 20 6d 75 73 74 20 73 65 65 64 20 52 4e 44 23 20 21 21 21 21 21 21 21 21 21 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR random ( 32 bit random # generator ) .REL | 53 55 42 52 20 72 61 6e 64 6f 6d 20 28 20 33 32 20 62 69 74 20 72 61 6e 64 6f 6d 20 23 20 67 65 6e 65 72 61 74 6f 72 20 29 20 2e 52 45 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( out- randomly selected # in DEHL ) | 20 20 28 20 6f 75 74 2d 20 72 61 6e 64 6f 6d 6c 79 20 73 65 6c 65 63 74 65 64 20 23 20 69 6e 20 44 45 48 4c 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 B PUSH, 0 RND# LBCD, 1321 H LXI, B DAD, H PUSH, | 20 42 20 50 55 53 48 2c 20 30 20 52 4e 44 23 20 4c 42 43 44 2c 20 31 33 32 31 20 48 20 4c 58 49 2c 20 42 20 44 41 44 2c 20 48 20 50 55 53 48 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2776 H LXI, B DADC, 1 RND# LDED, D DAD, XTHL, | 20 32 37 37 36 20 48 20 4c 58 49 2c 20 42 20 44 41 44 43 2c 20 31 20 52 4e 44 23 20 4c 44 45 44 2c 20 44 20 44 41 44 2c 20 58 54 48 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 B DAD, XTHL, D DADC, XTHL, B DAD, XTHL, D DADC, XTHL, | 20 42 20 44 41 44 2c 20 58 54 48 4c 2c 20 44 20 44 41 44 43 2c 20 58 54 48 4c 2c 20 42 20 44 41 44 2c 20 58 54 48 4c 2c 20 44 20 44 41 44 43 2c 20 58 54 48 4c 2c 20 20 20 20 20 20 20 20 20 20 E D MOV, B E MOV, C B MOV, 0 C MVI, B DAD, 0 RND# SHLD, | 20 45 20 44 20 4d 4f 56 2c 20 42 20 45 20 4d 4f 56 2c 20 43 20 42 20 4d 4f 56 2c 20 30 20 43 20 4d 56 49 2c 20 42 20 44 41 44 2c 20 30 20 52 4e 44 23 20 53 48 4c 44 2c 20 20 20 20 20 20 20 20 XTHL, D DADC, 1 RND# SHLD, D POP, B POP, RET, | 20 58 54 48 4c 2c 20 44 20 44 41 44 43 2c 20 31 20 52 4e 44 23 20 53 48 4c 44 2c 20 44 20 50 4f 50 2c 20 42 20 50 4f 50 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR ranger ( pass # in HL, range in DE, ) B PUSH, EXX, | 53 55 42 52 20 72 61 6e 67 65 72 20 28 20 70 61 73 73 20 23 20 69 6e 20 48 4c 2c 20 72 61 6e 67 65 20 69 6e 20 44 45 2c 20 29 20 42 20 50 55 53 48 2c 20 45 58 58 2c 20 20 20 20 20 20 20 20 20 0 H LXI, H D MOV, L E MOV, EXX, D PUSH, B POP, XCHG, | 20 30 20 48 20 4c 58 49 2c 20 48 20 44 20 4d 4f 56 2c 20 4c 20 45 20 4d 4f 56 2c 20 45 58 58 2c 20 44 20 50 55 53 48 2c 20 42 20 50 4f 50 2c 20 58 43 48 47 2c 20 20 20 20 20 20 20 20 20 20 20 0 H LXI, BEGIN, B SRLR, C RARR, CY, IF, D DAD, EXX, D DADC, | 20 30 20 48 20 4c 58 49 2c 20 42 45 47 49 4e 2c 20 42 20 53 52 4c 52 2c 20 43 20 52 41 52 52 2c 20 43 59 2c 20 49 46 2c 20 44 20 44 41 44 2c 20 45 58 58 2c 20 44 20 44 41 44 43 2c 20 20 20 20 EXX, THEN, B A MOV, C ORA, <>, IF, E SLAR, D RALR, EXX, E RALR, | 20 45 58 58 2c 20 54 48 45 4e 2c 20 42 20 41 20 4d 4f 56 2c 20 43 20 4f 52 41 2c 20 3c 3e 2c 20 49 46 2c 20 45 20 53 4c 41 52 2c 20 44 20 52 41 4c 52 2c 20 45 58 58 2c 20 45 20 52 41 4c 52 2c D RALR, EXX, { SWAP } JMP, THEN, EXX, B POP, RET, .ABS | 20 44 20 52 41 4c 52 2c 20 45 58 58 2c 20 7b 20 53 57 41 50 20 7d 20 4a 4d 50 2c 20 54 48 45 4e 2c 20 45 58 58 2c 20 42 20 50 4f 50 2c 20 52 45 54 2c 20 2e 41 42 53 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0035 } ( VGS random, RND, RANGER ) | 28 20 56 47 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 72 61 6e 64 6f 6d 2c 20 52 4e 44 2c 20 52 41 4e 47 45 52 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR rnd ( pass range in DE, returns # in HL ) | 53 55 42 52 20 72 6e 64 20 28 20 70 61 73 73 20 72 61 6e 67 65 20 69 6e 20 44 45 2c 20 72 65 74 75 72 6e 73 20 23 20 69 6e 20 48 4c 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 D PUSH, random CALL, D POP, ranger CALL, RET, | 20 44 20 50 55 53 48 2c 20 72 61 6e 64 6f 6d 20 43 41 4c 4c 2c 20 44 20 50 4f 50 2c 20 72 61 6e 67 65 72 20 43 41 4c 4c 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE RANDOM ( out= # on stack ) random CALL, H PUSH, NEXT | 43 4f 44 45 20 52 41 4e 44 4f 4d 20 28 20 6f 75 74 3d 20 23 20 6f 6e 20 73 74 61 63 6b 20 29 20 72 61 6e 64 6f 6d 20 43 41 4c 4c 2c 20 48 20 50 55 53 48 2c 20 4e 45 58 54 20 20 20 20 20 20 20 CODE RND ( pass range on stack ) | 43 4f 44 45 20 52 4e 44 20 28 20 70 61 73 73 20 72 61 6e 67 65 20 6f 6e 20 73 74 61 63 6b 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 random CALL, D POP, ranger CALL, H PUSH, NEXT | 20 72 61 6e 64 6f 6d 20 43 41 4c 4c 2c 20 44 20 50 4f 50 2c 20 72 61 6e 67 65 72 20 43 41 4c 4c 2c 20 48 20 50 55 53 48 2c 20 4e 45 58 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( RANDOM NUMBER ROUTINE DESIGNED NOT TO REPEAT SAME # TWICE ) | 28 20 52 41 4e 44 4f 4d 20 4e 55 4d 42 45 52 20 52 4f 55 54 49 4e 45 20 44 45 53 49 47 4e 45 44 20 4e 4f 54 20 54 4f 20 52 45 50 45 41 54 20 53 41 4d 45 20 23 20 54 57 49 43 45 20 29 20 20 20 ( TRACKBYTE RANGE UNEQRND --- NEWNUM ) | 28 20 54 52 41 43 4b 42 59 54 45 20 52 41 4e 47 45 20 55 4e 45 51 52 4e 44 20 2d 2d 2d 20 4e 45 57 4e 55 4d 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE UNEQRND .REL | 43 4f 44 45 20 55 4e 45 51 52 4e 44 20 2e 52 45 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 random CALL, D POP, D PUSH, ranger CALL, L A MOV, | 72 61 6e 64 6f 6d 20 43 41 4c 4c 2c 20 44 20 50 4f 50 2c 20 44 20 50 55 53 48 2c 20 72 61 6e 67 65 72 20 43 41 4c 4c 2c 20 4c 20 41 20 4d 4f 56 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 D POP, H POP, M CMP, 0=, IF, A INR, E CMP, 0=, IF, A XRA, | 44 20 50 4f 50 2c 20 48 20 50 4f 50 2c 20 4d 20 43 4d 50 2c 20 30 3d 2c 20 49 46 2c 20 41 20 49 4e 52 2c 20 45 20 43 4d 50 2c 20 30 3d 2c 20 49 46 2c 20 41 20 58 52 41 2c 20 20 20 20 20 20 20 THEN, THEN, A E MOV, 0 D MVI, E M MOV, D PUSH, .ABS NEXT | 54 48 45 4e 2c 20 54 48 45 4e 2c 20 41 20 45 20 4d 4f 56 2c 20 30 20 44 20 4d 56 49 2c 20 45 20 4d 20 4d 4f 56 2c 20 44 20 50 55 53 48 2c 20 2e 41 42 53 20 4e 45 58 54 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0036 } ( VGS COLOR AND FLOOD ) | 28 20 56 47 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 4f 4c 4f 52 20 41 4e 44 20 46 4c 4f 4f 44 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( UPDATE COLOR MAP -- QUICKLY ) | 28 20 55 50 44 41 54 45 20 43 4f 4c 4f 52 20 4d 41 50 20 2d 2d 20 51 55 49 43 4b 4c 59 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE COLOR EXX, H POP, 800 B LXI, | 43 4f 44 45 20 43 4f 4c 4f 52 20 45 58 58 2c 20 48 20 50 4f 50 2c 20 38 30 30 20 42 20 4c 58 49 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 BEGIN, M A MOV, A OUTP, H INX, C INR, LOOP, | 42 45 47 49 4e 2c 20 4d 20 41 20 4d 4f 56 2c 20 41 20 4f 55 54 50 2c 20 48 20 49 4e 58 2c 20 43 20 49 4e 52 2c 20 4c 4f 4f 50 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 EXX, NEXT | 45 58 58 2c 20 4e 45 58 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE FLOOD ( set all color ports to the same value ) | 43 4f 44 45 20 46 4c 4f 4f 44 20 20 20 28 20 73 65 74 20 61 6c 6c 20 63 6f 6c 6f 72 20 70 6f 72 74 73 20 74 6f 20 74 68 65 20 73 61 6d 65 20 76 61 6c 75 65 20 29 20 20 20 20 20 20 20 20 20 20 ( in- byte color value ) | 20 20 28 20 69 6e 2d 20 62 79 74 65 20 63 6f 6c 6f 72 20 76 61 6c 75 65 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( out- screen color ports set to same value ) | 20 20 28 20 6f 75 74 2d 20 73 63 72 65 65 6e 20 63 6f 6c 6f 72 20 70 6f 72 74 73 20 73 65 74 20 74 6f 20 73 61 6d 65 20 76 61 6c 75 65 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 EXX, H POP, L A MOV, 800 B LXI, BEGIN, A OUTP, C INR, LOOP, | 45 58 58 2c 20 48 20 50 4f 50 2c 20 4c 20 41 20 4d 4f 56 2c 20 38 30 30 20 42 20 4c 58 49 2c 20 42 45 47 49 4e 2c 20 41 20 4f 55 54 50 2c 20 43 20 49 4e 52 2c 20 4c 4f 4f 50 2c 20 20 20 20 20 EXX, NEXT | 45 58 58 2c 20 4e 45 58 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 : FILL ( fill screen whith constant data ) | 3a 20 46 49 4c 4c 20 20 20 28 20 66 69 6c 6c 20 73 63 72 65 65 6e 20 77 68 69 74 68 20 63 6f 6e 73 74 61 6e 74 20 64 61 74 61 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( in- constant , starting address , # of bytes to fill ) | 20 20 28 20 69 6e 2d 20 63 6f 6e 73 74 61 6e 74 20 2c 20 73 74 61 72 74 69 6e 67 20 61 64 64 72 65 73 73 20 2c 20 23 20 6f 66 20 62 79 74 65 73 20 74 6f 20 66 69 6c 6c 20 29 20 20 20 20 20 20 ( out- does sequential fill whith constant specified ) | 20 20 28 20 6f 75 74 2d 20 64 6f 65 73 20 73 65 71 75 65 6e 74 69 61 6c 20 66 69 6c 6c 20 77 68 69 74 68 20 63 6f 6e 73 74 61 6e 74 20 73 70 65 63 69 66 69 65 64 20 29 20 20 20 20 20 20 20 20 ROT ROT 2DUP ! SWAP DROP DUP 1+ ROT 1- BMOVE ; | 20 20 52 4f 54 20 52 4f 54 20 32 44 55 50 20 21 20 53 57 41 50 20 44 52 4f 50 20 44 55 50 20 31 2b 20 52 4f 54 20 31 2d 20 42 4d 4f 56 45 20 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0037 } ( VGS pattern board and magic equates ) | 28 20 56 47 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 70 61 74 74 65 72 6e 20 62 6f 61 72 64 20 61 6e 64 20 6d 61 67 69 63 20 65 71 75 61 74 65 73 20 29 20 20 20 20 20 20 20 20 HEX | 48 45 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( pattern board ports ) | 28 20 70 61 74 74 65 72 6e 20 62 6f 61 72 64 20 70 6f 72 74 73 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 78 C= PBLINADRL 79 C= PBLINADRH 7A C= PBSTAT 7B C= PBAREADRL | 37 38 20 43 3d 20 50 42 4c 49 4e 41 44 52 4c 20 37 39 20 43 3d 20 50 42 4c 49 4e 41 44 52 48 20 37 41 20 43 3d 20 50 42 53 54 41 54 20 37 42 20 43 3d 20 50 42 41 52 45 41 44 52 4c 20 20 20 20 7B C= PBXMOD 7C C= PBAREADRH 7D C= PBXWIDE 7E C= PBYHIGH | 37 42 20 43 3d 20 50 42 58 4d 4f 44 20 20 20 20 37 43 20 43 3d 20 50 42 41 52 45 41 44 52 48 20 37 44 20 43 3d 20 50 42 58 57 49 44 45 20 37 45 20 43 3d 20 50 42 59 48 49 47 48 20 20 20 20 20 ( pattern board status port bits ) | 20 20 28 20 70 61 74 74 65 72 6e 20 62 6f 61 72 64 20 73 74 61 74 75 73 20 70 6f 72 74 20 62 69 74 73 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 C= PBDIR 1 C= PBEXP 2 C= PBCONS 3 C= PBFLUSH | 30 20 43 3d 20 50 42 44 49 52 20 31 20 43 3d 20 50 42 45 58 50 20 32 20 43 3d 20 50 42 43 4f 4e 53 20 33 20 43 3d 20 50 42 46 4c 55 53 48 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4 C= PBFLIP 5 C= PBFLOP | 34 20 43 3d 20 50 42 46 4c 49 50 20 35 20 43 3d 20 50 42 46 4c 4f 50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( magic register bits ) | 20 20 28 20 6d 61 67 69 63 20 72 65 67 69 73 74 65 72 20 62 69 74 73 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2 C= MRROT 3 C= MREXP 4 C= MROR 5 C= MRXOR | 32 20 43 3d 20 4d 52 52 4f 54 20 33 20 43 3d 20 4d 52 45 58 50 20 34 20 43 3d 20 4d 52 4f 52 20 35 20 43 3d 20 4d 52 58 4f 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6 C= MRFLOP 7 C= MRFLIP | 36 20 43 3d 20 4d 52 46 4c 4f 50 20 37 20 43 3d 20 4d 52 46 4c 49 50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0038 } ( RELABS ) F= NULRET F= norrel SUBR ffnorrel , IF, 1 Y A LDX, H ADD, A DCR, A H MOV, | 37 20 43 20 42 49 54 2c 20 30 3c 3e 2c 20 49 46 2c 20 31 20 59 20 41 20 4c 44 58 2c 20 48 20 41 44 44 2c 20 41 20 44 43 52 2c 20 41 20 48 20 4d 4f 56 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 THEN, 6 C BIT, 0<>, IF, 0 Y A LDX, D ADD, A DCR, | 54 48 45 4e 2c 20 36 20 43 20 42 49 54 2c 20 30 3c 3e 2c 20 49 46 2c 20 30 20 59 20 41 20 4c 44 58 2c 20 44 20 41 44 44 2c 20 41 20 44 43 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 A D MOV, THEN, ( FALL INTO ... ) | 41 20 44 20 4d 4f 56 2c 20 54 48 45 4e 2c 20 28 20 46 41 4c 4c 20 49 4e 54 4f 20 2e 2e 2e 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 LABEL norrel ( relative X Y to magic address conversion ) | 4c 41 42 45 4c 20 6e 6f 72 72 65 6c 20 28 20 72 65 6c 61 74 69 76 65 20 58 20 59 20 74 6f 20 6d 61 67 69 63 20 61 64 64 72 65 73 73 20 63 6f 6e 76 65 72 73 69 6f 6e 20 29 20 20 20 20 20 20 20 ( in- BC=exp/mag DE=x HL=y ) | 20 20 28 20 69 6e 2d 20 42 43 3d 65 78 70 2f 6d 61 67 20 44 45 3d 78 20 48 4c 3d 79 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( out- BC=exp/mag+shift HL=scradr ) | 20 20 28 20 6f 75 74 2d 20 42 43 3d 65 78 70 2f 6d 61 67 2b 73 68 69 66 74 20 48 4c 3d 73 63 72 61 64 72 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 H A MOV, 0 H MVI, A L MOV, | 20 20 48 20 41 20 4d 4f 56 2c 20 30 20 48 20 4d 56 49 2c 20 41 20 4c 20 4d 4f 56 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 H DAD, H DAD, H DAD, | 20 20 48 20 44 41 44 2c 20 48 20 44 41 44 2c 20 48 20 44 41 44 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 H DAD, D PUSH, L E MOV, H D MOV, H DAD, H DAD, ( *64 ) | 20 20 48 20 44 41 44 2c 20 44 20 50 55 53 48 2c 20 4c 20 45 20 4d 4f 56 2c 20 48 20 44 20 4d 4f 56 2c 20 48 20 44 41 44 2c 20 48 20 44 41 44 2c 20 28 20 2a 36 34 20 29 20 20 20 20 20 20 20 20 D DAD, ( *80 ) XCHG, H POP, ( x ) | 20 20 44 20 44 41 44 2c 20 28 20 2a 38 30 20 29 20 58 43 48 47 2c 20 48 20 50 4f 50 2c 20 28 20 78 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 L A MOV, ( SAVE BIT CNT ) H L MOV, 0 H MVI, D DAD, ( x+y ) | 20 20 4c 20 41 20 4d 4f 56 2c 20 20 28 20 53 41 56 45 20 42 49 54 20 43 4e 54 20 29 20 48 20 4c 20 4d 4f 56 2c 20 30 20 48 20 4d 56 49 2c 20 44 20 44 41 44 2c 20 28 20 78 2b 79 20 29 20 20 20 RLC, RLC, HEX 3 ANI, | 20 20 52 4c 43 2c 20 52 4c 43 2c 20 48 45 58 20 33 20 41 4e 49 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 MRFLOP C BIT, 0<>, IF, NEG, 0=, IF, H DCX, THEN, THEN, | 20 20 4d 52 46 4c 4f 50 20 43 20 42 49 54 2c 20 30 3c 3e 2c 20 49 46 2c 20 4e 45 47 2c 20 30 3d 2c 20 49 46 2c 20 48 20 44 43 58 2c 20 54 48 45 4e 2c 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 3 ANI, A E MOV, C A MOV, FC ANI, E ORA, A C MOV, | 20 20 33 20 41 4e 49 2c 20 41 20 45 20 4d 4f 56 2c 20 43 20 41 20 4d 4f 56 2c 20 46 43 20 41 4e 49 2c 20 45 20 4f 52 41 2c 20 41 20 43 20 4d 4f 56 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 LABEL NULRET RET, ASSEMBLE> --> | 4c 41 42 45 4c 20 4e 55 4c 52 45 54 20 52 45 54 2c 20 41 53 53 45 4d 42 4c 45 3e 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0039 } ( VGS RELABS ) | 28 20 56 47 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 4c 41 42 53 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE RELABS ( relative to absolute conversion ) | 43 4f 44 45 20 52 45 4c 41 42 53 20 28 20 72 65 6c 61 74 69 76 65 20 74 6f 20 61 62 73 6f 6c 75 74 65 20 63 6f 6e 76 65 72 73 69 6f 6e 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( in- exp/mag , X , Y ) | 20 20 28 20 69 6e 2d 20 65 78 70 2f 6d 61 67 20 2c 20 58 20 2c 20 59 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( out- exp/mag+shift , scradr ) | 20 20 28 20 6f 75 74 2d 20 65 78 70 2f 6d 61 67 2b 73 68 69 66 74 20 2c 20 73 63 72 61 64 72 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 EXX, ( save BC ) | 20 20 45 58 58 2c 20 28 20 73 61 76 65 20 42 43 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 H POP, ( Y ) D POP, ( X ) B POP, ( exp/mag ) | 20 20 48 20 50 4f 50 2c 20 28 20 59 20 29 20 44 20 50 4f 50 2c 20 28 20 58 20 29 20 42 20 50 4f 50 2c 20 28 20 65 78 70 2f 6d 61 67 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 relabs CALL, B PUSH, ( exp/mag+shf ) | 20 20 72 65 6c 61 62 73 20 43 41 4c 4c 2c 20 42 20 50 55 53 48 2c 20 28 20 65 78 70 2f 6d 61 67 2b 73 68 66 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 H PUSH, ( scradr ) EXX, NEXT | 20 20 48 20 50 55 53 48 2c 20 28 20 73 63 72 61 64 72 20 29 20 45 58 58 2c 20 4e 45 58 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( UPSIDE DOWN RELABS ROUTINES FOR COCKTAIL MODE USE ) | 28 20 55 50 53 49 44 45 20 44 4f 57 4e 20 52 45 4c 41 42 53 20 52 4f 55 54 49 4e 45 53 20 46 4f 52 20 43 4f 43 4b 54 41 49 4c 20 4d 4f 44 45 20 55 53 45 20 29 20 20 20 20 20 20 20 20 20 20 20 SUBR cockrel norrel CALL, XCHG, 3FBF H LXI, A ANA, | 53 55 42 52 20 63 6f 63 6b 72 65 6c 20 6e 6f 72 72 65 6c 20 43 41 4c 4c 2c 20 58 43 48 47 2c 20 33 46 42 46 20 48 20 4c 58 49 2c 20 41 20 41 4e 41 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 D DSBC, C A MOV, 0C0 XRI, A C MOV, RET, | 44 20 44 53 42 43 2c 20 43 20 41 20 4d 4f 56 2c 20 30 43 30 20 58 52 49 2c 20 41 20 43 20 4d 4f 56 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR cockff ffnorrel CALL, XCHG, 3FBF H LXI, A ANA, | 53 55 42 52 20 63 6f 63 6b 66 66 20 66 66 6e 6f 72 72 65 6c 20 43 41 4c 4c 2c 20 58 43 48 47 2c 20 33 46 42 46 20 48 20 4c 58 49 2c 20 41 20 41 4e 41 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 D DSBC, C A MOV, 0C0 XRI, A C MOV, RET, | 44 20 44 53 42 43 2c 20 43 20 41 20 4d 4f 56 2c 20 30 43 30 20 58 52 49 2c 20 41 20 43 20 4d 4f 56 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0040 } ( JOYSTICK READ ROUTINE ) | 28 20 4a 4f 59 53 54 49 43 4b 20 52 45 41 44 20 52 4f 55 54 49 4e 45 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HEX | 48 45 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR GJ .REL | 53 55 42 52 20 47 4a 20 2e 52 45 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 COCKTAIL LDA, A ANA, 0=, IF, 12 IN, ELSE, 11 IN, THEN, | 43 4f 43 4b 54 41 49 4c 20 4c 44 41 2c 20 41 20 41 4e 41 2c 20 30 3d 2c 20 49 46 2c 20 31 32 20 49 4e 2c 20 45 4c 53 45 2c 20 31 31 20 49 4e 2c 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 20 0F XRI, RET, .ABS | 30 46 20 58 52 49 2c 20 52 45 54 2c 20 2e 41 42 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0041 } ( VGS WRITE ) | 28 20 56 47 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 57 52 49 54 45 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR write | 53 55 42 52 20 77 72 69 74 65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( pattern board write ) | 20 20 28 20 70 61 74 74 65 72 6e 20 62 6f 61 72 64 20 77 72 69 74 65 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 B A MOV, XPAND OUT, C A MOV, MAGIC OUT, 24 B MVI, | 20 20 42 20 41 20 4d 4f 56 2c 20 58 50 41 4e 44 20 4f 55 54 2c 20 43 20 41 20 4d 4f 56 2c 20 4d 41 47 49 43 20 4f 55 54 2c 20 32 34 20 42 20 4d 56 49 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 MRFLIP C BIT, 0<>, IF, PBFLIP B SET, THEN, | 20 20 4d 52 46 4c 49 50 20 43 20 42 49 54 2c 20 30 3c 3e 2c 20 49 46 2c 20 50 42 46 4c 49 50 20 42 20 53 45 54 2c 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 MRFLOP C BIT, 0<>, IF, PBFLOP B RES, THEN, | 20 20 4d 52 46 4c 4f 50 20 43 20 42 49 54 2c 20 30 3c 3e 2c 20 49 46 2c 20 50 42 46 4c 4f 50 20 42 20 52 45 53 2c 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 H PUSH, Y PUSHX, H POP, | 48 20 50 55 53 48 2c 20 59 20 50 55 53 48 58 2c 20 48 20 50 4f 50 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 MREXP C BIT, 0<>, IF, PBEXP B SET, | 20 20 4d 52 45 58 50 20 20 43 20 42 49 54 2c 20 30 3c 3e 2c 20 49 46 2c 20 50 42 45 58 50 20 42 20 53 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ELSE, PBFLUSH B SET, E INR, | 45 4c 53 45 2c 20 50 42 46 4c 55 53 48 20 42 20 53 45 54 2c 20 45 20 49 4e 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 THEN, B A MOV, PBSTAT OUT, ( B=status C=magic ) | 54 48 45 4e 2c 20 20 20 42 20 41 20 4d 4f 56 2c 20 50 42 53 54 41 54 20 4f 55 54 2c 20 28 20 42 3d 73 74 61 74 75 73 20 43 3d 6d 61 67 69 63 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 L A MOV, PBLINADRL OUT, | 20 20 4c 20 41 20 4d 4f 56 2c 20 50 42 4c 49 4e 41 44 52 4c 20 4f 55 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 H A MOV, PBLINADRH OUT, | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 48 20 41 20 4d 4f 56 2c 20 50 42 4c 49 4e 41 44 52 48 20 4f 55 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 H POP, | 20 20 48 20 50 4f 50 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 L A MOV, PBAREADRL OUT, | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4c 20 41 20 4d 4f 56 2c 20 50 42 41 52 45 41 44 52 4c 20 4f 55 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 H A MOV, PBAREADRH OUT, | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 48 20 41 20 4d 4f 56 2c 20 50 42 41 52 45 41 44 52 48 20 4f 55 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0042 } ( VGS write con't. ) | 28 20 56 47 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 77 72 69 74 65 20 63 6f 6e 27 74 2e 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 E H MOV, ( X size ) | 20 20 45 20 48 20 4d 4f 56 2c 20 28 20 58 20 73 69 7a 65 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 MREXP C BIT, 0<>, IF, H RLCR, ( *2 ) THEN, | 20 20 4d 52 45 58 50 20 43 20 42 49 54 2c 20 30 3c 3e 2c 20 49 46 2c 20 48 20 52 4c 43 52 2c 20 28 20 2a 32 20 29 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 H DCR, ( H=X size zero relative ) | 20 20 48 20 44 43 52 2c 20 28 20 48 3d 58 20 73 69 7a 65 20 7a 65 72 6f 20 72 65 6c 61 74 69 76 65 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 MRFLIP C BIT, 0<>, IF, | 20 20 4d 52 46 4c 49 50 20 43 20 42 49 54 2c 20 30 3c 3e 2c 20 49 46 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 MRFLOP C BIT, 0<>, IF, DECIMAL -80 A MVI, H ADD, | 20 20 20 20 4d 52 46 4c 4f 50 20 43 20 42 49 54 2c 20 30 3c 3e 2c 20 49 46 2c 20 44 45 43 49 4d 41 4c 20 2d 38 30 20 41 20 4d 56 49 2c 20 48 20 41 44 44 2c 20 20 20 20 20 20 20 20 20 20 20 20 ELSE, DECIMAL -80 A MVI, H SUB, THEN, | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 2c 20 44 45 43 49 4d 41 4c 20 2d 38 30 20 41 20 4d 56 49 2c 20 48 20 53 55 42 2c 20 54 48 45 4e 2c 20 20 20 20 20 20 ELSE, | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 MRFLOP C BIT, 0<>, IF, DECIMAL 80 A MVI, H ADD, | 20 20 20 20 4d 52 46 4c 4f 50 20 43 20 42 49 54 2c 20 30 3c 3e 2c 20 49 46 2c 20 44 45 43 49 4d 41 4c 20 20 38 30 20 41 20 4d 56 49 2c 20 48 20 41 44 44 2c 20 20 20 20 20 20 20 20 20 20 20 20 ELSE, DECIMAL 80 A MVI, H SUB, THEN, | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 2c 20 44 45 43 49 4d 41 4c 20 20 38 30 20 41 20 4d 56 49 2c 20 48 20 53 55 42 2c 20 54 48 45 4e 2c 20 20 20 20 20 20 THEN, ( A=Xmod ) PBXMOD OUT, | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 54 48 45 4e 2c 20 28 20 41 3d 58 6d 6f 64 20 29 20 50 42 58 4d 4f 44 20 4f 55 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HEX H A MOV, PBXWIDE OUT, | 20 20 48 45 58 20 48 20 41 20 4d 4f 56 2c 20 50 42 58 57 49 44 45 20 4f 55 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 D A MOV, ( Y size ) A DCR, ( 0 rel ) PBYHIGH OUT, | 20 20 44 20 41 20 4d 4f 56 2c 20 28 20 59 20 73 69 7a 65 20 29 20 41 20 44 43 52 2c 20 28 20 30 20 72 65 6c 20 29 20 50 42 59 48 49 47 48 20 4f 55 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 RET, | 20 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0043 } ( VGS writep ) | 28 20 56 47 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 77 72 69 74 65 70 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR writep ( does write with pattern size header on pattern ) | 53 55 42 52 20 77 72 69 74 65 70 20 20 28 20 64 6f 65 73 20 77 72 69 74 65 20 77 69 74 68 20 70 61 74 74 65 72 6e 20 73 69 7a 65 20 68 65 61 64 65 72 20 6f 6e 20 70 61 74 74 65 72 6e 20 29 20 ( in- BC=exp/mag+shift DE=y/x size HL=scradr IY=patadr ) | 20 20 20 28 20 69 6e 2d 20 42 43 3d 65 78 70 2f 6d 61 67 2b 73 68 69 66 74 20 44 45 3d 79 2f 78 20 73 69 7a 65 20 48 4c 3d 73 63 72 61 64 72 20 49 59 3d 70 61 74 61 64 72 20 29 20 20 20 20 20 ( WRTSYS 0<> for pattern board 0= for software write ) | 20 20 20 20 20 20 20 20 28 20 57 52 54 53 59 53 20 30 3c 3e 20 66 6f 72 20 70 61 74 74 65 72 6e 20 62 6f 61 72 64 20 30 3d 20 66 6f 72 20 73 6f 66 74 77 61 72 65 20 77 72 69 74 65 20 29 20 20 ( out- C=mag+shift ; pattern on screen ) | 20 20 20 28 20 6f 75 74 2d 20 43 3d 6d 61 67 2b 73 68 69 66 74 20 3b 20 70 61 74 74 65 72 6e 20 6f 6e 20 73 63 72 65 65 6e 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 Y E LDX, ( X size ) Y INXX, | 20 20 30 20 59 20 45 20 4c 44 58 2c 20 28 20 58 20 73 69 7a 65 20 29 20 59 20 49 4e 58 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 Y D LDX, ( Y size ) Y INXX, write JMP, | 20 20 30 20 59 20 44 20 4c 44 58 2c 20 28 20 59 20 73 69 7a 65 20 29 20 59 20 49 4e 58 58 2c 20 77 72 69 74 65 20 4a 4d 50 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0044 } ( VGS WRITEP ) | 28 20 56 47 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 57 52 49 54 45 50 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE WRITEP ( write with pattern size header on pattern ) | 43 4f 44 45 20 57 52 49 54 45 50 20 20 20 28 20 77 72 69 74 65 20 77 69 74 68 20 70 61 74 74 65 72 6e 20 73 69 7a 65 20 68 65 61 64 65 72 20 6f 6e 20 70 61 74 74 65 72 6e 20 29 20 20 20 20 20 ( in- x , y , patadr , ex/mag ) | 20 20 28 20 69 6e 2d 20 78 20 2c 20 79 20 2c 20 70 61 74 61 64 72 20 2c 20 65 78 2f 6d 61 67 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( WRTSYS 0<> for pattern board 0= for software write ) | 20 20 20 20 20 20 20 20 28 20 57 52 54 53 59 53 20 30 3c 3e 20 66 6f 72 20 70 61 74 74 65 72 6e 20 62 6f 61 72 64 20 30 3d 20 66 6f 72 20 73 6f 66 74 77 61 72 65 20 77 72 69 74 65 20 29 20 20 ( out- pattern on screen ) | 20 20 28 20 6f 75 74 2d 20 70 61 74 74 65 72 6e 20 6f 6e 20 73 63 72 65 65 6e 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 Y PUSHX, H POP, EXX, B POP, Y POPX, H POP, D POP, | 20 20 59 20 50 55 53 48 58 2c 20 48 20 50 4f 50 2c 20 45 58 58 2c 20 42 20 50 4f 50 2c 20 59 20 50 4f 50 58 2c 20 48 20 50 4f 50 2c 20 44 20 50 4f 50 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 relabs CALL, | 20 20 72 65 6c 61 62 73 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 writep CALL, EXX, H PUSH, Y POPX, NEXT | 20 20 77 72 69 74 65 70 20 43 41 4c 4c 2c 20 45 58 58 2c 20 48 20 50 55 53 48 2c 20 59 20 50 4f 50 58 2c 20 4e 45 58 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE FFWRITEP Y PUSHX, H POP, EXX, B POP, Y POPX, H POP, D POP, | 43 4f 44 45 20 46 46 57 52 49 54 45 50 20 59 20 50 55 53 48 58 2c 20 48 20 50 4f 50 2c 20 45 58 58 2c 20 42 20 50 4f 50 2c 20 59 20 50 4f 50 58 2c 20 48 20 50 4f 50 2c 20 44 20 50 4f 50 2c 20 ffrelabs CALL, writep CALL, EXX, H PUSH, Y POPX, NEXT | 66 66 72 65 6c 61 62 73 20 43 41 4c 4c 2c 20 77 72 69 74 65 70 20 43 41 4c 4c 2c 20 45 58 58 2c 20 48 20 50 55 53 48 2c 20 59 20 50 4f 50 58 2c 20 4e 45 58 54 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0045 } ( FRAME, UNFRAME MACROS ) | 28 20 46 52 41 4d 45 2c 20 55 4e 46 52 41 4d 45 20 4d 41 43 52 4f 53 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2 C= FR.P1 4 C= FR.P2 6 C= FR.P3 | 32 20 43 3d 20 46 52 2e 50 31 20 34 20 43 3d 20 46 52 2e 50 32 20 36 20 43 3d 20 46 52 2e 50 33 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { : FRAME } { [ } ASM { ] } Y PUSHX, 0 Y LXIX, SP DADY, { ; } | 7b 20 3a 20 46 52 41 4d 45 20 7d 20 7b 20 5b 20 7d 20 41 53 4d 20 7b 20 5d 20 7d 20 59 20 50 55 53 48 58 2c 20 30 20 59 20 4c 58 49 58 2c 20 53 50 20 44 41 44 59 2c 20 7b 20 3b 20 7d 20 20 20 { : UNFRAME } { [ } ASM { ] } Y POPX, { ; } | 7b 20 3a 20 55 4e 46 52 41 4d 45 20 7d 20 7b 20 5b 20 7d 20 41 53 4d 20 7b 20 5d 20 7d 20 59 20 50 4f 50 58 2c 20 7b 20 3b 20 7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0046 } ( 16 BIT INTEGER DIVIDE ROUTINE: M N UN/ Q R ) DECIMAL | 28 20 31 36 20 42 49 54 20 49 4e 54 45 47 45 52 20 44 49 56 49 44 45 20 52 4f 55 54 49 4e 45 3a 20 4d 20 4e 20 55 4e 2f 20 51 20 52 20 29 20 44 45 43 49 4d 41 4c 20 20 20 20 20 20 20 20 20 20 FORWARD .ZERO FORWARD IDV50 FORWARD IDV60 | 46 4f 52 57 41 52 44 20 2e 5a 45 52 4f 20 46 4f 52 57 41 52 44 20 49 44 56 35 30 20 46 4f 52 57 41 52 44 20 49 44 56 36 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 FORWARD IDV10 FORWARD IDV20 FORWARD IDV30 FORWARD IDV40 | 46 4f 52 57 41 52 44 20 49 44 56 31 30 20 46 4f 52 57 41 52 44 20 49 44 56 32 30 20 46 4f 52 57 41 52 44 20 49 44 56 33 30 20 46 4f 52 57 41 52 44 20 49 44 56 34 30 20 20 20 20 20 20 20 20 20 SUBR unsdiv | 4c 41 42 45 4c 20 2e 5a 45 52 4f 20 52 45 54 2c 20 41 53 53 45 4d 42 4c 45 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR UNSDIV H PUSH, D DSBC, CY, IF, 0 D LXI, H POP, ELSE, | 53 55 42 52 20 55 4e 53 44 49 56 20 48 20 50 55 53 48 2c 20 44 20 44 53 42 43 2c 20 43 59 2c 20 49 46 2c 20 30 20 44 20 4c 58 49 2c 20 48 20 50 4f 50 2c 20 45 4c 53 45 2c 20 20 20 20 20 20 20 H POP, unsdiv CALL, THEN, RET, CODE UN/ EXX, D POP, H POP, | 48 20 50 4f 50 2c 20 75 6e 73 64 69 76 20 43 41 4c 4c 2c 20 54 48 45 4e 2c 20 52 45 54 2c 20 43 4f 44 45 20 55 4e 2f 20 45 58 58 2c 20 44 20 50 4f 50 2c 20 48 20 50 4f 50 2c 20 20 20 20 20 20 UNSDIV CALL, H PUSH, D PUSH, EXX, NEXT DECIMAL --> | 55 4e 53 44 49 56 20 43 41 4c 4c 2c 20 48 20 50 55 53 48 2c 20 44 20 50 55 53 48 2c 20 45 58 58 2c 20 4e 45 58 54 20 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0047 } ( SNAP COMMAND ) | 28 20 53 4e 41 50 20 43 4f 4d 4d 41 4e 44 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HEX CODE snap EXX, | 48 45 58 20 43 4f 44 45 20 73 6e 61 70 20 45 58 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 25 A MVI, PBSTAT OUT, | 32 35 20 41 20 4d 56 49 2c 20 50 42 53 54 41 54 20 4f 55 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 H POP, | 48 20 50 4f 50 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 D POP, E A MOV, PBAREADRL OUT, D A MOV, 40 ORI, PBAREADRH OUT, | 44 20 50 4f 50 2c 20 45 20 41 20 4d 4f 56 2c 20 50 42 41 52 45 41 44 52 4c 20 4f 55 54 2c 20 44 20 41 20 4d 4f 56 2c 20 34 30 20 4f 52 49 2c 20 50 42 41 52 45 41 44 52 48 20 4f 55 54 2c 20 20 D POP, B POP, | 44 20 50 4f 50 2c 20 42 20 50 4f 50 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 B INX, B INX, B INX, B SRLR, C RARR, B SRLR, C RARR, | 42 20 49 4e 58 2c 20 42 20 49 4e 58 2c 20 42 20 49 4e 58 2c 20 42 20 53 52 4c 52 2c 20 43 20 52 41 52 52 2c 20 42 20 53 52 4c 52 2c 20 43 20 52 41 52 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 C A MOV, PBXWIDE OUT, A INR, A M MOV, H INX, E M MOV, H INX, | 43 20 41 20 4d 4f 56 2c 20 50 42 58 57 49 44 45 20 4f 55 54 2c 20 41 20 49 4e 52 2c 20 41 20 4d 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 45 20 4d 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 20 20 20 L A MOV, PBLINADRL OUT, H A MOV, PBLINADRH OUT, | 4c 20 41 20 4d 4f 56 2c 20 50 42 4c 49 4e 41 44 52 4c 20 4f 55 54 2c 20 48 20 41 20 4d 4f 56 2c 20 50 42 4c 49 4e 41 44 52 48 20 4f 55 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 A MVI, C SUB, PBXMOD OUT, | 35 30 20 41 20 4d 56 49 2c 20 43 20 53 55 42 2c 20 50 42 58 4d 4f 44 20 4f 55 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 E A MOV, A DCR, PBYHIGH OUT, ( DO IT TO IT ) | 45 20 41 20 4d 4f 56 2c 20 41 20 44 43 52 2c 20 50 42 59 48 49 47 48 20 4f 55 54 2c 20 28 20 44 4f 20 49 54 20 54 4f 20 49 54 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 EXX, NEXT | 45 58 58 2c 20 4e 45 58 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 : SNAP 0 ROT ROT RELABS SWAP DROP SWAP snap ; | 3a 20 53 4e 41 50 20 30 20 52 4f 54 20 52 4f 54 20 52 45 4c 41 42 53 20 53 57 41 50 20 44 52 4f 50 20 53 57 41 50 20 73 6e 61 70 20 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HEX DATA CKSM1 5A B, | 48 45 58 20 44 41 54 41 20 43 4b 53 4d 31 20 35 41 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0048 } ( 8 X 10 CHARACTER SET - ROTATED ) | 28 20 38 20 58 20 31 30 20 43 48 41 52 41 43 54 45 52 20 53 45 54 20 2d 20 52 4f 54 41 54 45 44 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HEX | 48 45 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA CHRTBL | 44 41 54 41 20 43 48 52 54 42 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0000 , 0000 , 0000 , 0000 , 0000 , 0000 , ( SPACE ) | 30 30 30 30 20 2c 20 30 30 30 30 20 2c 20 30 30 30 30 20 2c 20 30 30 30 30 20 2c 20 30 30 30 30 20 2c 20 30 30 30 30 20 2c 20 28 20 53 50 41 43 45 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 E01F , F03F , 3030 , 3030 , F03F , E01F , ( 0 ) | 45 30 31 46 20 2c 20 46 30 33 46 20 2c 20 33 30 33 30 20 2c 20 33 30 33 30 20 2c 20 46 30 33 46 20 2c 20 45 30 31 46 20 2c 20 28 20 30 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0000 , 2030 , E03F , F03F , 0030 , 0000 , ( 1 ) | 30 30 30 30 20 2c 20 32 30 33 30 20 2c 20 45 30 33 46 20 2c 20 46 30 33 46 20 2c 20 30 30 33 30 20 2c 20 30 30 30 30 20 2c 20 28 20 31 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 603E , 703F , 3033 , 3033 , F033 , E031 , ( 2 ) | 36 30 33 45 20 2c 20 37 30 33 46 20 2c 20 33 30 33 33 20 2c 20 33 30 33 33 20 2c 20 46 30 33 33 20 2c 20 45 30 33 31 20 2c 20 28 20 32 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6018 , 7038 , 3033 , 3033 , F03F , E01E , ( 3 ) | 36 30 31 38 20 2c 20 37 30 33 38 20 2c 20 33 30 33 33 20 2c 20 33 30 33 33 20 2c 20 46 30 33 46 20 2c 20 45 30 31 45 20 2c 20 28 20 33 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 F003 , F003 , 0003 , 0003 , F03F , F03F , ( 4 ) | 46 30 30 33 20 2c 20 46 30 30 33 20 2c 20 30 30 30 33 20 2c 20 30 30 30 33 20 2c 20 46 30 33 46 20 2c 20 46 30 33 46 20 2c 20 28 20 34 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 F01B , F03B , 3033 , 3033 , 303F , 001E , ( 5 ) | 46 30 31 42 20 2c 20 46 30 33 42 20 2c 20 33 30 33 33 20 2c 20 33 30 33 33 20 2c 20 33 30 33 46 20 2c 20 30 30 31 45 20 2c 20 28 20 35 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 E01F , F03F , 3033 , 3033 , 303F , 001E , ( 6 ) | 45 30 31 46 20 2c 20 46 30 33 46 20 2c 20 33 30 33 33 20 2c 20 33 30 33 33 20 2c 20 33 30 33 46 20 2c 20 30 30 31 45 20 2c 20 28 20 36 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3000 , 3038 , 303E , B00F , F003 , F000 , ( 7 ) | 33 30 30 30 20 2c 20 33 30 33 38 20 2c 20 33 30 33 45 20 2c 20 42 30 30 46 20 2c 20 46 30 30 33 20 2c 20 46 30 30 30 20 2c 20 28 20 37 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 E01E , F03F , 3033 , 3033 , F03F , E01E , ( 8 ) | 45 30 31 45 20 2c 20 46 30 33 46 20 2c 20 33 30 33 33 20 2c 20 33 30 33 33 20 2c 20 46 30 33 46 20 2c 20 45 30 31 45 20 2c 20 28 20 38 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 E001 , F003 , 3033 , 3033 , F03F , E01F , ( 9 ) | 45 30 30 31 20 2c 20 46 30 30 33 20 2c 20 33 30 33 33 20 2c 20 33 30 33 33 20 2c 20 46 30 33 46 20 2c 20 45 30 31 46 20 2c 20 28 20 39 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0049 } ( MORE CHARS ) C03F , E03F , 700C , 700C , E03F , C03F , ( A ) | 28 20 4d 4f 52 45 20 43 48 41 52 53 20 29 20 43 30 33 46 20 2c 20 45 30 33 46 20 2c 20 37 30 30 43 20 2c 20 37 30 30 43 20 2c 20 45 30 33 46 20 2c 20 43 30 33 46 20 2c 20 28 20 41 20 29 20 20 F03F , F03F , 3033 , 3033 , F03F , E01E , ( B ) | 46 30 33 46 20 2c 20 46 30 33 46 20 2c 20 33 30 33 33 20 2c 20 33 30 33 33 20 2c 20 46 30 33 46 20 2c 20 45 30 31 45 20 2c 20 28 20 42 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 E01F , F03F , 3030 , 3030 , 7038 , 6018 , ( C ) | 45 30 31 46 20 2c 20 46 30 33 46 20 2c 20 33 30 33 30 20 2c 20 33 30 33 30 20 2c 20 37 30 33 38 20 2c 20 36 30 31 38 20 2c 20 28 20 43 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 F03F , F03F , 3030 , 3030 , F03F , E01F , ( D ) | 46 30 33 46 20 2c 20 46 30 33 46 20 2c 20 33 30 33 30 20 2c 20 33 30 33 30 20 2c 20 46 30 33 46 20 2c 20 45 30 31 46 20 2c 20 28 20 44 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 F03F , F03F , 3033 , 3033 , 3033 , 3030 , ( E ) | 46 30 33 46 20 2c 20 46 30 33 46 20 2c 20 33 30 33 33 20 2c 20 33 30 33 33 20 2c 20 33 30 33 33 20 2c 20 33 30 33 30 20 2c 20 28 20 45 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 F03F , F03F , 3003 , 3003 , 3003 , 3000 , ( F ) | 46 30 33 46 20 2c 20 46 30 33 46 20 2c 20 33 30 30 33 20 2c 20 33 30 30 33 20 2c 20 33 30 30 33 20 2c 20 33 30 30 30 20 2c 20 28 20 46 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 E01F , F03F , 3030 , 3036 , 303E , 201E , ( G ) | 45 30 31 46 20 2c 20 46 30 33 46 20 2c 20 33 30 33 30 20 2c 20 33 30 33 36 20 2c 20 33 30 33 45 20 2c 20 32 30 31 45 20 2c 20 28 20 47 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 F03F , F03F , 0003 , 0003 , F03F , F03F , ( H ) | 46 30 33 46 20 2c 20 46 30 33 46 20 2c 20 30 30 30 33 20 2c 20 30 30 30 33 20 2c 20 46 30 33 46 20 2c 20 46 30 33 46 20 2c 20 28 20 48 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0000 , 3030 , F03F , F03F , 3030 , 0000 , ( I ) | 30 30 30 30 20 2c 20 33 30 33 30 20 2c 20 46 30 33 46 20 2c 20 46 30 33 46 20 2c 20 33 30 33 30 20 2c 20 30 30 30 30 20 2c 20 28 20 49 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 001C , 003C , 0030 , 0030 , F03F , F01F , ( J ) | 30 30 31 43 20 2c 20 30 30 33 43 20 2c 20 30 30 33 30 20 2c 20 30 30 33 30 20 2c 20 46 30 33 46 20 2c 20 46 30 31 46 20 2c 20 28 20 4a 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 F03F , F03F , 8003 , C00F , F03C , 7038 , ( K ) | 46 30 33 46 20 2c 20 46 30 33 46 20 2c 20 38 30 30 33 20 2c 20 43 30 30 46 20 2c 20 46 30 33 43 20 2c 20 37 30 33 38 20 2c 20 28 20 4b 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 F03F , F03F , 0030 , 0030 , 0030 , 0030 , ( L ) | 46 30 33 46 20 2c 20 46 30 33 46 20 2c 20 30 30 33 30 20 2c 20 30 30 33 30 20 2c 20 30 30 33 30 20 2c 20 30 30 33 30 20 2c 20 28 20 4c 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 F03F , 6000 , 8001 , 8001 , 6000 , F03F , ( M ) | 46 30 33 46 20 2c 20 36 30 30 30 20 2c 20 38 30 30 31 20 2c 20 38 30 30 31 20 2c 20 36 30 30 30 20 2c 20 46 30 33 46 20 2c 20 28 20 4d 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 F03F , F03F , C001 , 8003 , F03F , F03F , ( N ) | 46 30 33 46 20 2c 20 46 30 33 46 20 2c 20 43 30 30 31 20 2c 20 38 30 30 33 20 2c 20 46 30 33 46 20 2c 20 46 30 33 46 20 2c 20 28 20 4e 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 E01F , F03F , 3030 , 3030 , F03F , E01F , ( O ) | 45 30 31 46 20 2c 20 46 30 33 46 20 2c 20 33 30 33 30 20 2c 20 33 30 33 30 20 2c 20 46 30 33 46 20 2c 20 45 30 31 46 20 2c 20 28 20 4f 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 F03F , F03F , 3003 , 3003 , F003 , E001 , ( P ) --> | 46 30 33 46 20 2c 20 46 30 33 46 20 2c 20 33 30 30 33 20 2c 20 33 30 30 33 20 2c 20 46 30 30 33 20 2c 20 45 30 30 31 20 2c 20 28 20 50 20 29 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0050 } ( CHARS ) E01F , F03F , 3020 , 3028 , F01F , E02F , ( Q ) | 28 20 43 48 41 52 53 20 29 20 45 30 31 46 20 2c 20 46 30 33 46 20 2c 20 33 30 32 30 20 2c 20 33 30 32 38 20 2c 20 46 30 31 46 20 2c 20 45 30 32 46 20 2c 20 28 20 51 20 29 20 20 20 20 20 20 20 F03F , F03F , 3003 , 3007 , F03F , E03D , ( R ) | 46 30 33 46 20 2c 20 46 30 33 46 20 2c 20 33 30 30 33 20 2c 20 33 30 30 37 20 2c 20 46 30 33 46 20 2c 20 45 30 33 44 20 2c 20 28 20 52 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 E019 , F03B , 3033 , 3033 , 703F , 601E , ( S ) | 45 30 31 39 20 2c 20 46 30 33 42 20 2c 20 33 30 33 33 20 2c 20 33 30 33 33 20 2c 20 37 30 33 46 20 2c 20 36 30 31 45 20 2c 20 28 20 53 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3000 , 3000 , F03F , F03F , 3000 , 3000 , ( T ) | 33 30 30 30 20 2c 20 33 30 30 30 20 2c 20 46 30 33 46 20 2c 20 46 30 33 46 20 2c 20 33 30 30 30 20 2c 20 33 30 30 30 20 2c 20 28 20 54 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 F01F , F03F , 0030 , 0030 , F03F , F01F , ( U ) | 46 30 31 46 20 2c 20 46 30 33 46 20 2c 20 30 30 33 30 20 2c 20 30 30 33 30 20 2c 20 46 30 33 46 20 2c 20 46 30 31 46 20 2c 20 28 20 55 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 F003 , F00F , 003E , 003E , F00F , F003 , ( V ) | 46 30 30 33 20 2c 20 46 30 30 46 20 2c 20 30 30 33 45 20 2c 20 30 30 33 45 20 2c 20 46 30 30 46 20 2c 20 46 30 30 33 20 2c 20 28 20 56 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 F03F , 000C , 8007 , 8007 , 000C , F03F , ( W ) | 46 30 33 46 20 2c 20 30 30 30 43 20 2c 20 38 30 30 37 20 2c 20 38 30 30 37 20 2c 20 30 30 30 43 20 2c 20 46 30 33 46 20 2c 20 28 20 57 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7038 , F03C , C00F , C00F , F03C , 7038 , ( X ) | 37 30 33 38 20 2c 20 46 30 33 43 20 2c 20 43 30 30 46 20 2c 20 43 30 30 46 20 2c 20 46 30 33 43 20 2c 20 37 30 33 38 20 2c 20 28 20 58 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7000 , F000 , C03F , C03F , F000 , 7000 , ( Y ) | 37 30 30 30 20 2c 20 46 30 30 30 20 2c 20 43 30 33 46 20 2c 20 43 30 33 46 20 2c 20 46 30 30 30 20 2c 20 37 30 30 30 20 2c 20 28 20 59 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 303C , 303E , 3037 , B033 , F031 , F030 , ( Z ) | 33 30 33 43 20 2c 20 33 30 33 45 20 2c 20 33 30 33 37 20 2c 20 42 30 33 33 20 2c 20 46 30 33 31 20 2c 20 46 30 33 30 20 2c 20 28 20 5a 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0000 , 6018 , 6018 , 0000 , 0000 , 0000 , ( : ) | 30 30 30 30 20 2c 20 36 30 31 38 20 2c 20 36 30 31 38 20 2c 20 30 30 30 30 20 2c 20 30 30 30 30 20 2c 20 30 30 30 30 20 2c 20 28 20 3a 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 E01F , 7038 , B037 , B037 , 703B , E01F , ( COPYRITE ) | 45 30 31 46 20 2c 20 37 30 33 38 20 2c 20 42 30 33 37 20 2c 20 42 30 33 37 20 2c 20 37 30 33 42 20 2c 20 45 30 31 46 20 2c 20 28 20 43 4f 50 59 52 49 54 45 20 29 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0051 } ( NEW CHARACTER DRAW ROUTINE ) | 28 20 4e 45 57 20 43 48 41 52 41 43 54 45 52 20 44 52 41 57 20 52 4f 55 54 49 4e 45 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( IN HL=Y DE=X BC=EXPAND/MAGIC A= CHAR TO DISPLAY ) | 28 20 49 4e 20 48 4c 3d 59 20 44 45 3d 58 20 42 43 3d 45 58 50 41 4e 44 2f 4d 41 47 49 43 20 41 3d 20 43 48 41 52 20 54 4f 20 44 49 53 50 4c 41 59 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 HEX | 48 45 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR drawchar .REL B PUSH, H PUSH, D PUSH, 20 SUI, 0<>, IF, | 53 55 42 52 20 64 72 61 77 63 68 61 72 20 2e 52 45 4c 20 42 20 50 55 53 48 2c 20 48 20 50 55 53 48 2c 20 44 20 50 55 53 48 2c 20 32 30 20 53 55 49 2c 20 30 3c 3e 2c 20 49 46 2c 20 20 20 20 20 0F SUI, 0B CPI, CY~, IF, 7 SUI, THEN, THEN, | 30 46 20 53 55 49 2c 20 30 42 20 43 50 49 2c 20 43 59 7e 2c 20 49 46 2c 20 37 20 53 55 49 2c 20 54 48 45 4e 2c 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 A L MOV, 0 H MVI, H DAD, H DAD, L E MOV, H D MOV, | 41 20 4c 20 4d 4f 56 2c 20 30 20 48 20 4d 56 49 2c 20 48 20 44 41 44 2c 20 48 20 44 41 44 2c 20 4c 20 45 20 4d 4f 56 2c 20 48 20 44 20 4d 4f 56 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 H DAD, D DAD, CHRTBL D LXI, D DAD, H PUSH, Y POPX, | 48 20 44 41 44 2c 20 44 20 44 41 44 2c 20 43 48 52 54 42 4c 20 44 20 4c 58 49 2c 20 44 20 44 41 44 2c 20 48 20 50 55 53 48 2c 20 59 20 50 4f 50 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 D POP, H POP, H PUSH, D PUSH, relabs CALL, | 44 20 50 4f 50 2c 20 48 20 50 4f 50 2c 20 48 20 50 55 53 48 2c 20 44 20 50 55 53 48 2c 20 72 65 6c 61 62 73 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 602 D LXI, write CALL, D POP, H POP, H A MOV, 7 ADI, | 36 30 32 20 44 20 4c 58 49 2c 20 77 72 69 74 65 20 43 41 4c 4c 2c 20 44 20 50 4f 50 2c 20 48 20 50 4f 50 2c 20 48 20 41 20 4d 4f 56 2c 20 37 20 41 44 49 2c 20 20 20 20 20 20 20 20 20 20 20 20 A H MOV, B POP, RET, .ABS | 41 20 48 20 4d 4f 56 2c 20 42 20 50 4f 50 2c 20 52 45 54 2c 20 2e 41 42 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( TERSE INTERFACE - X Y COLOR/MAGIC CHAR cpost --- NEW X Y ) | 28 20 54 45 52 53 45 20 49 4e 54 45 52 46 41 43 45 20 2d 20 58 20 59 20 43 4f 4c 4f 52 2f 4d 41 47 49 43 20 43 48 41 52 20 63 70 6f 73 74 20 2d 2d 2d 20 4e 45 57 20 58 20 59 20 29 20 20 20 20 CODE cpost EXX, B POP, C A MOV, B POP, H POP, D POP, | 43 4f 44 45 20 63 70 6f 73 74 20 45 58 58 2c 20 42 20 50 4f 50 2c 20 43 20 41 20 4d 4f 56 2c 20 42 20 50 4f 50 2c 20 48 20 50 4f 50 2c 20 44 20 50 4f 50 2c 20 20 20 20 20 20 20 20 20 20 20 20 X PUSHX, Y PUSHX, drawchar CALL, Y POPX, X POPX, | 58 20 50 55 53 48 58 2c 20 59 20 50 55 53 48 58 2c 20 64 72 61 77 63 68 61 72 20 43 41 4c 4c 2c 20 59 20 50 4f 50 58 2c 20 58 20 50 4f 50 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 D PUSH, H PUSH, B PUSH, EXX, NEXT | 44 20 50 55 53 48 2c 20 48 20 50 55 53 48 2c 20 42 20 50 55 53 48 2c 20 45 58 58 2c 20 4e 45 58 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0052 } ( VGS SPOST ) | 28 20 56 47 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 50 4f 53 54 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 : SPOST ( post an ascii-string on the screen ; see options ) | 3a 20 53 50 4f 53 54 20 28 20 70 6f 73 74 20 61 6e 20 61 73 63 69 69 2d 73 74 72 69 6e 67 20 6f 6e 20 74 68 65 20 73 63 72 65 65 6e 20 3b 20 73 65 65 20 6f 70 74 69 6f 6e 73 20 29 20 20 20 20 ( in= x , y , opt+ex/mag , addr , count ) | 20 20 28 20 69 6e 3d 20 78 20 2c 20 79 20 2c 20 6f 70 74 2b 65 78 2f 6d 61 67 20 2c 20 61 64 64 72 20 2c 20 63 6f 75 6e 74 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( i.e. 0 0 28 A" STRING" COUNT SPOST ) | 20 20 20 20 20 20 20 28 20 69 2e 65 2e 20 30 20 30 20 32 38 20 41 22 20 53 54 52 49 4e 47 22 20 43 4f 55 4e 54 20 53 50 4f 53 54 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( WRTSYS 0<> for pattern board 0= for software write ) | 20 20 20 20 20 20 20 20 28 20 57 52 54 53 59 53 20 30 3c 3e 20 66 6f 72 20 70 61 74 74 65 72 6e 20 62 6f 61 72 64 20 30 3d 20 66 6f 72 20 73 6f 66 74 77 61 72 65 20 77 72 69 74 65 20 29 20 20 ( cannot be used in immediat mode ) | 20 20 20 20 20 20 20 20 28 20 63 61 6e 6e 6f 74 20 62 65 20 75 73 65 64 20 69 6e 20 69 6d 6d 65 64 69 61 74 20 6d 6f 64 65 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( out- character on screen ) | 20 20 28 20 6f 75 74 2d 20 63 68 61 72 61 63 74 65 72 20 6f 6e 20 73 63 72 65 65 6e 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 OVER + SWAP DO I B@ cpost LOOP 2DROP DROP ; | 20 20 4f 56 45 52 20 2b 20 53 57 41 50 20 44 4f 20 49 20 42 40 20 63 70 6f 73 74 20 4c 4f 4f 50 20 32 44 52 4f 50 20 44 52 4f 50 20 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0053 } ( INDEX MESSAGE LIST ) | 28 20 49 4e 44 45 58 20 4d 45 53 53 41 47 45 20 4c 49 53 54 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HEX | 48 45 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA MSGLINK 0 , | 44 41 54 41 20 4d 53 47 4c 49 4e 4b 20 30 20 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 F= iml | 46 3d 20 69 6d 6c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR indexmsg .REL SETTINGS IN, 8 ANI, 0<>, IF, MSGLINK LHLD, | 53 55 42 52 20 69 6e 64 65 78 6d 73 67 20 2e 52 45 4c 20 53 45 54 54 49 4e 47 53 20 49 4e 2c 20 38 20 41 4e 49 2c 20 30 3c 3e 2c 20 49 46 2c 20 4d 53 47 4c 49 4e 4b 20 4c 48 4c 44 2c 20 20 20 ELSE, 0C003 H LXI, | 45 4c 53 45 2c 20 30 43 30 30 33 20 48 20 4c 58 49 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 THEN, | 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 LABEL iml C A MOV, A ANA, RZ, | 4c 41 42 45 4c 20 69 6d 6c 20 43 20 41 20 4d 4f 56 2c 20 41 20 41 4e 41 2c 20 52 5a 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 M E MOV, 0 D MVI, D DAD, H INX, C DCR, iml JMPR, .ABS | 4d 20 45 20 4d 4f 56 2c 20 30 20 44 20 4d 56 49 2c 20 44 20 44 41 44 2c 20 48 20 49 4e 58 2c 20 43 20 44 43 52 2c 20 69 6d 6c 20 4a 4d 50 52 2c 20 2e 41 42 53 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE INXMSG EXX, B POP, indexmsg CALL, H PUSH, EXX, NEXT | 43 4f 44 45 20 49 4e 58 4d 53 47 20 45 58 58 2c 20 42 20 50 4f 50 2c 20 69 6e 64 65 78 6d 73 67 20 43 41 4c 4c 2c 20 48 20 50 55 53 48 2c 20 45 58 58 2c 20 4e 45 58 54 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 : ICSPOST INXMSG COUNT SPOST ; | 3a 20 49 43 53 50 4f 53 54 20 49 4e 58 4d 53 47 20 43 4f 55 4e 54 20 53 50 4f 53 54 20 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 : GNAME >R 100 5000 408 R> ICSPOST ; | 3a 20 47 4e 41 4d 45 20 3e 52 20 31 30 30 20 35 30 30 30 20 34 30 38 20 52 3e 20 49 43 53 50 4f 53 54 20 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2 +BLOCK CONTINUED | 32 20 2b 42 4c 4f 43 4b 20 43 4f 4e 54 49 4e 55 45 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0054 } | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0055 } ( SPELL A STRING CENTERED ) | 20 28 20 53 50 45 4c 4c 20 41 20 53 54 52 49 4e 47 20 43 45 4e 54 45 52 45 44 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HEX F= SPLP | 20 48 45 58 20 46 3d 20 53 50 4c 50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE CSPELL | 20 45 20 44 43 52 2c 20 53 50 4c 50 20 4a 52 4e 5a 2c 20 59 20 50 4f 50 58 2c 20 58 20 50 4f 50 58 2c 20 4e 45 58 54 20 41 53 53 45 4d 42 4c 45 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 : XUP 40 * ; | 20 3a 20 58 55 50 20 34 30 20 2a 20 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 : SPELL INXMSG 428 SWAP CSPELL ; | 20 3a 20 53 50 45 4c 4c 20 49 4e 58 4d 53 47 20 34 32 38 20 53 57 41 50 20 43 53 50 45 4c 4c 20 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL --> | 20 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0056 } ( DISPLAY 6 DIGIT BCD NUMBER -- X Y OPT NUMADDR DISPBCD6 ) | 28 20 44 49 53 50 4c 41 59 20 36 20 44 49 47 49 54 20 42 43 44 20 4e 55 4d 42 45 52 20 2d 2d 20 58 20 59 20 4f 50 54 20 4e 55 4d 41 44 44 52 20 44 49 53 50 42 43 44 36 20 29 20 20 20 20 20 20 HEX SUBR digit 0F ANI, 0=, IF, D ORA, 0<>, IF, 0F0 A MVI, THEN, | 48 45 58 20 53 55 42 52 20 64 69 67 69 74 20 30 46 20 41 4e 49 2c 20 30 3d 2c 20 49 46 2c 20 44 20 4f 52 41 2c 20 30 3c 3e 2c 20 49 46 2c 20 30 46 30 20 41 20 4d 56 49 2c 20 54 48 45 4e 2c 20 ELSE, 0 D MVI, THEN, 30 ADI, EXX, drawchar CALL, EXX, RET, | 45 4c 53 45 2c 20 30 20 44 20 4d 56 49 2c 20 54 48 45 4e 2c 20 33 30 20 41 44 49 2c 20 45 58 58 2c 20 64 72 61 77 63 68 61 72 20 43 41 4c 4c 2c 20 45 58 58 2c 20 52 45 54 2c 20 20 20 20 20 20 HEX | 48 45 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 F= DGTL | 46 3d 20 44 47 54 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE DISPBCD6 | 59 20 50 4f 50 58 2c 20 58 20 50 4f 50 58 2c 20 4e 45 58 54 20 41 53 53 45 4d 42 4c 45 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CC? IFTRUE TIMOR IFEND | 43 43 3f 20 49 46 54 52 55 45 20 54 49 4d 4f 52 20 49 46 45 4e 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0057 } ( TWO DIGIT BCD DISPLAY ROUTINE AND BUMPER ) | 28 20 54 57 4f 20 44 49 47 49 54 20 42 43 44 20 44 49 53 50 4c 41 59 20 52 4f 55 54 49 4e 45 20 41 4e 44 20 42 55 4d 50 45 52 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE DISPBCD2 H POP, EXX, B POP, H POP, D POP, | 43 4f 44 45 20 44 49 53 50 42 43 44 32 20 48 20 50 4f 50 2c 20 45 58 58 2c 20 42 20 50 4f 50 2c 20 48 20 50 4f 50 2c 20 44 20 50 4f 50 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 X PUSHX, Y PUSHX, EXX, | 58 20 50 55 53 48 58 2c 20 59 20 50 55 53 48 58 2c 20 45 58 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 1 D MVI, L A MOV, RRC, RRC, RRC, RRC, digit CALL, | 31 20 44 20 4d 56 49 2c 20 4c 20 41 20 4d 4f 56 2c 20 52 52 43 2c 20 52 52 43 2c 20 52 52 43 2c 20 52 52 43 2c 20 64 69 67 69 74 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 D MVI, L A MOV, digit CALL, | 30 20 44 20 4d 56 49 2c 20 4c 20 41 20 4d 4f 56 2c 20 64 69 67 69 74 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 Y POPX, X POPX, NEXT | 59 20 50 4f 50 58 2c 20 58 20 50 4f 50 58 2c 20 4e 45 58 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { : , } { [ } ASM { ] } PSW POP, V, IF, EI, THEN, p { ; } | 7b 20 3a 20 45 49 3e 2c 20 7d 20 7b 20 5b 20 7d 20 41 53 4d 20 7b 20 5d 20 7d 20 50 53 57 20 50 4f 50 2c 20 56 2c 20 49 46 2c 20 45 49 2c 20 54 48 45 4e 2c 20 70 20 7b 20 3b 20 7d 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0058 } ( WRITE PROTECT PRIMITIVES ) HEX | 28 20 57 52 49 54 45 20 50 52 4f 54 45 43 54 20 50 52 49 4d 49 54 49 56 45 53 20 29 20 48 45 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( *** SEND EVERYTHING THRU THESE, THEY DO DOUBLE WRITING *** ) | 28 20 2a 2a 2a 20 53 45 4e 44 20 45 56 45 52 59 54 48 49 4e 47 20 54 48 52 55 20 54 48 45 53 45 2c 20 54 48 45 59 20 44 4f 20 44 4f 55 42 4c 45 20 57 52 49 54 49 4e 47 20 2a 2a 2a 20 29 20 20 SUBR 2wp! ( HL=addr, DE=value ) | 53 55 42 52 20 32 77 70 21 20 28 20 48 4c 3d 61 64 64 72 2c 20 44 45 3d 76 61 6c 75 65 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 A5 A MVI, 5B OUT, | 20 41 35 20 41 20 4d 56 49 2c 20 35 42 20 4f 55 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 E M MOV, H INX, 5B OUT, D M MOV, RET, | 20 45 20 4d 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 35 42 20 4f 55 54 2c 20 44 20 4d 20 4d 4f 56 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR 2wpb! ( HL = addr, E = value ) | 53 55 42 52 20 32 77 70 62 21 20 28 20 48 4c 20 3d 20 61 64 64 72 2c 20 45 20 3d 20 76 61 6c 75 65 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 A5 A MVI, 5B OUT, E M MOV, RET, | 20 41 35 20 41 20 4d 56 49 2c 20 35 42 20 4f 55 54 2c 20 45 20 4d 20 4d 4f 56 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( * WP WORD! and WP BYTE! * ) | 28 20 2a 20 57 50 20 57 4f 52 44 21 20 61 6e 64 20 57 50 20 42 59 54 45 21 20 2a 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR wp! ( HL = addr DE = value ) , RET, | 20 48 20 50 4f 50 2c 20 45 49 3e 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR wpb! ( HL = addr, E = value ) | 53 55 42 52 20 77 70 62 21 20 28 20 48 4c 20 3d 20 61 64 64 72 2c 20 45 20 3d 20 76 61 6c 75 65 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 , | 20 3c 44 49 2c 20 48 20 50 55 53 48 2c 20 32 77 70 62 21 20 43 41 4c 4c 2c 20 48 20 50 4f 50 2c 20 45 49 3e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 RET, CODE BCDBUMP H POP, M A MOV, 1 ADI, DAA, A E MOV, | 52 45 54 2c 20 20 43 4f 44 45 20 42 43 44 42 55 4d 50 20 48 20 50 4f 50 2c 20 4d 20 41 20 4d 4f 56 2c 20 31 20 41 44 49 2c 20 44 41 41 2c 20 41 20 45 20 4d 4f 56 2c 20 20 20 20 20 20 20 20 20 wpb! CALL, NEXT | 77 70 62 21 20 43 41 4c 4c 2c 20 4e 45 58 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0059 } ( POINT WRITE ROUTINE STUFF ) | 28 20 50 4f 49 4e 54 20 57 52 49 54 45 20 52 4f 55 54 49 4e 45 20 53 54 55 46 46 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HEX | 48 45 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( SUBROUTINE TO DRAW A POINT ) | 28 20 53 55 42 52 4f 55 54 49 4e 45 20 54 4f 20 44 52 41 57 20 41 20 50 4f 49 4e 54 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR UPPOINT DI, H A MOV, C0 CPI, RNC, D A MOV, 50 CPI, RNC, | 53 55 42 52 20 55 50 50 4f 49 4e 54 20 44 49 2c 20 48 20 41 20 4d 4f 56 2c 20 43 30 20 43 50 49 2c 20 52 4e 43 2c 20 44 20 41 20 4d 4f 56 2c 20 35 30 20 43 50 49 2c 20 52 4e 43 2c 20 20 20 20 C A MOV, RRC, RRC, A B MOV, 20 C MVI, ( FUDGE B ) | 20 20 43 20 41 20 4d 4f 56 2c 20 52 52 43 2c 20 52 52 43 2c 20 41 20 42 20 4d 4f 56 2c 20 32 30 20 43 20 4d 56 49 2c 20 28 20 46 55 44 47 45 20 42 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 relabs CALL, C A MOV, MAGIC OUT, B M MOV, ( WRITE IT ) | 20 20 72 65 6c 61 62 73 20 43 41 4c 4c 2c 20 43 20 41 20 4d 4f 56 2c 20 4d 41 47 49 43 20 4f 55 54 2c 20 42 20 4d 20 4d 4f 56 2c 20 28 20 57 52 49 54 45 20 49 54 20 29 20 20 20 20 20 20 20 20 EI, RET, | 45 49 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE POINT EXX, B POP, H POP, D POP, UPPOINT CALL, EXX, NEXT | 43 4f 44 45 20 50 4f 49 4e 54 20 45 58 58 2c 20 42 20 50 4f 50 2c 20 48 20 50 4f 50 2c 20 44 20 50 4f 50 2c 20 55 50 50 4f 49 4e 54 20 43 41 4c 4c 2c 20 45 58 58 2c 20 4e 45 58 54 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0060 } ( n-processor MUSPCU, this is starting load block ) HEX | 28 20 6e 2d 70 72 6f 63 65 73 73 6f 72 20 4d 55 53 50 43 55 2c 20 74 68 69 73 20 69 73 20 73 74 61 72 74 69 6e 67 20 6c 6f 61 64 20 62 6c 6f 63 6b 20 29 20 48 45 58 20 20 20 20 20 20 20 20 20 ( old TERSE music still works and runs on this MUSCPU or ) | 28 20 6f 6c 64 20 54 45 52 53 45 20 6d 75 73 69 63 20 73 74 69 6c 6c 20 77 6f 72 6b 73 20 61 6e 64 20 72 75 6e 73 20 6f 6e 20 74 68 69 73 20 4d 55 53 43 50 55 20 6f 72 20 29 20 20 20 20 20 20 ( 2MUSCPU, multiple processors reload IY for music vector, ) | 28 20 32 4d 55 53 43 50 55 2c 20 6d 75 6c 74 69 70 6c 65 20 70 72 6f 63 65 73 73 6f 72 73 20 72 65 6c 6f 61 64 20 49 59 20 66 6f 72 20 6d 75 73 69 63 20 76 65 63 74 6f 72 2c 20 29 20 20 20 20 ( and the variable SOUNDBOX to the port 1 past the NOISE port, ) | 28 20 61 6e 64 20 74 68 65 20 76 61 72 69 61 62 6c 65 20 53 4f 55 4e 44 42 4f 58 20 74 6f 20 74 68 65 20 70 6f 72 74 20 31 20 70 61 73 74 20 74 68 65 20 4e 4f 49 53 45 20 70 6f 72 74 2c 20 29 ( ie. sounds are in 10-17, set SOUNDBOX to 18H. ) | 28 20 69 65 2e 20 73 6f 75 6e 64 73 20 61 72 65 20 69 6e 20 31 30 2d 31 37 2c 20 73 65 74 20 53 4f 55 4e 44 42 4f 58 20 74 6f 20 31 38 48 2e 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 BV= MUSICFLAG ( turns off all processors for GAMEOVER ) | 30 20 42 56 3d 20 4d 55 53 49 43 46 4c 41 47 20 28 20 74 75 72 6e 73 20 6f 66 66 20 61 6c 6c 20 70 72 6f 63 65 73 73 6f 72 73 20 66 6f 72 20 47 41 4d 45 4f 56 45 52 20 29 20 20 20 20 20 20 20 0 BV= THUMPCOUNTER ( SPECIAL SPACE MISSIONS OPCODE ) | 30 20 42 56 3d 20 54 48 55 4d 50 43 4f 55 4e 54 45 52 20 28 20 53 50 45 43 49 41 4c 20 53 50 41 43 45 20 4d 49 53 53 49 4f 4e 53 20 4f 50 43 4f 44 45 20 29 20 20 20 20 20 20 20 20 20 20 20 20 CC? IFTRUE | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0061 } | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0062 } ( MUSIC VARIABLES & IY EQUATES FOR OFFSETS ) HEX | 20 28 20 4d 55 53 49 43 20 56 41 52 49 41 42 4c 45 53 20 26 20 49 59 20 45 51 55 41 54 45 53 20 46 4f 52 20 4f 46 46 53 45 54 53 20 29 20 48 45 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 {{ NC= STOPTB ( stopvalue for timebase-mover ) | 20 7b 7b 20 4e 43 3d 20 53 54 4f 50 54 42 20 28 20 73 74 6f 70 76 61 6c 75 65 20 66 6f 72 20 74 69 6d 65 62 61 73 65 2d 6d 6f 76 65 72 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 NC= TBSTEP NC= TBTB NC= TBTIMER ( tbmover's ss,tb,timer ) }} | 20 4e 43 3d 20 54 42 53 54 45 50 20 4e 43 3d 20 54 42 54 42 20 4e 43 3d 20 54 42 54 49 4d 45 52 20 28 20 74 62 6d 6f 76 65 72 27 73 20 73 73 2c 74 62 2c 74 69 6d 65 72 20 29 20 7d 7d 20 20 20 {{ NC= NOSTOP ( noisemover's sv,ss,timer,tb,tracker ) | 20 7b 7b 20 4e 43 3d 20 4e 4f 53 54 4f 50 20 28 20 6e 6f 69 73 65 6d 6f 76 65 72 27 73 20 73 76 2c 73 73 2c 74 69 6d 65 72 2c 74 62 2c 74 72 61 63 6b 65 72 20 29 20 20 20 20 20 20 20 20 20 20 NC= NOSTEP NC= NOTIMER NC= NOTIMEBASE NC= NOVALUE }} | 20 4e 43 3d 20 4e 4f 53 54 45 50 20 4e 43 3d 20 4e 4f 54 49 4d 45 52 20 4e 43 3d 20 4e 4f 54 49 4d 45 42 41 53 45 20 4e 43 3d 20 4e 4f 56 41 4c 55 45 20 7d 7d 20 20 20 20 20 20 20 20 20 20 20 {{ NC= STOPSTEPS ( MO's stepmover etc. ) | 20 7b 7b 20 4e 43 3d 20 53 54 4f 50 53 54 45 50 53 20 28 20 4d 4f 27 73 20 73 74 65 70 6d 6f 76 65 72 20 65 74 63 2e 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 NC= BIGOFASTEP NC= STEPTIMEBASE NC= STEPTIMER }} | 20 4e 43 3d 20 42 49 47 4f 46 41 53 54 45 50 20 4e 43 3d 20 53 54 45 50 54 49 4d 45 42 41 53 45 20 4e 43 3d 20 53 54 45 50 54 49 4d 45 52 20 7d 7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 {{ NC= STOPLOWLIM ( lowlim's mover's ram, stopvalue ) | 20 7b 7b 20 4e 43 3d 20 53 54 4f 50 4c 4f 57 4c 49 4d 20 28 20 6c 6f 77 6c 69 6d 27 73 20 6d 6f 76 65 72 27 73 20 72 61 6d 2c 20 73 74 6f 70 76 61 6c 75 65 20 29 20 20 20 20 20 20 20 20 20 20 NC= LOWSTEP ( ss or stepsize ) | 20 4e 43 3d 20 4c 4f 57 53 54 45 50 20 28 20 73 73 20 6f 72 20 73 74 65 70 73 69 7a 65 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 NC= LOW# ( # of limits to hit before moving ) | 20 4e 43 3d 20 4c 4f 57 23 20 28 20 23 20 6f 66 20 6c 69 6d 69 74 73 20 74 6f 20 68 69 74 20 62 65 66 6f 72 65 20 6d 6f 76 69 6e 67 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 NC= LOWCOUNTER ( counting low# down ) }} | 20 4e 43 3d 20 4c 4f 57 43 4f 55 4e 54 45 52 20 28 20 63 6f 75 6e 74 69 6e 67 20 6c 6f 77 23 20 64 6f 77 6e 20 29 20 7d 7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 {{ NC= STOPHIGHLIM ( highmover's ram ) | 20 7b 7b 20 4e 43 3d 20 53 54 4f 50 48 49 47 48 4c 49 4d 20 28 20 68 69 67 68 6d 6f 76 65 72 27 73 20 72 61 6d 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 NC= HIGHSTEP NC= HIGH# NC= HIGHCOUNTER }} | 20 4e 43 3d 20 48 49 47 48 53 54 45 50 20 4e 43 3d 20 48 49 47 48 23 20 4e 43 3d 20 48 49 47 48 43 4f 55 4e 54 45 52 20 7d 7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0063 } ( STEREO EFFECTS RAM AND VOLUME CRES.-DECRES. RAM ) HEX | 20 28 20 53 54 45 52 45 4f 20 45 46 46 45 43 54 53 20 52 41 4d 20 41 4e 44 20 56 4f 4c 55 4d 45 20 43 52 45 53 2e 2d 44 45 43 52 45 53 2e 20 52 41 4d 20 29 20 48 45 58 20 20 20 20 20 20 20 20 ( total pan volumes either channel, FFH, 64 STEPS BETWEEN ) | 20 28 20 74 6f 74 61 6c 20 70 61 6e 20 76 6f 6c 75 6d 65 73 20 65 69 74 68 65 72 20 63 68 61 6e 6e 65 6c 2c 20 46 46 48 2c 20 20 36 34 20 53 54 45 50 53 20 42 45 54 57 45 45 4e 20 29 20 20 20 ( load lowest port in PANPORT#, this is left side, 1+ right ) | 20 28 20 6c 6f 61 64 20 6c 6f 77 65 73 74 20 70 6f 72 74 20 69 6e 20 50 41 4e 50 4f 52 54 23 2c 20 74 68 69 73 20 69 73 20 6c 65 66 74 20 73 69 64 65 2c 20 31 2b 20 72 69 67 68 74 20 29 20 20 ( watch step starting direction for left-right action ) | 20 28 20 77 61 74 63 68 20 73 74 65 70 20 73 74 61 72 74 69 6e 67 20 64 69 72 65 63 74 69 6f 6e 20 66 6f 72 20 6c 65 66 74 2d 72 69 67 68 74 20 61 63 74 69 6f 6e 20 29 20 20 20 20 20 20 20 20 ( {{ NC= LEFTPAN ( tracker ) | 20 28 20 7b 7b 20 4e 43 3d 20 4c 45 46 54 50 41 4e 20 28 20 74 72 61 63 6b 65 72 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( NC= PANSTEP ( step size ) | 20 28 20 4e 43 3d 20 50 41 4e 53 54 45 50 20 28 20 73 74 65 70 20 73 69 7a 65 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( timebase for updating ) | 20 20 28 20 74 69 6d 65 62 61 73 65 20 66 6f 72 20 75 70 64 61 74 69 6e 67 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( NC= PANTIMEBASE NC= PANTIMER | 20 28 20 4e 43 3d 20 50 41 4e 54 49 4d 45 42 41 53 45 20 4e 43 3d 20 50 41 4e 54 49 4d 45 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( count # of limits to achieve ) | 20 20 28 20 63 6f 75 6e 74 20 23 20 6f 66 20 6c 69 6d 69 74 73 20 74 6f 20 61 63 68 69 65 76 65 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( NC= PANCOUNTER }} ) | 20 28 20 4e 43 3d 20 50 41 4e 43 4f 55 4e 54 45 52 20 20 7d 7d 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 {{ NC= VOLHIGHLIM NC= VOLOWLIM NC= VOLSTEP | 20 7b 7b 20 4e 43 3d 20 56 4f 4c 48 49 47 48 4c 49 4d 20 4e 43 3d 20 56 4f 4c 4f 57 4c 49 4d 20 4e 43 3d 20 56 4f 4c 53 54 45 50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 NC= VOLTIMEBASE NC= VOLTIMER | 20 4e 43 3d 20 56 4f 4c 54 49 4d 45 42 41 53 45 20 4e 43 3d 20 56 4f 4c 54 49 4d 45 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 NC= MCTRACKER ( AB volumes taken from C ) | 20 4e 43 3d 20 4d 43 54 52 41 43 4b 45 52 20 28 20 41 42 20 76 6f 6c 75 6d 65 73 20 74 61 6b 65 6e 20 66 72 6f 6d 20 43 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0064 } ( MUSIC VARIABLES FOR COMPUTER MUSIC GENERATOR AND SYNCER ) HEX | 28 20 4d 55 53 49 43 20 56 41 52 49 41 42 4c 45 53 20 46 4f 52 20 43 4f 4d 50 55 54 45 52 20 4d 55 53 49 43 20 47 45 4e 45 52 41 54 4f 52 20 41 4e 44 20 53 59 4e 43 45 52 20 29 20 48 45 58 20 {{ NC= SYNCMO NC= STARTMC ( special bvarbs for THUMPING ) }} | 7b 7b 20 4e 43 3d 20 53 59 4e 43 4d 4f 20 4e 43 3d 20 53 54 41 52 54 4d 43 20 28 20 73 70 65 63 69 61 6c 20 62 76 61 72 62 73 20 66 6f 72 20 54 48 55 4d 50 49 4e 47 20 29 20 7d 7d 20 20 20 20 {{ NC= NOTETIMER ( note timer ) | 7b 7b 20 4e 43 3d 20 4e 4f 54 45 54 49 4d 45 52 20 28 20 6e 6f 74 65 20 74 69 6d 65 72 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( trackers of indecies to NOTABLE and MOTABLE ) | 28 20 74 72 61 63 6b 65 72 73 20 6f 66 20 69 6e 64 65 63 69 65 73 20 74 6f 20 4e 4f 54 41 42 4c 45 20 61 6e 64 20 4d 4f 54 41 42 4c 45 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 NC= MST ( MUSIC-STATE-TRANSITION jump around variable ) | 4e 43 3d 20 4d 53 54 20 28 20 4d 55 53 49 43 2d 53 54 41 54 45 2d 54 52 41 4e 53 49 54 49 4f 4e 20 6a 75 6d 70 20 61 72 6f 75 6e 64 20 76 61 72 69 61 62 6c 65 20 29 20 20 20 20 20 20 20 20 20 NC= ENDMUSRAM ( last byte of ram ) | 4e 43 3d 20 45 4e 44 4d 55 53 52 41 4d 20 28 20 6c 61 73 74 20 62 79 74 65 20 6f 66 20 72 61 6d 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 80 C= COMPTB CC? IFTRUE SWAP ONSCR> IFEND | 38 30 20 43 3d 20 43 4f 4d 50 54 42 20 43 43 3f 20 49 46 54 52 55 45 20 53 57 41 50 20 4f 4e 53 43 52 3e 20 49 46 45 4e 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DUP BARRAY MUSIC-BARRAY-1 | 44 55 50 20 42 41 52 52 41 59 20 4d 55 53 49 43 2d 42 41 52 52 41 59 2d 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 BARRAY MUSIC-BARRAY-2 CC? IFTRUE | 7b 20 3a 20 4d 42 32 20 7d 20 30 20 4d 55 53 49 43 2d 42 41 52 52 41 59 2d 32 20 7b 20 3b 20 7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 NC= COMPDURATION ( computer music note duration ) | 4e 43 3d 20 43 4f 4d 50 44 55 52 41 54 49 4f 4e 20 28 20 63 6f 6d 70 75 74 65 72 20 6d 75 73 69 63 20 6e 6f 74 65 20 64 75 72 61 74 69 6f 6e 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 NC= COMPSTEP ( step = { 1,0,-1 } ) | 4e 43 3d 20 43 4f 4d 50 53 54 45 50 20 28 20 73 74 65 70 20 3d 20 7b 20 31 2c 30 2c 2d 31 20 7d 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 NC= COMPTIMER ( for COMPDURATION moving ) | 4e 43 3d 20 43 4f 4d 50 54 49 4d 45 52 20 28 20 66 6f 72 20 43 4f 4d 50 44 55 52 41 54 49 4f 4e 20 6d 6f 76 69 6e 67 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 NC= ATRACKER NC= BTRACKER NC= CTRACKER NC= MOTRACKER | 4e 43 3d 20 41 54 52 41 43 4b 45 52 20 4e 43 3d 20 42 54 52 41 43 4b 45 52 20 4e 43 3d 20 43 54 52 41 43 4b 45 52 20 4e 43 3d 20 4d 4f 54 52 41 43 4b 45 52 20 20 20 20 20 20 20 20 20 20 20 20 NC= NOTECOUNTER ( for key changes ) }} | 4e 43 3d 20 4e 4f 54 45 43 4f 55 4e 54 45 52 20 28 20 66 6f 72 20 6b 65 79 20 63 68 61 6e 67 65 73 20 29 20 7d 7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0065 } ( MUSIC PROCESSOR COMANDS ) HEX ( data,PORT ) | 28 20 4d 55 53 49 43 20 50 52 4f 43 45 53 53 4f 52 20 43 4f 4d 41 4e 44 53 20 29 20 48 45 58 20 28 20 64 61 74 61 2c 50 4f 52 54 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { : MASTER } 10 B, B, { ; } { : ATONE } 11 B, B, { ; } | 7b 20 3a 20 4d 41 53 54 45 52 20 7d 20 31 30 20 42 2c 20 42 2c 20 7b 20 3b 20 7d 20 7b 20 3a 20 41 54 4f 4e 45 20 7d 20 31 31 20 42 2c 20 42 2c 20 7b 20 3b 20 7d 20 20 20 20 20 20 20 20 20 20 { : BTONE } 12 B, B, { ; } { : CTONE } 13 B, B, { ; } | 7b 20 3a 20 42 54 4f 4e 45 20 7d 20 31 32 20 42 2c 20 42 2c 20 7b 20 3b 20 7d 20 7b 20 3a 20 43 54 4f 4e 45 20 7d 20 31 33 20 42 2c 20 42 2c 20 7b 20 3b 20 7d 20 20 20 20 20 20 20 20 20 20 20 { : VIBS } 14 B, B, { ; } { : ABVOLS } 16 B, B, { ; } | 7b 20 3a 20 56 49 42 53 20 7d 20 31 34 20 42 2c 20 42 2c 20 7b 20 3b 20 7d 20 20 20 20 20 20 20 20 7b 20 3a 20 41 42 56 4f 4c 53 20 7d 20 31 36 20 42 2c 20 42 2c 20 7b 20 3b 20 7d 20 20 20 20 { : MCVOLS } 15 B, B, { ; } { : NOISE } 17 B, B, { ; } | 7b 20 3a 20 4d 43 56 4f 4c 53 20 7d 20 31 35 20 42 2c 20 42 2c 20 7b 20 3b 20 7d 20 20 20 20 20 7b 20 3a 20 4e 4f 49 53 45 20 7d 20 31 37 20 42 2c 20 42 2c 20 7b 20 3b 20 7d 20 20 20 20 20 20 ( range,disp.,port ) { : RDRNDNTE } 0 B, B, B, B, { ; } | 28 20 72 61 6e 67 65 2c 64 69 73 70 2e 2c 70 6f 72 74 20 29 20 7b 20 3a 20 52 44 52 4e 44 4e 54 45 20 7d 20 30 20 42 2c 20 42 2c 20 42 2c 20 42 2c 20 7b 20 3b 20 7d 20 20 20 20 20 20 20 20 20 ( range,port ) { : RRNDNTE } 0 B, B, 0 B, B, { ; } | 28 20 72 61 6e 67 65 2c 70 6f 72 74 20 29 20 7b 20 3a 20 52 52 4e 44 4e 54 45 20 7d 20 30 20 42 2c 20 42 2c 20 30 20 42 2c 20 42 2c 20 7b 20 3b 20 7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( port ) { : RNDNTE } 0 B, B, 0 B, FF B, { ; } | 28 20 70 6f 72 74 20 29 20 7b 20 3a 20 52 4e 44 4e 54 45 20 7d 20 30 20 42 2c 20 42 2c 20 30 20 42 2c 20 46 46 20 42 2c 20 7b 20 3b 20 7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { : DURATION } 1 B, B, { ; } { : PLAY } 3 B, { ; } | 7b 20 3a 20 44 55 52 41 54 49 4f 4e 20 7d 20 31 20 42 2c 20 42 2c 20 7b 20 3b 20 7d 20 20 20 20 7b 20 3a 20 50 4c 41 59 20 7d 20 33 20 42 2c 20 7b 20 3b 20 7d 20 20 20 20 20 20 20 20 20 20 20 ( address to cont. at ) { : LDPCC } 2 B, , { ; } | 28 20 61 64 64 72 65 73 73 20 74 6f 20 63 6f 6e 74 2e 20 61 74 20 29 20 7b 20 3a 20 4c 44 50 43 43 20 7d 20 32 20 42 2c 20 2c 20 7b 20 3b 20 7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( time,#A ) { : ANOTE } ATONE DURATION { ; } | 28 20 74 69 6d 65 2c 23 41 20 29 20 7b 20 3a 20 41 4e 4f 54 45 20 7d 20 41 54 4f 4e 45 20 44 55 52 41 54 49 4f 4e 20 7b 20 3b 20 7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( time,#B ) { : BNOTE } BTONE DURATION { ; } | 28 20 74 69 6d 65 2c 23 42 20 29 20 7b 20 3a 20 42 4e 4f 54 45 20 7d 20 42 54 4f 4e 45 20 44 55 52 41 54 49 4f 4e 20 7b 20 3b 20 7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( time,#C ) { : CNOTE } CTONE DURATION { ; } | 28 20 74 69 6d 65 2c 23 43 20 29 20 7b 20 3a 20 43 4e 4f 54 45 20 7d 20 43 54 4f 4e 45 20 44 55 52 41 54 49 4f 4e 20 7b 20 3b 20 7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( #A,#B,#C ) { : TONES } CTONE BTONE ATONE { ; } | 28 20 23 41 2c 23 42 2c 23 43 20 29 20 7b 20 3a 20 54 4f 4e 45 53 20 7d 20 43 54 4f 4e 45 20 42 54 4f 4e 45 20 41 54 4f 4e 45 20 7b 20 3b 20 7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( time,#A,#B,#C ) { : NOTES } TONES DURATION { ; } | 28 20 74 69 6d 65 2c 23 41 2c 23 42 2c 23 43 20 29 20 7b 20 3a 20 4e 4f 54 45 53 20 7d 20 54 4f 4e 45 53 20 44 55 52 41 54 49 4f 4e 20 7b 20 3b 20 7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0066 } ( MUSIC PROCESSOR COMANDS cont. ) HEX | 28 20 4d 55 53 49 43 20 50 52 4f 43 45 53 53 4f 52 20 43 4f 4d 41 4e 44 53 20 63 6f 6e 74 2e 20 29 20 48 45 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { : QUIET } 4 B, { ; } ( does an emusic ) | 7b 20 3a 20 51 55 49 45 54 20 7d 20 34 20 42 2c 20 7b 20 3b 20 7d 20 28 20 64 6f 65 73 20 61 6e 20 65 6d 75 73 69 63 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( time,step,low,high ) { : RAMBLE } 5 B, B, B, B, B, { ; } | 28 20 74 69 6d 65 2c 73 74 65 70 2c 6c 6f 77 2c 68 69 67 68 20 29 20 7b 20 3a 20 52 41 4d 42 4c 45 20 7d 20 35 20 42 2c 20 42 2c 20 42 2c 20 42 2c 20 42 2c 20 7b 20 3b 20 7d 20 20 20 20 20 20 ( time,step,low,high ) { : RAMP } 6 B, B, B, B, B, { ; } | 28 20 74 69 6d 65 2c 73 74 65 70 2c 6c 6f 77 2c 68 69 67 68 20 29 20 7b 20 3a 20 52 41 4d 50 20 7d 20 36 20 42 2c 20 42 2c 20 42 2c 20 42 2c 20 42 2c 20 7b 20 3b 20 7d 20 20 20 20 20 20 20 20 ( computer music generator, stepsize {1,0,-1}, duration ---- ) | 28 20 63 6f 6d 70 75 74 65 72 20 6d 75 73 69 63 20 67 65 6e 65 72 61 74 6f 72 2c 20 73 74 65 70 73 69 7a 65 20 7b 31 2c 30 2c 2d 31 7d 2c 20 64 75 72 61 74 69 6f 6e 20 2d 2d 2d 2d 20 29 20 20 { : GENMUSIC } 7 B, B, B, { ; } | 20 20 20 20 20 20 7b 20 3a 20 47 45 4e 4d 55 53 49 43 20 7d 20 37 20 42 2c 20 42 2c 20 42 2c 20 7b 20 3b 20 7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { : RERAMBLE } 8 B, { ; } ( restart ramble ) | 7b 20 3a 20 52 45 52 41 4d 42 4c 45 20 7d 20 38 20 42 2c 20 7b 20 3b 20 7d 20 28 20 72 65 73 74 61 72 74 20 72 61 6d 62 6c 65 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { : STOPRAMBLE } 9 B, { ; } | 7b 20 3a 20 53 54 4f 50 52 41 4d 42 4c 45 20 7d 20 39 20 42 2c 20 7b 20 3b 20 7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { : COUNTLIMITS } 0A B, B, { ; } | 7b 20 3a 20 43 4f 55 4e 54 4c 49 4d 49 54 53 20 7d 20 30 41 20 42 2c 20 42 2c 20 7b 20 3b 20 7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( Format for following : timebase,stepsize,stopvalue ---- ) | 28 20 46 6f 72 6d 61 74 20 66 6f 72 20 66 6f 6c 6c 6f 77 69 6e 67 20 3a 20 74 69 6d 65 62 61 73 65 2c 73 74 65 70 73 69 7a 65 2c 73 74 6f 70 76 61 6c 75 65 20 2d 2d 2d 2d 20 29 20 20 20 20 20 { : MOVESTEP } 0B B, B, B, B, { ; } | 7b 20 3a 20 4d 4f 56 45 53 54 45 50 20 7d 20 30 42 20 42 2c 20 42 2c 20 42 2c 20 42 2c 20 7b 20 3b 20 7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( wait#oflims,ss,sv ) { : MOVELOWLIM } 0C B, B, B, B, { ; } | 28 20 77 61 69 74 23 6f 66 6c 69 6d 73 2c 73 73 2c 73 76 20 29 20 7b 20 3a 20 4d 4f 56 45 4c 4f 57 4c 49 4d 20 7d 20 30 43 20 42 2c 20 42 2c 20 42 2c 20 42 2c 20 7b 20 3b 20 7d 20 20 20 20 20 ( hold#oflims,ss,sv ) { : MOVEHIGHLIM } 0D B, B, B, B, { ; } | 28 20 68 6f 6c 64 23 6f 66 6c 69 6d 73 2c 73 73 2c 73 76 20 29 20 7b 20 3a 20 4d 4f 56 45 48 49 47 48 4c 49 4d 20 7d 20 30 44 20 42 2c 20 42 2c 20 42 2c 20 42 2c 20 7b 20 3b 20 7d 20 20 20 20 ( timebase ) { : MOVETB } 0E B, B, B, B, { ; } | 28 20 74 69 6d 65 62 61 73 65 20 29 20 7b 20 3a 20 4d 4f 56 45 54 42 20 7d 20 30 45 20 42 2c 20 42 2c 20 42 2c 20 42 2c 20 7b 20 3b 20 7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( NOISE,tb,ss,sv ) { : MOVENOISE } 0F B, B, B, B, B, { ; } | 28 20 4e 4f 49 53 45 2c 74 62 2c 73 73 2c 73 76 20 29 20 7b 20 3a 20 4d 4f 56 45 4e 4f 49 53 45 20 7d 20 30 46 20 42 2c 20 42 2c 20 42 2c 20 42 2c 20 42 2c 20 7b 20 3b 20 7d 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0067 } ( MUSIC PROCESSOR COMANDS cont., STEREO STUFF and ABCRND ) HEX | 28 20 4d 55 53 49 43 20 50 52 4f 43 45 53 53 4f 52 20 43 4f 4d 41 4e 44 53 20 63 6f 6e 74 2e 2c 20 53 54 45 52 45 4f 20 53 54 55 46 46 20 61 6e 64 20 41 42 43 52 4e 44 20 29 20 48 45 58 20 20 ( try - timebase, stepsize, leftvolume, ---- ) | 28 20 74 72 79 20 2d 20 74 69 6d 65 62 61 73 65 2c 20 73 74 65 70 73 69 7a 65 2c 20 6c 65 66 74 76 6f 6c 75 6d 65 2c 20 2d 2d 2d 2d 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HEX { : MOVESOUND } 18 B, B, B, B, { ; } | 48 45 58 20 20 20 20 20 7b 20 3a 20 4d 4f 56 45 53 4f 55 4e 44 20 7d 20 31 38 20 42 2c 20 42 2c 20 42 2c 20 42 2c 20 7b 20 3b 20 7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( also notice that stepvol is pos. for left-->right ) | 28 20 61 6c 73 6f 20 6e 6f 74 69 63 65 20 74 68 61 74 20 73 74 65 70 76 6f 6c 20 69 73 20 70 6f 73 2e 20 66 ef 72 20 6c 65 66 74 2d 2d 3e 72 69 67 68 74 20 29 20 20 20 20 20 20 20 20 20 20 20 ( for limited movement, use the following : # of limits ---- ) | 28 20 66 6f 72 20 6c 69 6d 69 74 65 64 20 6d 6f 76 65 6d 65 6e 74 2c 20 75 73 65 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 3a 20 23 20 6f 66 20 6c 69 6d 69 74 73 20 2d 2d 2d 2d 20 29 20 20 { : COUNTPANS } 19 B, B, { ; } | 20 20 20 20 20 20 20 20 7b 20 3a 20 43 4f 55 4e 54 50 41 4e 53 20 7d 20 31 39 20 42 2c 20 42 2c 20 7b 20 3b 20 7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( volume moving is ind. of stereo ) | 28 20 76 6f 6c 75 6d 65 20 6d 6f 76 69 6e 67 20 69 73 20 69 6e 64 2e 20 6f 66 20 73 74 65 72 65 6f 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( ABvols,MCvols,tb,ss,ll,hl ---- ) | 28 20 41 42 76 6f 6c 73 2c 4d 43 76 6f 6c 73 2c 74 62 2c 73 73 2c 6c 6c 2c 68 6c 20 2d 2d 2d 2d 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { : MOVEVOLS } 1A B, B, B, B, B, MCVOLS ABVOLS { ; } | 20 20 20 20 20 20 20 20 7b 20 3a 20 4d 4f 56 45 56 4f 4c 53 20 7d 20 31 41 20 42 2c 20 42 2c 20 42 2c 20 42 2c 20 42 2c 20 4d 43 56 4f 4c 53 20 41 42 56 4f 4c 53 20 7b 20 3b 20 7d 20 20 20 20 ( special opcode to reload MC for fade out, STARTING MC ---- ) | 28 20 73 70 65 63 69 61 6c 20 6f 70 63 6f 64 65 20 74 6f 20 72 65 6c 6f 61 64 20 4d 43 20 66 6f 72 20 66 61 64 65 20 6f 75 74 2c 20 53 54 41 52 54 49 4e 47 20 4d 43 20 2d 2d 2d 2d 20 29 20 20 { : HITMO } 1B B, B, { ; } | 20 20 20 20 20 20 20 20 7b 20 3a 20 48 49 54 4d 4f 20 7d 20 31 42 20 42 2c 20 42 2c 20 7b 20 3b 20 7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0068 } ( NOTE CONSTANTS ) HEX | 28 20 4e 4f 54 45 20 43 4f 4e 53 54 41 4e 54 53 20 29 20 48 45 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 FD C= #G0 EE C= #GS0 E1 C= #A0 D4 C= #AS0 C8 C= #B0 | 46 44 20 43 3d 20 23 47 30 20 20 45 45 20 43 3d 20 23 47 53 30 20 20 45 31 20 43 3d 20 23 41 30 20 20 44 34 20 43 3d 20 23 41 53 30 20 20 43 38 20 43 3d 20 23 42 30 20 20 20 20 20 20 20 20 20 BD C= #C1 B2 C= #CS1 A8 C= #D1 9F C= #DS1 96 C= #E1 | 42 44 20 43 3d 20 23 43 31 20 20 42 32 20 43 3d 20 23 43 53 31 20 20 41 38 20 43 3d 20 23 44 31 20 20 39 46 20 43 3d 20 23 44 53 31 20 20 39 36 20 43 3d 20 23 45 31 20 20 20 20 20 20 20 20 20 8D C= #F1 85 C= #FS1 7E C= #G1 77 C= #GS1 70 C= #A1 | 38 44 20 43 3d 20 23 46 31 20 20 38 35 20 43 3d 20 23 46 53 31 20 20 37 45 20 43 3d 20 23 47 31 20 20 37 37 20 43 3d 20 23 47 53 31 20 20 37 30 20 43 3d 20 23 41 31 20 20 20 20 20 20 20 20 20 6A C= #AS1 64 C= #B1 5E C= #C2 59 C= #CS2 54 C= #D2 | 36 41 20 43 3d 20 23 41 53 31 20 20 36 34 20 43 3d 20 23 42 31 20 20 35 45 20 43 3d 20 23 43 32 20 20 35 39 20 43 3d 20 23 43 53 32 20 20 35 34 20 43 3d 20 23 44 32 20 20 20 20 20 20 20 20 20 4F C= #DS2 4A C= #E2 46 C= #F2 42 C= #FS2 3E C= #G2 | 34 46 20 43 3d 20 23 44 53 32 20 20 34 41 20 43 3d 20 23 45 32 20 20 34 36 20 43 3d 20 23 46 32 20 20 34 32 20 43 3d 20 23 46 53 32 20 20 33 45 20 43 3d 20 23 47 32 20 20 20 20 20 20 20 20 20 3B C= #GS2 37 C= #A2 34 C= #AS2 31 C= #B2 2E C= #C3 | 33 42 20 43 3d 20 23 47 53 32 20 20 33 37 20 43 3d 20 23 41 32 20 20 33 34 20 43 3d 20 23 41 53 32 20 20 33 31 20 43 3d 20 23 42 32 20 20 32 45 20 43 3d 20 23 43 33 20 20 20 20 20 20 20 20 20 2C C= #CS3 29 C= #D3 27 C= #DS3 25 C= #E3 22 C= #F3 | 32 43 20 43 3d 20 23 43 53 33 20 20 32 39 20 43 3d 20 23 44 33 20 20 32 37 20 43 3d 20 23 44 53 33 20 20 32 35 20 43 3d 20 23 45 33 20 20 32 32 20 43 3d 20 23 46 33 20 20 20 20 20 20 20 20 20 20 C= #FS3 1F C= #G3 1D C= #GS3 1B C= #A3 1A C= #AS3 | 32 30 20 43 3d 20 23 46 53 33 20 20 31 46 20 43 3d 20 23 47 33 20 20 31 44 20 43 3d 20 23 47 53 33 20 20 31 42 20 43 3d 20 23 41 33 20 20 31 41 20 43 3d 20 23 41 53 33 20 20 20 20 20 20 20 20 18 C= #B3 17 C= #C4 15 C= #CS4 14 C= #D4 13 C= #DS4 | 31 38 20 43 3d 20 23 42 33 20 20 31 37 20 43 3d 20 23 43 34 20 20 31 35 20 43 3d 20 23 43 53 34 20 20 31 34 20 43 3d 20 23 44 34 20 20 31 33 20 43 3d 20 23 44 53 34 20 20 20 20 20 20 20 20 20 12 C= #E4 11 C= #F4 10 C= #FS4 0F C= #G4 0E C= #GS4 | 31 32 20 43 3d 20 23 45 34 20 20 31 31 20 43 3d 20 23 46 34 20 20 31 30 20 43 3d 20 23 46 53 34 20 20 30 46 20 43 3d 20 23 47 34 20 20 30 45 20 43 3d 20 23 47 53 34 20 20 20 20 20 20 20 20 20 0D C= #A4 0B C= #C5 0A C= #CS5 09 C= #DS5 08 C= #F5 | 30 44 20 43 3d 20 23 41 34 20 20 30 42 20 43 3d 20 23 43 35 20 20 30 41 20 43 3d 20 23 43 53 35 20 20 30 39 20 43 3d 20 23 44 53 35 20 30 38 20 43 3d 20 23 46 35 20 20 20 20 20 20 20 20 20 20 07 C= #G5 06 C= #A5 05 C= #C6 04 C= #DS6 03 C= #G6 | 30 37 20 43 3d 20 23 47 35 20 20 30 36 20 43 3d 20 23 41 35 20 20 30 35 20 43 3d 20 23 43 36 20 20 30 34 20 43 3d 20 23 44 53 36 20 20 30 33 20 43 3d 20 23 47 36 20 20 20 20 20 20 20 20 20 20 02 C= #C7 01 C= #G7 00 C= #G8 CC? IFTRUE ONSCR> IFEND | 30 32 20 43 3d 20 23 43 37 20 20 30 31 20 43 3d 20 23 47 37 20 20 30 30 20 43 3d 20 23 47 38 20 43 43 3f 20 49 46 54 52 55 45 20 4f 4e 53 43 52 3e 20 49 46 45 4e 44 20 20 20 20 20 20 20 20 20 BTABLE MOTABLE 23 B, 22 B, 20 B, 1E B, 1C B, 1A B, 18 B, 17 B, | 42 54 41 42 4c 45 20 4d 4f 54 41 42 4c 45 20 32 33 20 42 2c 20 32 32 20 42 2c 20 32 30 20 42 2c 20 31 45 20 42 2c 20 31 43 20 42 2c 20 31 41 20 42 2c 20 31 38 20 42 2c 20 31 37 20 42 2c 20 20 16 B, 15 B, 14 B, 13 B, 12 B, 11 B, 0D B, 0B B, --> | 20 31 36 20 42 2c 20 31 35 20 42 2c 20 31 34 20 42 2c 20 31 33 20 42 2c 20 31 32 20 42 2c 20 31 31 20 42 2c 20 30 44 20 42 2c 20 30 42 20 42 2c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0069 } ( SIN BTABLE FOR LEFT-RIGHT PAN VOLTAGES ) DECIMAL | 28 20 53 49 4e 20 42 54 41 42 4c 45 20 46 4f 52 20 4c 45 46 54 2d 52 49 47 48 54 20 50 41 4e 20 56 4f 4c 54 41 47 45 53 20 29 20 44 45 43 49 4d 41 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { : ^ } ( STORE BYTES ON STACK IN RAM AS PATTERN ) | 7b 20 3a 20 5e 20 7d 20 20 28 20 53 54 4f 52 45 20 42 59 54 45 53 20 4f 4e 20 53 54 41 43 4b 20 49 4e 20 52 41 4d 20 41 53 20 50 41 54 54 45 52 4e 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 { -1 >R BEGIN DUP -1 = IF DROP 1 ELSE >R 0 THEN END | 20 20 7b 20 2d 31 20 3e 52 20 42 45 47 49 4e 20 44 55 50 20 2d 31 20 3d 20 49 46 20 44 52 4f 50 20 31 20 45 4c 53 45 20 3e 52 20 30 20 54 48 45 4e 20 45 4e 44 20 20 20 20 20 20 20 20 20 20 20 BEGIN R> DUP -1 = IF DROP 1 ELSE } B, { 0 THEN END ; } | 20 20 20 20 20 20 42 45 47 49 4e 20 52 3e 20 44 55 50 20 2d 31 20 3d 20 49 46 20 44 52 4f 50 20 31 20 45 4c 53 45 20 7d 20 42 2c 20 7b 20 30 20 54 48 45 4e 20 45 4e 44 20 3b 20 7d 20 20 20 20 -1 CONSTANT ~ ( MARK START OF PATTERN ) | 20 2d 31 20 43 4f 4e 53 54 41 4e 54 20 7e 20 28 20 4d 41 52 4b 20 53 54 41 52 54 20 4f 46 20 50 41 54 54 45 52 4e 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 BTABLE sin-table | 42 54 41 42 4c 45 20 73 69 6e 2d 74 61 62 6c 65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( 00-10 ) ~ 255 255 255 255 254 253 252 251 250 248 247 ^ | 28 20 30 30 2d 31 30 20 29 20 7e 20 32 35 35 20 32 35 35 20 32 35 35 20 32 35 35 20 32 35 34 20 32 35 33 20 32 35 32 20 32 35 31 20 32 35 30 20 32 34 38 20 32 34 37 20 5e 20 20 20 20 20 20 20 ( 11-21 ) ~ 245 243 241 239 237 234 231 229 226 223 220 ^ | 28 20 31 31 2d 32 31 20 29 20 7e 20 32 34 35 20 32 34 33 20 32 34 31 20 32 33 39 20 32 33 37 20 32 33 34 20 32 33 31 20 32 32 39 20 32 32 36 20 32 32 33 20 32 32 30 20 5e 20 20 20 20 20 20 20 ( 22-32 ) ~ 216 213 209 206 202 198 194 190 185 181 177 ^ | 28 20 32 32 2d 33 32 20 29 20 7e 20 32 31 36 20 32 31 33 20 32 30 39 20 32 30 36 20 32 30 32 20 31 39 38 20 31 39 34 20 31 39 30 20 31 38 35 20 31 38 31 20 31 37 37 20 5e 20 20 20 20 20 20 20 ( 33-43 ) ~ 172 167 162 157 152 147 142 137 132 126 121 ^ | 28 20 33 33 2d 34 33 20 29 20 7e 20 31 37 32 20 31 36 37 20 31 36 32 20 31 35 37 20 31 35 32 20 31 34 37 20 31 34 32 20 31 33 37 20 31 33 32 20 31 32 36 20 31 32 31 20 5e 20 20 20 20 20 20 20 ( 44-54 ) ~ 115 109 104 98 92 86 80 74 68 62 56 ^ | 28 20 34 34 2d 35 34 20 29 20 7e 20 31 31 35 20 31 30 39 20 31 30 34 20 20 39 38 20 20 39 32 20 20 38 36 20 20 38 30 20 20 37 34 20 20 36 38 20 20 36 32 20 20 35 36 20 5e 20 20 20 20 20 20 20 ( 55-63 ) ~ 50 44 38 31 25 19 13 6 0 ^ | 28 20 35 35 2d 36 33 20 29 20 7e 20 20 35 30 20 20 34 34 20 20 33 38 20 20 33 31 20 20 32 35 20 20 31 39 20 20 31 33 20 20 20 36 20 20 20 30 20 20 20 20 20 20 20 20 20 5e 20 20 20 20 20 20 20 SUBR sin ( pass <, 0<= < <= 63, in E ) 0 D MVI, | 53 55 42 52 20 73 69 6e 20 28 20 70 61 73 73 20 3c 2c 20 30 3c 3d 20 3c 20 3c 3d 20 36 33 2c 20 69 6e 20 45 20 29 20 30 20 44 20 4d 56 49 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 sin-table H LXI, D DAD, M A MOV, RET, | 20 30 20 73 69 6e 2d 74 61 62 6c 65 20 48 20 4c 58 49 2c 20 44 20 44 41 44 2c 20 4d 20 41 20 4d 4f 56 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0070 } ( HELPING SUBR's for MUSCPU *** NOTICE *** ) HEX | 28 20 48 45 4c 50 49 4e 47 20 53 55 42 52 27 73 20 66 6f 72 20 4d 55 53 43 50 55 20 2a 2a 2a 20 4e 4f 54 49 43 45 20 2a 2a 2a 20 29 20 48 45 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( The MUSPC rides in HL for the coarse of the MUSCPU ) | 28 20 54 68 65 20 4d 55 53 50 43 20 72 69 64 65 73 20 69 6e 20 48 4c 20 66 6f 72 20 74 68 65 20 63 6f 61 72 73 65 20 6f 66 20 74 68 65 20 4d 55 53 43 50 55 20 29 20 20 20 20 20 20 20 20 20 20 ( EACH MUSCPU LOADS ITS STARTING RAM IN IY ) | 28 20 45 41 43 48 20 4d 55 53 43 50 55 20 4c 4f 41 44 53 20 49 54 53 20 53 54 41 52 54 49 4e 47 20 52 41 4d 20 49 4e 20 49 59 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR PCJUMP ( reload MUSPC ) | 53 55 42 52 20 50 43 4a 55 4d 50 20 28 20 72 65 6c 6f 61 64 20 4d 55 53 50 43 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 M E MOV, H INX, M D MOV, XCHG, ( leave in HL ) | 20 4d 20 45 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 4d 20 44 20 4d 4f 56 2c 20 58 43 48 47 2c 20 28 20 6c 65 61 76 65 20 69 6e 20 48 4c 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 L MUSPC Y STX, H MUSPC 1+ Y STX, ( store ) RET, | 20 4c 20 4d 55 53 50 43 20 59 20 53 54 58 2c 20 48 20 4d 55 53 50 43 20 31 2b 20 59 20 53 54 58 2c 20 28 20 73 74 6f 72 65 20 29 20 20 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR portout ( pass value in A, port in C ) | 53 55 42 52 20 70 6f 72 74 6f 75 74 20 28 20 70 61 73 73 20 76 61 6c 75 65 20 69 6e 20 41 2c 20 70 6f 72 74 20 69 6e 20 43 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 A E MOV, 17 A MVI, C CMP, ( all ports are 10-17 ) | 20 41 20 45 20 4d 4f 56 2c 20 31 37 20 41 20 4d 56 49 2c 20 43 20 43 4d 50 2c 20 28 20 61 6c 6c 20 70 6f 72 74 73 20 61 72 65 20 31 30 2d 31 37 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0>=, IF, ( check for bad values ) | 20 30 3e 3d 2c 20 49 46 2c 20 28 20 63 68 65 63 6b 20 66 6f 72 20 62 61 64 20 76 61 6c 75 65 73 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 8 SUI, ( bottom ) C CMP, 0<, IF, ( oked ) | 20 38 20 53 55 49 2c 20 28 20 62 6f 74 74 6f 6d 20 29 20 43 20 43 4d 50 2c 20 30 3c 2c 20 49 46 2c 20 28 20 6f 6b 65 64 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 18 A MVI, C SUB, SOUNDBOX Y SUBX, NEG, A C MOV, E OUTP, | 20 31 38 20 41 20 4d 56 49 2c 20 43 20 53 55 42 2c 20 53 4f 55 4e 44 42 4f 58 20 59 20 53 55 42 58 2c 20 4e 45 47 2c 20 41 20 43 20 4d 4f 56 2c 20 45 20 4f 55 54 50 2c 20 20 20 20 20 20 20 20 THEN, THEN, A XRA, RET, | 20 54 48 45 4e 2c 20 54 48 45 4e 2c 20 41 20 58 52 41 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR babs ( byte absolute value ) | 53 55 42 52 20 62 61 62 73 20 28 20 62 79 74 65 20 61 62 73 6f 6c 75 74 65 20 76 61 6c 75 65 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7 A BIT, 0<>, IF, NEG, 7 A RES, THEN, RET, | 20 37 20 41 20 42 49 54 2c 20 30 3c 3e 2c 20 49 46 2c 20 4e 45 47 2c 20 37 20 41 20 52 45 53 2c 20 54 48 45 4e 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE BABS H POP, L A MOV, babs CALL, A L MOV, H PUSH, NEXT | 43 4f 44 45 20 42 41 42 53 20 48 20 50 4f 50 2c 20 4c 20 41 20 4d 4f 56 2c 20 62 61 62 73 20 43 41 4c 4c 2c 20 41 20 4c 20 4d 4f 56 2c 20 48 20 50 55 53 48 2c 20 4e 45 58 54 20 20 20 20 20 20 { BLOCK 0071 } ( HELPING SUBR's cont. ) HEX | 28 20 48 45 4c 50 49 4e 47 20 53 55 42 52 27 73 20 63 6f 6e 74 2e 20 29 20 48 45 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR HALFVOLS ( pass A ) EXX, A B MOV, DEMOMODE LDA, | 53 55 42 52 20 48 41 4c 46 56 4f 4c 53 20 28 20 70 61 73 73 20 41 20 29 20 45 58 58 2c 20 41 20 42 20 4d 4f 56 2c 20 44 45 4d 4f 4d 4f 44 45 20 4c 44 41 2c 20 20 20 20 20 20 20 20 20 20 20 20 A ANA, B A MOV, 0<>, IF, RRC, RRC, 33 ANI, THEN, | 41 20 41 4e 41 2c 20 42 20 41 20 4d 4f 56 2c 20 30 3c 3e 2c 20 49 46 2c 20 52 52 43 2c 20 52 52 43 2c 20 33 33 20 41 4e 49 2c 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 EXX, RET, | 45 58 58 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR LIMITCOUNT ( detect Music-State-transition if completed ) | 53 55 42 52 20 4c 49 4d 49 54 43 4f 55 4e 54 20 28 20 64 65 74 65 63 74 20 4d 75 73 69 63 2d 53 74 61 74 65 2d 74 72 61 6e 73 69 74 69 6f 6e 20 69 66 20 63 6f 6d 70 6c 65 74 65 64 20 29 20 20 LIMCOUNTER Y A LDX, A ORA, 0<>, IF, | 20 4c 49 4d 43 4f 55 4e 54 45 52 20 59 20 41 20 4c 44 58 2c 20 41 20 4f 52 41 2c 20 30 3c 3e 2c 20 49 46 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 A DCR, A LIMCOUNTER Y STX, 0=, IF, ( done ) | 20 41 20 44 43 52 2c 20 41 20 4c 49 4d 43 4f 55 4e 54 45 52 20 59 20 53 54 58 2c 20 30 3d 2c 20 49 46 2c 20 28 20 64 6f 6e 65 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 A RAMBLEFLAG Y STX, ( stop ramble ) 1 MST Y MVIX, | 20 41 20 52 41 4d 42 4c 45 46 4c 41 47 20 59 20 53 54 58 2c 20 28 20 73 74 6f 70 20 72 61 6d 62 6c 65 20 29 20 31 20 4d 53 54 20 59 20 4d 56 49 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 THEN, THEN, RET, | 20 54 48 45 4e 2c 20 54 48 45 4e 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0072 } ( MUSIC PROCESSOR- emusic ) | 28 20 4d 55 53 49 43 20 50 52 4f 43 45 53 53 4f 52 2d 20 65 6d 75 73 69 63 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA ENDMUS ASM PLAY | 44 41 54 41 20 45 4e 44 4d 55 53 20 41 53 4d 20 50 4c 41 59 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR emusic ( ** each EMUSIC passes vector addr in DE' ) | 53 55 42 52 20 65 6d 75 73 69 63 20 28 20 2a 2a 20 65 61 63 68 20 45 4d 55 53 49 43 20 70 61 73 73 65 73 20 76 65 63 74 6f 72 20 61 64 64 72 20 69 6e 20 44 45 27 20 29 20 20 20 20 20 20 20 20 MUSPC H LXI, D DAD, ENDMUS B LXI, C M MOV, H INX, B M MOV, | 20 4d 55 53 50 43 20 48 20 4c 58 49 2c 20 44 20 44 41 44 2c 20 45 4e 44 4d 55 53 20 42 20 4c 58 49 2c 20 43 20 4d 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 42 20 4d 20 4d 4f 56 2c 20 20 20 20 20 A XRA, 5 H LXI, D DAD, ( skip MUSPC,STARTPC,SOUNDBOX ) | 20 41 20 58 52 41 2c 20 35 20 48 20 4c 58 49 2c 20 44 20 44 41 44 2c 20 28 20 73 6b 69 70 20 4d 55 53 50 43 2c 53 54 41 52 54 50 43 2c 53 4f 55 4e 44 42 4f 58 20 29 20 20 20 20 20 20 20 20 20 ENDMUSRAM BEGMUSRAM - 5 - B MVI, | 20 45 4e 44 4d 55 53 52 41 4d 20 42 45 47 4d 55 53 52 41 4d 20 2d 20 35 20 2d 20 42 20 4d 56 49 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 BEGIN, A M MOV, H INX, B DCR, 0=, END, | 20 42 45 47 49 4e 2c 20 41 20 4d 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 42 20 44 43 52 2c 20 30 3d 2c 20 45 4e 44 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SOUNDBOX H LXI, D DAD, M C MOV, 8 B MVI, | 20 53 4f 55 4e 44 42 4f 58 20 48 20 4c 58 49 2c 20 44 20 44 41 44 2c 20 4d 20 43 20 4d 4f 56 2c 20 38 20 42 20 4d 56 49 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 BEGIN, C DCR, A OUTP, B DCR, 0=, END, | 20 42 45 47 49 4e 2c 20 43 20 44 43 52 2c 20 41 20 4f 55 54 50 2c 20 42 20 44 43 52 2c 20 30 3d 2c 20 45 4e 44 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 EXX, RET, | 20 45 58 58 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0073 } ( OPCODE SUBR's, 0-4, ALL OPCODES LEAVE HL OK ) | 28 20 4f 50 43 4f 44 45 20 53 55 42 52 27 73 2c 20 30 2d 34 2c 20 41 4c 4c 20 4f 50 43 4f 44 45 53 20 4c 45 41 56 45 20 48 4c 20 4f 4b 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR RANDOMNOTES H PUSH, ( save PC from RND ) | 53 55 42 52 20 52 41 4e 44 4f 4d 4e 4f 54 45 53 20 48 20 50 55 53 48 2c 20 28 20 73 61 76 65 20 50 43 20 66 72 6f 6d 20 52 4e 44 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 D MVI, M E MOV, D PUSH, H INX, M E MOV, D PUSH, H INX, | 20 30 20 44 20 4d 56 49 2c 20 4d 20 45 20 4d 4f 56 2c 20 44 20 50 55 53 48 2c 20 48 20 49 4e 58 2c 20 4d 20 45 20 4d 4f 56 2c 20 44 20 50 55 53 48 2c 20 48 20 49 4e 58 2c 20 20 20 20 20 20 20 M E MOV, random CALL, D POP, ( disp. ) D DAD, ( returns in HL ) | 20 4d 20 45 20 4d 4f 56 2c 20 72 61 6e 64 6f 6d 20 43 41 4c 4c 2c 20 44 20 50 4f 50 2c 20 28 20 64 69 73 70 2e 20 29 20 44 20 44 41 44 2c 20 28 20 72 65 74 75 72 6e 73 20 69 6e 20 48 4c 20 29 B POP, L A MOV, portout CALL, H POP, 3 D LXI, D DAD, ( MUSPC ) | 20 42 20 50 4f 50 2c 20 4c 20 41 20 4d 4f 56 2c 20 70 6f 72 74 6f 75 74 20 43 41 4c 4c 2c 20 48 20 50 4f 50 2c 20 33 20 44 20 4c 58 49 2c 20 44 20 44 41 44 2c 20 28 20 4d 55 53 50 43 20 29 20 A XRA, RET, | 20 41 20 58 52 41 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR LOADTIMER M A MOV, A NOTETIMER Y STX, H INX, ( A XRA, | 53 55 42 52 20 4c 4f 41 44 54 49 4d 45 52 20 4d 20 41 20 4d 4f 56 2c 20 41 20 4e 4f 54 45 54 49 4d 45 52 20 59 20 53 54 58 2c 20 48 20 49 4e 58 2c 20 28 20 41 20 58 52 41 2c 20 20 20 20 20 20 A COMPDURATION Y STX, ) 1 ORI, RET, | 20 41 20 43 4f 4d 50 44 55 52 41 54 49 4f 4e 20 59 20 53 54 58 2c 20 29 20 31 20 4f 52 49 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR CONTJUMP M E MOV, H INX, M D MOV, XCHG, A XRA, RET, | 53 55 42 52 20 43 4f 4e 54 4a 55 4d 50 20 4d 20 45 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 4d 20 44 20 4d 4f 56 2c 20 58 43 48 47 2c 20 41 20 58 52 41 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 SUBR QUITJUMP ( H DCX, 3 in A ) RET, | 53 55 42 52 20 51 55 49 54 4a 55 4d 50 20 28 20 48 20 44 43 58 2c 20 33 20 69 6e 20 41 20 29 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR QUITYET? ( QUIET ) MULTIPLE Y DCRX, | 53 55 42 52 20 51 55 49 54 59 45 54 3f 20 28 20 51 55 49 45 54 20 29 20 4d 55 4c 54 49 50 4c 45 20 59 20 44 43 52 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0<>, IF, STARTPC Y L LDX, STARTPC 1+ Y H LDX, A XRA, | 20 30 3c 3e 2c 20 49 46 2c 20 53 54 41 52 54 50 43 20 59 20 4c 20 4c 44 58 2c 20 53 54 41 52 54 50 43 20 31 2b 20 59 20 48 20 4c 44 58 2c 20 41 20 58 52 41 2c 20 20 20 20 20 20 20 20 20 20 20 ELSE, Y PUSHX, EXX, D POP, emusic CALL, 1 ORI, THEN, RET, | 20 45 4c 53 45 2c 20 59 20 50 55 53 48 58 2c 20 45 58 58 2c 20 44 20 50 4f 50 2c 20 65 6d 75 73 69 63 20 43 41 4c 4c 2c 20 31 20 4f 52 49 2c 20 54 48 45 4e 2c 20 52 45 54 2c 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0074 } ( OPCODE SUBR's, 5-6, HL= MUSPC ) | 28 20 4f 50 43 4f 44 45 20 53 55 42 52 27 73 2c 20 20 35 2d 36 2c 20 48 4c 3d 20 4d 55 53 50 43 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 FORWARD RAMBLESTORES | 46 4f 52 57 41 52 44 20 52 41 4d 42 4c 45 53 54 4f 52 45 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR RAMBLIN' A XRA, ( turn off ramp flag ) | 53 55 42 52 20 52 41 4d 42 4c 49 4e 27 20 41 20 58 52 41 2c 20 28 20 74 75 72 6e 20 6f 66 66 20 72 61 6d 70 20 66 6c 61 67 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 LABEL RAMBLESTORES A RAMPFLAG Y STX, | 20 4c 41 42 45 4c 20 52 41 4d 42 4c 45 53 54 4f 52 45 53 20 41 20 52 41 4d 50 46 4c 41 47 20 59 20 53 54 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 M A MOV, H INX, A HIGHLIM Y STX, | 20 4d 20 41 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 41 20 48 49 47 48 4c 49 4d 20 59 20 53 54 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 M A MOV, H INX, A LOWLIM Y STX, | 20 4d 20 41 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 41 20 4c 4f 57 4c 49 4d 20 59 20 53 54 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 M A MOV, H INX, A STEP Y STX, | 20 4d 20 41 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 41 20 53 54 45 50 20 59 20 53 54 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 M A MOV, H INX, A RAMBLETIMER Y STX, | 20 4d 20 41 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 41 20 52 41 4d 42 4c 45 54 49 4d 45 52 20 59 20 53 54 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 A TIMEBASE Y STX, 1 A MVI, A RAMBLEFLAG Y STX, A DCR, RET, | 20 41 20 54 49 4d 45 42 41 53 45 20 59 20 53 54 58 2c 20 31 20 41 20 4d 56 49 2c 20 41 20 52 41 4d 42 4c 45 46 4c 41 47 20 59 20 53 54 58 2c 20 41 20 44 43 52 2c 20 52 45 54 2c 20 20 20 20 20 SUBR RAMPIN' 1 A MVI, RAMBLESTORES JMP, | 53 55 42 52 20 52 41 4d 50 49 4e 27 20 31 20 41 20 4d 56 49 2c 20 52 41 4d 42 4c 45 53 54 4f 52 45 53 20 4a 4d 50 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0075 } ( OPCODE SUBR's, 8-0B, 10H ) | 28 20 4f 50 43 4f 44 45 20 53 55 42 52 27 73 2c 20 38 2d 30 42 2c 20 31 30 48 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR MASTART ( MASTER, 10H ) SOUNDBOX Y A LDX, 8 SUI, A C MOV, | 53 55 42 52 20 4d 41 53 54 41 52 54 20 28 20 4d 41 53 54 45 52 2c 20 31 30 48 20 29 20 53 4f 55 4e 44 42 4f 58 20 59 20 41 20 4c 44 58 2c 20 38 20 53 55 49 2c 20 41 20 43 20 4d 4f 56 2c 20 20 M A MOV, H INX, A MOVALUE Y STX, | 20 4d 20 41 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 41 20 4d 4f 56 41 4c 55 45 20 59 20 53 54 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 A OUTP, A XRA, RET, | 20 41 20 4f 55 54 50 2c 20 41 20 58 52 41 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR RAMBLE-ON 1 A MVI, A RAMBLEFLAG Y STX, A XRA, RET, | 53 55 42 52 20 52 41 4d 42 4c 45 2d 4f 4e 20 31 20 41 20 4d 56 49 2c 20 41 20 52 41 4d 42 4c 45 46 4c 41 47 20 59 20 53 54 58 2c 20 41 20 58 52 41 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 SUBR RAMBLE-OFF A XRA, A RAMBLEFLAG Y STX, RET, | 53 55 42 52 20 52 41 4d 42 4c 45 2d 4f 46 46 20 41 20 58 52 41 2c 20 41 20 52 41 4d 42 4c 45 46 4c 41 47 20 59 20 53 54 58 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR LIMITRAMBLE ( set up LIMCOUNTER ) | 53 55 42 52 20 4c 49 4d 49 54 52 41 4d 42 4c 45 20 28 20 73 65 74 20 75 70 20 4c 49 4d 43 4f 55 4e 54 45 52 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 1 A MVI, A RAMBLEFLAG Y STX, M A MOV, H INX, | 20 31 20 41 20 4d 56 49 2c 20 41 20 52 41 4d 42 4c 45 46 4c 41 47 20 59 20 53 54 58 2c 20 4d 20 41 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 A LIMCOUNTER Y STX, A XRA, RET, | 20 41 20 4c 49 4d 43 4f 55 4e 54 45 52 20 59 20 53 54 58 2c 20 41 20 58 52 41 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR STEPMOVIN' M A MOV, H INX, A STOPSTEPS Y STX, | 53 55 42 52 20 53 54 45 50 4d 4f 56 49 4e 27 20 4d 20 41 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 41 20 53 54 4f 50 53 54 45 50 53 20 59 20 53 54 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 M A MOV, H INX, A BIGOFASTEP Y STX, M A MOV, H INX, | 20 4d 20 41 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 41 20 42 49 47 4f 46 41 53 54 45 50 20 59 20 53 54 58 2c 20 4d 20 41 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 A STEPTIMEBASE Y STX, A STEPTIMER Y STX, A XRA, RET, | 20 41 20 53 54 45 50 54 49 4d 45 42 41 53 45 20 59 20 53 54 58 2c 20 41 20 53 54 45 50 54 49 4d 45 52 20 59 20 53 54 58 2c 20 41 20 58 52 41 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 SUBR ABVOLIN' ( 16H ) RRC, A C MOV, M A MOV, 0F ANI, | 53 55 42 52 20 41 42 56 4f 4c 49 4e 27 20 28 20 31 36 48 20 29 20 52 52 43 2c 20 41 20 43 20 4d 4f 56 2c 20 4d 20 41 20 4d 4f 56 2c 20 30 46 20 41 4e 49 2c 20 20 20 20 20 20 20 20 20 20 20 20 HALFVOLS CALL, A E MOV, M A MOV, 0F0 ANI, HALFVOLS CALL, | 20 48 41 4c 46 56 4f 4c 53 20 43 41 4c 4c 2c 20 41 20 45 20 4d 4f 56 2c 20 4d 20 41 20 4d 4f 56 2c 20 30 46 30 20 41 4e 49 2c 20 48 41 4c 46 56 4f 4c 53 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 0F0 ANI, E ORA, H INX, portout JMP, | 20 30 46 30 20 41 4e 49 2c 20 45 20 4f 52 41 2c 20 48 20 49 4e 58 2c 20 70 6f 72 74 6f 75 74 20 4a 4d 50 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0076 } ( OPCODES 0C-0F ) | 28 20 4f 50 43 4f 44 45 53 20 30 43 2d 30 46 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR LOWMOVIN' M A MOV, H INX, A STOPLOWLIM Y STX, | 53 55 42 52 20 4c 4f 57 4d 4f 56 49 4e 27 20 4d 20 41 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 41 20 53 54 4f 50 4c 4f 57 4c 49 4d 20 59 20 53 54 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 M A MOV, H INX, A LOWSTEP Y STX, M A MOV, H INX, A LOW# Y STX, | 20 4d 20 41 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 41 20 4c 4f 57 53 54 45 50 20 59 20 53 54 58 2c 20 4d 20 41 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 41 20 4c 4f 57 23 20 59 20 53 54 58 2c 20 A LOWCOUNTER Y STX, A XRA, RET, | 20 41 20 4c 4f 57 43 4f 55 4e 54 45 52 20 59 20 53 54 58 2c 20 41 20 58 52 41 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR HIGHMOVIN' M A MOV, H INX, A STOPHIGHLIM Y STX, | 53 55 42 52 20 48 49 47 48 4d 4f 56 49 4e 27 20 4d 20 41 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 41 20 53 54 4f 50 48 49 47 48 4c 49 4d 20 59 20 53 54 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 M A MOV, H INX, A HIGHSTEP Y STX, M A MOV, H INX, | 20 4d 20 41 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 41 20 48 49 47 48 53 54 45 50 20 59 20 53 54 58 2c 20 4d 20 41 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 A HIGH# Y STX, A HIGHCOUNTER Y STX, A XRA, RET, | 20 41 20 48 49 47 48 23 20 59 20 53 54 58 2c 20 41 20 48 49 47 48 43 4f 55 4e 54 45 52 20 59 20 53 54 58 2c 20 41 20 58 52 41 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR TBMOVIN' M A MOV, H INX, A STOPTB Y STX, M A MOV, H INX, | 53 55 42 52 20 54 42 4d 4f 56 49 4e 27 20 4d 20 41 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 41 20 53 54 4f 50 54 42 20 59 20 53 54 58 2c 20 4d 20 41 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 20 20 A TBSTEP Y STX, M A MOV, H INX, A TBTB Y STX, A TBTIMER Y STX, | 20 41 20 54 42 53 54 45 50 20 59 20 53 54 58 2c 20 4d 20 41 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 41 20 54 42 54 42 20 59 20 53 54 58 2c 20 41 20 54 42 54 49 4d 45 52 20 59 20 53 54 58 2c 20 A XRA, RET, | 20 41 20 58 52 41 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR NOMOVIN' M A MOV, H INX, A NOSTOP Y STX, M A MOV, H INX, | 53 55 42 52 20 4e 4f 4d 4f 56 49 4e 27 20 4d 20 41 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 41 20 4e 4f 53 54 4f 50 20 59 20 53 54 58 2c 20 4d 20 41 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 20 20 A NOSTEP Y STX, M A MOV, H INX, A NOTIMER Y STX, | 20 41 20 4e 4f 53 54 45 50 20 59 20 53 54 58 2c 20 4d 20 41 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 41 20 4e 4f 54 49 4d 45 52 20 59 20 53 54 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 A NOTIMEBASE Y STX, SOUNDBOX Y C LDX, C DCR, | 20 41 20 4e 4f 54 49 4d 45 42 41 53 45 20 59 20 53 54 58 2c 20 53 4f 55 4e 44 42 4f 58 20 59 20 43 20 4c 44 58 2c 20 43 20 44 43 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 M A MOV, H INX, A NOVALUE Y STX, A OUTP, A XRA, RET, | 20 4d 20 41 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 41 20 4e 4f 56 41 4c 55 45 20 59 20 53 54 58 2c 20 41 20 4f 55 54 50 2c 20 41 20 58 52 41 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0077 } ( OPCODES 11-16 I/O PORT OUTPUTS and PAN COUNTING, 1AH ) HEX | 28 20 4f 50 43 4f 44 45 53 20 31 31 2d 31 36 20 49 2f 4f 20 50 4f 52 54 20 4f 55 54 50 55 54 53 20 61 6e 64 20 50 41 4e 20 43 4f 55 4e 54 49 4e 47 2c 20 31 41 48 20 29 20 48 45 58 20 20 20 20 SUBR OPPORT ( 11H-14H, 17H ) | 53 55 42 52 20 4f 50 50 4f 52 54 20 28 20 31 31 48 2d 31 34 48 2c 20 31 37 48 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 RRC, A C MOV, M A MOV, H INX, portout JMP, | 20 52 52 43 2c 20 41 20 43 20 4d 4f 56 2c 20 4d 20 41 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 70 6f 72 74 6f 75 74 20 4a 4d 50 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR MCMOVIN' ( 15H ) RRC, A C MOV, M A MOV, 0F0 ANI, A E MOV, | 53 55 42 52 20 4d 43 4d 4f 56 49 4e 27 20 28 20 31 35 48 20 29 20 52 52 43 2c 20 41 20 43 20 4d 4f 56 2c 20 4d 20 41 20 4d 4f 56 2c 20 30 46 30 20 41 4e 49 2c 20 41 20 45 20 4d 4f 56 2c 20 20 M A MOV, 0F ANI, | 4d 20 41 20 4d 4f 56 2c 20 30 46 20 41 4e 49 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HALFVOLS CALL, E ORA, H INX, A MCTRACKER Y STX, portout JMP, | 20 48 41 4c 46 56 4f 4c 53 20 43 41 4c 4c 2c 20 45 20 4f 52 41 2c 20 48 20 49 4e 58 2c 20 41 20 4d 43 54 52 41 43 4b 45 52 20 59 20 53 54 58 2c 20 70 6f 72 74 6f 75 74 20 4a 4d 50 2c 20 20 20 SUBR NOISEPORT ( 17H ) | 53 55 42 52 20 4e 4f 49 53 45 50 4f 52 54 20 28 20 31 37 48 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 RRC, A C MOV, M A MOV, H INX, A NOVALUE Y STX, portout JMP, | 20 52 52 43 2c 20 41 20 43 20 4d 4f 56 2c 20 4d 20 41 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 41 20 4e 4f 56 41 4c 55 45 20 59 20 53 54 58 2c 20 70 6f 72 74 6f 75 74 20 4a 4d 50 2c 20 20 20 20 SUBR SOUNDMOVIN' ( 18H ) RET, ( M E MOV, H INX, E LEFTPAN Y STX, | 53 55 42 52 20 53 4f 55 4e 44 4d 4f 56 49 4e 27 20 28 20 31 38 48 20 29 20 52 45 54 2c 20 28 20 4d 20 45 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 45 20 4c 45 46 54 50 41 4e 20 59 20 53 54 58 2c H PUSH, PANOUTS CALL, H POP, | 20 48 20 50 55 53 48 2c 20 50 41 4e 4f 55 54 53 20 43 41 4c 4c 2c 20 48 20 50 4f 50 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 M A MOV, H INX, A PANSTEP Y STX, | 20 4d 20 41 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 41 20 50 41 4e 53 54 45 50 20 59 20 53 54 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 M A MOV, H INX, A PANTIMEBASE Y STX, | 20 4d 20 41 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 41 20 50 41 4e 54 49 4d 45 42 41 53 45 20 59 20 53 54 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 A PANTIMER Y STX, FF PANCOUNTER Y MVIX, A XRA, RET, ) | 20 41 20 50 41 4e 54 49 4d 45 52 20 59 20 53 54 58 2c 20 46 46 20 50 41 4e 43 4f 55 4e 54 45 52 20 59 20 4d 56 49 58 2c 20 41 20 58 52 41 2c 20 52 45 54 2c 20 29 20 20 20 20 20 20 20 20 20 20 SUBR PANLIMITCOUNTIN' ( 19 ) RET, --> | 53 55 42 52 20 50 41 4e 4c 49 4d 49 54 43 4f 55 4e 54 49 4e 27 20 28 20 31 39 20 29 20 52 45 54 2c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( M A MOV, H INX, A PANCOUNTER Y STX, | 28 20 4d 20 41 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 41 20 50 41 4e 43 4f 55 4e 54 45 52 20 59 20 53 54 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 PANTIMEBASE Y A LDX, A PANTIMER Y STX, A XRA, RET, ) | 20 50 41 4e 54 49 4d 45 42 41 53 45 20 59 20 41 20 4c 44 58 2c 20 41 20 50 41 4e 54 49 4d 45 52 20 59 20 53 54 58 2c 20 41 20 58 52 41 2c 20 52 45 54 2c 20 29 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0078 } ( STEREO OPCODE 1A, THUMPER 1B, MUSIC GENERATOR 07H ) HEX | 28 20 53 54 45 52 45 4f 20 4f 50 43 4f 44 45 20 31 41 2c 20 54 48 55 4d 50 45 52 20 31 42 2c 20 4d 55 53 49 43 20 47 45 4e 45 52 41 54 4f 52 20 30 37 48 20 29 20 48 45 58 20 20 20 20 20 20 20 SUBR VOLMOVIN' ( 1AH ) | 53 55 42 52 20 56 4f 4c 4d 4f 56 49 4e 27 20 28 20 31 41 48 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 M A MOV, HALFVOLS CALL, H INX, A VOLHIGHLIM Y STX, | 20 4d 20 41 20 4d 4f 56 2c 20 48 41 4c 46 56 4f 4c 53 20 43 41 4c 4c 2c 20 48 20 49 4e 58 2c 20 41 20 56 4f 4c 48 49 47 48 4c 49 4d 20 59 20 53 54 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 M A MOV, HALFVOLS CALL, H INX, A VOLOWLIM Y STX, | 20 4d 20 41 20 4d 4f 56 2c 20 48 41 4c 46 56 4f 4c 53 20 43 41 4c 4c 2c 20 48 20 49 4e 58 2c 20 41 20 56 4f 4c 4f 57 4c 49 4d 20 59 20 53 54 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 M A MOV, H INX, A VOLSTEP Y STX, | 20 4d 20 41 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 41 20 56 4f 4c 53 54 45 50 20 59 20 53 54 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 M A MOV, H INX, A VOLTIMEBASE Y STX, | 20 4d 20 41 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 41 20 56 4f 4c 54 49 4d 45 42 41 53 45 20 59 20 53 54 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 1 VOLTIMER Y MVIX, A XRA, RET, | 20 31 20 56 4f 4c 54 49 4d 45 52 20 59 20 4d 56 49 58 2c 20 41 20 58 52 41 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR MOHITTIN' ( 1B ) | 53 55 42 52 20 4d 4f 48 49 54 54 49 4e 27 20 28 20 31 42 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 1 SYNCMO Y MVIX, ( turn on THUMPER-sync ) 3 A MVI, THUMPCOUNTER | 20 31 20 53 59 4e 43 4d 4f 20 59 20 4d 56 49 58 2c 20 28 20 74 75 72 6e 20 6f 6e 20 54 48 55 4d 50 45 52 2d 73 79 6e 63 20 29 20 33 20 41 20 4d 56 49 2c 20 54 48 55 4d 50 43 4f 55 4e 54 45 52 STA, M A MOV, H INX, A STARTMC Y STX, A XRA, RET, | 20 53 54 41 2c 20 4d 20 41 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 41 20 53 54 41 52 54 4d 43 20 59 20 53 54 58 2c 20 41 20 58 52 41 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR MUSICIN' ( 07 ) RET, --> | 53 55 42 52 20 4d 55 53 49 43 49 4e 27 20 28 20 30 37 20 29 20 52 45 54 2c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 M A MOV, H INX, A COMPDURATION Y STX, 1 NOTETIMER Y MVIX, | 20 4d 20 41 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 41 20 43 4f 4d 50 44 55 52 41 54 49 4f 4e 20 59 20 53 54 58 2c 20 31 20 4e 4f 54 45 54 49 4d 45 52 20 59 20 4d 56 49 58 2c 20 20 20 20 20 20 M A MOV, H INX, A COMPSTEP Y STX, COMPTB COMPTIMER Y MVIX, | 20 4d 20 41 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 41 20 43 4f 4d 50 53 54 45 50 20 59 20 53 54 58 2c 20 43 4f 4d 50 54 42 20 43 4f 4d 50 54 49 4d 45 52 20 59 20 4d 56 49 58 2c 20 20 20 20 20 4 ATRACKER Y MVIX, 9 BTRACKER Y MVIX, 0E CTRACKER Y MVIX, | 20 34 20 41 54 52 41 43 4b 45 52 20 59 20 4d 56 49 58 2c 20 39 20 42 54 52 41 43 4b 45 52 20 59 20 4d 56 49 58 2c 20 30 45 20 43 54 52 41 43 4b 45 52 20 59 20 4d 56 49 58 2c 20 20 20 20 20 20 8 MOTRACKER Y MVIX, A XRA, RET, ( zero ) | 20 38 20 4d 4f 54 52 41 43 4b 45 52 20 59 20 4d 56 49 58 2c 20 41 20 58 52 41 2c 20 52 45 54 2c 20 28 20 7a 65 72 6f 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0079 } ( OPCODE ADDRESS TABLE and FORWARDS ) HEX | 28 20 4f 50 43 4f 44 45 20 41 44 44 52 45 53 53 20 54 41 42 4c 45 20 61 6e 64 20 46 4f 52 57 41 52 44 53 20 29 20 48 45 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 1B C= #-OF-OPCODES | 20 20 20 20 20 20 20 31 42 20 43 3d 20 23 2d 4f 46 2d 4f 50 43 4f 44 45 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 F= process F= endprocess F= MUSEND | 46 3d 20 70 72 6f 63 65 73 73 20 46 3d 20 65 6e 64 70 72 6f 63 65 73 73 20 46 3d 20 4d 55 53 45 4e 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 TABLE OPADDRESSES | 54 41 42 4c 45 20 4f 50 41 44 44 52 45 53 53 45 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 RANDOMNOTES , LOADTIMER , CONTJUMP , QUITJUMP , | 20 20 20 20 20 20 52 41 4e 44 4f 4d 4e 4f 54 45 53 20 2c 20 4c 4f 41 44 54 49 4d 45 52 20 2c 20 43 4f 4e 54 4a 55 4d 50 20 2c 20 51 55 49 54 4a 55 4d 50 20 2c 20 20 20 20 20 20 20 20 20 20 20 QUITYET? , RAMBLIN' , RAMPIN' , MUSICIN' , | 20 20 20 20 20 20 51 55 49 54 59 45 54 3f 20 2c 20 52 41 4d 42 4c 49 4e 27 20 2c 20 52 41 4d 50 49 4e 27 20 2c 20 4d 55 53 49 43 49 4e 27 20 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 RAMBLE-ON , RAMBLE-OFF , LIMITRAMBLE , STEPMOVIN' , | 20 20 20 20 20 20 52 41 4d 42 4c 45 2d 4f 4e 20 2c 20 52 41 4d 42 4c 45 2d 4f 46 46 20 2c 20 4c 49 4d 49 54 52 41 4d 42 4c 45 20 2c 20 53 54 45 50 4d 4f 56 49 4e 27 20 2c 20 20 20 20 20 20 20 LOWMOVIN' , HIGHMOVIN' , TBMOVIN' , NOMOVIN' , | 20 20 20 20 20 20 4c 4f 57 4d 4f 56 49 4e 27 20 2c 20 48 49 47 48 4d 4f 56 49 4e 27 20 2c 20 54 42 4d 4f 56 49 4e 27 20 2c 20 4e 4f 4d 4f 56 49 4e 27 20 2c 20 20 20 20 20 20 20 20 20 20 20 20 MASTART , 3 0 << OPPORT , >> | 20 20 20 20 20 20 4d 41 53 54 41 52 54 20 2c 20 33 20 30 20 3c 3c 20 4f 50 50 4f 52 54 20 2c 20 3e 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 OPPORT , MCMOVIN' , ABVOLIN' , NOISEPORT , | 20 20 20 20 20 20 4f 50 50 4f 52 54 20 2c 20 4d 43 4d 4f 56 49 4e 27 20 2c 20 41 42 56 4f 4c 49 4e 27 20 2c 20 4e 4f 49 53 45 50 4f 52 54 20 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SOUNDMOVIN' , PANLIMITCOUNTIN' , VOLMOVIN' , MOHITTIN' , | 20 20 20 20 20 20 53 4f 55 4e 44 4d 4f 56 49 4e 27 20 2c 20 50 41 4e 4c 49 4d 49 54 43 4f 55 4e 54 49 4e 27 20 2c 20 56 4f 4c 4d 4f 56 49 4e 27 20 2c 20 4d 4f 48 49 54 54 49 4e 27 20 2c 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0080 } ( COMPMUSIC's +-disp., 15MOD, NOTABLE and THUMPLOCATION ) HEX | 28 20 43 4f 4d 50 4d 55 53 49 43 27 73 20 2b 2d 64 69 73 70 2e 2c 20 31 35 4d 4f 44 2c 20 4e 4f 54 41 42 4c 45 20 61 6e 64 20 54 48 55 4d 50 4c 4f 43 41 54 49 4f 4e 20 29 20 48 45 58 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( BTABLE THUMPLOCATION ( where to locate sound in stereo image ) | 28 20 42 54 41 42 4c 45 20 54 48 55 4d 50 4c 4f 43 41 54 49 4f 4e 20 28 20 77 68 65 72 65 20 74 6f 20 6c 6f 63 61 74 65 20 73 6f 75 6e 64 20 69 6e 20 73 74 65 72 65 6f 20 69 6d 61 67 65 20 29 ( 3F B, 2A B, 15 B, 00 B, ) | 20 28 20 33 46 20 42 2c 20 32 41 20 42 2c 20 31 35 20 42 2c 20 30 30 20 42 2c 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 BTABLE NOTABLE ASM ( 3 octave range ) | 42 54 41 42 4c 45 20 4e 4f 54 41 42 4c 45 20 41 53 4d 20 28 20 33 20 6f 63 74 61 76 65 20 72 61 6e 67 65 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 #G0 B, #A0 B, #B0 B, #C1 B, #D1 B, #E1 B, #FS1 B, | 20 23 47 30 20 42 2c 20 23 41 30 20 42 2c 20 23 42 30 20 42 2c 20 23 43 31 20 42 2c 20 23 44 31 20 42 2c 20 23 45 31 20 42 2c 20 23 46 53 31 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 #G1 B, #A1 B, #B1 B, #C2 B, #D2 B, #E2 B, #FS2 B, | 20 23 47 31 20 42 2c 20 23 41 31 20 42 2c 20 23 42 31 20 42 2c 20 23 43 32 20 42 2c 20 23 44 32 20 42 2c 20 23 45 32 20 42 2c 20 23 46 53 32 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 #G2 B, #A2 B, #B2 B, #C3 B, #D3 B, #E3 B, #FS3 B, | 20 23 47 32 20 42 2c 20 23 41 32 20 42 2c 20 23 42 32 20 42 2c 20 23 43 33 20 42 2c 20 23 44 33 20 42 2c 20 23 45 33 20 42 2c 20 23 46 53 33 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR +-disp. ( change A to a + or - 3-bit # ) | 53 55 42 52 20 2b 2d 64 69 73 70 2e 20 28 20 63 68 61 6e 67 65 20 41 20 74 6f 20 61 20 2b 20 6f 72 20 2d 20 33 2d 62 69 74 20 23 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 A BIT, 0<>, IF, ( neg ) F8 ORI, ELSE, 7 ANI, THEN, RET, | 20 30 20 41 20 42 49 54 2c 20 30 3c 3e 2c 20 49 46 2c 20 28 20 6e 65 67 20 29 20 46 38 20 4f 52 49 2c 20 45 4c 53 45 2c 20 37 20 41 4e 49 2c 20 54 48 45 4e 2c 20 52 45 54 2c 20 20 20 20 20 20 SUBR 15MOD ( base 21decimal ) 15 CPI, 0>=, IF, 7 SUI, | 53 55 42 52 20 31 35 4d 4f 44 20 28 20 62 61 73 65 20 32 31 64 65 63 69 6d 61 6c 20 29 20 31 35 20 43 50 49 2c 20 30 3e 3d 2c 20 49 46 2c 20 37 20 53 55 49 2c 20 20 20 20 20 20 20 20 20 20 20 ( only adjust note down 1 octave ) THEN, A ORA, 0<, IF, | 20 28 20 6f 6e 6c 79 20 61 64 6a 75 73 74 20 6e 6f 74 65 20 64 6f 77 6e 20 31 20 6f 63 74 61 76 65 20 29 20 54 48 45 4e 2c 20 41 20 4f 52 41 2c 20 30 3c 2c 20 49 46 2c 20 20 20 20 20 20 20 20 ( adjust up 1 octave ) 7 ADI, THEN, RET, | 20 28 20 61 64 6a 75 73 74 20 75 70 20 31 20 6f 63 74 61 76 65 20 29 20 37 20 41 44 49 2c 20 54 48 45 4e 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR UP-AN-OUT ( pass index in A ) EXX, | 53 55 42 52 20 55 50 2d 41 4e 2d 4f 55 54 20 28 20 70 61 73 73 20 69 6e 64 65 78 20 69 6e 20 41 20 29 20 45 58 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 NOTABLE D LXI, 0 H MVI, A L MOV, | 20 30 20 4e 4f 54 41 42 4c 45 20 44 20 4c 58 49 2c 20 30 20 48 20 4d 56 49 2c 20 41 20 4c 20 4d 4f 56 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 D DAD, C INR, M A MOV, A OUTP, ( outp note ) EXX, RET, | 20 44 20 44 41 44 2c 20 43 20 49 4e 52 2c 20 4d 20 41 20 4d 4f 56 2c 20 41 20 4f 55 54 50 2c 20 28 20 6f 75 74 70 20 6e 6f 74 65 20 29 20 45 58 58 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 { BLOCK 0081 } ( STEREO STUFF, LIMITCOUNTING ) --> | 28 20 53 54 45 52 45 4f 20 53 54 55 46 46 2c 20 4c 49 4d 49 54 43 4f 55 4e 54 49 4e 47 20 29 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( PANLIMITS- achieving limits of volumes per channel ) | 28 20 50 41 4e 4c 49 4d 49 54 53 2d 20 61 63 68 69 65 76 69 6e 67 20 6c 69 6d 69 74 73 20 6f 66 20 76 6f 6c 75 6d 65 73 20 70 65 72 20 63 68 61 6e 6e 65 6c 20 29 20 20 20 20 20 20 20 20 20 20 SUBR PANLIMIT ( A&E= LEFTVOL, D=tb, H=counter, L=stepvol ) | 53 55 42 52 20 50 41 4e 4c 49 4d 49 54 20 28 20 41 26 45 3d 20 4c 45 46 54 56 4f 4c 2c 20 44 3d 74 62 2c 20 48 3d 63 6f 75 6e 74 65 72 2c 20 4c 3d 73 74 65 70 76 6f 6c 20 29 20 20 20 20 20 20 H INR, 0<>, IF, ( wasn't FF ) H DCR, H DCR, ( counted ) | 20 20 48 20 49 4e 52 2c 20 30 3c 3e 2c 20 49 46 2c 20 28 20 77 61 73 6e 27 74 20 46 46 20 29 20 48 20 44 43 52 2c 20 48 20 44 43 52 2c 20 28 20 63 6f 75 6e 74 65 64 20 29 20 20 20 20 20 20 20 0=, IF, ( counted down ) | 20 20 20 30 3d 2c 20 49 46 2c 20 28 20 63 6f 75 6e 74 65 64 20 64 6f 77 6e 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 1 MST Y MVIX, ( detect state transition ) 0 D MVI, | 20 20 20 20 31 20 4d 53 54 20 59 20 4d 56 49 58 2c 20 28 20 64 65 74 65 63 74 20 73 74 61 74 65 20 74 72 61 6e 73 69 74 69 6f 6e 20 29 20 30 20 44 20 4d 56 49 2c 20 20 20 20 20 20 20 20 20 20 THEN, ELSE, H DCR, ( back to FF ) | 20 20 20 54 48 45 4e 2c 20 45 4c 53 45 2c 20 48 20 44 43 52 2c 20 28 20 62 61 63 6b 20 74 6f 20 46 46 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 THEN, A XRA, L SUB, ( change step sign ) A L MOV, | 20 20 54 48 45 4e 2c 20 41 20 58 52 41 2c 20 4c 20 53 55 42 2c 20 28 20 63 68 61 6e 67 65 20 73 74 65 70 20 73 69 67 6e 20 29 20 41 20 4c 20 4d 4f 56 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 RET, ( zero or non-zero ) | 20 52 45 54 2c 20 28 20 7a 65 72 6f 20 6f 72 20 6e 6f 6e 2d 7a 65 72 6f 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0082 } ( ** MUSCPU ** **STEREO** ) HEX | 28 20 2a 2a 20 4d 55 53 43 50 55 20 2a 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 2a 53 54 45 52 45 4f 2a 2a 20 29 20 48 45 58 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR MUSCPU ( runs in interrupt ) | 53 55 42 52 20 4d 55 53 43 50 55 20 28 20 72 75 6e 73 20 69 6e 20 69 6e 74 65 72 72 75 70 74 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 A XRA, MST Y CMPX, 0<>, IF, RET, THEN, ( no background ) | 20 41 20 58 52 41 2c 20 4d 53 54 20 59 20 43 4d 50 58 2c 20 30 3c 3e 2c 20 49 46 2c 20 52 45 54 2c 20 54 48 45 4e 2c 20 28 20 6e 6f 20 62 61 63 6b 67 72 6f 75 6e 64 20 29 20 20 20 20 20 20 20 NOTETIMER Y CMPX, 0<>, IF, NOTETIMER Y DCRX, 0=, IF, | 20 4e 4f 54 45 54 49 4d 45 52 20 59 20 43 4d 50 58 2c 20 30 3c 3e 2c 20 49 46 2c 20 4e 4f 54 45 54 49 4d 45 52 20 59 20 44 43 52 58 2c 20 30 3d 2c 20 49 46 2c 20 20 20 20 20 20 20 20 20 20 20 1 MST Y MVIX, ( need a new note ) THEN, THEN, --> | 31 20 4d 53 54 20 59 20 4d 56 49 58 2c 20 28 20 6e 65 65 64 20 61 20 6e 65 77 20 6e 6f 74 65 20 29 20 54 48 45 4e 2c 20 54 48 45 4e 2c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 COMPDURATION Y CMPX, 0<>, IF, 2 A MVI, NOTECOUNTER Y DCRX, | 20 43 4f 4d 50 44 55 52 41 54 49 4f 4e 20 59 20 43 4d 50 58 2c 20 30 3c 3e 2c 20 49 46 2c 20 32 20 41 20 4d 56 49 2c 20 4e 4f 54 45 43 4f 55 4e 54 45 52 20 59 20 44 43 52 58 2c 20 20 20 20 20 ELSE, A INR, THEN, | 20 45 4c 53 45 2c 20 41 20 49 4e 52 2c 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 A MST Y STX, THEN, THEN, ( * PANNER * ) | 20 41 20 4d 53 54 20 59 20 53 54 58 2c 20 54 48 45 4e 2c 20 54 48 45 4e 2c 20 28 20 2a 20 50 41 4e 4e 45 52 20 2a 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0083 } ( ** MUSCPU ** **STEREO** ) HEX --> | 28 20 2a 2a 20 4d 55 53 43 50 55 20 2a 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 2a 53 54 45 52 45 4f 2a 2a 20 29 20 48 45 58 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 LEFTPAN Y E LDX, ( setups for PANNER ) | 20 4c 45 46 54 50 41 4e 20 59 20 45 20 4c 44 58 2c 20 28 20 73 65 74 75 70 73 20 66 6f 72 20 50 41 4e 4e 45 52 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 PANTIMER Y CMPX, ( all vectoring routines follow ) | 20 50 41 4e 54 49 4d 45 52 20 59 20 43 4d 50 58 2c 20 28 20 61 6c 6c 20 76 65 63 74 6f 72 69 6e 67 20 72 6f 75 74 69 6e 65 73 20 66 6f 6c 6c 6f 77 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 0<>, IF, ( timer on ) PANTIMER Y DCRX, 0=, IF, ( expired ) | 20 30 3c 3e 2c 20 49 46 2c 20 28 20 74 69 6d 65 72 20 6f 6e 20 29 20 50 41 4e 54 49 4d 45 52 20 59 20 44 43 52 58 2c 20 30 3d 2c 20 49 46 2c 20 28 20 65 78 70 69 72 65 64 20 29 20 20 20 20 20 PANTIMEBASE Y D LDX, PANCOUNTER Y H LDX, PANSTEP Y L LDX, | 20 50 41 4e 54 49 4d 45 42 41 53 45 20 59 20 44 20 4c 44 58 2c 20 50 41 4e 43 4f 55 4e 54 45 52 20 59 20 48 20 4c 44 58 2c 20 50 41 4e 53 54 45 50 20 59 20 4c 20 4c 44 58 2c 20 20 20 20 20 20 ( A&E=leftvol, D=timer-reload, value H=counter, L=stepvol ) | 28 20 41 26 45 3d 6c 65 66 74 76 6f 6c 2c 20 44 3d 74 69 6d 65 72 2d 72 65 6c 6f 61 64 2c 20 76 61 6c 75 65 20 48 3d 63 6f 75 6e 74 65 72 2c 20 4c 3d 73 74 65 70 76 6f 6c 20 29 20 20 20 20 20 E A MOV, L ADD, ( newpan ) A E MOV, A ORA, | 20 45 20 41 20 4d 4f 56 2c 20 4c 20 41 44 44 2c 20 28 20 6e 65 77 70 61 6e 20 29 20 41 20 45 20 4d 4f 56 2c 20 41 20 4f 52 41 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0<, IF, ( low limit ) 0 E MVI, PANLIMIT CALL, | 20 30 3c 2c 20 49 46 2c 20 28 20 6c 6f 77 20 6c 69 6d 69 74 20 29 20 30 20 45 20 4d 56 49 2c 20 50 41 4e 4c 49 4d 49 54 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( ~ screen 220, PANLIMIT zaps D, so a zero timer comes in ) | 28 20 7e 20 73 63 72 65 65 6e 20 32 32 30 2c 20 50 41 4e 4c 49 4d 49 54 20 7a 61 70 73 20 44 2c 20 73 6f 20 61 20 7a 65 72 6f 20 74 69 6d 65 72 20 63 6f 6d 65 73 20 69 6e 20 29 20 20 20 20 20 ELSE, 3F CPI, >=, IF, ( 64 ) 3F E MVI, PANLIMIT CALL, | 20 45 4c 53 45 2c 20 33 46 20 43 50 49 2c 20 3e 3d 2c 20 49 46 2c 20 28 20 36 34 20 29 20 33 46 20 45 20 4d 56 49 2c 20 50 41 4e 4c 49 4d 49 54 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 THEN, THEN, L PANSTEP Y STX, D PANTIMER Y STX, | 20 54 48 45 4e 2c 20 54 48 45 4e 2c 20 4c 20 50 41 4e 53 54 45 50 20 59 20 53 54 58 2c 20 44 20 50 41 4e 54 49 4d 45 52 20 59 20 53 54 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 E LEFTPAN Y STX, ( PANOUTS creams E ) H PANCOUNTER Y STX, | 20 45 20 4c 45 46 54 50 41 4e 20 59 20 53 54 58 2c 20 28 20 50 41 4e 4f 55 54 53 20 63 72 65 61 6d 73 20 45 20 29 20 48 20 50 41 4e 43 4f 55 4e 54 45 52 20 59 20 53 54 58 2c 20 20 20 20 20 20 THEN, THEN, PANOUTS CALL, ( pass location in E ) | 20 54 48 45 4e 2c 20 54 48 45 4e 2c 20 50 41 4e 4f 55 54 53 20 43 41 4c 4c 2c 20 28 20 70 61 73 73 20 6c 6f 63 61 74 69 6f 6e 20 69 6e 20 45 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0084 } ( MUSCPU NOTETIMER,MOSYNC ) | 28 20 4d 55 53 43 50 55 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4e 4f 54 45 54 49 4d 45 52 2c 4d 4f 53 59 4e 43 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 A XRA, RAMBLEFLAG Y CMPX, ( * RAMBLER * ) | 41 20 58 52 41 2c 20 52 41 4d 42 4c 45 46 4c 41 47 20 59 20 43 4d 50 58 2c 20 20 28 20 2a 20 52 41 4d 42 4c 45 52 20 2a 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0<>, IF, RAMBLETIMER Y DCRX, 0=, IF, | 20 30 3c 3e 2c 20 49 46 2c 20 52 41 4d 42 4c 45 54 49 4d 45 52 20 59 20 44 43 52 58 2c 20 30 3d 2c 20 49 46 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 STEP Y L LDX, ( setup ) SOUNDBOX Y A LDX, 8 SUI, A C MOV, | 20 53 54 45 50 20 59 20 4c 20 4c 44 58 2c 20 28 20 73 65 74 75 70 20 29 20 53 4f 55 4e 44 42 4f 58 20 59 20 41 20 4c 44 58 2c 20 38 20 53 55 49 2c 20 41 20 43 20 4d 4f 56 2c 20 20 20 20 20 20 MOVALUE Y A LDX, L ADD, ( step ) A MOVALUE Y STX, ( upit ) | 20 4d 4f 56 41 4c 55 45 20 59 20 41 20 4c 44 58 2c 20 4c 20 41 44 44 2c 20 28 20 73 74 65 70 20 29 20 41 20 4d 4f 56 41 4c 55 45 20 59 20 53 54 58 2c 20 28 20 75 70 69 74 20 29 20 20 20 20 20 A OUTP, A D MOV, A XRA, SYNCMO Y CMPX, 0<>, IF, EXX, | 20 41 20 4f 55 54 50 2c 20 41 20 44 20 4d 4f 56 2c 20 41 20 58 52 41 2c 20 53 59 4e 43 4d 4f 20 59 20 43 4d 50 58 2c 20 30 3c 3e 2c 20 49 46 2c 20 45 58 58 2c 20 20 20 20 20 20 20 20 20 20 20 ( * special opcode for thumping sound * ) STARTMC Y A LDX, | 28 20 2a 20 73 70 65 63 69 61 6c 20 6f 70 63 6f 64 65 20 66 6f 72 20 74 68 75 6d 70 69 6e 67 20 73 6f 75 6e 64 20 2a 20 29 20 53 54 41 52 54 4d 43 20 59 20 41 20 4c 44 58 2c 20 20 20 20 20 20 A MCTRACKER Y STX, TIMEBASE Y A LDX, ( keep durations close ) | 20 41 20 4d 43 54 52 41 43 4b 45 52 20 59 20 53 54 58 2c 20 54 49 4d 45 42 41 53 45 20 59 20 41 20 4c 44 58 2c 20 28 20 6b 65 65 70 20 64 75 72 61 74 69 6f 6e 73 20 63 6c 6f 73 65 20 29 20 20 0F0 ANI, RRC, RRC, RRC, RRC, A INR, A VOLTIMEBASE Y STX, | 20 30 46 30 20 41 4e 49 2c 20 52 52 43 2c 20 52 52 43 2c 20 52 52 43 2c 20 52 52 43 2c 20 41 20 49 4e 52 2c 20 41 20 56 4f 4c 54 49 4d 45 42 41 53 45 20 59 20 53 54 58 2c 20 20 20 20 20 20 20 THUMPCOUNTER H LXI, M DCR, M C MOV, 0=, IF, 4 M MVI, THEN, | 20 54 48 55 4d 50 43 4f 55 4e 54 45 52 20 48 20 4c 58 49 2c 20 4d 20 44 43 52 2c 20 4d 20 43 20 4d 4f 56 2c 20 30 3d 2c 20 49 46 2c 20 34 20 4d 20 4d 56 49 2c 20 54 48 45 4e 2c 20 20 20 20 20 ( 0 B MVI, 0 THUMPLOCATION H LXI, B DAD, ( stereo loc. ) | 28 20 30 20 42 20 4d 56 49 2c 20 30 20 54 48 55 4d 50 4c 4f 43 41 54 49 4f 4e 20 48 20 4c 58 49 2c 20 42 20 44 41 44 2c 20 28 20 73 74 65 72 65 6f 20 6c 6f 63 2e 20 29 20 20 20 20 20 20 20 20 ( M E MOV, E LEFTPAN Y STX, let PANNER refresh PANOUTS CALL,) | 28 20 4d 20 45 20 4d 4f 56 2c 20 45 20 4c 45 46 54 50 41 4e 20 59 20 53 54 58 2c 20 6c 65 74 20 50 41 4e 4e 45 52 20 72 65 66 72 65 73 68 20 50 41 4e 4f 55 54 53 20 43 41 4c 4c 2c 29 20 20 20 EXX, THEN, | 20 45 58 58 2c 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0085 } ( MUSCPU cont. MORAMBLE, LOWMOVER, HIGHMOVER ) | 28 20 4d 55 53 43 50 55 20 63 6f 6e 74 2e 20 20 20 20 20 20 20 20 20 20 20 4d 4f 52 41 4d 42 4c 45 2c 20 4c 4f 57 4d 4f 56 45 52 2c 20 48 49 47 48 4d 4f 56 45 52 20 29 20 20 20 20 20 20 20 20 ( HIGHMOVER ) | 28 20 48 49 47 48 4d 4f 56 45 52 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 LOWLIM Y A LDX, A DCR, D CMP, <, IF, | 20 4c 4f 57 4c 49 4d 20 59 20 41 20 4c 44 58 2c 20 41 20 44 43 52 2c 20 44 20 43 4d 50 2c 20 3c 2c 20 49 46 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HIGH# Y A LDX, A ORA, 0<>, IF, | 20 48 49 47 48 23 20 59 20 41 20 4c 44 58 2c 20 41 20 4f 52 41 2c 20 30 3c 3e 2c 20 49 46 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HIGHCOUNTER Y DCRX, 0=, IF, A C MOV, | 20 48 49 47 48 43 4f 55 4e 54 45 52 20 59 20 44 43 52 58 2c 20 30 3d 2c 20 49 46 2c 20 41 20 43 20 4d 4f 56 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HIGHLIM Y A LDX, HIGHSTEP Y ADDX, | 20 48 49 47 48 4c 49 4d 20 59 20 41 20 4c 44 58 2c 20 48 49 47 48 53 54 45 50 20 59 20 41 44 44 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 STOPHIGHLIM Y CMPX, =, IF, 0 HIGH# Y MVIX, THEN, | 20 53 54 4f 50 48 49 47 48 4c 49 4d 20 59 20 43 4d 50 58 2c 20 3d 2c 20 49 46 2c 20 30 20 48 49 47 48 23 20 59 20 4d 56 49 58 2c 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 A HIGHLIM Y STX, C HIGHCOUNTER Y STX, THEN, THEN, | 20 41 20 48 49 47 48 4c 49 4d 20 59 20 53 54 58 2c 20 43 20 48 49 47 48 43 4f 55 4e 54 45 52 20 59 20 53 54 58 2c 20 54 48 45 4e 2c 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 LIMITCOUNT CALL, RAMPFLAG Y A LDX, 3 CPI, 0=, IF, | 20 4c 49 4d 49 54 43 4f 55 4e 54 20 43 41 4c 4c 2c 20 52 41 4d 50 46 4c 41 47 20 59 20 41 20 4c 44 58 2c 20 33 20 43 50 49 2c 20 30 3d 2c 20 49 46 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( just came from LOWMOVER ) 1 A MVI, A RAMPFLAG Y STX, ELSE, | 20 28 20 6a 75 73 74 20 63 61 6d 65 20 66 72 6f 6d 20 4c 4f 57 4d 4f 56 45 52 20 20 29 20 31 20 41 20 4d 56 49 2c 20 41 20 52 41 4d 50 46 4c 41 47 20 59 20 53 54 58 2c 20 45 4c 53 45 2c 20 20 A ORA, 0<>, IF, ( RAMP ) | 20 41 20 4f 52 41 2c 20 30 3c 3e 2c 20 49 46 2c 20 28 20 52 41 4d 50 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 RAMPFLAG Y INRX, ( tell LOWMOVER donothing ) | 20 52 41 4d 50 46 4c 41 47 20 59 20 49 4e 52 58 2c 20 28 20 74 65 6c 6c 20 4c 4f 57 4d 4f 56 45 52 20 64 6f 6e 6f 74 68 69 6e 67 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HIGHLIM Y A LDX, L SUB, A MOVALUE Y STX, ELSE, ( change sign ) | 20 48 49 47 48 4c 49 4d 20 59 20 41 20 4c 44 58 2c 20 4c 20 53 55 42 2c 20 41 20 4d 4f 56 41 4c 55 45 20 59 20 53 54 58 2c 20 45 4c 53 45 2c 20 28 20 63 68 61 6e 67 65 20 73 69 67 6e 20 29 20 L SUB, A STEP Y STX, THEN, THEN, THEN, | 20 4c 20 53 55 42 2c 20 41 20 53 54 45 50 20 59 20 53 54 58 2c 20 54 48 45 4e 2c 20 54 48 45 4e 2c 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0086 } ( MUSCPU cont., MORAMBLE cont., STEPMOVER ) | 28 20 4d 55 53 43 50 55 20 63 6f 6e 74 2e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4d 4f 52 41 4d 42 4c 45 20 63 6f 6e 74 2e 2c 20 53 54 45 50 4d 4f 56 45 52 20 29 20 20 20 20 20 HIGHLIM Y A LDX, D CMP, >=, IF, ( at limit ) | 20 48 49 47 48 4c 49 4d 20 59 20 41 20 4c 44 58 2c 20 44 20 43 4d 50 2c 20 3e 3d 2c 20 49 46 2c 20 28 20 61 74 20 6c 69 6d 69 74 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( LOWMOVER ) | 28 20 4c 4f 57 4d 4f 56 45 52 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 LOW# Y A LDX, A ORA, 0<>, IF, ( not dead already ) | 20 4c 4f 57 23 20 59 20 41 20 4c 44 58 2c 20 41 20 4f 52 41 2c 20 30 3c 3e 2c 20 49 46 2c 20 28 20 6e 6f 74 20 64 65 61 64 20 61 6c 72 65 61 64 79 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 LOWCOUNTER Y DCRX, 0=, IF, A C MOV, | 20 4c 4f 57 43 4f 55 4e 54 45 52 20 59 20 44 43 52 58 2c 20 30 3d 2c 20 49 46 2c 20 41 20 43 20 4d 4f 56 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 LOWLIM Y A LDX, LOWSTEP Y ADDX, | 20 4c 4f 57 4c 49 4d 20 59 20 41 20 4c 44 58 2c 20 4c 4f 57 53 54 45 50 20 59 20 41 44 44 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 STOPLOWLIM Y CMPX, =, IF, 0 LOW# Y MVIX, THEN, | 20 53 54 4f 50 4c 4f 57 4c 49 4d 20 59 20 43 4d 50 58 2c 20 3d 2c 20 49 46 2c 20 30 20 4c 4f 57 23 20 59 20 4d 56 49 58 2c 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 A LOWLIM Y STX, C LOWCOUNTER Y STX, THEN, THEN, | 20 41 20 4c 4f 57 4c 49 4d 20 59 20 53 54 58 2c 20 43 20 4c 4f 57 43 4f 55 4e 54 45 52 20 59 20 53 54 58 2c 20 54 48 45 4e 2c 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 LIMITCOUNT CALL, RAMPFLAG Y A LDX, | 20 4c 49 4d 49 54 43 4f 55 4e 54 20 43 41 4c 4c 2c 20 52 41 4d 50 46 4c 41 47 20 59 20 41 20 4c 44 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2 CPI, 0=, IF, RAMPFLAG Y DCRX, ELSE, | 20 32 20 43 50 49 2c 20 30 3d 2c 20 49 46 2c 20 52 41 4d 50 46 4c 41 47 20 59 20 44 43 52 58 2c 20 45 4c 53 45 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 A ORA, 0<>, IF, ( ramp ) 3 A MVI, A RAMPFLAG Y STX, | 20 41 20 4f 52 41 2c 20 30 3c 3e 2c 20 49 46 2c 20 28 20 72 61 6d 70 20 29 20 33 20 41 20 4d 56 49 2c 20 41 20 52 41 4d 50 46 4c 41 47 20 59 20 53 54 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 ( tell HIGHMOVER to donutting ) | 20 28 20 74 65 6c 6c 20 48 49 47 48 4d 4f 56 45 52 20 74 6f 20 64 6f 6e 75 74 74 69 6e 67 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 LOWLIM Y A LDX, L SUB, A MOVALUE Y STX, ELSE, L SUB, | 20 4c 4f 57 4c 49 4d 20 59 20 41 20 4c 44 58 2c 20 4c 20 53 55 42 2c 20 41 20 4d 4f 56 41 4c 55 45 20 59 20 53 54 58 2c 20 45 4c 53 45 2c 20 4c 20 53 55 42 2c 20 20 20 20 20 20 20 20 20 20 20 A STEP Y STX, THEN, THEN, THEN, | 20 41 20 53 54 45 50 20 59 20 53 54 58 2c 20 54 48 45 4e 2c 20 54 48 45 4e 2c 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 TIMEBASE Y A LDX, A RAMBLETIMER Y STX, THEN, THEN, | 20 54 49 4d 45 42 41 53 45 20 59 20 41 20 4c 44 58 2c 20 41 20 52 41 4d 42 4c 45 54 49 4d 45 52 20 59 20 53 54 58 2c 20 54 48 45 4e 2c 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0087 } ( MUSCPU VOLUME MOVING ) | 28 20 4d 55 53 43 50 55 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 56 4f 4c 55 4d 45 20 4d 4f 56 49 4e 47 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 VOLTIMER Y A LDX, A ORA, 0<>, IF, A DCR, 0=, IF, | 56 4f 4c 54 49 4d 45 52 20 59 20 41 20 4c 44 58 2c 20 41 20 4f 52 41 2c 20 30 3c 3e 2c 20 49 46 2c 20 41 20 44 43 52 2c 20 30 3d 2c 20 49 46 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( D=MCtracker, E=MOset, H=limitcheck, L=stepsize ) | 28 20 44 3d 4d 43 74 72 61 63 6b 65 72 2c 20 45 3d 4d 4f 73 65 74 2c 20 48 3d 6c 69 6d 69 74 63 68 65 63 6b 2c 20 4c 3d 73 74 65 70 73 69 7a 65 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 MCTRACKER Y D LDX, D A MOV, 0F0 ANI, A E MOV, D A MOV, | 20 4d 43 54 52 41 43 4b 45 52 20 59 20 44 20 4c 44 58 2c 20 44 20 41 20 4d 4f 56 2c 20 30 46 30 20 41 4e 49 2c 20 41 20 45 20 4d 4f 56 2c 20 44 20 41 20 4d 4f 56 2c 20 20 20 20 20 20 20 20 20 E SUB, VOLSTEP Y L LDX, L ADD, ( update tracker ) A D MOV, | 20 45 20 53 55 42 2c 20 56 4f 4c 53 54 45 50 20 59 20 4c 20 4c 44 58 2c 20 4c 20 41 44 44 2c 20 28 20 75 70 64 61 74 65 20 74 72 61 63 6b 65 72 20 29 20 41 20 44 20 4d 4f 56 2c 20 20 20 20 20 VOLHIGHLIM Y H LDX, H CMP, 0>=, IF, H D MOV, ( check top ) | 20 56 4f 4c 48 49 47 48 4c 49 4d 20 59 20 48 20 4c 44 58 2c 20 48 20 43 4d 50 2c 20 30 3e 3d 2c 20 49 46 2c 20 48 20 44 20 4d 4f 56 2c 20 28 20 63 68 65 63 6b 20 74 6f 70 20 29 20 20 20 20 20 A XRA, L SUB, A L MOV, ( change dir. ) | 20 41 20 58 52 41 2c 20 4c 20 53 55 42 2c 20 41 20 4c 20 4d 4f 56 2c 20 28 20 63 68 61 6e 67 65 20 64 69 72 2e 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ELSE, A DCR, VOLOWLIM Y H LDX, H CMP, 0<, IF, | 20 45 4c 53 45 2c 20 41 20 44 43 52 2c 20 56 4f 4c 4f 57 4c 49 4d 20 59 20 48 20 4c 44 58 2c 20 48 20 43 4d 50 2c 20 30 3c 2c 20 49 46 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 H D MOV, ( low end ) A XRA, L SUB, A L MOV, ( change ) | 20 48 20 44 20 4d 4f 56 2c 20 28 20 6c 6f 77 20 65 6e 64 20 29 20 41 20 58 52 41 2c 20 4c 20 53 55 42 2c 20 41 20 4c 20 4d 4f 56 2c 20 28 20 63 68 61 6e 67 65 20 29 20 20 20 20 20 20 20 20 20 THEN, THEN, | 20 54 48 45 4e 2c 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 L VOLSTEP Y STX, D A MOV, ( Cvols ) RRC, RRC, RRC, RRC, | 20 4c 20 56 4f 4c 53 54 45 50 20 59 20 53 54 58 2c 20 44 20 41 20 4d 4f 56 2c 20 28 20 43 76 6f 6c 73 20 29 20 52 52 43 2c 20 52 52 43 2c 20 52 52 43 2c 20 52 52 43 2c 20 20 20 20 20 20 20 20 D ADD, ( ABvols is CCvols ) SOUNDBOX Y C LDX, C DCR, C DCR, | 20 44 20 41 44 44 2c 20 28 20 41 42 76 6f 6c 73 20 69 73 20 43 43 76 6f 6c 73 20 29 20 53 4f 55 4e 44 42 4f 58 20 59 20 43 20 4c 44 58 2c 20 43 20 44 43 52 2c 20 43 20 44 43 52 2c 20 20 20 20 A OUTP, C DCR, D A MOV, E ORA, ( mosetting ) | 20 41 20 4f 55 54 50 2c 20 43 20 44 43 52 2c 20 44 20 41 20 4d 4f 56 2c 20 45 20 4f 52 41 2c 20 28 20 6d 6f 73 65 74 74 69 6e 67 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 A MCTRACKER Y STX, A OUTP, | 20 41 20 4d 43 54 52 41 43 4b 45 52 20 59 20 53 54 58 2c 20 41 20 4f 55 54 50 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 VOLTIMEBASE Y A LDX, THEN, A VOLTIMER Y STX, THEN, | 20 56 4f 4c 54 49 4d 45 42 41 53 45 20 59 20 41 20 4c 44 58 2c 20 54 48 45 4e 2c 20 41 20 56 4f 4c 54 49 4d 45 52 20 59 20 53 54 58 2c 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0088 } ( MUSCPU STEPMOVER, COMPDURMOVER ) | 28 20 4d 55 53 43 50 55 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 54 45 50 4d 4f 56 45 52 2c 20 43 4f 4d 50 44 55 52 4d 4f 56 45 52 20 29 20 20 20 20 20 20 20 20 STEPTIMER Y A LDX, A ORA, 0<>, IF, ( work on it ) | 20 53 54 45 50 54 49 4d 45 52 20 59 20 41 20 4c 44 58 2c 20 41 20 4f 52 41 2c 20 30 3c 3e 2c 20 49 46 2c 20 28 20 77 6f 72 6b 20 6f 6e 20 69 74 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 STEPTIMER Y DCRX, 0=, IF, | 20 53 54 45 50 54 49 4d 45 52 20 59 20 44 43 52 58 2c 20 30 3d 2c 20 49 46 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 STEP Y A LDX, A E MOV, ( save for sign ) babs CALL, ( abs ) | 20 53 54 45 50 20 59 20 41 20 4c 44 58 2c 20 41 20 45 20 4d 4f 56 2c 20 28 20 73 61 76 65 20 66 6f 72 20 73 69 67 6e 20 29 20 62 61 62 73 20 43 41 4c 4c 2c 20 28 20 61 62 73 20 29 20 20 20 20 BIGOFASTEP Y ADDX, ( positive value ) | 20 42 49 47 4f 46 41 53 54 45 50 20 59 20 41 44 44 58 2c 20 28 20 70 6f 73 69 74 69 76 65 20 76 61 6c 75 65 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 STOPSTEPS Y CMPX, ( positive ) 0<>, IF, ( not done ) | 20 53 54 4f 50 53 54 45 50 53 20 59 20 43 4d 50 58 2c 20 28 20 70 6f 73 69 74 69 76 65 20 29 20 30 3c 3e 2c 20 49 46 2c 20 28 20 6e 6f 74 20 64 6f 6e 65 20 29 20 20 20 20 20 20 20 20 20 20 20 STEPTIMEBASE Y A LDX, A STEPTIMER Y STX, THEN, 7 E BIT, | 20 53 54 45 50 54 49 4d 45 42 41 53 45 20 59 20 41 20 4c 44 58 2c 20 41 20 53 54 45 50 54 49 4d 45 52 20 59 20 53 54 58 2c 20 54 48 45 4e 2c 20 37 20 45 20 42 49 54 2c 20 20 20 20 20 20 20 20 0<>, IF, NEG, THEN, A STEP Y STX, ( store ) THEN, THEN, | 20 30 3c 3e 2c 20 49 46 2c 20 4e 45 47 2c 20 54 48 45 4e 2c 20 41 20 53 54 45 50 20 59 20 53 54 58 2c 20 28 20 73 74 6f 72 65 20 29 20 54 48 45 4e 2c 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( COMP-DURATION MOVER ) COMPDURATION Y A LDX, A ORA, 0<>, IF, | 28 20 43 4f 4d 50 2d 44 55 52 41 54 49 4f 4e 20 4d 4f 56 45 52 20 29 20 43 4f 4d 50 44 55 52 41 54 49 4f 4e 20 59 20 41 20 4c 44 58 2c 20 41 20 4f 52 41 2c 20 30 3c 3e 2c 20 49 46 2c 20 20 20 COMPTIMER Y DCRX, 0=, IF, COMPTB COMPTIMER Y MVIX, ( equate ) | 20 43 4f 4d 50 54 49 4d 45 52 20 59 20 44 43 52 58 2c 20 30 3d 2c 20 49 46 2c 20 43 4f 4d 50 54 42 20 43 4f 4d 50 54 49 4d 45 52 20 59 20 4d 56 49 58 2c 20 28 20 65 71 75 61 74 65 20 29 20 20 COMPSTEP Y ADDX, A DCR, 0<, IF, ( 1=>CARRY, 81=>NC ) | 20 43 4f 4d 50 53 54 45 50 20 59 20 41 44 44 58 2c 20 41 20 44 43 52 2c 20 30 3c 2c 20 49 46 2c 20 28 20 31 3d 3e 43 41 52 52 59 2c 20 38 31 3d 3e 4e 43 20 29 20 20 20 20 20 20 20 20 20 20 20 0 COMPDURATION Y MVIX, ( both stop ) | 20 30 20 43 4f 4d 50 44 55 52 41 54 49 4f 4e 20 59 20 4d 56 49 58 2c 20 28 20 62 6f 74 68 20 73 74 6f 70 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 1 MST Y MVIX, ( tell background we're there ) ELSE, | 20 31 20 4d 53 54 20 59 20 4d 56 49 58 2c 20 28 20 74 65 6c 6c 20 62 61 63 6b 67 72 6f 75 6e 64 20 77 65 27 72 65 20 74 68 65 72 65 20 29 20 45 4c 53 45 2c 20 20 20 20 20 20 20 20 20 20 20 20 A INR, A COMPDURATION Y STX, THEN, THEN, THEN, | 20 41 20 49 4e 52 2c 20 41 20 43 4f 4d 50 44 55 52 41 54 49 4f 4e 20 59 20 53 54 58 2c 20 54 48 45 4e 2c 20 54 48 45 4e 2c 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0089 } ( MUSPCU cont., TBMOVER, NOMOVER ) | 28 20 4d 55 53 50 43 55 20 63 6f 6e 74 2e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 54 42 4d 4f 56 45 52 2c 20 4e 4f 4d 4f 56 45 52 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( TBMOVER timebase ) TBSTEP Y A LDX, A ORA, 0<>, IF, | 28 20 54 42 4d 4f 56 45 52 20 74 69 6d 65 62 61 73 65 20 29 20 54 42 53 54 45 50 20 59 20 41 20 4c 44 58 2c 20 41 20 4f 52 41 2c 20 30 3c 3e 2c 20 49 46 2c 20 20 20 20 20 20 20 20 20 20 20 20 ( not done ) TBTIMER Y DCRX, 0=, IF, | 20 28 20 6e 6f 74 20 64 6f 6e 65 20 29 20 54 42 54 49 4d 45 52 20 59 20 44 43 52 58 2c 20 30 3d 2c 20 49 46 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 TIMEBASE Y ADDX, A TIMEBASE Y STX, STOPTB Y SUBX, | 20 54 49 4d 45 42 41 53 45 20 59 20 41 44 44 58 2c 20 41 20 54 49 4d 45 42 41 53 45 20 59 20 53 54 58 2c 20 53 54 4f 50 54 42 20 59 20 53 55 42 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0=, IF, A TBSTEP Y STX, THEN, | 20 30 3d 2c 20 49 46 2c 20 41 20 54 42 53 54 45 50 20 59 20 53 54 58 2c 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 TBTB Y A LDX, A TBTIMER Y STX, THEN, THEN, | 20 54 42 54 42 20 59 20 41 20 4c 44 58 2c 20 41 20 54 42 54 49 4d 45 52 20 59 20 53 54 58 2c 20 54 48 45 4e 2c 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( NOMOVER noise mover ) NOTIMER Y A LDX, A ORA, 0<>, IF, | 28 20 4e 4f 4d 4f 56 45 52 20 6e 6f 69 73 65 20 6d 6f 76 65 72 20 29 20 4e 4f 54 49 4d 45 52 20 59 20 41 20 4c 44 58 2c 20 41 20 4f 52 41 2c 20 30 3c 3e 2c 20 49 46 2c 20 20 20 20 20 20 20 20 NOTIMER Y DCRX, 0=, IF, ( update ) | 20 4e 4f 54 49 4d 45 52 20 59 20 44 43 52 58 2c 20 30 3d 2c 20 49 46 2c 20 28 20 75 70 64 61 74 65 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SOUNDBOX Y C LDX, C DCR, ( output port ) | 20 53 4f 55 4e 44 42 4f 58 20 59 20 43 20 4c 44 58 2c 20 43 20 44 43 52 2c 20 28 20 6f 75 74 70 75 74 20 70 6f 72 74 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 NOVALUE Y A LDX, NOSTEP Y ADDX, A NOVALUE Y STX, A OUTP, | 20 4e 4f 56 41 4c 55 45 20 59 20 41 20 4c 44 58 2c 20 4e 4f 53 54 45 50 20 59 20 41 44 44 58 2c 20 41 20 4e 4f 56 41 4c 55 45 20 59 20 53 54 58 2c 20 41 20 4f 55 54 50 2c 20 20 20 20 20 20 20 NOSTOP Y CMPX, ( timer to stop? ) | 20 4e 4f 53 54 4f 50 20 59 20 43 4d 50 58 2c 20 28 20 74 69 6d 65 72 20 74 6f 20 73 74 6f 70 3f 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0<>, IF, ( not done, reload ) | 20 30 3c 3e 2c 20 49 46 2c 20 28 20 6e 6f 74 20 64 6f 6e 65 2c 20 72 65 6c 6f 61 64 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 NOTIMEBASE Y A LDX, A NOTIMER Y STX, THEN, THEN, THEN, | 20 4e 4f 54 49 4d 45 42 41 53 45 20 59 20 41 20 4c 44 58 2c 20 41 20 4e 4f 54 49 4d 45 52 20 59 20 53 54 58 2c 20 54 48 45 4e 2c 20 54 48 45 4e 2c 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 RET, | 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0090 } ( ** MUSIC INTERRUPTER ** COMPUTER MUSIC ) HEX | 28 20 2a 2a 20 4d 55 53 49 43 20 49 4e 54 45 52 52 55 50 54 45 52 20 2a 2a 20 20 20 20 20 20 20 20 20 20 43 4f 4d 50 55 54 45 52 20 4d 55 53 49 43 20 29 20 48 45 58 20 20 20 20 20 20 20 20 20 SUBR MUSINTERP ( music interrupter, pre-load IY ) | 53 55 42 52 20 4d 55 53 49 4e 54 45 52 50 20 28 20 6d 75 73 69 63 20 69 6e 74 65 72 72 75 70 74 65 72 2c 20 70 72 65 2d 6c 6f 61 64 20 49 59 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 30 3d 2c 20 49 46 2c 20 52 45 54 2c 20 54 48 45 4e 2c 20 28 20 6e 6f 20 63 6f 6d 70 2e 20 6d 75 73 69 63 20 29 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 A DCR, 0=, IF, ( AHA!! state transition ) | 41 20 44 43 52 2c 20 30 3d 2c 20 49 46 2c 20 20 28 20 41 48 41 21 21 20 73 74 61 74 65 20 74 72 61 6e 73 69 74 69 6f 6e 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 process JMP, THEN, ( AHHA HA!! MST=2 => COMPUTER MUSIC ) | 20 70 72 6f 63 65 73 73 20 4a 4d 50 2c 20 54 48 45 4e 2c 20 28 20 41 48 48 41 20 48 41 21 21 20 4d 53 54 3d 32 20 3d 3e 20 43 4f 4d 50 55 54 45 52 20 4d 55 53 49 43 20 29 20 20 20 20 20 20 20 COMPDURATION Y A LDX, A NOTETIMER Y STX, ( compmusic duration ) | 20 43 4f 4d 50 44 55 52 41 54 49 4f 4e 20 59 20 41 20 4c 44 58 2c 20 41 20 4e 4f 54 45 54 49 4d 45 52 20 59 20 53 54 58 2c 20 28 20 63 6f 6d 70 6d 75 73 69 63 20 64 75 72 61 74 69 6f 6e 20 29 random CALL, ( use 3 reg. melody trackers, 1 for MO tracker ) | 20 72 61 6e 64 6f 6d 20 43 41 4c 4c 2c 20 28 20 75 73 65 20 33 20 72 65 67 2e 20 6d 65 6c 6f 64 79 20 74 72 61 63 6b 65 72 73 2c 20 31 20 66 6f 72 20 4d 4f 20 74 72 61 63 6b 65 72 20 29 20 20 NOTECOUNTER Y A LDX, A ORA, 0<, IF, ( new key ) EXX, | 20 4e 4f 54 45 43 4f 55 4e 54 45 52 20 59 20 41 20 4c 44 58 2c 20 41 20 4f 52 41 2c 20 30 3c 2c 20 49 46 2c 20 28 20 6e 65 77 20 6b 65 79 20 29 20 45 58 58 2c 20 20 20 20 20 20 20 20 20 20 20 LDAR, ( gen new wait # ) 1 E MVI, 7 D MVI, ( # = 2^n ) | 20 4c 44 41 52 2c 20 28 20 67 65 6e 20 6e 65 77 20 77 61 69 74 20 23 20 29 20 31 20 45 20 4d 56 49 2c 20 37 20 44 20 4d 56 49 2c 20 28 20 23 20 3d 20 32 5e 6e 20 29 20 20 20 20 20 20 20 20 20 BEGIN, RAR, CY, IF, E SLAR, THEN, D DCR, 0=, END, E SLAR, | 20 42 45 47 49 4e 2c 20 52 41 52 2c 20 43 59 2c 20 49 46 2c 20 45 20 53 4c 41 52 2c 20 54 48 45 4e 2c 20 44 20 44 43 52 2c 20 30 3d 2c 20 45 4e 44 2c 20 45 20 53 4c 41 52 2c 20 20 20 20 20 20 ( 2^2 to 2^8 ) E NOTECOUNTER Y STX, EXX, 1 L MVI, ( inc MO ) | 20 28 20 32 5e 32 20 74 6f 20 32 5e 38 20 29 20 45 20 4e 4f 54 45 43 4f 55 4e 54 45 52 20 59 20 53 54 58 2c 20 45 58 58 2c 20 31 20 4c 20 4d 56 49 2c 20 28 20 69 6e 63 20 4d 4f 20 29 20 20 20 ELSE, 0 L MVI, ( leave MO ) THEN, | 20 45 4c 53 45 2c 20 30 20 4c 20 4d 56 49 2c 20 28 20 6c 65 61 76 65 20 4d 4f 20 29 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 L A MOV, ( do anyhow for setup ) | 20 4c 20 41 20 4d 4f 56 2c 20 28 20 64 6f 20 61 6e 79 68 6f 77 20 66 6f 72 20 73 65 74 75 70 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 MOTRACKER Y ADDX, 0F ANI, ( 0-15 ) A MOTRACKER Y STX, | 20 4d 4f 54 52 41 43 4b 45 52 20 59 20 41 44 44 58 2c 20 30 46 20 41 4e 49 2c 20 28 20 30 2d 31 35 20 29 20 41 20 4d 4f 54 52 41 43 4b 45 52 20 59 20 53 54 58 2c 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0091 } ( MUSCPU cont., RANDOM NOTES ) --> | 28 20 4d 55 53 43 50 55 20 63 6f 6e 74 2e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 41 4e 44 4f 4d 20 4e 4f 54 45 53 20 29 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 EXX, 0 MOTABLE H LXI, A E MOV, 0 D MVI, D DAD, M A MOV, | 20 45 58 58 2c 20 30 20 4d 4f 54 41 42 4c 45 20 48 20 4c 58 49 2c 20 41 20 45 20 4d 4f 56 2c 20 30 20 44 20 4d 56 49 2c 20 44 20 44 41 44 2c 20 4d 20 41 20 4d 4f 56 2c 20 20 20 20 20 20 20 20 A MOVALUE Y STX, A B MOV, ( save from soundbox ) | 20 41 20 4d 4f 56 41 4c 55 45 20 59 20 53 54 58 2c 20 41 20 42 20 4d 4f 56 2c 20 28 20 73 61 76 65 20 66 72 6f 6d 20 73 6f 75 6e 64 62 6f 78 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SOUNDBOX Y A LDX, 8 SUI, A C MOV, 20 CPI, <, IF, ( low chip ) | 20 53 4f 55 4e 44 42 4f 58 20 59 20 41 20 4c 44 58 2c 20 38 20 53 55 49 2c 20 41 20 43 20 4d 4f 56 2c 20 32 30 20 43 50 49 2c 20 3c 2c 20 49 46 2c 20 28 20 6c 6f 77 20 63 68 69 70 20 29 20 20 B OUTP, C D MOV, 40 ADI, A C MOV, B OUTP, ( MO ) D C MOV, THEN, | 20 42 20 4f 55 54 50 2c 20 43 20 44 20 4d 4f 56 2c 20 34 30 20 41 44 49 2c 20 41 20 43 20 4d 4f 56 2c 20 42 20 4f 55 54 50 2c 20 28 20 4d 4f 20 29 20 44 20 43 20 4d 4f 56 2c 20 54 48 45 4e 2c EXX, H A MOV, ( use this # for disp. to index ) +-disp. CALL, | 20 45 58 58 2c 20 48 20 41 20 4d 4f 56 2c 20 28 20 75 73 65 20 74 68 69 73 20 23 20 66 6f 72 20 64 69 73 70 2e 20 74 6f 20 69 6e 64 65 78 20 29 20 2b 2d 64 69 73 70 2e 20 43 41 4c 4c 2c 20 20 ( +7 to -7 ) ATRACKER Y ADDX, 15MOD CALL, ( index 0-15H ) | 20 28 20 2b 37 20 74 6f 20 2d 37 20 29 20 41 54 52 41 43 4b 45 52 20 59 20 41 44 44 58 2c 20 31 35 4d 4f 44 20 43 41 4c 4c 2c 20 28 20 69 6e 64 65 78 20 30 2d 31 35 48 20 29 20 20 20 20 20 20 A ATRACKER Y STX, UP-AN-OUT CALL, | 20 41 20 41 54 52 41 43 4b 45 52 20 59 20 53 54 58 2c 20 55 50 2d 41 4e 2d 4f 55 54 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 E A MOV, ( next note ) +-disp. CALL, ( +7 to -6 disp. ) | 20 45 20 41 20 4d 4f 56 2c 20 28 20 6e 65 78 74 20 6e 6f 74 65 20 29 20 2b 2d 64 69 73 70 2e 20 43 41 4c 4c 2c 20 28 20 2b 37 20 74 6f 20 2d 36 20 64 69 73 70 2e 20 29 20 20 20 20 20 20 20 20 BTRACKER Y ADDX, 15MOD CALL, ( index 0-15H ) | 20 42 54 52 41 43 4b 45 52 20 59 20 41 44 44 58 2c 20 31 35 4d 4f 44 20 43 41 4c 4c 2c 20 28 20 69 6e 64 65 78 20 30 2d 31 35 48 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 A BTRACKER Y STX, UP-AN-OUT CALL, ( get from NOTE TABLE ) | 20 41 20 42 54 52 41 43 4b 45 52 20 59 20 53 54 58 2c 20 55 50 2d 41 4e 2d 4f 55 54 20 43 41 4c 4c 2c 20 28 20 67 65 74 20 66 72 6f 6d 20 4e 4f 54 45 20 54 41 42 4c 45 20 29 20 20 20 20 20 20 D A MOV, ( next disp. ) +-disp. CALL, ( +7 to -6 ) | 20 44 20 41 20 4d 4f 56 2c 20 28 20 6e 65 78 74 20 64 69 73 70 2e 20 29 20 2b 2d 64 69 73 70 2e 20 43 41 4c 4c 2c 20 28 20 2b 37 20 74 6f 20 2d 36 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 CTRACKER Y ADDX, 15MOD CALL, ( index 0-15H ) | 20 43 54 52 41 43 4b 45 52 20 59 20 41 44 44 58 2c 20 31 35 4d 4f 44 20 43 41 4c 4c 2c 20 28 20 69 6e 64 65 78 20 30 2d 31 35 48 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 A CTRACKER Y STX, UP-AN-OUT CALL, | 20 41 20 43 54 52 41 43 4b 45 52 20 59 20 53 54 58 2c 20 55 50 2d 41 4e 2d 4f 55 54 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( done with notes ) MUSEND JMP, | 20 28 20 64 6f 6e 65 20 77 69 74 68 20 6e 6f 74 65 73 20 29 20 4d 55 53 45 4e 44 20 4a 4d 50 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0092 } ( MUSCPU cont., PROCESS the score, ) | 28 20 4d 55 53 43 50 55 20 63 6f 6e 74 2e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 52 4f 43 45 53 53 20 74 68 65 20 73 63 6f 72 65 2c 20 29 20 20 20 20 20 20 20 20 20 20 20 20 LABEL process MUSPC Y L LDX, MUSPC 1+ Y H LDX, | 4c 41 42 45 4c 20 70 72 6f 63 65 73 73 20 20 4d 55 53 50 43 20 59 20 4c 20 4c 44 58 2c 20 4d 55 53 50 43 20 31 2b 20 59 20 48 20 4c 44 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 BEGIN, ( MUSPC in HL until done ) | 20 42 45 47 49 4e 2c 20 28 20 4d 55 53 50 43 20 69 6e 20 48 4c 20 75 6e 74 69 6c 20 64 6f 6e 65 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 M A MOV, H INX, #-OF-OPCODES 1+ CPI, ( bad opcode check ) | 20 4d 20 41 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 23 2d 4f 46 2d 4f 50 43 4f 44 45 53 20 31 2b 20 43 50 49 2c 20 28 20 62 61 64 20 6f 70 63 6f 64 65 20 63 68 65 63 6b 20 29 20 20 20 20 20 20 <, IF, EXX, ( swap to keep MUSPC around ) | 20 3c 2c 20 49 46 2c 20 45 58 58 2c 20 28 20 73 77 61 70 20 74 6f 20 6b 65 65 70 20 4d 55 53 50 43 20 61 72 6f 75 6e 64 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 endprocess H LXI, H PUSH, ( ret to end of process ) | 20 65 6e 64 70 72 6f 63 65 73 73 20 48 20 4c 58 49 2c 20 48 20 50 55 53 48 2c 20 28 20 72 65 74 20 74 6f 20 65 6e 64 20 6f 66 20 70 72 6f 63 65 73 73 20 29 20 20 20 20 20 20 20 20 20 20 20 20 0 OPADDRESSES H LXI, ( get address of opcode verb ) | 20 30 20 4f 50 41 44 44 52 45 53 53 45 53 20 48 20 4c 58 49 2c 20 20 28 20 67 65 74 20 61 64 64 72 65 73 73 20 6f 66 20 6f 70 63 6f 64 65 20 76 65 72 62 20 29 20 20 20 20 20 20 20 20 20 20 20 RLC, ( words ) A E MOV, 0 D MVI, D DAD, | 20 52 4c 43 2c 20 28 20 77 6f 72 64 73 20 29 20 41 20 45 20 4d 4f 56 2c 20 30 20 44 20 4d 56 49 2c 20 44 20 44 41 44 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 M E MOV, H INX, M D MOV, D PUSH, ( RET to routine ) | 20 4d 20 45 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 4d 20 44 20 4d 4f 56 2c 20 44 20 50 55 53 48 2c 20 28 20 52 45 54 20 74 6f 20 72 6f 75 74 69 6e 65 20 29 20 20 20 20 20 20 20 20 20 20 20 20 EXX, ( put MUSPC in HL ) RET, | 20 45 58 58 2c 20 28 20 70 75 74 20 4d 55 53 50 43 20 69 6e 20 48 4c 20 29 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ELSE, 1 ORI, ( quit ) THEN, | 20 45 4c 53 45 2c 20 31 20 4f 52 49 2c 20 28 20 71 75 69 74 20 29 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 LABEL endprocess A ORA, 0<>, END, ( opverbs return non-0 or 0 ) | 4c 41 42 45 4c 20 65 6e 64 70 72 6f 63 65 73 73 20 41 20 4f 52 41 2c 20 30 3c 3e 2c 20 45 4e 44 2c 20 28 20 6f 70 76 65 72 62 73 20 72 65 74 75 72 6e 20 6e 6f 6e 2d 30 20 6f 72 20 30 20 29 20 L MUSPC Y STX, H MUSPC 1+ Y STX, | 20 4c 20 4d 55 53 50 43 20 59 20 53 54 58 2c 20 48 20 4d 55 53 50 43 20 31 2b 20 59 20 53 54 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 LABEL MUSEND 0 MST Y MVIX, ( let interrupts run ) RET, | 4c 41 42 45 4c 20 4d 55 53 45 4e 44 20 30 20 4d 53 54 20 59 20 4d 56 49 58 2c 20 28 20 6c 65 74 20 69 6e 74 65 72 72 75 70 74 73 20 72 75 6e 20 29 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 ASSEMBLE> | 41 53 53 45 4d 42 4c 45 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0093 } ( MUSIC PROCESSOR- MUSCPUS PUT TOGETHER ) HEX | 28 20 4d 55 53 49 43 20 50 52 4f 43 45 53 53 4f 52 2d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4d 55 53 43 50 55 53 20 50 55 54 20 54 4f 47 45 54 48 45 52 20 29 20 48 45 58 20 20 20 20 20 20 SUBR MUSCPUS | 53 55 42 52 20 4d 55 53 43 50 55 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 MUSICFLAG LDA, A ORA, 0<>, IF, Y PUSHX, ( F4 A MVI, 0 OUT, ) | 20 4d 55 53 49 43 46 4c 41 47 20 4c 44 41 2c 20 41 20 4f 52 41 2c 20 30 3c 3e 2c 20 49 46 2c 20 59 20 50 55 53 48 58 2c 20 28 20 46 34 20 41 20 4d 56 49 2c 20 30 20 4f 55 54 2c 20 29 20 20 20 0 MUSIC-BARRAY-1 Y LXIX, MUSCPU CALL, ( A2 A MVI, 0 OUT, ) | 20 30 20 4d 55 53 49 43 2d 42 41 52 52 41 59 2d 31 20 59 20 4c 58 49 58 2c 20 4d 55 53 43 50 55 20 43 41 4c 4c 2c 20 28 20 41 32 20 41 20 4d 56 49 2c 20 30 20 4f 55 54 2c 20 29 20 20 20 20 20 0 MUSIC-BARRAY-2 Y LXIX, MUSCPU CALL, ( 53 A MVI, 0 OUT, ) | 20 30 20 4d 55 53 49 43 2d 42 41 52 52 41 59 2d 32 20 59 20 4c 58 49 58 2c 20 4d 55 53 43 50 55 20 43 41 4c 4c 2c 20 28 20 35 33 20 41 20 4d 56 49 2c 20 30 20 4f 55 54 2c 20 29 20 20 20 20 20 Y POPX, THEN, RET, | 59 20 50 4f 50 58 2c 20 54 48 45 4e 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR busaround ( back-music-ground ) | 53 55 42 52 20 62 75 73 61 72 6f 75 6e 64 20 28 20 62 61 63 6b 2d 6d 75 73 69 63 2d 67 72 6f 75 6e 64 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 MUSICFLAG LDA, A ORA, 0<>, IF, Y PUSHX, ( F4 A MVI, 4 OUT, ) | 20 4d 55 53 49 43 46 4c 41 47 20 4c 44 41 2c 20 41 20 4f 52 41 2c 20 30 3c 3e 2c 20 49 46 2c 20 59 20 50 55 53 48 58 2c 20 28 20 46 34 20 41 20 4d 56 49 2c 20 34 20 4f 55 54 2c 20 29 20 20 20 0 MUSIC-BARRAY-1 Y LXIX, MUSINTERP CALL, ( A2 A MVI, 4 OUT, ) | 20 30 20 4d 55 53 49 43 2d 42 41 52 52 41 59 2d 31 20 59 20 4c 58 49 58 2c 20 4d 55 53 49 4e 54 45 52 50 20 43 41 4c 4c 2c 20 28 20 41 32 20 41 20 4d 56 49 2c 20 34 20 4f 55 54 2c 20 29 20 20 0 MUSIC-BARRAY-2 Y LXIX, MUSINTERP CALL, ( 53 A MVI, 4 OUT, ) | 20 30 20 4d 55 53 49 43 2d 42 41 52 52 41 59 2d 32 20 59 20 4c 58 49 58 2c 20 4d 55 53 49 4e 54 45 52 50 20 43 41 4c 4c 2c 20 28 20 35 33 20 41 20 4d 56 49 2c 20 34 20 4f 55 54 2c 20 29 20 20 Y POPX, THEN, RET, | 59 20 50 4f 50 58 2c 20 54 48 45 4e 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE BMS ( code level back-music-ground ) B PUSH, | 43 4f 44 45 20 42 4d 53 20 28 20 63 6f 64 65 20 6c 65 76 65 6c 20 62 61 63 6b 2d 6d 75 73 69 63 2d 67 72 6f 75 6e 64 20 29 20 42 20 50 55 53 48 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 busaround CALL, B POP, NEXT | 20 62 75 73 61 72 6f 75 6e 64 20 43 41 4c 4c 2c 20 42 20 50 4f 50 2c 20 4e 45 58 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0094 } ( MUSIC PROCESSOR- ALL xmusics NEED AN IY LOAD ) HEX | 28 20 4d 55 53 49 43 20 50 52 4f 43 45 53 53 4f 52 2d 20 41 4c 4c 20 78 6d 75 73 69 63 73 20 4e 45 45 44 20 41 4e 20 49 59 20 4c 4f 41 44 20 29 20 48 45 58 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR loadpc L MUSPC Y STX, L STARTPC Y STX, | 53 55 42 52 20 6c 6f 61 64 70 63 20 4c 20 4d 55 53 50 43 20 59 20 53 54 58 2c 20 4c 20 53 54 41 52 54 50 43 20 59 20 53 54 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 H MUSPC 1+ Y STX, H STARTPC 1+ Y STX, RET, | 20 48 20 4d 55 53 50 43 20 31 2b 20 59 20 53 54 58 2c 20 48 20 53 54 41 52 54 50 43 20 31 2b 20 59 20 53 54 58 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0095 } ( MUSCPU SUBROUTINE CALLS ) | 28 20 4d 55 53 43 50 55 20 53 55 42 52 4f 55 54 49 4e 45 20 43 41 4c 4c 53 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( * SET SCORE IN HL, RAM IN IY, MULTIPLE IN E if req. * ) | 28 20 2a 20 53 45 54 20 53 43 4f 52 45 20 49 4e 20 48 4c 2c 20 52 41 4d 20 49 4e 20 49 59 2c 20 4d 55 4c 54 49 50 4c 45 20 49 4e 20 45 20 69 66 20 72 65 71 2e 20 2a 20 29 20 20 20 20 20 20 20 SUBR bmusic | 53 55 42 52 20 62 6d 75 73 69 63 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 PRIORITY Y A LDX, A ORA, 0=, IF, 1 MST Y MVIX, | 20 50 52 49 4f 52 49 54 59 20 59 20 41 20 4c 44 58 2c 20 41 20 4f 52 41 2c 20 30 3d 2c 20 49 46 2c 20 31 20 4d 53 54 20 59 20 4d 56 49 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 A NOTETIMER Y STX, A INR, A MULTIPLE Y STX, loadpc JMP, | 20 41 20 4e 4f 54 45 54 49 4d 45 52 20 59 20 53 54 58 2c 20 41 20 49 4e 52 2c 20 41 20 4d 55 4c 54 49 50 4c 45 20 59 20 53 54 58 2c 20 6c 6f 61 64 70 63 20 4a 4d 50 2c 20 20 20 20 20 20 20 20 ( leave MST=1 for BMS ) THEN, RET, | 20 28 20 6c 65 61 76 65 20 4d 53 54 3d 31 20 66 6f 72 20 42 4d 53 20 29 20 54 48 45 4e 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR pmusic 1 MST Y MVIX, Y PUSHX, EXX, D POP, emusic CALL, | 53 55 42 52 20 70 6d 75 73 69 63 20 31 20 4d 53 54 20 59 20 4d 56 49 58 2c 20 59 20 50 55 53 48 58 2c 20 45 58 58 2c 20 44 20 50 4f 50 2c 20 65 6d 75 73 69 63 20 43 41 4c 4c 2c 20 20 20 20 20 1 A MVI, A MST Y STX, A MULTIPLE Y STX, A PRIORITY Y STX, | 20 31 20 41 20 4d 56 49 2c 20 41 20 4d 53 54 20 59 20 53 54 58 2c 20 41 20 4d 55 4c 54 49 50 4c 45 20 59 20 53 54 58 2c 20 41 20 50 52 49 4f 52 49 54 59 20 59 20 53 54 58 2c 20 20 20 20 20 20 loadpc JMP, | 20 20 6c 6f 61 64 70 63 20 4a 4d 50 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR mmusic PRIORITY Y A LDX, A ORA, 0=, IF, 1 MST Y MVIX, | 53 55 42 52 20 6d 6d 75 73 69 63 20 50 52 49 4f 52 49 54 59 20 59 20 41 20 4c 44 58 2c 20 41 20 4f 52 41 2c 20 30 3d 2c 20 49 46 2c 20 31 20 4d 53 54 20 59 20 4d 56 49 58 2c 20 20 20 20 20 20 A NOTETIMER Y STX, E MULTIPLE Y STX, loadpc JMP, THEN, RET, | 20 41 20 4e 4f 54 45 54 49 4d 45 52 20 59 20 53 54 58 2c 20 45 20 4d 55 4c 54 49 50 4c 45 20 59 20 53 54 58 2c 20 6c 6f 61 64 70 63 20 4a 4d 50 2c 20 54 48 45 4e 2c 20 52 45 54 2c 20 20 20 20 SUBR mpmusic 1 MST Y MVIX, Y PUSHX, EXX, D POP, emusic CALL, | 53 55 42 52 20 6d 70 6d 75 73 69 63 20 31 20 4d 53 54 20 59 20 4d 56 49 58 2c 20 59 20 50 55 53 48 58 2c 20 45 58 58 2c 20 44 20 50 4f 50 2c 20 65 6d 75 73 69 63 20 43 41 4c 4c 2c 20 20 20 20 1 A MVI, A MST Y STX, A PRIORITY Y STX, E MULTIPLE Y STX, | 20 31 20 41 20 4d 56 49 2c 20 41 20 4d 53 54 20 59 20 53 54 58 2c 20 41 20 50 52 49 4f 52 49 54 59 20 59 20 53 54 58 2c 20 45 20 4d 55 4c 54 49 50 4c 45 20 59 20 53 54 58 2c 20 20 20 20 20 20 loadpc JMP, | 20 20 6c 6f 61 64 70 63 20 4a 4d 50 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0096 } gggggggggggggggggggggggggggggggggggggggggggggggggggggggggggggggg | e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 gggggggggggggggggggggggggggggggggggggggggggggggggggggggggggggggg | e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 gggggggggggggggggggggggggggggggggggggggggggggggggggggggggggggggg | e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 gggggggggggggggggggggggggggggggggggggggggggggggggggggggggggggggg | e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 gggggggggggggggggggggggggggggggggggggggggggggggggggggggggggggggg | e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 gggggggggggggggggggggggggggggggggggggggggggggggggggggggggggggggg | e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 gggggggggggggggggggggggggggggggggggggggggggggggggggggggggggggggg | e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 gggggggggggggggggggggggggggggggggggggggggggggggggggggggggggggggg | e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 gggggggggggggggggggggggggggggggggggggggggggggggggggggggggggggggg | e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 gggggggggggggggggggggggggggggggggggggggggggggggggggggggggggggggg | e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 gggggggggggggggggggggggggggggggggggggggggggggggggggggggggggggggg | e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 gggggggggggggggggggggggggggggggggggggggggggggggggggggggggggggggg | e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 gggggggggggggggggggggggggggggggggggggggggggggggggggggggggggggggg | e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 gggggggggggggggggggggggggggggggggggggggggggggggggggggggggggggggg | e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 gggggggggggggggggggggggggggggggggggggggggggggggggggggggggggggggg | e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 gggggggggggggggggggggggggggggggggggggggggggggggggggggggggggggggg | e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 e7 { BLOCK 0097 } ( MUSIC PROCESSOR- E2MUSIC, B2MUSIC, ... ) | 20 28 20 4d 55 53 49 43 20 50 52 4f 43 45 53 53 4f 52 2d 20 45 32 4d 55 53 49 43 2c 20 42 32 4d 55 53 49 43 2c 20 2e 2e 2e 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE E2MUSIC EXX, 0 MUSIC-BARRAY-2 D LXI, ( pass to emusic ) | 20 43 4f 44 45 20 45 32 4d 55 53 49 43 20 45 58 58 2c 20 30 20 4d 55 53 49 43 2d 42 41 52 52 41 59 2d 32 20 44 20 4c 58 49 2c 20 28 20 70 61 73 73 20 74 6f 20 65 6d 75 73 69 63 20 29 20 20 20 MST H LXI, D DAD, 1 M MVI, ( make non-zero ) | 20 20 4d 53 54 20 48 20 4c 58 49 2c 20 44 20 44 41 44 2c 20 31 20 4d 20 4d 56 49 2c 20 28 20 6d 61 6b 65 20 6e 6f 6e 2d 7a 65 72 6f 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SOUNDBOX H LXI, D DAD, CHIP2 M MVI, | 20 20 53 4f 55 4e 44 42 4f 58 20 48 20 4c 58 49 2c 20 44 20 44 41 44 2c 20 43 48 49 50 32 20 4d 20 4d 56 49 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 emusic CALL, ( musicoverun flag is zeroed last ) NEXT | 20 20 65 6d 75 73 69 63 20 43 41 4c 4c 2c 20 28 20 6d 75 73 69 63 6f 76 65 72 75 6e 20 66 6c 61 67 20 69 73 20 7a 65 72 6f 65 64 20 6c 61 73 74 20 29 20 4e 45 58 54 20 20 20 20 20 20 20 20 20 ( *** ALWAYS CALL E2MUSIC AS AN INIT IN PROGRAM *** ) | 20 28 20 2a 2a 2a 20 41 4c 57 41 59 53 20 43 41 4c 4c 20 45 32 4d 55 53 49 43 20 41 53 20 41 4e 20 49 4e 49 54 20 49 4e 20 50 52 4f 47 52 41 4d 20 2a 2a 2a 20 29 20 20 20 20 20 20 20 20 20 20 CODE B2MUSIC H POP, Y PUSHX, | 20 43 4f 44 45 20 42 32 4d 55 53 49 43 20 48 20 50 4f 50 2c 20 59 20 50 55 53 48 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 MUSIC-BARRAY-2 Y LXIX, bmusic CALL, Y POPX, NEXT | 20 20 30 20 4d 55 53 49 43 2d 42 41 52 52 41 59 2d 32 20 59 20 4c 58 49 58 2c 20 62 6d 75 73 69 63 20 43 41 4c 4c 2c 20 59 20 50 4f 50 58 2c 20 4e 45 58 54 20 20 20 20 20 20 20 20 20 20 20 20 CODE P2MUSIC H POP, Y PUSHX, | 20 43 4f 44 45 20 50 32 4d 55 53 49 43 20 48 20 50 4f 50 2c 20 59 20 50 55 53 48 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 MUSIC-BARRAY-2 Y LXIX, pmusic CALL, Y POPX, NEXT | 20 20 30 20 4d 55 53 49 43 2d 42 41 52 52 41 59 2d 32 20 59 20 4c 58 49 58 2c 20 70 6d 75 73 69 63 20 43 41 4c 4c 2c 20 59 20 50 4f 50 58 2c 20 4e 45 58 54 20 20 20 20 20 20 20 20 20 20 20 20 CODE M2MUSIC H POP, D POP, Y PUSHX, | 20 43 4f 44 45 20 4d 32 4d 55 53 49 43 20 48 20 50 4f 50 2c 20 44 20 50 4f 50 2c 20 59 20 50 55 53 48 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 MUSIC-BARRAY-2 Y LXIX, mmusic CALL, Y POPX, NEXT | 20 20 30 20 4d 55 53 49 43 2d 42 41 52 52 41 59 2d 32 20 59 20 4c 58 49 58 2c 20 6d 6d 75 73 69 63 20 43 41 4c 4c 2c 20 59 20 50 4f 50 58 2c 20 4e 45 58 54 20 20 20 20 20 20 20 20 20 20 20 20 CODE MP2MUSIC H POP, D POP, Y PUSHX, | 20 43 4f 44 45 20 4d 50 32 4d 55 53 49 43 20 48 20 50 4f 50 2c 20 44 20 50 4f 50 2c 20 59 20 50 55 53 48 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 MUSIC-BARRAY-2 Y LXIX, mpmusic CALL, Y POPX, NEXT | 20 20 30 20 4d 55 53 49 43 2d 42 41 52 52 41 59 2d 32 20 59 20 4c 58 49 58 2c 20 6d 70 6d 75 73 69 63 20 43 41 4c 4c 2c 20 59 20 50 4f 50 58 2c 20 4e 45 58 54 20 20 20 20 20 20 20 20 20 20 20 : SHUTUP EMUSIC E2MUSIC ; --> | 20 3a 20 53 48 55 54 55 50 20 45 4d 55 53 49 43 20 45 32 4d 55 53 49 43 20 3b 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0098 } ( SCOT'S VOTRAX TALKING CHIP SOFTWARE for JAY ) | 20 28 20 53 43 4f 54 27 53 20 56 4f 54 52 41 58 20 54 41 4c 4b 49 4e 47 20 43 48 49 50 20 53 4f 46 54 57 41 52 45 20 66 6f 72 20 4a 41 59 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( IMPORTANT EQUATES ) HEX | 20 28 20 49 4d 50 4f 52 54 41 4e 54 20 45 51 55 41 54 45 53 20 29 20 48 45 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 8 C= #TALKSTK ( size of stack for primitive talk statements ) | 20 38 20 43 3d 20 23 54 41 4c 4b 53 54 4b 20 28 20 73 69 7a 65 20 6f 66 20 73 74 61 63 6b 20 66 6f 72 20 70 72 69 6d 69 74 69 76 65 20 74 61 6c 6b 20 73 74 61 74 65 6d 65 6e 74 73 20 29 20 20 3F C= STOP ( phoneme to stop the chip's talking ) | 20 33 46 20 43 3d 20 53 54 4f 50 20 28 20 70 68 6f 6e 65 6d 65 20 74 6f 20 73 74 6f 70 20 74 68 65 20 63 68 69 70 27 73 20 74 61 6c 6b 69 6e 67 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 17 C= PHONEOUT ( port to stuff phoneme into ) | 20 31 37 20 43 3d 20 50 48 4f 4e 45 4f 55 54 20 28 20 70 6f 72 74 20 74 6f 20 73 74 75 66 66 20 70 68 6f 6e 65 6d 65 20 69 6e 74 6f 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 12 C= NEWPHONE ( port to read for phoneme request ) | 20 31 32 20 43 3d 20 4e 45 57 50 48 4f 4e 45 20 28 20 70 6f 72 74 20 74 6f 20 72 65 61 64 20 66 6f 72 20 70 68 6f 6e 65 6d 65 20 72 65 71 75 65 73 74 20 29 20 20 20 20 20 20 20 20 20 20 20 20 CODE BONE H POP, 1 M MVI, NEXT | 20 43 4f 44 45 20 42 4f 4e 45 20 48 20 50 4f 50 2c 20 31 20 4d 20 4d 56 49 2c 20 4e 45 58 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE BZERO H POP, 0 M MVI, NEXT | 20 43 4f 44 45 20 42 5a 45 52 4f 20 48 20 50 4f 50 2c 20 30 20 4d 20 4d 56 49 2c 20 4e 45 58 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0099 } ( VOTRAX RAM and VOCABULARY STUFF ) | 20 28 20 56 4f 54 52 41 58 20 52 41 4d 20 61 6e 64 20 56 4f 43 41 42 55 4c 41 52 59 20 53 54 55 46 46 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 BV= ONHOLD ( timer to time out before talking ) | 20 30 20 42 56 3d 20 4f 4e 48 4f 4c 44 20 28 20 74 69 6d 65 72 20 74 6f 20 74 69 6d 65 20 6f 75 74 20 62 65 66 6f 72 65 20 74 61 6c 6b 69 6e 67 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 V= TOPTALK ( top stack entry ) | 20 30 20 56 3d 20 54 4f 50 54 41 4c 4b 20 28 20 74 6f 70 20 73 74 61 63 6b 20 65 6e 74 72 79 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 VPTR @ #TALKSTK 2- -1 MAX 2 * + VPTR ! | 20 56 50 54 52 20 40 20 23 54 41 4c 4b 53 54 4b 20 32 2d 20 2d 31 20 4d 41 58 20 32 20 2a 20 2b 20 56 50 54 52 20 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 V= BOTTOMTALK ( not related to asses ) | 20 30 20 56 3d 20 42 4f 54 54 4f 4d 54 41 4c 4b 20 28 20 6e 6f 74 20 72 65 6c 61 74 65 64 20 74 6f 20 61 73 73 65 73 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 V= TALKHERE ( holds phoneme address to talk from ) | 20 30 20 56 3d 20 54 41 4c 4b 48 45 52 45 20 28 20 68 6f 6c 64 73 20 70 68 6f 6e 65 6d 65 20 61 64 64 72 65 73 73 20 74 6f 20 74 61 6c 6b 20 66 72 6f 6d 20 29 20 20 20 20 20 20 20 20 20 20 20 0 BV= PHONE# ( # of phonemes in primitive statement ) | 20 30 20 42 56 3d 20 50 48 4f 4e 45 23 20 28 20 23 20 6f 66 20 70 68 6f 6e 65 6d 65 73 20 69 6e 20 70 72 69 6d 69 74 69 76 65 20 73 74 61 74 65 6d 65 6e 74 20 29 20 20 20 20 20 20 20 20 20 20 0 V= TALKIN ( holds stack address to stuff next primitive into | 20 30 20 56 3d 20 54 41 4c 4b 49 4e 20 28 20 68 6f 6c 64 73 20 73 74 61 63 6b 20 61 64 64 72 65 73 73 20 74 6f 20 73 74 75 66 66 20 6e 65 78 74 20 70 72 69 6d 69 74 69 76 65 20 69 6e 74 6f 20 )0 V= TALKOUT ( holds stack address to talk from ) | 29 30 20 56 3d 20 54 41 4c 4b 4f 55 54 20 28 20 68 6f 6c 64 73 20 73 74 61 63 6b 20 61 64 64 72 65 73 73 20 74 6f 20 74 61 6c 6b 20 66 72 6f 6d 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 BV= MSYRND 0 BV= HTYRND ( ANTIDOUBLETALK NUMBER TRACKERS ) | 20 30 20 42 56 3d 20 4d 53 59 52 4e 44 20 30 20 42 56 3d 20 48 54 59 52 4e 44 20 28 20 41 4e 54 49 44 4f 55 42 4c 45 54 41 4c 4b 20 4e 55 4d 42 45 52 20 54 52 41 43 4b 45 52 53 20 29 20 20 20 CC? IFTRUE VOCABULARY TALKING TERSE DEFINITIONS | 20 43 43 3f 20 49 46 54 52 55 45 20 56 4f 43 41 42 55 4c 41 52 59 20 54 41 4c 4b 49 4e 47 20 54 45 52 53 45 20 44 45 46 49 4e 49 54 49 4f 4e 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { : TALK } UNMAP TALKING { ; } | 20 20 7b 20 3a 20 54 41 4c 4b 20 7d 20 55 4e 4d 41 50 20 54 41 4c 4b 49 4e 47 20 7b 20 3b 20 7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 UNMAP HERE there @ DP ! ( put behind the screen ) | 20 20 55 4e 4d 41 50 20 48 45 52 45 20 74 68 65 72 65 20 40 20 44 50 20 21 20 28 20 70 75 74 20 62 65 68 69 6e 64 20 74 68 65 20 73 63 72 65 65 6e 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 TALKING DEFINITIONS OTHERWISE { : TALK } { ; } IFEND | 20 54 41 4c 4b 49 4e 47 20 44 45 46 49 4e 49 54 49 4f 4e 53 20 4f 54 48 45 52 57 49 53 45 20 7b 20 3a 20 54 41 4c 4b 20 7d 20 7b 20 3b 20 7d 20 49 46 45 4e 44 20 20 20 20 20 20 20 20 20 20 20 --> | 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0100 } ( TALKING PHONEME EQUATES ) HEX | 28 20 54 41 4c 4b 49 4e 47 20 50 48 4f 4e 45 4d 45 20 45 51 55 41 54 45 53 20 29 20 48 45 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 C= EH3 01 C= EH2 02 C= EH1 03 C= PA0 04 C= DT | 30 30 20 43 3d 20 45 48 33 20 30 31 20 43 3d 20 45 48 32 20 30 32 20 43 3d 20 45 48 31 20 30 33 20 43 3d 20 50 41 30 20 30 34 20 43 3d 20 44 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 05 C= pA2 06 C= pA1 07 C= ZH 08 C= AH2 | 30 35 20 43 3d 20 70 41 32 20 30 36 20 43 3d 20 70 41 31 20 30 37 20 43 3d 20 5a 48 20 30 38 20 43 3d 20 41 48 32 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 09 C= I3 0A C= I2 0B C= I1 | 30 39 20 43 3d 20 49 33 20 30 41 20 43 3d 20 49 32 20 30 42 20 43 3d 20 49 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0C C= M 0D C= N 0E C= pB 0F C= V 10 C= CH 11 C= SH 12 C= Z | 30 43 20 43 3d 20 4d 20 30 44 20 43 3d 20 4e 20 30 45 20 43 3d 20 70 42 20 30 46 20 43 3d 20 56 20 31 30 20 43 3d 20 43 48 20 31 31 20 43 3d 20 53 48 20 31 32 20 43 3d 20 5a 20 20 20 20 20 20 13 C= AW1 14 C= NG 15 C= AH1 16 C= OO1 17 C= OO | 31 33 20 43 3d 20 41 57 31 20 31 34 20 43 3d 20 4e 47 20 31 35 20 43 3d 20 41 48 31 20 31 36 20 43 3d 20 4f 4f 31 20 31 37 20 43 3d 20 4f 4f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 18 C= L 19 C= K0 1A C= J0 1B C= H | 31 38 20 43 3d 20 4c 20 31 39 20 43 3d 20 4b 30 20 31 41 20 43 3d 20 4a 30 20 31 42 20 43 3d 20 48 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 1C C= G 1D C= pF 1E C= pD 1F C= S | 31 43 20 43 3d 20 47 20 31 44 20 43 3d 20 70 46 20 31 45 20 43 3d 20 70 44 20 31 46 20 43 3d 20 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 C= pA 21 C= AY 22 C= Y1 23 C= UH3 24 C= AH 25 C= P | 32 30 20 43 3d 20 70 41 20 32 31 20 43 3d 20 41 59 20 32 32 20 43 3d 20 59 31 20 32 33 20 43 3d 20 55 48 33 20 32 34 20 43 3d 20 41 48 20 32 35 20 43 3d 20 50 20 20 20 20 20 20 20 20 20 20 20 26 C= O 27 C= I0 28 C= U 29 C= Y 2A C= T 2B C= R 2C C= pE | 32 36 20 43 3d 20 4f 20 32 37 20 43 3d 20 49 30 20 32 38 20 43 3d 20 55 20 32 39 20 43 3d 20 59 20 32 41 20 43 3d 20 54 20 32 42 20 43 3d 20 52 20 32 43 20 43 3d 20 70 45 20 20 20 20 20 20 20 2D C= W 2E C= pAE 2F C= pAE1 30 C= AW2 31 C= UH2 32 C= UH1 | 32 44 20 43 3d 20 57 20 32 45 20 43 3d 20 70 41 45 20 32 46 20 43 3d 20 70 41 45 31 20 33 30 20 43 3d 20 41 57 32 20 33 31 20 43 3d 20 55 48 32 20 33 32 20 43 3d 20 55 48 31 20 20 20 20 20 20 33 C= UH 34 C= O2 35 C= O1 36 C= IU 37 C= U1 | 33 33 20 43 3d 20 55 48 20 33 34 20 43 3d 20 4f 32 20 33 35 20 43 3d 20 4f 31 20 33 36 20 43 3d 20 49 55 20 33 37 20 43 3d 20 55 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 38 C= THV 39 C= TH 3A C= ER 3B C= EH 3C C= pE1 3D C= AW | 33 38 20 43 3d 20 54 48 56 20 33 39 20 43 3d 20 54 48 20 33 41 20 43 3d 20 45 52 20 33 42 20 43 3d 20 45 48 20 33 43 20 43 3d 20 70 45 31 20 33 44 20 43 3d 20 41 57 20 20 20 20 20 20 20 20 20 3E C= PA1 ( 3F C= STOP ) | 33 45 20 43 3d 20 50 41 31 20 28 20 33 46 20 43 3d 20 53 54 4f 50 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { : HI } 80 OR { ; } { : UP } 40 OR { ; } | 7b 20 3a 20 48 49 20 7d 20 38 30 20 4f 52 20 7b 20 3b 20 7d 20 7b 20 3a 20 55 50 20 7d 20 34 30 20 4f 52 20 7b 20 3b 20 7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0101 } ( BTABLE HELPING VERBS ) | 28 20 42 54 41 42 4c 45 20 48 45 4c 50 49 4e 47 20 56 45 52 42 53 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { : PRIM } ( DATA nnnn TALK PRIM sets up a primitive ) | 7b 20 3a 20 50 52 49 4d 20 7d 20 28 20 44 41 54 41 20 6e 6e 6e 6e 20 54 41 4c 4b 20 50 52 49 4d 20 73 65 74 73 20 75 70 20 61 20 70 72 69 6d 69 74 69 76 65 20 29 20 20 20 20 20 20 20 20 20 20 HERE ~ ( mark stack ) 0 { ; } | 20 48 45 52 45 20 7e 20 28 20 6d 61 72 6b 20 73 74 61 63 6b 20 29 20 30 20 7b 20 3b 20 7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { : ENDPRIM } ( stuff primitive's size ) ^ ( clear stack off ) | 7b 20 3a 20 45 4e 44 50 52 49 4d 20 7d 20 28 20 73 74 75 66 66 20 70 72 69 6d 69 74 69 76 65 27 73 20 73 69 7a 65 20 29 20 5e 20 28 20 63 6c 65 61 72 20 73 74 61 63 6b 20 6f 66 66 20 29 20 20 DUP ( here ) HERE SWAP - 1 - SWAP BU! { ; } | 20 44 55 50 20 28 20 68 65 72 65 20 29 20 48 45 52 45 20 53 57 41 50 20 2d 20 31 20 2d 20 53 57 41 50 20 42 55 21 20 7b 20 3b 20 7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CC? IFTRUE HERE there ! DP ! TERSE DEFINITIONS IFEND | 43 43 3f 20 49 46 54 52 55 45 20 48 45 52 45 20 74 68 65 72 65 20 21 20 44 50 20 21 20 54 45 52 53 45 20 44 45 46 49 4e 49 54 49 4f 4e 53 20 49 46 45 4e 44 20 20 20 20 20 20 20 20 20 20 20 20 SUBR speaklink .REL 10 IN, 80 ANI, RZ, | 53 55 42 52 20 73 70 65 61 6b 6c 69 6e 6b 20 2e 52 45 4c 20 31 30 20 49 4e 2c 20 38 30 20 41 4e 49 2c 20 52 5a 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DI, TALKIN LHLD, E M MOV, H INX, D M MOV, H INX, | 44 49 2c 20 54 41 4c 4b 49 4e 20 4c 48 4c 44 2c 20 45 20 4d 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 44 20 4d 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 XCHG, BOTTOMTALK H LXI, A ANA, D DSBC, <, IF, TOPTALK D LXI, | 58 43 48 47 2c 20 42 4f 54 54 4f 4d 54 41 4c 4b 20 48 20 4c 58 49 2c 20 41 20 41 4e 41 2c 20 44 20 44 53 42 43 2c 20 3c 2c 20 49 46 2c 20 54 4f 50 54 41 4c 4b 20 44 20 4c 58 49 2c 20 20 20 20 THEN, TALKIN SDED, EI, RET, | 54 48 45 4e 2c 20 54 41 4c 4b 49 4e 20 53 44 45 44 2c 20 45 49 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HEX SUBR speak SETTINGS IN, 8 ANI, speaklink JNZ, 0C000 JMP, | 48 45 58 20 53 55 42 52 20 73 70 65 61 6b 20 53 45 54 54 49 4e 47 53 20 49 4e 2c 20 38 20 41 4e 49 2c 20 73 70 65 61 6b 6c 69 6e 6b 20 4a 4e 5a 2c 20 30 43 30 30 30 20 4a 4d 50 2c 20 20 20 20 .ABS | 2e 41 42 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE SPEAK D POP, speak CALL, NEXT | 43 4f 44 45 20 53 50 45 41 4b 20 44 20 50 4f 50 2c 20 73 70 65 61 6b 20 43 41 4c 4c 2c 20 4e 45 58 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0102 } ( SUBR TO EMBED IN INTERRUPTS ) HEX | 28 20 53 55 42 52 20 54 4f 20 45 4d 42 45 44 20 49 4e 20 49 4e 54 45 52 52 55 50 54 53 20 29 20 48 45 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ASM SUBR PHONE ONHOLD LDA, A ORA, 0=, IF, | 41 53 4d 20 53 55 42 52 20 50 48 4f 4e 45 20 4f 4e 48 4f 4c 44 20 4c 44 41 2c 20 41 20 4f 52 41 2c 20 30 3d 2c 20 49 46 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 NEWPHONE IN, 7 A BIT, <>, IF, ( chip's ready for more ) | 20 20 4e 45 57 50 48 4f 4e 45 20 49 4e 2c 20 37 20 41 20 42 49 54 2c 20 3c 3e 2c 20 49 46 2c 20 28 20 63 68 69 70 27 73 20 72 65 61 64 79 20 66 6f 72 20 6d 6f 72 65 20 29 20 20 20 20 20 20 20 PHONE# LDA, A ORA, 0=, IF, ( primitive's done ) | 20 20 20 50 48 4f 4e 45 23 20 4c 44 41 2c 20 41 20 4f 52 41 2c 20 30 3d 2c 20 49 46 2c 20 28 20 70 72 69 6d 69 74 69 76 65 27 73 20 64 6f 6e 65 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 TALKIN LHLD, TALKOUT LDED, D DSBC, <>, IF, ( more to say ) | 20 20 20 20 54 41 4c 4b 49 4e 20 4c 48 4c 44 2c 20 54 41 4c 4b 4f 55 54 20 4c 44 45 44 2c 20 44 20 44 53 42 43 2c 20 3c 3e 2c 20 49 46 2c 20 28 20 6d 6f 72 65 20 74 6f 20 73 61 79 20 29 20 20 0D15 B LXI, A INP, | 20 30 44 31 35 20 42 20 4c 58 49 2c 20 41 20 49 4e 50 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 XCHG, M E MOV, H INX, M D MOV, ( next prim's addr ) | 20 20 20 20 58 43 48 47 2c 20 4d 20 45 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 4d 20 44 20 4d 4f 56 2c 20 28 20 6e 65 78 74 20 70 72 69 6d 27 73 20 61 64 64 72 20 29 20 20 20 20 20 20 20 20 20 XCHG, M A MOV, ( PHONE# ) H INX, TALKHERE SHLD, | 20 20 20 20 58 43 48 47 2c 20 4d 20 41 20 4d 4f 56 2c 20 28 20 50 48 4f 4e 45 23 20 29 20 48 20 49 4e 58 2c 20 54 41 4c 4b 48 45 52 45 20 53 48 4c 44 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 ELSE, 3F00 PHONEOUT + B LXI, A INP, 0C15 B LXI, A INP, RET, | 20 45 4c 53 45 2c 20 33 46 30 30 20 50 48 4f 4e 45 4f 55 54 20 2b 20 42 20 4c 58 49 2c 20 41 20 49 4e 50 2c 20 30 43 31 35 20 42 20 4c 58 49 2c 20 41 20 49 4e 50 2c 20 52 45 54 2c 20 20 20 20 THEN, ELSE, TALKHERE LHLD, THEN, A DCR, 0=, IF, | 20 54 48 45 4e 2c 20 20 20 45 4c 53 45 2c 20 54 41 4c 4b 48 45 52 45 20 4c 48 4c 44 2c 20 54 48 45 4e 2c 20 41 20 44 43 52 2c 20 30 3d 2c 20 49 46 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 EXX, TALKOUT LHLD, 2 D LXI, D DAD, XCHG, BOTTOMTALK H LXI, | 20 20 45 58 58 2c 20 54 41 4c 4b 4f 55 54 20 4c 48 4c 44 2c 20 32 20 44 20 4c 58 49 2c 20 44 20 44 41 44 2c 20 58 43 48 47 2c 20 42 4f 54 54 4f 4d 54 41 4c 4b 20 48 20 4c 58 49 2c 20 20 20 20 A ORA, D DSBC, <, IF, TOPTALK D LXI, THEN, TALKOUT SDED, EXX, | 20 20 41 20 4f 52 41 2c 20 44 20 44 53 42 43 2c 20 3c 2c 20 49 46 2c 20 54 4f 50 54 41 4c 4b 20 44 20 4c 58 49 2c 20 54 48 45 4e 2c 20 54 41 4c 4b 4f 55 54 20 53 44 45 44 2c 20 45 58 58 2c 20 THEN, PHONE# STA, M B MOV, ( next phoneme ) H INX, | 20 20 54 48 45 4e 2c 20 50 48 4f 4e 45 23 20 53 54 41 2c 20 4d 20 42 20 4d 4f 56 2c 20 28 20 6e 65 78 74 20 70 68 6f 6e 65 6d 65 20 29 20 48 20 49 4e 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 PHONEOUT C MVI, A INP, TALKHERE SHLD, THEN, ELSE, | 20 50 48 4f 4e 45 4f 55 54 20 43 20 4d 56 49 2c 20 41 20 49 4e 50 2c 20 54 41 4c 4b 48 45 52 45 20 53 48 4c 44 2c 20 54 48 45 4e 2c 20 45 4c 53 45 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 A DCR, ONHOLD STA, THEN, RET, --> | 20 41 20 44 43 52 2c 20 4f 4e 48 4f 4c 44 20 53 54 41 2c 20 54 48 45 4e 2c 20 52 45 54 2c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0103 } ( GORF TALKING PRIMITIVES ) | 28 20 47 4f 52 46 20 54 41 4c 4b 49 4e 47 20 50 52 49 4d 49 54 49 56 45 53 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CC? IFTRUE TERSE DEFINITIONS IFEND | 43 43 3f 20 49 46 54 52 55 45 20 54 45 52 53 45 20 44 45 46 49 4e 49 54 49 4f 4e 53 20 49 46 45 4e 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA 'INSERT TALK PRIM | 44 41 54 41 20 27 49 4e 53 45 52 54 20 54 41 4c 4b 20 50 52 49 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 PA1 I0 N S ER T PA1 K0 O1 UH3 I3 AY N N PA1 ENDPRIM | 20 50 41 31 20 49 30 20 4e 20 53 20 45 52 20 54 20 50 41 31 20 4b 30 20 4f 31 20 55 48 33 20 49 33 20 41 59 20 4e 20 4e 20 50 41 31 20 45 4e 44 50 52 49 4d 20 20 20 20 20 20 20 20 20 20 20 20 DATA 'GORF TALK PRIM PA1 | 44 41 54 41 20 27 47 4f 52 46 20 54 41 4c 4b 20 50 52 49 4d 20 50 41 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 AH1 I1 UP Y UP pAE M UP THV UH1 UP G DT O1 R UP pF UP Y pA1 N | 20 41 48 31 20 49 31 20 55 50 20 59 20 55 50 20 70 41 45 20 4d 20 55 50 20 54 48 56 20 55 48 31 20 55 50 20 47 20 44 54 20 4f 31 20 52 20 55 50 20 70 46 20 55 50 20 59 20 70 41 31 20 4e 20 20 EH1 UP M UP P AH1 I1 R PA1 ENDPRIM | 20 45 48 31 20 55 50 20 4d 20 55 50 20 50 20 41 48 31 20 49 31 20 52 20 50 41 31 20 45 4e 44 50 52 49 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA 'SPACE TALK PRIM | 44 41 54 41 20 27 53 50 41 43 45 20 54 41 4c 4b 20 50 52 49 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 S P pA1 I3 UP Y UP S UP ENDPRIM | 20 53 20 50 20 70 41 31 20 49 33 20 55 50 20 59 20 55 50 20 53 20 55 50 20 45 4e 44 50 52 49 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA 'CONQUER TALK PRIM | 44 41 54 41 20 27 43 4f 4e 51 55 45 52 20 54 41 4c 4b 20 50 52 49 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 G DT O1 UP R UP pF UP Y UP pA1 N S K0 AH1 N K0 UP ER UP | 20 47 20 44 54 20 4f 31 20 55 50 20 52 20 55 50 20 70 46 20 55 50 20 59 20 55 50 20 70 41 31 20 4e 20 53 20 4b 30 20 41 48 31 20 4e 20 4b 30 20 55 50 20 45 52 20 55 50 20 20 20 20 20 20 20 20 AH2 N UP UH UP TH UP ER G UP pAE1 L UH1 K0 UP S Y PA1 ENDPRIM | 20 41 48 32 20 4e 20 55 50 20 55 48 20 55 50 20 54 48 20 55 50 20 45 52 20 47 20 55 50 20 70 41 45 31 20 4c 20 55 48 31 20 4b 30 20 55 50 20 53 20 59 20 50 41 31 20 45 4e 44 50 52 49 4d 20 20 DATA 'TRY TALK PRIM | 44 41 54 41 20 27 54 52 59 20 54 41 4c 4b 20 50 52 49 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 T R UP AH2 UP I1 UP Y UP PA0 UH1 G UP EH1 UP I3 N PA1 PA1 AH1 | 20 54 20 52 20 55 50 20 41 48 32 20 55 50 20 49 31 20 55 50 20 59 20 55 50 20 50 41 30 20 55 48 31 20 47 20 55 50 20 45 48 31 20 55 50 20 49 33 20 4e 20 50 41 31 20 50 41 31 20 41 48 31 20 20 I1 UP Y1 UP pD Y V AH1 UP U1 ER K0 UP O1 UP UH3 I3 pE1 N S PA1 | 49 31 20 55 50 20 59 31 20 55 50 20 70 44 20 59 20 56 20 41 48 31 20 55 50 20 55 31 20 45 52 20 4b 30 20 55 50 20 4f 31 20 55 50 20 55 48 33 20 49 33 20 70 45 31 20 4e 20 53 20 50 41 31 20 20 ENDPRIM --> | 45 4e 44 50 52 49 4d 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0104 } ( GORF PHRASES ) | 28 20 47 4f 52 46 20 50 48 52 41 53 45 53 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA 'LONG TALK PRIM | 44 41 54 41 20 27 4c 4f 4e 47 20 54 41 4c 4b 20 50 52 49 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 PA1 L AW UP NG UP L I1 UP V UP G UP DT UP O1 UP O1 UP R R pF pF | 20 50 41 31 20 4c 20 41 57 20 55 50 20 4e 47 20 55 50 20 4c 20 49 31 20 55 50 20 56 20 55 50 20 47 20 55 50 20 44 54 20 55 50 20 4f 31 20 55 50 20 4f 31 20 55 50 20 52 20 52 20 70 46 20 70 46 ENDPRIM | 20 45 4e 44 50 52 49 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA 'ROBOTS TALK PRIM | 44 41 54 41 20 27 52 4f 42 4f 54 53 20 54 41 4c 4b 20 50 52 49 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 G UP DT UP O1 UP R UP pF UP pE1 UP EH2 N | 20 47 20 55 50 20 44 54 20 55 50 20 4f 31 20 55 50 20 52 20 55 50 20 70 46 20 55 50 20 70 45 31 20 55 50 20 45 48 32 20 4e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 R UP O1 UP U1 UP pB AH1 UH3 T S PA1 PA1 | 20 52 20 55 50 20 4f 31 20 55 50 20 55 31 20 55 50 20 70 42 20 41 48 31 20 55 48 33 20 54 20 53 20 50 41 31 20 50 41 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 UH1 T pAE EH3 UP K0 UP PA0 UH1 T pAE EH3 UP K0 UP PA1 ENDPRIM | 20 55 48 31 20 54 20 70 41 45 20 45 48 33 20 55 50 20 4b 30 20 55 50 20 50 41 30 20 55 48 31 20 54 20 70 41 45 20 45 48 33 20 55 50 20 4b 30 20 55 50 20 50 41 31 20 45 4e 44 50 52 49 4d 20 20 DATA 'BADMOVE TALK PRIM | 44 41 54 41 20 27 42 41 44 4d 4f 56 45 20 54 41 4c 4b 20 50 52 49 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 pB pAE EH1 UP pD UP M UP U UP U1 V PA1 | 20 70 42 20 70 41 45 20 45 48 31 20 55 50 20 70 44 20 55 50 20 4d 20 55 50 20 55 20 55 50 20 55 31 20 56 20 50 41 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ENDPRIM | 20 45 4e 44 50 52 49 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA 'HA TALK PRIM | 44 41 54 41 20 27 48 41 20 54 41 4c 4b 20 50 52 49 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 H UP AH1 UP H AH1 UP H AH1 UP H AH1 PA1 ENDPRIM | 20 48 20 55 50 20 41 48 31 20 55 50 20 48 20 41 48 31 20 55 50 20 48 20 41 48 31 20 55 50 20 48 20 41 48 31 20 50 41 31 20 45 4e 44 50 52 49 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0105 } ( GORF PHRASES ) | 28 20 47 4f 52 46 20 50 48 52 41 53 45 53 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA 'ESCAPE TALK PRIM | 44 41 54 41 20 27 45 53 43 41 50 45 20 54 41 4c 4b 20 50 52 49 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 Y1 I1 U1 UP U1 UP K0 pAE1 UP N UP UH1 T PA0 EH1 S K0 pA2 UP | 20 59 31 20 49 31 20 55 31 20 55 50 20 55 31 20 55 50 20 4b 30 20 70 41 45 31 20 55 50 20 4e 20 55 50 20 55 48 31 20 54 20 50 41 30 20 45 48 31 20 53 20 4b 30 20 70 41 32 20 55 50 20 20 20 20 pE1 UP P UP THV UH1 G DT O1 UP R UP pF UP Y UP pA1 N | 20 70 45 31 20 55 50 20 50 20 55 50 20 54 48 56 20 55 48 31 20 47 20 44 54 20 4f 31 20 55 50 20 52 20 55 50 20 70 46 20 55 50 20 59 20 55 50 20 70 41 31 20 4e 20 20 20 20 20 20 20 20 20 20 20 PA0 R O1 UP U1 UP pB AH1 T S PA1 ENDPRIM | 20 50 41 30 20 52 20 4f 31 20 55 50 20 55 31 20 55 50 20 70 42 20 41 48 31 20 54 20 53 20 50 41 31 20 45 4e 44 50 52 49 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA 'GOTYOU TALK PRIM | 44 41 54 41 20 27 47 4f 54 59 4f 55 20 54 41 4c 4b 20 50 52 49 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 G AH1 EH3 UP T UP Y1 UP I3 U1 PA1 ENDPRIM | 20 47 20 41 48 31 20 45 48 33 20 55 50 20 54 20 55 50 20 59 31 20 55 50 20 49 33 20 55 31 20 50 41 31 20 45 4e 44 50 52 49 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA 'NICE TALK PRIM | 44 41 54 41 20 27 4e 49 43 45 20 54 41 4c 4b 20 50 52 49 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 N UH3 AH2 UP Y UP S UP PA0 UP | 20 4e 20 55 48 33 20 41 48 32 20 55 50 20 59 20 55 50 20 53 20 55 50 20 50 41 30 20 55 50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SH UP AH1 UP UH3 T PA1 ENDPRIM | 20 53 48 20 55 50 20 41 48 31 20 55 50 20 55 48 33 20 54 20 50 41 31 20 45 4e 44 50 52 49 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA 'TOOBAD TALK PRIM | 44 41 54 41 20 27 54 4f 4f 42 41 44 20 54 41 4c 4b 20 50 52 49 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 T U UP pB UP pAE UP EH3 pD PA1 ENDPRIM | 20 54 20 55 20 55 50 20 70 42 20 55 50 20 70 41 45 20 55 50 20 45 48 33 20 70 44 20 50 41 31 20 45 4e 44 50 52 49 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA 'PRIS TALK PRIM | 44 41 54 41 20 27 50 52 49 53 20 54 41 4c 4b 20 50 52 49 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 G DT O1 UP R UP pF Y pA1 N S T pA UP K0 UP N O UP | 20 47 20 44 54 20 4f 31 20 55 50 20 52 20 55 50 20 70 46 20 59 20 70 41 31 20 4e 20 53 20 54 20 70 41 20 55 50 20 4b 30 20 55 50 20 4e 20 4f 20 55 50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 P R UP I1 UP S UP I3 UP N EH3 R S PA1 ENDPRIM --> | 20 50 20 52 20 55 50 20 49 31 20 55 50 20 53 20 55 50 20 49 33 20 55 50 20 4e 20 45 48 33 20 52 20 53 20 50 41 31 20 45 4e 44 50 52 49 4d 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0106 } ( GORF PHRASES ) | 28 20 47 4f 52 46 20 50 48 52 41 53 45 53 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA 'CADET TALK PRIM | 44 41 54 41 20 27 43 41 44 45 54 20 54 41 4c 4b 20 50 52 49 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 K0 UH pD EH2 UP T UP PA1 ENDPRIM | 20 4b 30 20 55 48 20 70 44 20 45 48 32 20 55 50 20 54 20 55 50 20 50 41 31 20 45 4e 44 50 52 49 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA 'CAPT TALK PRIM | 44 41 54 41 20 27 43 41 50 54 20 54 41 4c 4b 20 50 52 49 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 K0 pAE1 UP EH3 UP P UP T I3 N PA1 ENDPRIM | 20 4b 30 20 70 41 45 31 20 55 50 20 45 48 33 20 55 50 20 50 20 55 50 20 54 20 49 33 20 4e 20 50 41 31 20 45 4e 44 50 52 49 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA 'COLONEL TALK PRIM | 44 41 54 41 20 27 43 4f 4c 4f 4e 45 4c 20 54 41 4c 4b 20 50 52 49 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 K0 ER UP N UP AH2 L PA1 ENDPRIM | 20 4b 30 20 45 52 20 55 50 20 4e 20 55 50 20 41 48 32 20 4c 20 50 41 31 20 45 4e 44 50 52 49 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA 'GENERAL TALK PRIM | 44 41 54 41 20 27 47 45 4e 45 52 41 4c 20 54 41 4c 4b 20 50 52 49 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 pD J0 EH2 UP N UP ER UH3 L PA1 ENDPRIM | 20 70 44 20 4a 30 20 45 48 32 20 55 50 20 4e 20 55 50 20 45 52 20 55 48 33 20 4c 20 50 41 31 20 45 4e 44 50 52 49 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA 'WARRIOR TALK PRIM | 44 41 54 41 20 27 57 41 52 52 49 4f 52 20 54 41 4c 4b 20 50 52 49 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 W O UP R UP AY UP Y1 UP EH3 R PA1 ENDPRIM | 20 57 20 4f 20 55 50 20 52 20 55 50 20 41 59 20 55 50 20 59 31 20 55 50 20 45 48 33 20 52 20 50 41 31 20 45 4e 44 50 52 49 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA 'AVENGER TALK PRIM | 44 41 54 41 20 27 41 56 45 4e 47 45 52 20 54 41 4c 4b 20 50 52 49 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 UH1 V EH1 UP EH3 UP N UP N pD J0 ER PA1 ENDPRIM | 20 55 48 31 20 56 20 45 48 31 20 55 50 20 45 48 33 20 55 50 20 4e 20 55 50 20 4e 20 70 44 20 4a 30 20 45 52 20 50 41 31 20 45 4e 44 50 52 49 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA 'PROMOTE TALK PRIM | 44 41 54 41 20 27 50 52 4f 4d 4f 54 45 20 54 41 4c 4b 20 50 52 49 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 Y1 IU U1 UP U1 UP H pAE1 EH3 UP V UP pB EH3 EH1 UP N UP | 20 59 31 20 49 55 20 55 31 20 55 50 20 55 31 20 55 50 20 48 20 70 41 45 31 20 45 48 33 20 55 50 20 56 20 55 50 20 70 42 20 45 48 33 20 45 48 31 20 55 50 20 4e 20 55 50 20 20 20 20 20 20 20 20 P R UH2 M O UP T UP EH3 pD PA0 T IU U1 PA0 ENDPRIM --> | 20 50 20 52 20 55 48 32 20 4d 20 4f 20 55 50 20 54 20 55 50 20 45 48 33 20 70 44 20 50 41 30 20 54 20 49 55 20 55 31 20 50 41 30 20 45 4e 44 50 52 49 4d 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 { BLOCK 0107 } ( GORF PHRASES FOR PLAYER HIT ) | 28 20 47 4f 52 46 20 50 48 52 41 53 45 53 20 46 4f 52 20 50 4c 41 59 45 52 20 48 49 54 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA 'SOME TALK PRIM | 44 41 54 41 20 27 53 4f 4d 45 20 54 41 4c 4b 20 50 52 49 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 S UH M G UH1 L pAE K0 T I1 K0 PA0 pD pE1 pF UP EH1 UP N pD ER | 20 53 20 55 48 20 4d 20 47 20 55 48 31 20 4c 20 70 41 45 20 4b 30 20 54 20 49 31 20 4b 30 20 50 41 30 20 70 44 20 70 45 31 20 70 46 20 55 50 20 45 48 31 20 55 50 20 4e 20 70 44 20 45 52 20 20 PA0 Y IU UP U1 UP U1 UP UH R PA1 ENDPRIM | 20 50 41 30 20 59 20 49 55 20 55 50 20 55 31 20 55 50 20 55 31 20 55 50 20 55 48 20 52 20 50 41 31 20 45 4e 44 50 52 49 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA 'BITE TALK PRIM | 44 41 54 41 20 27 42 49 54 45 20 54 41 4c 4b 20 50 52 49 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 pB AH2 I3 Y1 UP UP T UP THV UH UP pD UP UH UP S T PA1 | 20 70 42 20 41 48 32 20 49 33 20 59 31 20 55 50 20 55 50 20 54 20 55 50 20 54 48 56 20 55 48 20 55 50 20 70 44 20 55 50 20 55 48 20 55 50 20 53 20 54 20 50 41 31 20 20 20 20 20 20 20 20 20 20 ENDPRIM | 45 4e 44 50 52 49 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0108 } ( GORF PHRASES FOR PLAYER HIT ) | 28 20 47 4f 52 46 20 50 48 52 41 53 45 53 20 46 4f 52 20 50 4c 41 59 45 52 20 48 49 54 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA 'HAIL TALK PRIM | 44 41 54 41 20 27 48 41 49 4c 20 54 41 4c 4b 20 50 52 49 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 AW L H pA1 UP AY UP L THV UH S U1 P UP R UP pE1 UP M PA1 | 20 41 57 20 4c 20 48 20 70 41 31 20 55 50 20 41 59 20 55 50 20 4c 20 54 48 56 20 55 48 20 53 20 55 31 20 50 20 55 50 20 52 20 55 50 20 70 45 31 20 55 50 20 4d 20 50 41 31 20 20 20 20 20 20 20 G DT O1 UP R UP F Y pA1 N PA1 EH UP M UP P AH2 I3 Y R PA1 | 20 47 20 44 54 20 4f 31 20 55 50 20 52 20 55 50 20 46 20 59 20 70 41 31 20 4e 20 50 41 31 20 45 48 20 55 50 20 4d 20 55 50 20 50 20 41 48 32 20 49 33 20 59 20 52 20 50 41 31 20 20 20 20 20 20 ENDPRIM | 20 45 4e 44 50 52 49 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA 'ENEMY TALK PRIM | 44 41 54 41 20 27 45 4e 45 4d 59 20 54 41 4c 4b 20 50 52 49 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 AH1 N UH THV R UP R UP PA0 EH1 N EH1 M Y | 20 41 48 31 20 4e 20 55 48 20 54 48 56 20 52 20 55 50 20 52 20 55 50 20 50 41 30 20 45 48 31 20 4e 20 45 48 31 20 4d 20 59 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SH I0 P PA0 pD UP pE1 UP S UP T R O1 I1 Y1 pD PA1 ENDPRIM | 20 53 48 20 49 30 20 50 20 50 41 30 20 70 44 20 55 50 20 70 45 31 20 55 50 20 53 20 55 50 20 54 20 52 20 4f 31 20 49 31 20 59 31 20 70 44 20 50 41 31 20 45 4e 44 50 52 49 4d 20 20 20 20 20 20 DATA 'BETCHA TALK PRIM | 44 41 54 41 20 27 42 45 54 43 48 41 20 54 41 4c 4b 20 50 52 49 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 Y O UP R UP EH N pD PA0 pD R AW1 S N I0 UP R ENDPRIM | 20 59 20 4f 20 55 50 20 52 20 55 50 20 45 48 20 4e 20 70 44 20 50 41 30 20 70 44 20 52 20 41 57 31 20 53 20 4e 20 49 30 20 55 50 20 52 20 45 4e 44 50 52 49 4d 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0109 } ( GETRANK, COINSOUND, GOYAK, AND COINYAK ) HEX | 28 20 47 45 54 52 41 4e 4b 2c 20 43 4f 49 4e 53 4f 55 4e 44 2c 20 47 4f 59 41 4b 2c 20 41 4e 44 20 43 4f 49 4e 59 41 4b 20 29 20 48 45 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 TABLE RKTBL 'CADET , 'CAPT , 'COLONEL , 'GENERAL , 'WARRIOR , | 54 41 42 4c 45 20 52 4b 54 42 4c 20 27 43 41 44 45 54 20 2c 20 27 43 41 50 54 20 2c 20 27 43 4f 4c 4f 4e 45 4c 20 2c 20 27 47 45 4e 45 52 41 4c 20 2c 20 27 57 41 52 52 49 4f 52 20 2c 20 20 20 'AVENGER , : GETRANK SKILLFACTOR B@ 5 MIN | 20 27 41 56 45 4e 47 45 52 20 2c 20 3a 20 47 45 54 52 41 4e 4b 20 53 4b 49 4c 4c 46 41 43 54 4f 52 20 42 40 20 35 20 4d 49 4e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 'SPACE SPEAK RKTBL @ ; | 20 27 53 50 41 43 45 20 53 50 45 41 4b 20 52 4b 54 42 4c 20 40 20 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA GOYTBL 'INSERT , 'GORF , 'LONG , 'INSERT , | 44 41 54 41 20 47 4f 59 54 42 4c 20 27 49 4e 53 45 52 54 20 2c 20 27 47 4f 52 46 20 2c 20 27 4c 4f 4e 47 20 2c 20 27 49 4e 53 45 52 54 20 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA COINSOUND1 ASM 86 VIBS HERE 10 MASTER 3 1 3C 10 RAMP | 44 41 54 41 20 43 4f 49 4e 53 4f 55 4e 44 31 20 41 53 4d 20 38 36 20 56 49 42 53 20 48 45 52 45 20 31 30 20 4d 41 53 54 45 52 20 33 20 31 20 33 43 20 31 30 20 52 41 4d 50 20 20 20 20 20 20 20 #G1 #E1 #C2 TONES FF ABVOLS 0F MCVOLS 40 DURATION QUIET | 20 23 47 31 20 23 45 31 20 23 43 32 20 54 4f 4e 45 53 20 46 46 20 41 42 56 4f 4c 53 20 30 46 20 4d 43 56 4f 4c 53 20 34 30 20 44 55 52 41 54 49 4f 4e 20 51 55 49 45 54 20 20 20 20 20 20 20 20 DATA COINSOUND2 ASM ( there ) LDPCC | 44 41 54 41 20 43 4f 49 4e 53 4f 55 4e 44 32 20 41 53 4d 20 28 20 74 68 65 72 65 20 29 20 4c 44 50 43 43 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 : CNSD COINSOUND1 B2MUSIC ; | 3a 20 43 4e 53 44 20 43 4f 49 4e 53 4f 55 4e 44 31 20 42 32 4d 55 53 49 43 20 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR GOYAK GOYFLAG LDA, A ANA, RNZ, GJ CALL, 0F ANI, RZ, | 53 55 42 52 20 47 4f 59 41 4b 20 47 4f 59 46 4c 41 47 20 4c 44 41 2c 20 41 20 41 4e 41 2c 20 52 4e 5a 2c 20 47 4a 20 43 41 4c 4c 2c 20 30 46 20 41 4e 49 2c 20 52 5a 2c 20 20 20 20 20 20 20 20 1 A MVI, MUSICFLAG STA, PHONE# LDA, A ANA, 0=, IF, | 31 20 41 20 4d 56 49 2c 20 4d 55 53 49 43 46 4c 41 47 20 53 54 41 2c 20 50 48 4f 4e 45 23 20 4c 44 41 2c 20 41 20 41 4e 41 2c 20 30 3d 2c 20 49 46 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 TALKIN LHLD, TALKOUT LDED, D DSBC, 0=, IF, | 54 41 4c 4b 49 4e 20 4c 48 4c 44 2c 20 54 41 4c 4b 4f 55 54 20 4c 44 45 44 2c 20 44 20 44 53 42 43 2c 20 30 3d 2c 20 49 46 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3B A MVI, ONHOLD STA, COINSOUND2 H LXI, MB1 Y LXIX, pmusic CALL, | 33 42 20 41 20 4d 56 49 2c 20 4f 4e 48 4f 4c 44 20 53 54 41 2c 20 43 4f 49 4e 53 4f 55 4e 44 32 20 48 20 4c 58 49 2c 20 4d 42 31 20 59 20 4c 58 49 58 2c 20 70 6d 75 73 69 63 20 43 41 4c 4c 2c THEN, THEN, LDAR, 3 ANI, RLC, A E MOV, 0 D MVI, | 20 54 48 45 4e 2c 20 54 48 45 4e 2c 20 4c 44 41 52 2c 20 33 20 41 4e 49 2c 20 52 4c 43 2c 20 41 20 45 20 4d 4f 56 2c 20 30 20 44 20 4d 56 49 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 GOYTBL H LXI, D DAD, M E MOV, H INX, M D MOV, | 47 4f 59 54 42 4c 20 48 20 4c 58 49 2c 20 44 20 44 41 44 2c 20 4d 20 45 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 4d 20 44 20 4d 4f 56 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 1 A MVI, GOYFLAG STA, speak JMP, --> | 31 20 41 20 4d 56 49 2c 20 47 4f 59 46 4c 41 47 20 53 54 41 2c 20 73 70 65 61 6b 20 4a 4d 50 2c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0110 } ( LBYAK, HITYAK ) | 28 20 4c 42 59 41 4b 2c 20 48 49 54 59 41 4b 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 TABLE LBYTBL 'CONQUER , 'TRY , 'ESCAPE , 'GORF , 'HAIL , | 54 41 42 4c 45 20 4c 42 59 54 42 4c 20 27 43 4f 4e 51 55 45 52 20 2c 20 27 54 52 59 20 2c 20 27 45 53 43 41 50 45 20 2c 20 27 47 4f 52 46 20 2c 20 27 48 41 49 4c 20 2c 20 20 20 20 20 20 20 20 : LBYAK 2 RND IF 'TOOBAD ELSE 'BITE THEN SPEAK GETRANK SPEAK | 3a 20 4c 42 59 41 4b 20 32 20 52 4e 44 20 49 46 20 27 54 4f 4f 42 41 44 20 45 4c 53 45 20 27 42 49 54 45 20 54 48 45 4e 20 53 50 45 41 4b 20 47 45 54 52 41 4e 4b 20 53 50 45 41 4b 20 20 20 20 5 RND LBYTBL @ SPEAK ; | 20 35 20 52 4e 44 20 4c 42 59 54 42 4c 20 40 20 53 50 45 41 4b 20 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 TABLE HITYTBL 'HA , 'ENEMY , 'BETCHA , 'BADMOVE , 'GOTYOU , | 54 41 42 4c 45 20 48 49 54 59 54 42 4c 20 27 48 41 20 2c 20 27 45 4e 45 4d 59 20 2c 20 27 42 45 54 43 48 41 20 2c 20 27 42 41 44 4d 4f 56 45 20 2c 20 27 47 4f 54 59 4f 55 20 2c 20 20 20 20 20 'SOME , : HITYAK HTYRND 6 UNEQRND DUP 1 > IF HITYTBL @ SPEAK | 27 53 4f 4d 45 20 2c 20 3a 20 48 49 54 59 41 4b 20 48 54 59 52 4e 44 20 36 20 55 4e 45 51 52 4e 44 20 44 55 50 20 31 20 3e 20 49 46 20 48 49 54 59 54 42 4c 20 40 20 53 50 45 41 4b 20 20 20 20 GETRANK ELSE HITYTBL @ THEN SPEAK ; | 47 45 54 52 41 4e 4b 20 45 4c 53 45 20 48 49 54 59 54 42 4c 20 40 20 54 48 45 4e 20 53 50 45 41 4b 20 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0111 } ( CLEAR BLOCK COMMAND - USES THE PATTERN BOARD ) | 28 20 43 4c 45 41 52 20 42 4c 4f 43 4b 20 43 4f 4d 4d 41 4e 44 20 2d 20 55 53 45 53 20 54 48 45 20 50 41 54 54 45 52 4e 20 42 4f 41 52 44 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HEX ( THIS VERSION CLEARS A 1K BLOCK ) | 48 45 58 20 28 20 54 48 49 53 20 56 45 52 53 49 4f 4e 20 43 4c 45 41 52 53 20 41 20 31 4b 20 42 4c 4f 43 4b 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 BV= PIXVAL | 30 20 42 56 3d 20 50 49 58 56 41 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR clear1k 20 A MVI, PBSTAT OUT, PIXVAL H LXI, | 53 55 42 52 20 63 6c 65 61 72 31 6b 20 32 30 20 41 20 4d 56 49 2c 20 50 42 53 54 41 54 20 4f 55 54 2c 20 50 49 58 56 41 4c 20 48 20 4c 58 49 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 M MVI, L A MOV, PBLINADRL OUT, H A MOV, PBLINADRH OUT, | 30 20 4d 20 4d 56 49 2c 20 4c 20 41 20 4d 4f 56 2c 20 50 42 4c 49 4e 41 44 52 4c 20 4f 55 54 2c 20 48 20 41 20 4d 4f 56 2c 20 50 42 4c 49 4e 41 44 52 48 20 4f 55 54 2c 20 20 20 20 20 20 20 20 E A MOV, PBAREADRL OUT, D A MOV, PBAREADRH OUT, | 45 20 41 20 4d 4f 56 2c 20 50 42 41 52 45 41 44 52 4c 20 4f 55 54 2c 20 44 20 41 20 4d 4f 56 2c 20 50 42 41 52 45 41 44 52 48 20 4f 55 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 1 A MVI, PBXMOD OUT, | 31 20 41 20 4d 56 49 2c 20 50 42 58 4d 4f 44 20 4f 55 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7F A MVI, PBXWIDE OUT, 7 A MVI, PBYHIGH OUT, RET, | 37 46 20 41 20 4d 56 49 2c 20 50 42 58 57 49 44 45 20 4f 55 54 2c 20 37 20 41 20 4d 56 49 2c 20 50 42 59 48 49 47 48 20 4f 55 54 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 F= CLLL | 46 3d 20 43 4c 4c 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE CL 4000 D LXI, | 4e 45 58 54 20 41 53 53 45 4d 42 4c 45 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0112 } ( JAYS VIDEO GAME GOODIES ) | 28 20 4a 41 59 53 20 56 49 44 45 4f 20 47 41 4d 45 20 47 4f 4f 44 49 45 53 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL { : BINARY } 2 BASE ! { ; } | 44 45 43 49 4d 41 4c 20 7b 20 3a 20 42 49 4e 41 52 59 20 7d 20 32 20 42 41 53 45 20 21 20 7b 20 3b 20 7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { : QUAD } 4 BASE ! { ; } | 7b 20 3a 20 51 55 41 44 20 7d 20 34 20 42 41 53 45 20 21 20 7b 20 3b 20 7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HEX | 48 45 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CC? IFTRUE : GRAPHICS MAP 0 FB OUTP ; OTHERWISE : GRAPHICS ; | 43 43 3f 20 49 46 54 52 55 45 20 3a 20 47 52 41 50 48 49 43 53 20 4d 41 50 20 30 20 46 42 20 4f 55 54 50 20 3b 20 4f 54 48 45 52 57 49 53 45 20 3a 20 47 52 41 50 48 49 43 53 20 3b 20 20 20 20 IFEND | 49 46 45 4e 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 : XY 100 * SWAP 40 * SWAP ; | 3a 20 58 59 20 31 30 30 20 2a 20 53 57 41 50 20 34 30 20 2a 20 53 57 41 50 20 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL | 44 45 43 49 4d 41 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE DOIT H POP, PCHL, NEXT | 43 4f 44 45 20 44 4f 49 54 20 48 20 50 4f 50 2c 20 50 43 48 4c 2c 20 4e 45 58 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 : INIT GRAPHICS 1 8 OUTP 204 10 OUTP 43 9 OUTP ; | 3a 20 49 4e 49 54 20 47 52 41 50 48 49 43 53 20 31 20 38 20 4f 55 54 50 20 32 30 34 20 31 30 20 4f 55 54 50 20 34 33 20 39 20 4f 55 54 50 20 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE BCOUT EXX, B POP, A INP, EXX, NEXT | 43 4f 44 45 20 42 43 4f 55 54 20 45 58 58 2c 20 42 20 50 4f 50 2c 20 41 20 49 4e 50 2c 20 45 58 58 2c 20 4e 45 58 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0113 } ( QUEUE - VECTOR MANIPULATION ROUTINES ) | 28 20 51 55 45 55 45 20 2d 20 56 45 43 54 4f 52 20 4d 41 4e 49 50 55 4c 41 54 49 4f 4e 20 52 4f 55 54 49 4e 45 53 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( THE QUEUE IS MAINTAINED AS A DOUBLE LINKED CIRCULAR LIST ) | 28 20 54 48 45 20 51 55 45 55 45 20 49 53 20 4d 41 49 4e 54 41 49 4e 45 44 20 41 53 20 41 20 44 4f 55 42 4c 45 20 4c 49 4e 4b 45 44 20 43 49 52 43 55 4c 41 52 20 4c 49 53 54 20 29 20 20 20 20 CC? IFTRUE | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0114 } ( VECTOR FIELD EQUATES CONTINUED ) | 28 20 56 45 43 54 4f 52 20 46 49 45 4c 44 20 45 51 55 41 54 45 53 20 43 4f 4e 54 49 4e 55 45 44 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31 C= VFVPL 32 C= VFVPH ( FORMATION VECTOR POINTERS ) | 33 31 20 43 3d 20 56 46 56 50 4c 20 33 32 20 43 3d 20 56 46 56 50 48 20 28 20 46 4f 52 4d 41 54 49 4f 4e 20 56 45 43 54 4f 52 20 50 4f 49 4e 54 45 52 53 20 29 20 20 20 20 20 20 20 20 20 20 20 33 C= VPCL 34 C= VPCH ( ANIMATION PROGRAM COUNTER ) | 33 33 20 43 3d 20 56 50 43 4c 20 33 34 20 43 3d 20 56 50 43 48 20 28 20 41 4e 49 4d 41 54 49 4f 4e 20 50 52 4f 47 52 41 4d 20 43 4f 55 4e 54 45 52 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 35 C= VSPL 36 C= VSPH ( ANIMATION STACK POINTER ) | 33 35 20 43 3d 20 56 53 50 4c 20 33 36 20 43 3d 20 56 53 50 48 20 28 20 41 4e 49 4d 41 54 49 4f 4e 20 53 54 41 43 4b 20 50 4f 49 4e 54 45 52 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 37 C= VPTBL 38 C= VPTBH ( ANIMATION PATTERN TABLE ) | 33 37 20 43 3d 20 56 50 54 42 4c 20 33 38 20 43 3d 20 56 50 54 42 48 20 28 20 41 4e 49 4d 41 54 49 4f 4e 20 50 41 54 54 45 52 4e 20 54 41 42 4c 45 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 39 C= VIRL 40 C= VIRH ( INTERCEPT CHECK ROUTINE ) | 33 39 20 43 3d 20 56 49 52 4c 20 34 30 20 43 3d 20 56 49 52 48 20 28 20 49 4e 54 45 52 43 45 50 54 20 43 48 45 43 4b 20 52 4f 55 54 49 4e 45 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 41 C= VINTER ( INTERCEPT CODE ) 41 C= VRACK ( RACK CODE ) | 34 31 20 43 3d 20 56 49 4e 54 45 52 20 28 20 49 4e 54 45 52 43 45 50 54 20 43 4f 44 45 20 29 20 34 31 20 43 3d 20 56 52 41 43 4b 20 28 20 52 41 43 4b 20 43 4f 44 45 20 29 20 20 20 20 20 20 20 42 C= VFNLPL 43 C= VFNLPH ( FINAL ANIMATION PATTERN ) | 34 32 20 43 3d 20 56 46 4e 4c 50 4c 20 34 33 20 43 3d 20 56 46 4e 4c 50 48 20 28 20 46 49 4e 41 4c 20 41 4e 49 4d 41 54 49 4f 4e 20 50 41 54 54 45 52 4e 20 29 20 20 20 20 20 20 20 20 20 20 20 44 C= VSHFTA ( MAGIC REG USED IN LAST WRITE ) | 34 34 20 43 3d 20 56 53 48 46 54 41 20 28 20 4d 41 47 49 43 20 52 45 47 20 55 53 45 44 20 49 4e 20 4c 41 53 54 20 57 52 49 54 45 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 C= VIDENT ( IDENTITY CODE - WHAT I AM ) | 34 35 20 43 3d 20 56 49 44 45 4e 54 20 28 20 49 44 45 4e 54 49 54 59 20 43 4f 44 45 20 2d 20 57 48 41 54 20 49 20 41 4d 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 46 C= VFXBL 47 C= VFXBH ( FORMATION X BIAS ) | 34 36 20 43 3d 20 56 46 58 42 4c 20 34 37 20 43 3d 20 56 46 58 42 48 20 28 20 46 4f 52 4d 41 54 49 4f 4e 20 58 20 42 49 41 53 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 48 C= VFYBL 49 C= VFYBH ( FORMATION Y BIAS ) | 34 38 20 43 3d 20 56 46 59 42 4c 20 34 39 20 43 3d 20 56 46 59 42 48 20 28 20 46 4f 52 4d 41 54 49 4f 4e 20 59 20 42 49 41 53 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 C= VASTKS ( ANIMATION STACK AREA START ) | 35 30 20 43 3d 20 56 41 53 54 4b 53 20 28 20 41 4e 49 4d 41 54 49 4f 4e 20 53 54 41 43 4b 20 41 52 45 41 20 53 54 41 52 54 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0115 } ( STATUS BIT EQUATES ) | 28 20 53 54 41 54 55 53 20 42 49 54 20 45 51 55 41 54 45 53 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7 C= PQSRH ( RUN/HALT ) | 37 20 43 3d 20 50 51 53 52 48 20 20 20 20 20 20 28 20 52 55 4e 2f 48 41 4c 54 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6 C= PQSDW ( DONT WRITE ) | 36 20 43 3d 20 50 51 53 44 57 20 20 20 20 20 20 28 20 44 4f 4e 54 20 57 52 49 54 45 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 5 C= PQSDE ( DONT ERASE ) | 35 20 43 3d 20 50 51 53 44 45 20 20 20 20 20 20 28 20 44 4f 4e 54 20 45 52 41 53 45 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4 C= PQSDF ( DONT FREE ) | 34 20 43 3d 20 50 51 53 44 46 20 20 20 20 20 20 28 20 44 4f 4e 54 20 46 52 45 45 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3 C= PQSDS ( DONT SCREEN SYNCHONIZE ) | 33 20 43 3d 20 50 51 53 44 53 20 20 20 20 20 20 28 20 44 4f 4e 54 20 53 43 52 45 45 4e 20 53 59 4e 43 48 4f 4e 49 5a 45 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2 C= PQSUFP ( USE FINAL PATTERN ON HALT ) | 32 20 43 3d 20 50 51 53 55 46 50 20 20 20 20 20 28 20 55 53 45 20 46 49 4e 41 4c 20 50 41 54 54 45 52 4e 20 4f 4e 20 48 41 4c 54 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 1 C= PQSNMT ( NO MASTER TIME LIMIT ) | 31 20 43 3d 20 50 51 53 4e 4d 54 20 20 20 20 20 28 20 4e 4f 20 4d 41 53 54 45 52 20 54 49 4d 45 20 4c 49 4d 49 54 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 C= PQSFRZ ( OFFSTAGE FREEZE ) | 30 20 43 3d 20 50 51 53 46 52 5a 20 20 20 20 20 28 20 4f 46 46 53 54 41 47 45 20 46 52 45 45 5a 45 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( AUXILLARY STATUS BITS ) | 28 20 41 55 58 49 4c 4c 41 52 59 20 53 54 41 54 55 53 20 42 49 54 53 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7 C= ASFLOK ( FORMATION MEMBER IS LOCKED IN ) | 37 20 43 3d 20 41 53 46 4c 4f 4b 20 20 20 20 20 28 20 46 4f 52 4d 41 54 49 4f 4e 20 4d 45 4d 42 45 52 20 49 53 20 4c 4f 43 4b 45 44 20 49 4e 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( EQUATES FOR VECTOR HEAD ) | 28 20 45 51 55 41 54 45 53 20 46 4f 52 20 56 45 43 54 4f 52 20 48 45 41 44 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 C= QFL 1 C= QFH 2 C= QBL 3 C= QBH | 30 20 43 3d 20 51 46 4c 20 31 20 43 3d 20 51 46 48 20 32 20 43 3d 20 51 42 4c 20 33 20 43 3d 20 51 42 48 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CC? IFTRUE ONSCR> IFEND | 43 43 3f 20 49 46 54 52 55 45 20 4f 4e 53 43 52 3e 20 49 46 45 4e 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0116 } ( VGS VWRITE VERASE ) | 28 20 56 47 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 56 57 52 49 54 45 20 56 45 52 41 53 45 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR vwrite ( Write from a vector structure ) | 53 55 42 52 20 76 77 72 69 74 65 20 28 20 57 72 69 74 65 20 66 72 6f 6d 20 61 20 76 65 63 74 6f 72 20 73 74 72 75 63 74 75 72 65 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 VXPAND X B LDX, VMAGIC X C LDX, VXH X D LDX, VXL X E LDX, | 20 20 56 58 50 41 4e 44 20 58 20 42 20 4c 44 58 2c 20 56 4d 41 47 49 43 20 58 20 43 20 4c 44 58 2c 20 56 58 48 20 58 20 44 20 4c 44 58 2c 20 56 58 4c 20 58 20 45 20 4c 44 58 2c 20 20 20 20 20 VPATH X H LDX, VPATL X L LDX, H PUSH, XTIY, | 20 20 56 50 41 54 48 20 58 20 48 20 4c 44 58 2c 20 56 50 41 54 4c 20 58 20 4c 20 4c 44 58 2c 20 48 20 50 55 53 48 2c 20 58 54 49 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 VYH X H LDX, VYL X L LDX, | 20 20 56 59 48 20 58 20 48 20 4c 44 58 2c 20 56 59 4c 20 58 20 4c 20 4c 44 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ffrelabs CALL, ( calculates magic add. ) | 66 66 72 65 6c 61 62 73 20 43 41 4c 4c 2c 20 20 28 20 63 61 6c 63 75 6c 61 74 65 73 20 6d 61 67 69 63 20 61 64 64 2e 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 H VSAH X STX, L VSAL X STX, ( set scradr for erase ) | 20 20 48 20 56 53 41 48 20 58 20 53 54 58 2c 20 4c 20 56 53 41 4c 20 58 20 53 54 58 2c 20 20 28 20 73 65 74 20 73 63 72 61 64 72 20 66 6f 72 20 65 72 61 73 65 20 29 20 20 20 20 20 20 20 20 20 writep CALL, ( write it ) | 20 77 72 69 74 65 70 20 43 41 4c 4c 2c 20 20 28 20 77 72 69 74 65 20 69 74 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 C VSHFTA X STX, ( save shift for erase ) Y POPX, RET, | 20 20 20 20 43 20 56 53 48 46 54 41 20 58 20 53 54 58 2c 20 28 20 73 61 76 65 20 73 68 69 66 74 20 66 6f 72 20 65 72 61 73 65 20 29 20 59 20 50 4f 50 58 2c 20 52 45 54 2c 20 20 20 20 20 20 20 SUBR verase ( does pattern board erase from vector IX ) | 53 55 42 52 20 76 65 72 61 73 65 20 20 28 20 64 6f 65 73 20 70 61 74 74 65 72 6e 20 62 6f 61 72 64 20 65 72 61 73 65 20 66 72 6f 6d 20 76 65 63 74 6f 72 20 49 58 20 29 20 20 20 20 20 20 20 20 VXPAND X B LDX, VSHFTA X C LDX, VPATH X H LDX, VPATL X L LDX, | 20 20 56 58 50 41 4e 44 20 58 20 42 20 4c 44 58 2c 20 56 53 48 46 54 41 20 58 20 43 20 4c 44 58 2c 20 56 50 41 54 48 20 58 20 48 20 4c 44 58 2c 20 56 50 41 54 4c 20 58 20 4c 20 4c 44 58 2c 20 H PUSH, XTIY, | 20 20 48 20 50 55 53 48 2c 20 58 54 49 59 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 VSAH X H LDX, VSAL X L LDX, | 20 20 56 53 41 48 20 58 20 48 20 4c 44 58 2c 20 56 53 41 4c 20 58 20 4c 20 4c 44 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 writep CALL, Y POPX, RET, | 20 20 77 72 69 74 65 70 20 43 41 4c 4c 2c 20 59 20 50 4f 50 58 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0117 } ( STORAGE ALLOCATOR GOODIES ) | 28 20 53 54 4f 52 41 47 45 20 41 4c 4c 4f 43 41 54 4f 52 20 47 4f 4f 44 49 45 53 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 1STCLRADDR VPTR ! | 31 53 54 43 4c 52 41 44 44 52 20 56 50 54 52 20 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 24 C= NODECOUNT 64 C= NODESIZE NODECOUNT NODESIZE * C= POOLSIZE | 32 34 20 43 3d 20 4e 4f 44 45 43 4f 55 4e 54 20 36 34 20 43 3d 20 4e 4f 44 45 53 49 5a 45 20 4e 4f 44 45 43 4f 55 4e 54 20 4e 4f 44 45 53 49 5a 45 20 2a 20 43 3d 20 50 4f 4f 4c 53 49 5a 45 20 POOLSIZE BARRAY MEMPOOL 0 MEMPOOL VARIABLE FREELIST | 50 4f 4f 4c 53 49 5a 45 20 42 41 52 52 41 59 20 4d 45 4d 50 4f 4f 4c 20 30 20 4d 45 4d 50 4f 4f 4c 20 56 41 52 49 41 42 4c 45 20 46 52 45 45 4c 49 53 54 20 20 20 20 20 20 20 20 20 20 20 20 20 : INITFREELIST NODECOUNT 1 DO NODESIZE I * MEMPOOL | 3a 20 49 4e 49 54 46 52 45 45 4c 49 53 54 20 4e 4f 44 45 43 4f 55 4e 54 20 31 20 44 4f 20 4e 4f 44 45 53 49 5a 45 20 49 20 2a 20 4d 45 4d 50 4f 4f 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 NODESIZE I 1 - * MEMPOOL 1+ ! LOOP ( THREAD THRU POINTERS ) | 20 20 4e 4f 44 45 53 49 5a 45 20 49 20 31 20 2d 20 2a 20 4d 45 4d 50 4f 4f 4c 20 31 2b 20 21 20 4c 4f 4f 50 20 28 20 54 48 52 45 41 44 20 54 48 52 55 20 50 4f 49 4e 54 45 52 53 20 29 20 20 20 0 NODECOUNT 1 - NODESIZE * MEMPOOL 1+ ! 0 MEMPOOL FREELIST ! ; | 30 20 4e 4f 44 45 43 4f 55 4e 54 20 31 20 2d 20 4e 4f 44 45 53 49 5a 45 20 2a 20 4d 45 4d 50 4f 4f 4c 20 31 2b 20 21 20 30 20 4d 45 4d 50 4f 4f 4c 20 46 52 45 45 4c 49 53 54 20 21 20 3b 20 20 ( GET A NODE FROM ASM LANGUAGE - RETURN: HL=NODE, 0 IF CAN'T ) | 28 20 47 45 54 20 41 20 4e 4f 44 45 20 46 52 4f 4d 20 41 53 4d 20 4c 41 4e 47 55 41 47 45 20 2d 20 52 45 54 55 52 4e 3a 20 48 4c 3d 4e 4f 44 45 2c 20 30 20 49 46 20 43 41 4e 27 54 20 29 20 20 SUBR getnode FREELIST LHLD, L A MOV, H ORA, ( CHECK FOR NIL ) | 53 55 42 52 20 67 65 74 6e 6f 64 65 20 46 52 45 45 4c 49 53 54 20 4c 48 4c 44 2c 20 4c 20 41 20 4d 4f 56 2c 20 48 20 4f 52 41 2c 20 28 20 43 48 45 43 4b 20 46 4f 52 20 4e 49 4c 20 29 20 20 20 0<>, IF, H INX, M E MOV, H INX, M D MOV, H DCX, ( FREE=NXT ) | 20 20 20 30 3c 3e 2c 20 49 46 2c 20 48 20 49 4e 58 2c 20 4d 20 45 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 4d 20 44 20 4d 4f 56 2c 20 48 20 44 43 58 2c 20 28 20 46 52 45 45 3d 4e 58 54 20 29 20 H DCX, FREELIST SDED, ELSE, PCHL, THEN, RET, | 48 20 44 43 58 2c 20 46 52 45 45 4c 49 53 54 20 53 44 45 44 2c 20 45 4c 53 45 2c 20 50 43 48 4c 2c 20 54 48 45 4e 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE GETNODE DI, getnode CALL, H PUSH, EI, NEXT ( TERSE ENTRY ) | 43 4f 44 45 20 47 45 54 4e 4f 44 45 20 44 49 2c 20 67 65 74 6e 6f 64 65 20 43 41 4c 4c 2c 20 48 20 50 55 53 48 2c 20 45 49 2c 20 4e 45 58 54 20 28 20 54 45 52 53 45 20 45 4e 54 52 59 20 29 20 ( RELEASE NODE - HL=BLOCK TO FREE ) | 28 20 52 45 4c 45 41 53 45 20 4e 4f 44 45 20 2d 20 48 4c 3d 42 4c 4f 43 4b 20 54 4f 20 46 52 45 45 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR freenode FREELIST LDED, FREELIST SHLD, ( LINK IN AT HEAD ) | 53 55 42 52 20 66 72 65 65 6e 6f 64 65 20 46 52 45 45 4c 49 53 54 20 4c 44 45 44 2c 20 46 52 45 45 4c 49 53 54 20 53 48 4c 44 2c 20 28 20 4c 49 4e 4b 20 49 4e 20 41 54 20 48 45 41 44 20 29 20 H INX, E M MOV, H INX, D M MOV, RET, --> | 48 20 49 4e 58 2c 20 45 20 4d 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 44 20 4d 20 4d 4f 56 2c 20 52 45 54 2c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0118 } ( ADD NODE TO QUEUE ROUTINE ) | 28 20 41 44 44 20 4e 4f 44 45 20 54 4f 20 51 55 45 55 45 20 52 4f 55 54 49 4e 45 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR ADDQ ( HL = NEW, IY = HEAD ) | 53 55 42 52 20 41 44 44 51 20 28 20 48 4c 20 3d 20 4e 45 57 2c 20 49 59 20 3d 20 48 45 41 44 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 QFL Y E LDX, QFH Y D LDX, E A MOV, D ORA, 0<>, IF, | 51 46 4c 20 59 20 45 20 4c 44 58 2c 20 51 46 48 20 59 20 44 20 4c 44 58 2c 20 45 20 41 20 4d 4f 56 2c 20 44 20 4f 52 41 2c 20 30 3c 3e 2c 20 49 46 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 QBL Y C LDX, QBH Y B LDX, H PUSH, H INX, | 51 42 4c 20 59 20 43 20 4c 44 58 2c 20 51 42 48 20 59 20 42 20 4c 44 58 2c 20 48 20 50 55 53 48 2c 20 48 20 49 4e 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 E M MOV, H INX, D M MOV, H INX, C M MOV, H INX, B M MOV, | 45 20 4d 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 44 20 4d 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 43 20 4d 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 42 20 4d 20 4d 4f 56 2c 20 20 20 20 20 20 20 20 XCHG, D POP, H INX, H INX, H INX, E M MOV, H INX, D M MOV, | 58 43 48 47 2c 20 44 20 50 4f 50 2c 20 48 20 49 4e 58 2c 20 48 20 49 4e 58 2c 20 48 20 49 4e 58 2c 20 45 20 4d 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 44 20 4d 20 4d 4f 56 2c 20 20 20 20 20 20 E A MOV, B INX, B STAX, D A MOV, B INX, B STAX, | 45 20 41 20 4d 4f 56 2c 20 42 20 49 4e 58 2c 20 42 20 53 54 41 58 2c 20 44 20 41 20 4d 4f 56 2c 20 42 20 49 4e 58 2c 20 42 20 53 54 41 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ELSE, L E MOV, H D MOV, H INX, E M MOV, H INX, D M MOV, | 45 4c 53 45 2c 20 4c 20 45 20 4d 4f 56 2c 20 48 20 44 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 45 20 4d 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 44 20 4d 20 4d 4f 56 2c 20 20 20 20 20 20 20 20 20 H INX, E M MOV, H INX, D M MOV, E QBL Y STX, D QBH Y STX, | 48 20 49 4e 58 2c 20 45 20 4d 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 44 20 4d 20 4d 4f 56 2c 20 45 20 51 42 4c 20 59 20 53 54 58 2c 20 44 20 51 42 48 20 59 20 53 54 58 2c 20 20 20 20 20 20 20 THEN, E QFL Y STX, D QFH Y STX, RET, | 54 48 45 4e 2c 20 45 20 51 46 4c 20 59 20 53 54 58 2c 20 44 20 51 46 48 20 59 20 53 54 58 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR kill ( software lockup ) | 53 55 42 52 20 6b 69 6c 6c 20 28 20 73 6f 66 74 77 61 72 65 20 6c 6f 63 6b 75 70 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6 E MVI, BEGIN, BEGIN, BEGIN, ( let watchdog kick or else ) | 20 36 20 45 20 4d 56 49 2c 20 42 45 47 49 4e 2c 20 42 45 47 49 4e 2c 20 42 45 47 49 4e 2c 20 28 20 6c 65 74 20 77 61 74 63 68 64 6f 67 20 6b 69 63 6b 20 6f 72 20 65 6c 73 65 20 29 20 20 20 20 L DCR, 0=, END, H DCR, 0=, END, E DCR, 0=, END, 0000 JMP, | 20 20 4c 20 44 43 52 2c 20 30 3d 2c 20 45 4e 44 2c 20 48 20 44 43 52 2c 20 30 3d 2c 20 45 4e 44 2c 20 45 20 44 43 52 2c 20 30 3d 2c 20 45 4e 44 2c 20 30 30 30 30 20 4a 4d 50 2c 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0119 } | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0120 } ( ADVANCE TO NEXT NODE ON QUEUE ) | 28 20 41 44 56 41 4e 43 45 20 54 4f 20 4e 45 58 54 20 4e 4f 44 45 20 4f 4e 20 51 55 45 55 45 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR nextq ( IY = HEAD ) | 53 55 42 52 20 6e 65 78 74 71 20 28 20 49 59 20 3d 20 48 45 41 44 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 QFL Y L LDX, QFH Y H LDX, H A MOV, L ORA, RZ, | 51 46 4c 20 59 20 4c 20 4c 44 58 2c 20 51 46 48 20 59 20 48 20 4c 44 58 2c 20 48 20 41 20 4d 4f 56 2c 20 4c 20 4f 52 41 2c 20 52 5a 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 H INX, M E MOV, H INX, M D MOV, ( DE=FORW[FORW[HEAD]] ) | 48 20 49 4e 58 2c 20 4d 20 45 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 4d 20 44 20 4d 4f 56 2c 20 28 20 44 45 3d 46 4f 52 57 5b 46 4f 52 57 5b 48 45 41 44 5d 5d 20 29 20 20 20 20 20 20 20 20 20 H DCX, H DCX, L QBL Y STX, H QBH Y STX, ( BACK[HEAD]=NODE ) | 48 20 44 43 58 2c 20 48 20 44 43 58 2c 20 4c 20 51 42 4c 20 59 20 53 54 58 2c 20 48 20 51 42 48 20 59 20 53 54 58 2c 20 28 20 42 41 43 4b 5b 48 45 41 44 5d 3d 4e 4f 44 45 20 29 20 20 20 20 20 E QFL Y STX, D QFH Y STX, ( FORW[HEAD]=FORW[NODE] ) | 45 20 51 46 4c 20 59 20 53 54 58 2c 20 44 20 51 46 48 20 59 20 53 54 58 2c 20 28 20 46 4f 52 57 5b 48 45 41 44 5d 3d 46 4f 52 57 5b 4e 4f 44 45 5d 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 RET, | 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR INCTB | 53 55 42 52 20 49 4e 43 54 42 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 QFL Y L LDX, QFH Y H LDX, H A MOV, L ORA, ( Q FORW, NIL CHECK ) | 51 46 4c 20 59 20 4c 20 4c 44 58 2c 20 51 46 48 20 59 20 48 20 4c 44 58 2c 20 48 20 41 20 4d 4f 56 2c 20 4c 20 4f 52 41 2c 20 28 20 51 20 46 4f 52 57 2c 20 4e 49 4c 20 43 48 45 43 4b 20 29 20 RZ, L E MOV, H D MOV, BEGIN, ( QUIT IF NIL, ELSE REMEM FIRST ) | 52 5a 2c 20 4c 20 45 20 4d 4f 56 2c 20 48 20 44 20 4d 4f 56 2c 20 42 45 47 49 4e 2c 20 28 20 51 55 49 54 20 49 46 20 4e 49 4c 2c 20 45 4c 53 45 20 52 45 4d 45 4d 20 46 49 52 53 54 20 29 20 20 D PUSH, PQTB D LXI, D DAD, M A MOV, C ADD, A M MOV, ( UPDATE ) | 44 20 50 55 53 48 2c 20 50 51 54 42 20 44 20 4c 58 49 2c 20 44 20 44 41 44 2c 20 4d 20 41 20 4d 4f 56 2c 20 43 20 41 44 44 2c 20 41 20 4d 20 4d 4f 56 2c 20 28 20 55 50 44 41 54 45 20 29 20 20 A ANA, D DSBC, D POP, ( AND RETURN PTR TO NORMAL ) | 41 20 41 4e 41 2c 20 44 20 44 53 42 43 2c 20 44 20 50 4f 50 2c 20 28 20 41 4e 44 20 52 45 54 55 52 4e 20 50 54 52 20 54 4f 20 4e 4f 52 4d 41 4c 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 H INX, M A MOV, H INX, M H MOV, A L MOV, ( HL=FORW[NODE] ) | 48 20 49 4e 58 2c 20 4d 20 41 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 4d 20 48 20 4d 4f 56 2c 20 41 20 4c 20 4d 4f 56 2c 20 28 20 48 4c 3d 46 4f 52 57 5b 4e 4f 44 45 5d 20 29 20 20 20 20 20 20 E XRA, A B MOV, H A MOV, D XRA, B ORA, 0=, ( ONCE AROUND ) | 45 20 58 52 41 2c 20 41 20 42 20 4d 4f 56 2c 20 48 20 41 20 4d 4f 56 2c 20 44 20 58 52 41 2c 20 42 20 4f 52 41 2c 20 30 3d 2c 20 28 20 4f 4e 43 45 20 41 52 4f 55 4e 44 20 29 20 20 20 20 20 20 END, RET, | 45 4e 44 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0121 } ( WP BYTE VERBS ) HEX | 28 20 57 50 20 42 59 54 45 20 56 45 52 42 53 20 29 20 48 45 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE WPB! ( ---- ) | 43 4f 44 45 20 57 50 42 21 20 28 20 3c 76 61 6c 75 65 3e 20 3c 61 64 64 72 3e 20 2d 2d 2d 2d 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 H POP, D POP, wpb! CALL, NEXT | 20 48 20 50 4f 50 2c 20 44 20 50 4f 50 2c 20 77 70 62 21 20 43 41 4c 4c 2c 20 4e 45 58 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE WPBONE ( ---- ) | 43 4f 44 45 20 57 50 42 4f 4e 45 20 28 20 3c 61 64 64 72 3e 20 2d 2d 2d 2d 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 H POP, 1 E MVI, wpb! CALL, NEXT | 20 48 20 50 4f 50 2c 20 31 20 45 20 4d 56 49 2c 20 77 70 62 21 20 43 41 4c 4c 2c 20 4e 45 58 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE WPBZERO ( ---- ) | 43 4f 44 45 20 57 50 42 5a 45 52 4f 20 28 20 3c 61 64 64 72 3e 20 2d 2d 2d 2d 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 H POP, 0 E MVI, wpb! CALL, NEXT | 20 48 20 50 4f 50 2c 20 30 20 45 20 4d 56 49 2c 20 77 70 62 21 20 43 41 4c 4c 2c 20 4e 45 58 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE 1-WPB! ( ---- ) | 43 4f 44 45 20 31 2d 57 50 42 21 20 28 20 3c 61 64 64 72 3e 20 2d 2d 2d 2d 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 H POP, M E MOV, E DCR, wpb! CALL, NEXT | 20 48 20 50 4f 50 2c 20 4d 20 45 20 4d 4f 56 2c 20 45 20 44 43 52 2c 20 77 70 62 21 20 43 41 4c 4c 2c 20 4e 45 58 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE +WPB! ( ---- ) H POP, M A MOV, | 43 4f 44 45 20 2b 57 50 42 21 20 28 20 3c 76 61 6c 75 65 3e 20 3c 61 64 64 72 3e 20 2d 2d 2d 2d 20 29 20 48 20 50 4f 50 2c 20 4d 20 41 20 4d 4f 56 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 D POP, E ADD, A E MOV, wpb! CALL, NEXT | 20 44 20 50 4f 50 2c 20 45 20 41 44 44 2c 20 41 20 45 20 4d 4f 56 2c 20 77 70 62 21 20 43 41 4c 4c 2c 20 4e 45 58 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE 1+WPB! ( ---- ) | 43 4f 44 45 20 31 2b 57 50 42 21 20 28 20 3c 61 64 64 72 3e 20 2d 2d 2d 2d 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 H POP, M E MOV, E INR, wpb! CALL, NEXT | 20 48 20 50 4f 50 2c 20 4d 20 45 20 4d 4f 56 2c 20 45 20 49 4e 52 2c 20 77 70 62 21 20 43 41 4c 4c 2c 20 4e 45 58 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE -WPB! H POP, M A MOV, D POP, E SUB, A E MOV, | 43 4f 44 45 20 2d 57 50 42 21 20 48 20 50 4f 50 2c 20 4d 20 41 20 4d 4f 56 2c 20 44 20 50 4f 50 2c 20 45 20 53 55 42 2c 20 41 20 45 20 4d 4f 56 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 wpb! CALL, NEXT | 77 70 62 21 20 43 41 4c 4c 2c 20 4e 45 58 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0122 } ( WRITE PROTECT CLEAR-RAM AND COMBO GOODIES ) HEX | 28 20 57 52 49 54 45 20 50 52 4f 54 45 43 54 20 43 4c 45 41 52 2d 52 41 4d 20 41 4e 44 20 43 4f 4d 42 4f 20 47 4f 4f 44 49 45 53 20 29 20 48 45 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR CHGCOM 0F ANI, A E MOV, RLC, RLC, RLC, RLC, E ORA, | 53 55 42 52 20 43 48 47 43 4f 4d 20 30 46 20 41 4e 49 2c 20 41 20 45 20 4d 4f 56 2c 20 52 4c 43 2c 20 52 4c 43 2c 20 52 4c 43 2c 20 52 4c 43 2c 20 45 20 4f 52 41 2c 20 20 20 20 20 20 20 20 20 A E MOV, CMA, A D MOV, wp! JMP, | 41 20 45 20 4d 4f 56 2c 20 43 4d 41 2c 20 41 20 44 20 4d 4f 56 2c 20 77 70 21 20 4a 4d 50 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR UPDCOMB COMBO1 LDA, A INR, COMBO1 H LXI, CHGCOM CALL, | 53 55 42 52 20 55 50 44 43 4f 4d 42 20 43 4f 4d 42 4f 31 20 4c 44 41 2c 20 41 20 49 4e 52 2c 20 43 4f 4d 42 4f 31 20 48 20 4c 58 49 2c 20 43 48 47 43 4f 4d 20 43 41 4c 4c 2c 20 20 20 20 20 20 LDAR, COMBO2 H LXI, CHGCOM CALL, RET, | 4c 44 41 52 2c 20 43 4f 4d 42 4f 32 20 48 20 4c 58 49 2c 20 43 48 47 43 4f 4d 20 43 41 4c 4c 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR CCHECK H A MOV, L ADD, A INR, RNZ, L A MOV, RLC, RLC, | 53 55 42 52 20 43 43 48 45 43 4b 20 48 20 41 20 4d 4f 56 2c 20 4c 20 41 44 44 2c 20 41 20 49 4e 52 2c 20 52 4e 5a 2c 20 4c 20 41 20 4d 4f 56 2c 20 52 4c 43 2c 20 52 4c 43 2c 20 20 20 20 20 20 RLC, RLC, L XRA, RET, | 52 4c 43 2c 20 52 4c 43 2c 20 4c 20 58 52 41 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 F= WPZAP F= WPNOZ | 46 3d 20 57 50 5a 41 50 20 46 3d 20 57 50 4e 4f 5a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE WPCLEAR | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0123 } ( WRITE PROTECT CLEAR-RAM CONTINUED ) HEX | 28 20 57 52 49 54 45 20 50 52 4f 54 45 43 54 20 43 4c 45 41 52 2d 52 41 4d 20 43 4f 4e 54 49 4e 55 45 44 20 29 20 48 45 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( CLEAR THE THROAT ) | 28 20 43 4c 45 41 52 20 54 48 45 20 54 48 52 4f 41 54 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 A XRA, PHONE# STA, ONHOLD STA, TOPTALK H LXI, TALKIN SHLD, | 41 20 58 52 41 2c 20 50 48 4f 4e 45 23 20 53 54 41 2c 20 4f 4e 48 4f 4c 44 20 53 54 41 2c 20 54 4f 50 54 41 4c 4b 20 48 20 4c 58 49 2c 20 54 41 4c 4b 49 4e 20 53 48 4c 44 2c 20 20 20 20 20 20 TALKOUT SHLD, 0C15 B LXI, A INP, | 54 41 4c 4b 4f 55 54 20 53 48 4c 44 2c 20 30 43 31 35 20 42 20 4c 58 49 2c 20 41 20 49 4e 50 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DEMOMODE H LXI, 1 E MVI, wpb! CALL, ( set GAMEOVER ) | 20 44 45 4d 4f 4d 4f 44 45 20 48 20 4c 58 49 2c 20 31 20 45 20 4d 56 49 2c 20 77 70 62 21 20 43 41 4c 4c 2c 20 28 20 73 65 74 20 47 41 4d 45 4f 56 45 52 20 29 20 20 20 20 20 20 20 20 20 20 20 UPDCOMB CALL, | 55 50 44 43 4f 4d 42 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 LABEL WPNOZ OLDCREDITS H LXI, ( init coinport tracker ) | 4c 41 42 45 4c 20 57 50 4e 4f 5a 20 4f 4c 44 43 52 45 44 49 54 53 20 48 20 4c 58 49 2c 20 28 20 69 6e 69 74 20 63 6f 69 6e 70 6f 72 74 20 74 72 61 63 6b 65 72 20 29 20 20 20 20 20 20 20 20 20 COINPORT C MVI, E INP, wpb! CALL, ( force lost coin ) | 20 43 4f 49 4e 50 4f 52 54 20 43 20 4d 56 49 2c 20 45 20 49 4e 50 2c 20 77 70 62 21 20 43 41 4c 4c 2c 20 28 20 66 6f 72 63 65 20 6c 6f 73 74 20 63 6f 69 6e 20 29 20 20 20 20 20 20 20 20 20 20 CRASHCTR H LXI, M A MOV, 3 CPI, CY~, IF, | 20 43 52 41 53 48 43 54 52 20 48 20 4c 58 49 2c 20 4d 20 41 20 4d 4f 56 2c 20 33 20 43 50 49 2c 20 43 59 7e 2c 20 49 46 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 E MVI, wpb! CALL, 1 E MVI, DEMOMODE H LXI, wpb! CALL, | 30 20 45 20 4d 56 49 2c 20 77 70 62 21 20 43 41 4c 4c 2c 20 31 20 45 20 4d 56 49 2c 20 44 45 4d 4f 4d 4f 44 45 20 48 20 4c 58 49 2c 20 77 70 62 21 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 kill JMP, THEN, EXX, NEXT ASSEMBLE> | 6b 69 6c 6c 20 4a 4d 50 2c 20 54 48 45 4e 2c 20 45 58 58 2c 20 4e 45 58 54 20 41 53 53 45 4d 42 4c 45 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0124 } ( ** COINSTUFF FOR INTERRUPTS, COINTABLE, COINCOUNT ** ) | 28 20 2a 2a 20 43 4f 49 4e 53 54 55 46 46 20 46 4f 52 20 49 4e 54 45 52 52 55 50 54 53 2c 20 43 4f 49 4e 54 41 42 4c 45 2c 20 43 4f 49 4e 43 4f 55 4e 54 20 2a 2a 20 29 20 20 20 20 20 20 20 20 DATA COINTABLE ( fraction in low, credits in high ) | 44 41 54 41 20 43 4f 49 4e 54 41 42 4c 45 20 28 20 66 72 61 63 74 69 6f 6e 20 69 6e 20 6c 6f 77 2c 20 63 72 65 64 69 74 73 20 69 6e 20 68 69 67 68 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 500 , 300 , 080 , 100 , | 20 20 35 30 30 20 2c 20 33 30 30 20 2c 20 30 38 30 20 2c 20 31 30 30 20 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( 1/5 , 1/3 , 2/1 , 1/1 , COINS/CREDITS) | 28 20 31 2f 35 20 2c 20 31 2f 33 20 2c 20 32 2f 31 20 2c 20 31 2f 31 20 2c 20 43 4f 49 4e 53 2f 43 52 45 44 49 54 53 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( table flipped cause door port is negative true ) | 28 20 74 61 62 6c 65 20 66 6c 69 70 70 65 64 20 63 61 75 73 65 20 64 6f 6f 72 20 70 6f 72 74 20 69 73 20 6e 65 67 61 74 69 76 65 20 74 72 75 65 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR COINCOUNT .REL | 53 55 42 52 20 43 4f 49 4e 43 4f 55 4e 54 20 2e 52 45 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 EXX, A ORA, RAL, ( words ) | 20 45 58 58 2c 20 41 20 4f 52 41 2c 20 52 41 4c 2c 20 28 20 77 6f 72 64 73 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 A E MOV, 0 D MVI, | 41 20 45 20 4d 4f 56 2c 20 30 20 44 20 4d 56 49 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 COINTABLE H LXI, D DAD, M E MOV, | 20 43 4f 49 4e 54 41 42 4c 45 20 48 20 4c 58 49 2c 20 44 20 44 41 44 2c 20 4d 20 45 20 4d 4f 56 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 H INX, M D MOV, COINFRAC LHLD, ( coinsin high ) | 20 48 20 49 4e 58 2c 20 4d 20 44 20 4d 4f 56 2c 20 43 4f 49 4e 46 52 41 43 20 4c 48 4c 44 2c 20 28 20 63 6f 69 6e 73 69 6e 20 68 69 67 68 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 D DAD, XCHG, D A MOV, 10 CPI, CY, IF, | 20 44 20 44 41 44 2c 20 58 43 48 47 2c 20 44 20 41 20 4d 4f 56 2c 20 31 30 20 43 50 49 2c 20 43 59 2c 20 49 46 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 COINFRAC H LXI, wp! CALL, THEN, EXX, RET, | 20 43 4f 49 4e 46 52 41 43 20 48 20 4c 58 49 2c 20 77 70 21 20 43 41 4c 4c 2c 20 54 48 45 4e 2c 20 45 58 58 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR SETCOIN ( turn on COINS? for passing of a coin ) | 53 55 42 52 20 53 45 54 43 4f 49 4e 20 28 20 74 75 72 6e 20 6f 6e 20 43 4f 49 4e 53 3f 20 66 6f 72 20 70 61 73 73 69 6e 67 20 6f 66 20 61 20 63 6f 69 6e 20 29 20 20 20 20 20 20 20 20 20 20 20 EXX, COINS? H LXI, 1 E MVI, wpb! CALL, EXX, RET, .ABS | 20 45 58 58 2c 20 43 4f 49 4e 53 3f 20 48 20 4c 58 49 2c 20 31 20 45 20 4d 56 49 2c 20 77 70 62 21 20 43 41 4c 4c 2c 20 45 58 58 2c 20 52 45 54 2c 20 2e 41 42 53 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0125 } ( CHECK FOR DOORSLAM ) | 28 20 43 48 45 43 4b 20 46 4f 52 20 44 4f 4f 52 53 4c 41 4d 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR COINCHECK | 53 55 42 52 20 43 4f 49 4e 43 48 45 43 4b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SETTINGS IN, 8 ANI, 0CC00 JZ, | 53 45 54 54 49 4e 47 53 20 49 4e 2c 20 38 20 41 4e 49 2c 20 30 43 43 30 30 20 4a 5a 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 COINPORT IN, ( port 10H ) | 43 4f 49 4e 50 4f 52 54 20 49 4e 2c 20 28 20 70 6f 72 74 20 31 30 48 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SLAMBIT A BIT, 0=, IF, ( SLAMMED ) | 20 53 4c 41 4d 42 49 54 20 41 20 42 49 54 2c 20 30 3d 2c 20 49 46 2c 20 28 20 53 4c 41 4d 4d 45 44 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 1 E MVI, DEMOMODE H LXI, wpb! CALL, | 31 20 45 20 4d 56 49 2c 20 44 45 4d 4f 4d 4f 44 45 20 48 20 4c 58 49 2c 20 77 70 62 21 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SLAM? H LXI, wpb! CALL, kill JMP, ( abort ) THEN, | 53 4c 41 4d 3f 20 48 20 4c 58 49 2c 20 77 70 62 21 20 43 41 4c 4c 2c 20 6b 69 6c 6c 20 4a 4d 50 2c 20 28 20 61 62 6f 72 74 20 29 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0126 } ( * START OF COINSTUFF * ) HEX | 28 20 2a 20 53 54 41 52 54 20 4f 46 20 43 4f 49 4e 53 54 55 46 46 20 2a 20 29 20 48 45 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( Acc has 10H INP'ed ) | 28 20 41 63 63 20 68 61 73 20 31 30 48 20 49 4e 50 27 65 64 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 BEGIN, A B MOV, COINPORT IN, B CMP, 0=, END, ( two == values ) | 42 45 47 49 4e 2c 20 41 20 42 20 4d 4f 56 2c 20 43 4f 49 4e 50 4f 52 54 20 49 4e 2c 20 42 20 43 4d 50 2c 20 30 3d 2c 20 45 4e 44 2c 20 28 20 74 77 6f 20 3d 3d 20 20 76 61 6c 75 65 73 20 29 20 OLDCREDITS H LXI, -1 B LXI, ( default ) M XRA, ( changed bits?) | 20 4f 4c 44 43 52 45 44 49 54 53 20 48 20 4c 58 49 2c 20 2d 31 20 42 20 4c 58 49 2c 20 28 20 64 65 66 61 75 6c 74 20 29 20 4d 20 58 52 41 2c 20 28 20 63 68 61 6e 67 65 64 20 62 69 74 73 3f 29 COINBITR A BIT, 0<>, IF, ( coins in ) | 20 43 4f 49 4e 42 49 54 52 20 41 20 42 49 54 2c 20 30 3c 3e 2c 20 49 46 2c 20 28 20 63 6f 69 6e 73 20 69 6e 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 EXAF, ( save port reading ) M A MOV, ( old value ) | 20 45 58 41 46 2c 20 28 20 73 61 76 65 20 70 6f 72 74 20 72 65 61 64 69 6e 67 20 29 20 4d 20 41 20 4d 4f 56 2c 20 28 20 6f 6c 64 20 76 61 6c 75 65 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 COINBITR A BIT, 0<>, IF, ( old up then leading edge ) | 20 43 4f 49 4e 42 49 54 52 20 41 20 42 49 54 2c 20 30 3c 3e 2c 20 49 46 2c 20 28 20 6f 6c 64 20 75 70 20 74 68 65 6e 20 6c 65 61 64 69 6e 67 20 65 64 67 65 20 29 20 20 20 20 20 20 20 20 20 20 COINBITR A RES, A E MOV, wpb! CALL, EXAF, | 20 43 4f 49 4e 42 49 54 52 20 41 20 52 45 53 2c 20 41 20 45 20 4d 4f 56 2c 20 77 70 62 21 20 43 41 4c 4c 2c 20 45 58 41 46 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ELSE, ( coin's done ) COINBITR A SET, A E MOV, | 20 45 4c 53 45 2c 20 28 20 63 6f 69 6e 27 73 20 64 6f 6e 65 20 29 20 43 4f 49 4e 42 49 54 52 20 41 20 53 45 54 2c 20 41 20 45 20 4d 4f 56 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 wpb! CALL, SETCOIN CALL, ( set COINS? on ) EXX, ( save BC ) | 20 77 70 62 21 20 43 41 4c 4c 2c 20 53 45 54 43 4f 49 4e 20 43 41 4c 4c 2c 20 28 20 73 65 74 20 43 4f 49 4e 53 3f 20 6f 6e 20 29 20 45 58 58 2c 20 28 20 73 61 76 65 20 42 43 20 29 20 20 20 20 COUNTERBITS LDA, A B MOV, ( coincounters on bits 0+1 ) | 20 43 4f 55 4e 54 45 52 42 49 54 53 20 4c 44 41 2c 20 41 20 42 20 4d 4f 56 2c 20 28 20 63 6f 69 6e 63 6f 75 6e 74 65 72 73 20 6f 6e 20 62 69 74 73 20 30 2b 31 20 29 20 20 20 20 20 20 20 20 20 SETTINGS C MVI, A INP, ( put B on A8-A15 ) | 20 53 45 54 54 49 4e 47 53 20 43 20 4d 56 49 2c 20 41 20 49 4e 50 2c 20 28 20 70 75 74 20 42 20 6f 6e 20 41 38 2d 41 31 35 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 1 ANI, 2 ORI, ( coin value lookup ) EXX, | 20 31 20 41 4e 49 2c 20 32 20 4f 52 49 2c 20 28 20 63 6f 69 6e 20 76 61 6c 75 65 20 6c 6f 6f 6b 75 70 20 29 20 45 58 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 A C MOV, ( this is the guy's value to be ) EXAF, THEN, THEN, | 41 20 43 20 4d 4f 56 2c 20 28 20 74 68 69 73 20 69 73 20 74 68 65 20 67 75 79 27 73 20 76 61 6c 75 65 20 74 6f 20 62 65 20 29 20 45 58 41 46 2c 20 54 48 45 4e 2c 20 54 48 45 4e 2c 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0127 } ( COINS ) | 28 20 43 4f 49 4e 53 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 COINBITL A BIT, 0<>, IF, ( same logic ) | 20 43 4f 49 4e 42 49 54 4c 20 41 20 42 49 54 2c 20 30 3c 3e 2c 20 49 46 2c 20 28 20 73 61 6d 65 20 6c 6f 67 69 63 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 EXAF, M A MOV, COINBITL A BIT, 0<>, IF, | 20 45 58 41 46 2c 20 4d 20 41 20 4d 4f 56 2c 20 43 4f 49 4e 42 49 54 4c 20 41 20 42 49 54 2c 20 30 3c 3e 2c 20 49 46 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( in ) COINBITL A RES, A E MOV, wpb! CALL, EXAF, | 20 28 20 69 6e 20 29 20 43 4f 49 4e 42 49 54 4c 20 41 20 52 45 53 2c 20 41 20 45 20 4d 4f 56 2c 20 77 70 62 21 20 43 41 4c 4c 2c 20 45 58 41 46 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ELSE, COINBITL A SET, A E MOV, wpb! CALL, | 20 45 4c 53 45 2c 20 43 4f 49 4e 42 49 54 4c 20 41 20 53 45 54 2c 20 41 20 45 20 4d 4f 56 2c 20 77 70 62 21 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SETCOIN CALL, EXX, ( save BC ) | 20 53 45 54 43 4f 49 4e 20 43 41 4c 4c 2c 20 45 58 58 2c 20 28 20 73 61 76 65 20 42 43 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SETTINGS IN, A B MOV, | 53 45 54 54 49 4e 47 53 20 49 4e 2c 20 41 20 42 20 4d 4f 56 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6 ANI, RAR, ( 1 bit ) A C MOV, B A MOV, 1 ANI, 2 ORI, C CMP, | 20 36 20 41 4e 49 2c 20 52 41 52 2c 20 28 20 31 20 62 69 74 20 29 20 41 20 43 20 4d 4f 56 2c 20 42 20 41 20 4d 4f 56 2c 20 31 20 41 4e 49 2c 20 32 20 4f 52 49 2c 20 43 20 43 4d 50 2c 20 20 20 <>, IF, C A MOV, ( use 1st value ) EXX, A B MOV, | 20 3c 3e 2c 20 49 46 2c 20 43 20 41 20 4d 4f 56 2c 20 28 20 75 73 65 20 31 73 74 20 76 61 6c 75 65 20 29 20 45 58 58 2c 20 41 20 42 20 4d 4f 56 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ELSE, ( =, use 2nd ) EXX, A C MOV, | 20 45 4c 53 45 2c 20 28 20 3d 2c 20 75 73 65 20 32 6e 64 20 29 20 45 58 58 2c 20 41 20 43 20 4d 4f 56 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( use other door's coin counter ) THEN, THEN, THEN, | 20 28 20 75 73 65 20 6f 74 68 65 72 20 64 6f 6f 72 27 73 20 63 6f 69 6e 20 63 6f 75 6e 74 65 72 20 29 20 54 48 45 4e 2c 20 54 48 45 4e 2c 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 20 20 20 ( done reading coins ) | 28 20 64 6f 6e 65 20 72 65 61 64 69 6e 67 20 63 6f 69 6e 73 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0128 } ( COIN COUNTING ) | 28 20 43 4f 49 4e 20 43 4f 55 4e 54 49 4e 47 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 C A MOV, ( doorvalue 1 ) -1 CPI, <>, IF, ( coin ) | 20 43 20 41 20 4d 4f 56 2c 20 28 20 64 6f 6f 72 76 61 6c 75 65 20 31 20 29 20 2d 31 20 43 50 49 2c 20 3c 3e 2c 20 49 46 2c 20 28 20 63 6f 69 6e 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 COINCOUNT CALL, ( rack up ) | 20 43 4f 49 4e 43 4f 55 4e 54 20 43 41 4c 4c 2c 20 28 20 72 61 63 6b 20 75 70 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 COINBACKLOGR H LXI, M E MOV, E INR, wpb! CALL, | 20 43 4f 49 4e 42 41 43 4b 4c 4f 47 52 20 48 20 4c 58 49 2c 20 4d 20 45 20 4d 4f 56 2c 20 45 20 49 4e 52 2c 20 77 70 62 21 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 THEN, | 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 B A MOV, -1 CPI, 0<>, IF, COINCOUNT CALL, | 20 42 20 41 20 4d 4f 56 2c 20 2d 31 20 43 50 49 2c 20 30 3c 3e 2c 20 49 46 2c 20 43 4f 49 4e 43 4f 55 4e 54 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 COINBACKLOGL H LXI, M E MOV, E INR, wpb! CALL, THEN, | 20 43 4f 49 4e 42 41 43 4b 4c 4f 47 4c 20 48 20 4c 58 49 2c 20 4d 20 45 20 4d 4f 56 2c 20 45 20 49 4e 52 2c 20 77 70 62 21 20 43 41 4c 4c 2c 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0129 } ( COIN BACKLOGING, KEEPING BITS STRAIGHT ) | 28 20 43 4f 49 4e 20 42 41 43 4b 4c 4f 47 49 4e 47 2c 20 4b 45 45 50 49 4e 47 20 42 49 54 53 20 53 54 52 41 49 47 48 54 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( track counter bits ) | 20 28 20 74 72 61 63 6b 20 63 6f 75 6e 74 65 72 20 62 69 74 73 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CCMISC C MVI, A XRA, A B MOV, ( build proper value ) | 20 43 43 4d 49 53 43 20 43 20 4d 56 49 2c 20 41 20 58 52 41 2c 20 41 20 42 20 4d 4f 56 2c 20 28 20 62 75 69 6c 64 20 70 72 6f 70 65 72 20 76 61 6c 75 65 20 29 20 20 20 20 20 20 20 20 20 20 20 COINCOUNTERR H LXI, M CMP, 0<>, IF, ( timer for counter on ) | 20 43 4f 49 4e 43 4f 55 4e 54 45 52 52 20 48 20 4c 58 49 2c 20 4d 20 43 4d 50 2c 20 30 3c 3e 2c 20 49 46 2c 20 28 20 74 69 6d 65 72 20 66 6f 72 20 63 6f 75 6e 74 65 72 20 6f 6e 20 29 20 20 20 M E MOV, E DCR, wpb! CALL, ( destroys HL ) | 20 4d 20 45 20 4d 4f 56 2c 20 45 20 44 43 52 2c 20 77 70 62 21 20 43 41 4c 4c 2c 20 28 20 64 65 73 74 72 6f 79 73 20 48 4c 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 COINCOUNTERR H LXI, COINTICKS A MVI, ( load 2* ) M CMP, <, IF, | 20 43 4f 49 4e 43 4f 55 4e 54 45 52 52 20 48 20 4c 58 49 2c 20 43 4f 49 4e 54 49 43 4b 53 20 41 20 4d 56 49 2c 20 28 20 6c 6f 61 64 20 32 2a 20 29 20 4d 20 43 4d 50 2c 20 3c 2c 20 49 46 2c 20 ( if over 1/2 keep counter down till under 1/2 then up ) | 28 20 69 66 20 6f 76 65 72 20 31 2f 32 20 6b 65 65 70 20 63 6f 75 6e 74 65 72 20 64 6f 77 6e 20 74 69 6c 6c 20 75 6e 64 65 72 20 31 2f 32 20 74 68 65 6e 20 75 70 20 29 20 20 20 20 20 20 20 20 COINBITR B SET, ( on counter ) THEN, | 20 43 4f 49 4e 42 49 54 52 20 42 20 53 45 54 2c 20 28 20 6f 6e 20 63 6f 75 6e 74 65 72 20 29 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ELSE, ( no coin-in-progress ) H INX, ( BACKLOG, order dep. ) | 20 45 4c 53 45 2c 20 28 20 6e 6f 20 63 6f 69 6e 2d 69 6e 2d 70 72 6f 67 72 65 73 73 20 29 20 48 20 49 4e 58 2c 20 28 20 42 41 43 4b 4c 4f 47 2c 20 6f 72 64 65 72 20 64 65 70 2e 20 29 20 20 20 M CMP, 0<>, IF, ( got a backlog to rack up ) | 20 4d 20 43 4d 50 2c 20 30 3c 3e 2c 20 49 46 2c 20 28 20 67 6f 74 20 61 20 62 61 63 6b 6c 6f 67 20 74 6f 20 72 61 63 6b 20 75 70 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 M E MOV, E DCR, wpb! CALL, ( 1 less ) | 20 4d 20 45 20 4d 4f 56 2c 20 45 20 44 43 52 2c 20 77 70 62 21 20 43 41 4c 4c 2c 20 28 20 31 20 6c 65 73 73 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 COINCOUNTERR H LXI, COINTICKS 2* E MVI, wpb! CALL, | 20 43 4f 49 4e 43 4f 55 4e 54 45 52 52 20 48 20 4c 58 49 2c 20 43 4f 49 4e 54 49 43 4b 53 20 32 2a 20 45 20 4d 56 49 2c 20 77 70 62 21 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 THEN, THEN, ( save B ) | 20 54 48 45 4e 2c 20 54 48 45 4e 2c 20 28 20 73 61 76 65 20 42 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0130 } ( LEFT BACKLOG and COINCOUNTERS' output ) | 28 20 4c 45 46 54 20 42 41 43 4b 4c 4f 47 20 61 6e 64 20 43 4f 49 4e 43 4f 55 4e 54 45 52 53 27 20 6f 75 74 70 75 74 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 A XRA, COINCOUNTERL H LXI, M CMP, 0<>, IF, ( in-action ) | 41 20 58 52 41 2c 20 43 4f 49 4e 43 4f 55 4e 54 45 52 4c 20 48 20 4c 58 49 2c 20 4d 20 43 4d 50 2c 20 30 3c 3e 2c 20 49 46 2c 20 28 20 69 6e 2d 61 63 74 69 6f 6e 20 29 20 20 20 20 20 20 20 20 M E MOV, E DCR, wpb! CALL, | 20 4d 20 45 20 4d 4f 56 2c 20 45 20 44 43 52 2c 20 77 70 62 21 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 COINCOUNTERL H LXI, COINTICKS A MVI, M CMP, <, IF, ( 1/2 way ) | 20 43 4f 49 4e 43 4f 55 4e 54 45 52 4c 20 48 20 4c 58 49 2c 20 43 4f 49 4e 54 49 43 4b 53 20 41 20 4d 56 49 2c 20 4d 20 43 4d 50 2c 20 3c 2c 20 49 46 2c 20 28 20 31 2f 32 20 77 61 79 20 29 20 COINBITL B SET, ( on ) THEN, | 20 43 4f 49 4e 42 49 54 4c 20 42 20 53 45 54 2c 20 28 20 6f 6e 20 29 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ELSE, H INX, ( BACKLOG check ) M CMP, 0<>, IF, | 20 45 4c 53 45 2c 20 48 20 49 4e 58 2c 20 28 20 42 41 43 4b 4c 4f 47 20 63 68 65 63 6b 20 29 20 4d 20 43 4d 50 2c 20 30 3c 3e 2c 20 49 46 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 M E MOV, E DCR, wpb! CALL, ( 1 less ) | 20 4d 20 45 20 4d 4f 56 2c 20 45 20 44 43 52 2c 20 77 70 62 21 20 43 41 4c 4c 2c 20 28 20 31 20 6c 65 73 73 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 COINCOUNTERL H LXI, COINTICKS 2* E MVI, wpb! CALL, | 20 43 4f 49 4e 43 4f 55 4e 54 45 52 4c 20 48 20 4c 58 49 2c 20 43 4f 49 4e 54 49 43 4b 53 20 32 2a 20 45 20 4d 56 49 2c 20 77 70 62 21 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 THEN, THEN, ( betterbuilt ) | 20 54 48 45 4e 2c 20 54 48 45 4e 2c 20 28 20 62 65 74 74 65 72 62 75 69 6c 74 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( THIS CLUDGE HANDLES THE COIN COUNTER ) | 28 20 54 48 49 53 20 43 4c 55 44 47 45 20 48 41 4e 44 4c 45 53 20 54 48 45 20 43 4f 49 4e 20 43 4f 55 4e 54 45 52 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 B E MOV, B A MOV, 1 ANI, A B MOV, A INP, E A MOV, RRC, | 20 42 20 45 20 4d 4f 56 2c 20 42 20 41 20 4d 4f 56 2c 20 31 20 41 4e 49 2c 20 41 20 42 20 4d 4f 56 2c 20 41 20 49 4e 50 2c 20 45 20 41 20 4d 4f 56 2c 20 52 52 43 2c 20 20 20 20 20 20 20 20 20 1 ANI, 2 ORI, A B MOV, A INP, | 31 20 41 4e 49 2c 20 32 20 4f 52 49 2c 20 41 20 42 20 4d 4f 56 2c 20 41 20 49 4e 50 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 COUNTERBITS H LXI, wpb! CALL, | 20 43 4f 55 4e 54 45 52 42 49 54 53 20 48 20 4c 58 49 2c 20 77 70 62 21 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( all done ) | 28 20 61 6c 6c 20 64 6f 6e 65 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 RET, | 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0131 } ( BCD SCORE STUFF - INCREMENT AND ZERO ) | 28 20 42 43 44 20 53 43 4f 52 45 20 53 54 55 46 46 20 2d 20 49 4e 43 52 45 4d 45 4e 54 20 41 4e 44 20 5a 45 52 4f 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 F= wpam! | 46 3d 20 77 70 61 6d 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR DAPAM | 41 53 53 45 4d 42 4c 45 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE BCD+! EXX, H POP, D POP, | 43 4f 44 45 20 42 43 44 2b 21 20 45 58 58 2c 20 48 20 50 4f 50 2c 20 44 20 50 4f 50 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 M A MOV, E ADD, DAPAM CALL, | 4d 20 41 20 4d 4f 56 2c 20 45 20 41 44 44 2c 20 44 41 50 41 4d 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 H INX, M A MOV, D ADC, DAPAM CALL, | 48 20 49 4e 58 2c 20 4d 20 41 20 4d 4f 56 2c 20 44 20 41 44 43 2c 20 44 41 50 41 4d 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 H INX, M A MOV, 0 ACI, DAPAM CALL, | 48 20 49 4e 58 2c 20 4d 20 41 20 4d 4f 56 2c 20 30 20 41 43 49 2c 20 44 41 50 41 4d 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 EXX, NEXT | 45 58 58 2c 20 4e 45 58 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE ZEROSCORE EXX, H POP, 3 B MVI, 0 E MVI, BEGIN, | 43 4f 44 45 20 5a 45 52 4f 53 43 4f 52 45 20 45 58 58 2c 20 48 20 50 4f 50 2c 20 33 20 42 20 4d 56 49 2c 20 30 20 45 20 4d 56 49 2c 20 42 45 47 49 4e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 wpb! CALL, H INX, LOOP, EXX, NEXT | 77 70 62 21 20 43 41 4c 4c 2c 20 48 20 49 4e 58 2c 20 4c 4f 4f 50 2c 20 45 58 58 2c 20 4e 45 58 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HEX DATA CKSM2 0B3 B, | 48 45 58 20 44 41 54 41 20 43 4b 53 4d 32 20 30 42 33 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0132 } ( NEW, IMPROVED, HOTROD INTERRUPT SYSTEM ) DECIMAL | 28 20 4e 45 57 2c 20 49 4d 50 52 4f 56 45 44 2c 20 48 4f 54 52 4f 44 20 49 4e 54 45 52 52 55 50 54 20 53 59 53 54 45 4d 20 29 20 44 45 43 49 4d 41 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HEX CC? IFTRUE 62 C= IPNT OTHERWISE HERE 0F + FFF0 AND DP ! | 48 45 58 20 43 43 3f 20 49 46 54 52 55 45 20 36 32 20 43 3d 20 49 50 4e 54 20 4f 54 48 45 52 57 49 53 45 20 48 45 52 45 20 30 46 20 2b 20 46 46 46 30 20 41 4e 44 20 44 50 20 21 20 20 20 20 20 DATA KPNT 0 , 0 , 0 , KPNT 2 + C= IPNT IFEND | 44 41 54 41 20 4b 50 4e 54 20 30 20 2c 20 30 20 2c 20 30 20 2c 20 4b 50 4e 54 20 32 20 2b 20 43 3d 20 49 50 4e 54 20 49 46 45 4e 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 IPNT 2 + C= BGINTVEC | 49 50 4e 54 20 32 20 2b 20 43 3d 20 42 47 49 4e 54 56 45 43 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( LIGHT PEN INTERRUPT ROUTINE ) | 28 20 4c 49 47 48 54 20 50 45 4e 20 49 4e 54 45 52 52 55 50 54 20 52 4f 55 54 49 4e 45 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR LPINT PSW PUSH, VERAF IN, LPYC STA, 8 A MVI, LPFLAG STA, | 53 55 42 52 20 4c 50 49 4e 54 20 50 53 57 20 50 55 53 48 2c 20 56 45 52 41 46 20 49 4e 2c 20 4c 50 59 43 20 53 54 41 2c 20 38 20 41 20 4d 56 49 2c 20 4c 50 46 4c 41 47 20 53 54 41 2c 20 20 20 INMOD OUT, PSW POP, EI, RET, | 49 4e 4d 4f 44 20 4f 55 54 2c 20 50 53 57 20 50 4f 50 2c 20 45 49 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( ROUTINE TO RETURN Y ADDRESS SCREEN IS AT ) | 28 20 52 4f 55 54 49 4e 45 20 54 4f 20 52 45 54 55 52 4e 20 59 20 41 44 44 52 45 53 53 20 53 43 52 45 45 4e 20 49 53 20 41 54 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR GETSYC A XRA, LPFLAG STA, 18 A MVI, INMOD OUT, BEGIN, | 53 55 42 52 20 47 45 54 53 59 43 20 41 20 58 52 41 2c 20 4c 50 46 4c 41 47 20 53 54 41 2c 20 31 38 20 41 20 4d 56 49 2c 20 49 4e 4d 4f 44 20 4f 55 54 2c 20 42 45 47 49 4e 2c 20 20 20 20 20 20 LPFLAG LDA, A ANA, 0<>, END, LPYC LDA, RET, | 4c 50 46 4c 41 47 20 4c 44 41 2c 20 41 20 41 4e 41 2c 20 30 3c 3e 2c 20 45 4e 44 2c 20 4c 50 59 43 20 4c 44 41 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0133 } ( RESUME BACKGROUND - END INTERRUPT ) | 28 20 52 45 53 55 4d 45 20 42 41 43 4b 47 52 4f 55 4e 44 20 2d 20 45 4e 44 20 49 4e 54 45 52 52 55 50 54 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL F= ENDINT | 44 45 43 49 4d 41 4c 20 46 3d 20 45 4e 44 49 4e 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR RESUMEBACKGROUND | 50 53 57 20 50 4f 50 2c 20 45 49 2c 20 52 45 54 2c 20 41 53 53 45 4d 42 4c 45 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0134 } ( TRY TO RUN SOMETHING IN FOREGROUND ) | 28 20 54 52 59 20 54 4f 20 52 55 4e 20 53 4f 4d 45 54 48 49 4e 47 20 49 4e 20 46 4f 52 45 47 52 4f 55 4e 44 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 F= RETPT F= TRYAGAIN | 46 3d 20 52 45 54 50 54 20 46 3d 20 54 52 59 41 47 41 49 4e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HEX SUBR TRYFOREGROUND , IF, VPATL X L LDX, VPATH X H LDX, | 43 4f 43 4b 54 41 49 4c 20 4c 44 41 2c 20 41 20 41 4e 41 2c 20 30 3c 3e 2c 20 49 46 2c 20 56 50 41 54 4c 20 58 20 4c 20 4c 44 58 2c 20 56 50 41 54 48 20 58 20 48 20 4c 44 58 2c 20 20 20 20 20 L A MOV, H ORA, CB A MVI, 0<>, IF, VYH X SUBX, H INX, M SUB, | 4c 20 41 20 4d 4f 56 2c 20 48 20 4f 52 41 2c 20 43 42 20 41 20 4d 56 49 2c 20 30 3c 3e 2c 20 49 46 2c 20 56 59 48 20 58 20 53 55 42 58 2c 20 48 20 49 4e 58 2c 20 4d 20 53 55 42 2c 20 20 20 20 ELSE, VYH X SUBX, THEN, ELSE, VYH X A LDX, THEN, | 45 4c 53 45 2c 20 56 59 48 20 58 20 53 55 42 58 2c 20 54 48 45 4e 2c 20 45 4c 53 45 2c 20 56 59 48 20 58 20 41 20 4c 44 58 2c 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 C SUB, 0<, IF, CMA, A INR, THEN, | 43 20 53 55 42 2c 20 30 3c 2c 20 49 46 2c 20 43 4d 41 2c 20 41 20 49 4e 52 2c 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 VXZW X CMPX, RESUMEBACKGROUND JC, THEN, DI, nextq CALL, | 56 58 5a 57 20 58 20 43 4d 50 58 2c 20 52 45 53 55 4d 45 42 41 43 4b 47 52 4f 55 4e 44 20 4a 43 2c 20 54 48 45 4e 2c 20 44 49 2c 20 6e 65 78 74 71 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 EI, TRYAGAIN H LXI, H PUSH, PQRL X L LDX, PQRH X H LDX, PCHL, | 45 49 2c 20 54 52 59 41 47 41 49 4e 20 48 20 4c 58 49 2c 20 48 20 50 55 53 48 2c 20 50 51 52 4c 20 58 20 4c 20 4c 44 58 2c 20 50 51 52 48 20 58 20 48 20 4c 44 58 2c 20 50 43 48 4c 2c 20 20 20 ASSEMBLE> --> | 41 53 53 45 4d 42 4c 45 3e 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0135 } ( BACKGROUND END AND TIMER INTERRUPTS ) | 28 20 42 41 43 4b 47 52 4f 55 4e 44 20 45 4e 44 20 41 4e 44 20 54 49 4d 45 52 20 49 4e 54 45 52 52 55 50 54 53 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HEX SUBR BGENDI PSW PUSH, B PUSH, D PUSH, H PUSH, EXX, EXAF, | 48 45 58 20 53 55 42 52 20 42 47 45 4e 44 49 20 50 53 57 20 50 55 53 48 2c 20 42 20 50 55 53 48 2c 20 44 20 50 55 53 48 2c 20 48 20 50 55 53 48 2c 20 45 58 58 2c 20 45 58 41 46 2c 20 20 20 20 PSW PUSH, B PUSH, D PUSH, H PUSH, X PUSHX, Y PUSHX, | 50 53 57 20 50 55 53 48 2c 20 42 20 50 55 53 48 2c 20 44 20 50 55 53 48 2c 20 48 20 50 55 53 48 2c 20 58 20 50 55 53 48 58 2c 20 59 20 50 55 53 48 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 80 A MVI, INLIN OUT, IPNT A MVI, INFBK OUT, TRYFOREGROUND JMP, | 38 30 20 41 20 4d 56 49 2c 20 49 4e 4c 49 4e 20 4f 55 54 2c 20 49 50 4e 54 20 41 20 4d 56 49 2c 20 49 4e 46 42 4b 20 4f 55 54 2c 20 54 52 59 46 4f 52 45 47 52 4f 55 4e 44 20 4a 4d 50 2c 20 20 F= LOCKED | 46 3d 20 4c 4f 43 4b 45 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR TIMINT , IF, M DCR, | 49 4e 54 44 4f 47 20 48 20 4c 58 49 2c 20 4d 20 41 20 4d 4f 56 2c 20 41 20 41 4e 41 2c 20 30 3c 3e 2c 20 49 46 2c 20 4d 20 44 43 52 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 COINCHECK CALL, | 43 4f 49 4e 43 48 45 43 4b 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 THEN, UPDCOMB CALL, | 54 48 45 4e 2c 20 55 50 44 43 4f 4d 42 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 LOCKOUTCOUNTER LDA, A ANA, LOCKED JNZ, | 4c 4f 43 4b 4f 55 54 43 4f 55 4e 54 45 52 20 4c 44 41 2c 20 41 20 41 4e 41 2c 20 4c 4f 43 4b 45 44 20 4a 4e 5a 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0136 } ( TIMER INTERRUPT ) | 28 20 54 49 4d 45 52 20 49 4e 54 45 52 52 55 50 54 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 TIMER0 LHLD, H A MOV, L ORA, 0<>, IF, H DCX, TIMER0 SHLD, THEN, | 54 49 4d 45 52 30 20 4c 48 4c 44 2c 20 48 20 41 20 4d 4f 56 2c 20 4c 20 4f 52 41 2c 20 30 3c 3e 2c 20 49 46 2c 20 48 20 44 43 58 2c 20 54 49 4d 45 52 30 20 53 48 4c 44 2c 20 54 48 45 4e 2c 20 TIMER1 LHLD, H A MOV, L ORA, 0<>, IF, H DCX, TIMER1 SHLD, THEN, | 54 49 4d 45 52 31 20 4c 48 4c 44 2c 20 48 20 41 20 4d 4f 56 2c 20 4c 20 4f 52 41 2c 20 30 3c 3e 2c 20 49 46 2c 20 48 20 44 43 58 2c 20 54 49 4d 45 52 31 20 53 48 4c 44 2c 20 54 48 45 4e 2c 20 TIMER2 LHLD, H A MOV, L ORA, 0<>, IF, H DCX, TIMER2 SHLD, THEN, | 54 49 4d 45 52 32 20 4c 48 4c 44 2c 20 48 20 41 20 4d 4f 56 2c 20 4c 20 4f 52 41 2c 20 30 3c 3e 2c 20 49 46 2c 20 48 20 44 43 58 2c 20 54 49 4d 45 52 32 20 53 48 4c 44 2c 20 54 48 45 4e 2c 20 TIMER3 LHLD, H A MOV, L ORA, 0<>, IF, H DCX, TIMER3 SHLD, THEN, | 54 49 4d 45 52 33 20 4c 48 4c 44 2c 20 48 20 41 20 4d 4f 56 2c 20 4c 20 4f 52 41 2c 20 30 3c 3e 2c 20 49 46 2c 20 48 20 44 43 58 2c 20 54 49 4d 45 52 33 20 53 48 4c 44 2c 20 54 48 45 4e 2c 20 BLINKTIMER H LXI, M A MOV, A ANA, 0<>, IF, M DCR, THEN, | 42 4c 49 4e 4b 54 49 4d 45 52 20 48 20 4c 58 49 2c 20 4d 20 41 20 4d 4f 56 2c 20 41 20 41 4e 41 2c 20 30 3c 3e 2c 20 49 46 2c 20 4d 20 44 43 52 2c 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 GAMTMR LHLD, H A MOV, L ORA, 0<>, IF, H DCX, ELSE, | 47 41 4d 54 4d 52 20 4c 48 4c 44 2c 20 48 20 41 20 4d 4f 56 2c 20 4c 20 4f 52 41 2c 20 30 3c 3e 2c 20 49 46 2c 20 48 20 44 43 58 2c 20 45 4c 53 45 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HARDNESS H LXI, M INR, 400 H LXI, THEN, GAMTMR SHLD, | 48 41 52 44 4e 45 53 53 20 48 20 4c 58 49 2c 20 4d 20 49 4e 52 2c 20 34 30 30 20 48 20 4c 58 49 2c 20 54 48 45 4e 2c 20 47 41 4d 54 4d 52 20 53 48 4c 44 2c 20 20 20 20 20 20 20 20 20 20 20 20 BGTIMER LDA, A ANA, 0<>, IF, A DCR, BGTIMER STA, THEN, | 42 47 54 49 4d 45 52 20 4c 44 41 2c 20 41 20 41 4e 41 2c 20 30 3c 3e 2c 20 49 46 2c 20 41 20 44 43 52 2c 20 42 47 54 49 4d 45 52 20 53 54 41 2c 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 20 1 C MVI, 0 vqhead Y LXIX, INCTB CALL, | 31 20 43 20 4d 56 49 2c 20 30 20 76 71 68 65 61 64 20 59 20 4c 58 49 58 2c 20 49 4e 43 54 42 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 BACKGROUNDRUNNING LDA, A ANA, TRYFOREGROUND JNZ, | 42 41 43 4b 47 52 4f 55 4e 44 52 55 4e 4e 49 4e 47 20 4c 44 41 2c 20 41 20 41 4e 41 2c 20 54 52 59 46 4f 52 45 47 52 4f 55 4e 44 20 4a 4e 5a 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 LABEL LOCKED | 4c 41 42 45 4c 20 4c 4f 43 4b 45 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 Y POPX, X POPX, H POP, D POP, B POP, PSW POP, | 59 20 50 4f 50 58 2c 20 58 20 50 4f 50 58 2c 20 48 20 50 4f 50 2c 20 44 20 50 4f 50 2c 20 42 20 50 4f 50 2c 20 50 53 57 20 50 4f 50 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 EXX, EXAF, H POP, D POP, B POP, PSW POP, EI, RET, | 45 58 58 2c 20 45 58 41 46 2c 20 48 20 50 4f 50 2c 20 44 20 50 4f 50 2c 20 42 20 50 4f 50 2c 20 50 53 57 20 50 4f 50 2c 20 45 49 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ASSEMBLE> | 41 53 53 45 4d 42 4c 45 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0137 } ( INTERRUPT START ROUTINE, BARK, KILLOFF ) HEX | 28 20 49 4e 54 45 52 52 55 50 54 20 53 54 41 52 54 20 52 4f 55 54 49 4e 45 2c 20 42 41 52 4b 2c 20 4b 49 4c 4c 4f 46 46 20 29 20 48 45 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE INTSTART DI, IPNT { SWAB } A MVI, STAI, IPNT A MVI, | 43 4f 44 45 20 49 4e 54 53 54 41 52 54 20 44 49 2c 20 49 50 4e 54 20 7b 20 53 57 41 42 20 7d 20 41 20 4d 56 49 2c 20 53 54 41 49 2c 20 49 50 4e 54 20 41 20 4d 56 49 2c 20 20 20 20 20 20 20 20 INFBK OUT, 1 A MVI, BACKGROUNDRUNNING STA, 8 A MVI, INMOD OUT, | 49 4e 46 42 4b 20 4f 55 54 2c 20 31 20 41 20 4d 56 49 2c 20 42 41 43 4b 47 52 4f 55 4e 44 52 55 4e 4e 49 4e 47 20 53 54 41 2c 20 38 20 41 20 4d 56 49 2c 20 49 4e 4d 4f 44 20 4f 55 54 2c 20 20 80 A MVI, INLIN OUT, | 38 30 20 41 20 4d 56 49 2c 20 49 4e 4c 49 4e 20 4f 55 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 IM2, EI, NEXT | 49 4d 32 2c 20 45 49 2c 20 4e 45 58 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( HIT THE WATCHDOG IF EVERYTHING IS COOL ) | 28 20 48 49 54 20 54 48 45 20 57 41 54 43 48 44 4f 47 20 49 46 20 45 56 45 52 59 54 48 49 4e 47 20 49 53 20 43 4f 4f 4c 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL | 44 45 43 49 4d 41 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR bowwow 180 A MVI, INTDOG STA, RET, | 53 55 42 52 20 62 6f 77 77 6f 77 20 31 38 30 20 41 20 4d 56 49 2c 20 49 4e 54 44 4f 47 20 53 54 41 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE BARK bowwow CALL, NEXT | 43 4f 44 45 20 42 41 52 4b 20 62 6f 77 77 6f 77 20 43 41 4c 4c 2c 20 4e 45 58 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( ROUTINE TO DELETE VECTOR IF STATUS SO INDICATES ) | 28 20 52 4f 55 54 49 4e 45 20 54 4f 20 44 45 4c 45 54 45 20 56 45 43 54 4f 52 20 49 46 20 53 54 41 54 55 53 20 53 4f 20 49 4e 44 49 43 41 54 45 53 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR KILLOFF PQSRH PQS X BITX, 0=, IF, DI, 0 vqhead Y LXIX, | 53 55 42 52 20 4b 49 4c 4c 4f 46 46 20 50 51 53 52 48 20 50 51 53 20 58 20 42 49 54 58 2c 20 30 3d 2c 20 49 46 2c 20 44 49 2c 20 30 20 76 71 68 65 61 64 20 59 20 4c 58 49 58 2c 20 20 20 20 20 delq CALL, PQSDF PQS X BITX, 0 PQS X MVIX, | 64 65 6c 71 20 43 41 4c 4c 2c 20 50 51 53 44 46 20 50 51 53 20 58 20 42 49 54 58 2c 20 30 20 50 51 53 20 58 20 4d 56 49 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0=, IF, X PUSHX, H POP, freenode CALL, | 30 3d 2c 20 49 46 2c 20 58 20 50 55 53 48 58 2c 20 48 20 50 4f 50 2c 20 66 72 65 65 6e 6f 64 65 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 THEN, EI, THEN, RET, | 54 48 45 4e 2c 20 45 49 2c 20 54 48 45 4e 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0138 } ( MACROS TO GENERATE ANIMATION OPCODES ) DECIMAL | 28 20 4d 41 43 52 4f 53 20 54 4f 20 47 45 4e 45 52 41 54 45 20 41 4e 49 4d 41 54 49 4f 4e 20 4f 50 43 4f 44 45 53 20 29 20 44 45 43 49 4d 41 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CC? IFTRUE | 7b 20 3a 20 44 49 53 50 4c 20 7d 20 32 36 20 42 2c 20 53 57 41 50 20 42 2c 20 42 2c 20 7b 20 3b 20 7d 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0139 } ( MORE ANIMATION MACRO STUFF ) | 28 20 4d 4f 52 45 20 41 4e 49 4d 41 54 49 4f 4e 20 4d 41 43 52 4f 20 53 54 55 46 46 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { : AREPEAT } 28 B, B, HERE { ; } | 7b 20 3a 20 41 52 45 50 45 41 54 20 7d 20 32 38 20 42 2c 20 42 2c 20 48 45 52 45 20 7b 20 3b 20 7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { : ALOOP } 30 B, , { ; } | 7b 20 3a 20 41 4c 4f 4f 50 20 7d 20 33 30 20 42 2c 20 2c 20 7b 20 3b 20 7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { : SETS } 32 B, B, B, { ; } | 7b 20 3a 20 53 45 54 53 20 7d 20 33 32 20 42 2c 20 42 2c 20 42 2c 20 7b 20 3b 20 7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { : PATI } 34 B, B, { ; } | 7b 20 3a 20 50 41 54 49 20 7d 20 33 34 20 42 2c 20 42 2c 20 7b 20 3b 20 7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { : ASMCALL } 36 B, , { ; } | 7b 20 3a 20 41 53 4d 43 41 4c 4c 20 7d 20 33 36 20 42 2c 20 2c 20 7b 20 3b 20 7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { : SETPT } 38 B, , { ; } | 7b 20 3a 20 53 45 54 50 54 20 7d 20 33 38 20 42 2c 20 2c 20 7b 20 3b 20 7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { : SETFP } 40 B, , { ; } | 7b 20 3a 20 53 45 54 46 50 20 7d 20 34 30 20 42 2c 20 2c 20 7b 20 3b 20 7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { : SETXZW } 42 B, B, { ; } | 7b 20 3a 20 53 45 54 58 5a 57 20 7d 20 34 32 20 42 2c 20 42 2c 20 7b 20 3b 20 7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { : RANDOMDO } 44 B, SWAP B, , { ; } | 7b 20 3a 20 52 41 4e 44 4f 4d 44 4f 20 7d 20 34 34 20 42 2c 20 53 57 41 50 20 42 2c 20 2c 20 7b 20 3b 20 7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { : SETXP } 46 B, B, { ; } | 7b 20 3a 20 53 45 54 58 50 20 7d 20 34 36 20 42 2c 20 42 2c 20 7b 20 3b 20 7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { : FOREVER } HERE { ; } | 7b 20 3a 20 46 4f 52 45 56 45 52 20 7d 20 48 45 52 45 20 7b 20 3b 20 7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { : EVERFOR } 10 B, , { ; } | 7b 20 3a 20 45 56 45 52 46 4f 52 20 7d 20 31 30 20 42 2c 20 2c 20 7b 20 3b 20 7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CC? IFTRUE ONSCR> IFEND --> | 43 43 3f 20 49 46 54 52 55 45 20 4f 4e 53 43 52 3e 20 49 46 45 4e 44 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0140 } ( ANIMATION INTERPRETER ROUTINES ) | 28 20 41 4e 49 4d 41 54 49 4f 4e 20 49 4e 54 45 52 50 52 45 54 45 52 20 52 4f 55 54 49 4e 45 53 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR RASETP M E MOV, H INX, M D MOV, H INX, E VPATL X STX, | 53 55 42 52 20 52 41 53 45 54 50 20 4d 20 45 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 4d 20 44 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 45 20 56 50 41 54 4c 20 58 20 53 54 58 2c 20 20 20 20 20 20 D VPATH X STX, RET, | 44 20 56 50 41 54 48 20 58 20 53 54 58 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR RASETM M A MOV, H INX, A VMAGIC X STX, RET, | 53 55 42 52 20 52 41 53 45 54 4d 20 4d 20 41 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 41 20 56 4d 41 47 49 43 20 58 20 53 54 58 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR RASETR M E MOV, H INX, M D MOV, H INX, E PQRL X STX, | 53 55 42 52 20 52 41 53 45 54 52 20 4d 20 45 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 4d 20 44 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 45 20 50 51 52 4c 20 58 20 53 54 58 2c 20 20 20 20 20 20 20 D PQRH X STX, RET, | 44 20 50 51 52 48 20 58 20 53 54 58 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR RAWAIT M A MOV, H INX, PQSFRZ PQS X BITX, 0<>, IF, | 53 55 42 52 20 52 41 57 41 49 54 20 4d 20 41 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 50 51 53 46 52 5a 20 50 51 53 20 58 20 42 49 54 58 2c 20 30 3c 3e 2c 20 49 46 2c 20 20 20 20 20 20 20 20 20 1 A MVI, THEN, A VATMR X STX, L VPCL X STX, | 31 20 41 20 4d 56 49 2c 20 54 48 45 4e 2c 20 41 20 56 41 54 4d 52 20 58 20 53 54 58 2c 20 4c 20 56 50 43 4c 20 58 20 53 54 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 H VPCH X STX, H POP, RET, | 48 20 56 50 43 48 20 58 20 53 54 58 2c 20 48 20 50 4f 50 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR RACALL M C MOV, H INX, M B MOV, H INX, XCHG, | 53 55 42 52 20 52 41 43 41 4c 4c 20 4d 20 43 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 4d 20 42 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 58 43 48 47 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 VSPL X L LDX, VSPH X H LDX, E M MOV, H INX, D M MOV, H INX, | 56 53 50 4c 20 58 20 4c 20 4c 44 58 2c 20 56 53 50 48 20 58 20 48 20 4c 44 58 2c 20 45 20 4d 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 44 20 4d 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 20 20 20 20 L VSPL X STX, H VSPH X STX, C L MOV, B H MOV, RET, | 4c 20 56 53 50 4c 20 58 20 53 54 58 2c 20 48 20 56 53 50 48 20 58 20 53 54 58 2c 20 43 20 4c 20 4d 4f 56 2c 20 42 20 48 20 4d 4f 56 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR RARET VSPL X L LDX, VSPH X H LDX, H DCX, M D MOV, H DCX, | 53 55 42 52 20 52 41 52 45 54 20 56 53 50 4c 20 58 20 4c 20 4c 44 58 2c 20 56 53 50 48 20 58 20 48 20 4c 44 58 2c 20 48 20 44 43 58 2c 20 4d 20 44 20 4d 4f 56 2c 20 48 20 44 43 58 2c 20 20 20 M E MOV, L VSPL X STX, H VSPH X STX, XCHG, RET, | 4d 20 45 20 4d 4f 56 2c 20 4c 20 56 53 50 4c 20 58 20 53 54 58 2c 20 48 20 56 53 50 48 20 58 20 53 54 58 2c 20 58 43 48 47 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR RAHALT PQSRH PQS X RESX, H POP, RET, | 53 55 42 52 20 52 41 48 41 4c 54 20 50 51 53 52 48 20 50 51 53 20 58 20 52 45 53 58 2c 20 48 20 50 4f 50 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR RASETXP M A MOV, H INX, A VXPAND X STX, RET, --> | 53 55 42 52 20 52 41 53 45 54 58 50 20 4d 20 41 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 41 20 56 58 50 41 4e 44 20 58 20 53 54 58 2c 20 52 45 54 2c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0141 } ( MORE ANIMATION INTERPRETER ROUTINES ) | 28 20 4d 4f 52 45 20 41 4e 49 4d 41 54 49 4f 4e 20 49 4e 54 45 52 50 52 45 54 45 52 20 52 4f 55 54 49 4e 45 53 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR RASETI M E MOV, H INX, M D MOV, H INX, E VIRL X STX, | 53 55 42 52 20 52 41 53 45 54 49 20 4d 20 45 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 4d 20 44 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 45 20 56 49 52 4c 20 58 20 53 54 58 2c 20 20 20 20 20 20 20 D VIRH X STX, RET, | 44 20 56 49 52 48 20 58 20 53 54 58 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR RASETXC M E MOV, H INX, M D MOV, H INX, E VXL X STX, | 53 55 42 52 20 52 41 53 45 54 58 43 20 4d 20 45 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 4d 20 44 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 45 20 56 58 4c 20 58 20 53 54 58 2c 20 20 20 20 20 20 20 D VXH X STX, RET, | 44 20 56 58 48 20 58 20 53 54 58 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR RASETYC M E MOV, H INX, M D MOV, H INX, E VYL X STX, | 53 55 42 52 20 52 41 53 45 54 59 43 20 4d 20 45 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 4d 20 44 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 45 20 56 59 4c 20 58 20 53 54 58 2c 20 20 20 20 20 20 20 D VYH X STX, RET, | 44 20 56 59 48 20 58 20 53 54 58 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR RAJMP M E MOV, H INX, M D MOV, XCHG, RET, | 53 55 42 52 20 52 41 4a 4d 50 20 4d 20 45 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 4d 20 44 20 4d 4f 56 2c 20 58 43 48 47 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR RASETDC M E MOV, H INX, M D MOV, H INX, | 53 55 42 52 20 52 41 53 45 54 44 43 20 4d 20 45 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 4d 20 44 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 E VDXL X STX, D VDXH X STX, | 45 20 56 44 58 4c 20 58 20 53 54 58 2c 20 44 20 56 44 58 48 20 58 20 53 54 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 M E MOV, H INX, M D MOV, H INX, | 4d 20 45 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 4d 20 44 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 E VDYL X STX, D VDYH X STX, RET, | 45 20 56 44 59 4c 20 58 20 53 54 58 2c 20 44 20 56 44 59 48 20 58 20 53 54 58 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR RASETDDC M E MOV, H INX, M D MOV, H INX, E VDDXL X STX, | 53 55 42 52 20 52 41 53 45 54 44 44 43 20 4d 20 45 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 4d 20 44 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 45 20 56 44 44 58 4c 20 58 20 53 54 58 2c 20 20 20 20 D VDDXH X STX, M E MOV, H INX, M D MOV, H INX, E VDDYL X STX, | 44 20 56 44 44 58 48 20 58 20 53 54 58 2c 20 4d 20 45 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 4d 20 44 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 45 20 56 44 44 59 4c 20 58 20 53 54 58 2c 20 20 20 D VDDYH X STX, RET, | 44 20 56 44 44 59 48 20 58 20 53 54 58 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0142 } ( YET MORE ANIMATION INTERPRETER ROUTINES ) | 28 20 59 45 54 20 4d 4f 52 45 20 41 4e 49 4d 41 54 49 4f 4e 20 49 4e 54 45 52 50 52 45 54 45 52 20 52 4f 55 54 49 4e 45 53 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR RASETREP M A MOV, H INX, VSPL X E LDX, VSPH X D LDX, | 53 55 42 52 20 52 41 53 45 54 52 45 50 20 4d 20 41 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 56 53 50 4c 20 58 20 45 20 4c 44 58 2c 20 56 53 50 48 20 58 20 44 20 4c 44 58 2c 20 20 20 20 20 20 20 D STAX, D INX, E VSPL X STX, D VSPH X STX, RET, | 44 20 53 54 41 58 2c 20 44 20 49 4e 58 2c 20 45 20 56 53 50 4c 20 58 20 53 54 58 2c 20 44 20 56 53 50 48 20 58 20 53 54 58 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR RALOOP M E MOV, H INX, M D MOV, H INX, VSPL X C LDX, | 53 55 42 52 20 52 41 4c 4f 4f 50 20 4d 20 45 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 4d 20 44 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 56 53 50 4c 20 58 20 43 20 4c 44 58 2c 20 20 20 20 20 20 20 VSPH X B LDX, B DCX, B LDAX, A DCR, 0<>, IF, B STAX, XCHG, | 56 53 50 48 20 58 20 42 20 4c 44 58 2c 20 42 20 44 43 58 2c 20 42 20 4c 44 41 58 2c 20 41 20 44 43 52 2c 20 30 3c 3e 2c 20 49 46 2c 20 42 20 53 54 41 58 2c 20 58 43 48 47 2c 20 20 20 20 20 20 ELSE, C VSPL X STX, B VSPH X STX, THEN, RET, | 45 4c 53 45 2c 20 43 20 56 53 50 4c 20 58 20 53 54 58 2c 20 42 20 56 53 50 48 20 58 20 53 54 58 2c 20 54 48 45 4e 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR RASETS M C MOV, H INX, M B MOV, H INX, PQS X A LDX, | 53 55 42 52 20 52 41 53 45 54 53 20 4d 20 43 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 4d 20 42 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 50 51 53 20 58 20 41 20 4c 44 58 2c 20 20 20 20 20 20 20 20 C XRA, B ANA, C XRA, A PQS X STX, RET, | 43 20 58 52 41 2c 20 42 20 41 4e 41 2c 20 43 20 58 52 41 2c 20 41 20 50 51 53 20 58 20 53 54 58 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HEX | 48 45 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR RADISP M A MOV, H INX, XCHG, RRC, RRC, A B MOV, C0 ANI, | 53 55 42 52 20 52 41 44 49 53 50 20 4d 20 41 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 58 43 48 47 2c 20 52 52 43 2c 20 52 52 43 2c 20 41 20 42 20 4d 4f 56 2c 20 43 30 20 41 4e 49 2c 20 20 20 20 A C MOV, B A MOV, 5 A BIT, 0<>, IF, C0 ORI, ELSE, 3F ANI, | 41 20 43 20 4d 4f 56 2c 20 42 20 41 20 4d 4f 56 2c 20 35 20 41 20 42 49 54 2c 20 30 3c 3e 2c 20 49 46 2c 20 43 30 20 4f 52 49 2c 20 45 4c 53 45 2c 20 33 46 20 41 4e 49 2c 20 20 20 20 20 20 20 THEN, A B MOV, VXL X L LDX, VXH X H LDX, B DAD, L VXL X STX, | 54 48 45 4e 2c 20 41 20 42 20 4d 4f 56 2c 20 56 58 4c 20 58 20 4c 20 4c 44 58 2c 20 56 58 48 20 58 20 48 20 4c 44 58 2c 20 42 20 44 41 44 2c 20 4c 20 56 58 4c 20 58 20 53 54 58 2c 20 20 20 20 H VXH X STX, D LDAX, D INX, A B MOV, 0 C MVI, | 48 20 56 58 48 20 58 20 53 54 58 2c 20 44 20 4c 44 41 58 2c 20 44 20 49 4e 58 2c 20 41 20 42 20 4d 4f 56 2c 20 30 20 43 20 4d 56 49 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 VYL X L LDX, VYH X H LDX, B DAD, L VYL X STX, H VYH X STX, | 56 59 4c 20 58 20 4c 20 4c 44 58 2c 20 56 59 48 20 58 20 48 20 4c 44 58 2c 20 42 20 44 41 44 2c 20 4c 20 56 59 4c 20 58 20 53 54 58 2c 20 48 20 56 59 48 20 58 20 53 54 58 2c 20 20 20 20 20 20 XCHG, RET, | 58 43 48 47 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0143 } ( THE ABSOLUTELY LAST SCREEN OF ANIMATION INTERPRETER STUFF ) | 28 20 54 48 45 20 41 42 53 4f 4c 55 54 45 4c 59 20 4c 41 53 54 20 53 43 52 45 45 4e 20 4f 46 20 41 4e 49 4d 41 54 49 4f 4e 20 49 4e 54 45 52 50 52 45 54 45 52 20 53 54 55 46 46 20 29 20 20 20 SUBR RAPATI M C MOV, H INX, 0 B MVI, XCHG, | 53 55 42 52 20 52 41 50 41 54 49 20 4d 20 43 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 30 20 42 20 4d 56 49 2c 20 58 43 48 47 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 VPTBL X L LDX, VPTBH X H LDX, B DAD, M C MOV, H INX, M B MOV, | 56 50 54 42 4c 20 58 20 4c 20 4c 44 58 2c 20 56 50 54 42 48 20 58 20 48 20 4c 44 58 2c 20 42 20 44 41 44 2c 20 4d 20 43 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 4d 20 42 20 4d 4f 56 2c 20 20 20 C VPATL X STX, B VPATH X STX, XCHG, RET, | 43 20 56 50 41 54 4c 20 58 20 53 54 58 2c 20 42 20 56 50 41 54 48 20 58 20 53 54 58 2c 20 58 43 48 47 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR RASMCALL M E MOV, H INX, M D MOV, H INX, D PUSH, RET, | 53 55 42 52 20 52 41 53 4d 43 41 4c 4c 20 4d 20 45 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 4d 20 44 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 44 20 50 55 53 48 2c 20 52 45 54 2c 20 20 20 20 20 20 SUBR RASETPT M E MOV, H INX, M D MOV, H INX, E VPTBL X STX, | 53 55 42 52 20 52 41 53 45 54 50 54 20 4d 20 45 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 4d 20 44 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 45 20 56 50 54 42 4c 20 58 20 53 54 58 2c 20 20 20 20 20 D VPTBH X STX, RET, | 44 20 56 50 54 42 48 20 58 20 53 54 58 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR RASETFP M E MOV, H INX, M D MOV, H INX, E VFNLPL X STX, | 53 55 42 52 20 52 41 53 45 54 46 50 20 4d 20 45 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 4d 20 44 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 45 20 56 46 4e 4c 50 4c 20 58 20 53 54 58 2c 20 20 20 20 D VFNLPH X STX, RET, | 44 20 56 46 4e 4c 50 48 20 58 20 53 54 58 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR RASETXZW M A MOV, H INX, A VXZW X STX, RET, | 53 55 42 52 20 52 41 53 45 54 58 5a 57 20 4d 20 41 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 41 20 56 58 5a 57 20 58 20 53 54 58 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR RARANDOMDO M C MOV, H INX, M E MOV, H INX, M D MOV, H INX, | 53 55 42 52 20 52 41 52 41 4e 44 4f 4d 44 4f 20 4d 20 43 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 4d 20 45 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 4d 20 44 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 LDAR, C ANA, RNZ, XCHG, RET, | 4c 44 41 52 2c 20 43 20 41 4e 41 2c 20 52 4e 5a 2c 20 58 43 48 47 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0144 } ( JUMP TABLE FOR INTERPRETER ROUTINES ) | 28 20 4a 55 4d 50 20 54 41 42 4c 45 20 46 4f 52 20 49 4e 54 45 52 50 52 45 54 45 52 20 52 4f 55 54 49 4e 45 53 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA AJTBL RASETP , RASETM , RASETR , RAWAIT , | 44 41 54 41 20 41 4a 54 42 4c 20 52 41 53 45 54 50 20 2c 20 52 41 53 45 54 4d 20 2c 20 52 41 53 45 54 52 20 2c 20 52 41 57 41 49 54 20 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 RACALL , RAJMP , RASETDC , RASETDDC , RARET , | 52 41 43 41 4c 4c 20 2c 20 52 41 4a 4d 50 20 2c 20 52 41 53 45 54 44 43 20 2c 20 52 41 53 45 54 44 44 43 20 2c 20 52 41 52 45 54 20 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 RAHALT , RASETI , RASETXC , RASETYC , RADISP , | 52 41 48 41 4c 54 20 2c 20 52 41 53 45 54 49 20 2c 20 52 41 53 45 54 58 43 20 2c 20 52 41 53 45 54 59 43 20 2c 20 52 41 44 49 53 50 20 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 RASETREP , RALOOP , RASETS , RAPATI , RASMCALL , | 52 41 53 45 54 52 45 50 20 2c 20 52 41 4c 4f 4f 50 20 2c 20 52 41 53 45 54 53 20 2c 20 52 41 50 41 54 49 20 2c 20 52 41 53 4d 43 41 4c 4c 20 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 RASETPT , RASETFP , RASETXZW , RARANDOMDO , | 52 41 53 45 54 50 54 20 2c 20 52 41 53 45 54 46 50 20 2c 20 52 41 53 45 54 58 5a 57 20 2c 20 52 41 52 41 4e 44 4f 4d 44 4f 20 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 RASETXP , | 52 41 53 45 54 58 50 20 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0145 } ( ANIMATION UPDATOR ROUTINE ) | 28 20 41 4e 49 4d 41 54 49 4f 4e 20 55 50 44 41 54 4f 52 20 52 4f 55 54 49 4e 45 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 F= ANIRET | 46 3d 20 41 4e 49 52 45 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR ainter VATMR X A LDX, A ANA, RNZ, ( QUIT IF NOT NEEDED ) | 53 55 42 52 20 61 69 6e 74 65 72 20 56 41 54 4d 52 20 58 20 41 20 4c 44 58 2c 20 41 20 41 4e 41 2c 20 52 4e 5a 2c 20 28 20 51 55 49 54 20 49 46 20 4e 4f 54 20 4e 45 45 44 45 44 20 29 20 20 20 VPCL X L LDX, VPCH X H LDX, | 56 50 43 4c 20 58 20 4c 20 4c 44 58 2c 20 56 50 43 48 20 58 20 48 20 4c 44 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 LABEL ANIRET | 4c 41 42 45 4c 20 41 4e 49 52 45 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ANIRET D LXI, D PUSH, M C MOV, H INX, 0 B MVI, XCHG, | 41 4e 49 52 45 54 20 44 20 4c 58 49 2c 20 44 20 50 55 53 48 2c 20 4d 20 43 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 30 20 42 20 4d 56 49 2c 20 58 43 48 47 2c 20 20 20 20 20 20 20 20 20 20 20 20 AJTBL H LXI, B DAD, M C MOV, H INX, M B MOV, XCHG, | 41 4a 54 42 4c 20 48 20 4c 58 49 2c 20 42 20 44 41 44 2c 20 4d 20 43 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 4d 20 42 20 4d 4f 56 2c 20 58 43 48 47 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 B PUSH, RET, | 42 20 50 55 53 48 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR aup .REL ainter CALL, PQSRH PQS X BITX, 0=, IF, | 53 55 42 52 20 61 75 70 20 2e 52 45 4c 20 61 69 6e 74 65 72 20 43 41 4c 4c 2c 20 50 51 53 52 48 20 50 51 53 20 58 20 42 49 54 58 2c 20 30 3d 2c 20 49 46 2c 20 20 20 20 20 20 20 20 20 20 20 20 PQSUFP PQS X BITX, 0<>, IF, VFNLPL X L LDX, VFNLPH X H LDX, | 50 51 53 55 46 50 20 50 51 53 20 58 20 42 49 54 58 2c 20 30 3c 3e 2c 20 49 46 2c 20 56 46 4e 4c 50 4c 20 58 20 4c 20 4c 44 58 2c 20 56 46 4e 4c 50 48 20 58 20 48 20 4c 44 58 2c 20 20 20 20 20 L VPATL X STX, H VPATH X STX, THEN, THEN, RET, .ABS | 4c 20 56 50 41 54 4c 20 58 20 53 54 58 2c 20 48 20 56 50 41 54 48 20 58 20 53 54 58 2c 20 54 48 45 4e 2c 20 54 48 45 4e 2c 20 52 45 54 2c 20 2e 41 42 53 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0146 } ( DECREMENT ANIMATION TIMERS, COMPUTE VECTORING TIME ) | 28 20 44 45 43 52 45 4d 45 4e 54 20 41 4e 49 4d 41 54 49 4f 4e 20 54 49 4d 45 52 53 2c 20 43 4f 4d 50 55 54 45 20 56 45 43 54 4f 52 49 4e 47 20 54 49 4d 45 20 29 20 20 20 20 20 20 20 20 20 20 F= TBVD F= TBOK F= TBQUIT | 46 3d 20 54 42 56 44 20 46 3d 20 54 42 4f 4b 20 46 3d 20 54 42 51 55 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR TBCALC =, IF, A VATMR X STX, 0 PQTB X MVIX, | 30 3e 3d 2c 20 49 46 2c 20 41 20 56 41 54 4d 52 20 58 20 53 54 58 2c 20 30 20 50 51 54 42 20 58 20 4d 56 49 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ELSE, C A MOV, B SUB, A PQTB X STX, 0 VATMR X MVIX, B C MOV, | 45 4c 53 45 2c 20 43 20 41 20 4d 4f 56 2c 20 42 20 53 55 42 2c 20 41 20 50 51 54 42 20 58 20 53 54 58 2c 20 30 20 56 41 54 4d 52 20 58 20 4d 56 49 58 2c 20 42 20 43 20 4d 4f 56 2c 20 20 20 20 THEN, PQSNMT PQS X BITX, TBQUIT JRNZ, ( QUIT IF NO MASTER ) | 54 48 45 4e 2c 20 50 51 53 4e 4d 54 20 50 51 53 20 58 20 42 49 54 58 2c 20 54 42 51 55 49 54 20 4a 52 4e 5a 2c 20 28 20 51 55 49 54 20 49 46 20 4e 4f 20 4d 41 53 54 45 52 20 29 20 20 20 20 20 0 B MVI, VTLL X L LDX, VTLH X H LDX, A ANA, B DSBC, | 30 20 42 20 4d 56 49 2c 20 56 54 4c 4c 20 58 20 4c 20 4c 44 58 2c 20 56 54 4c 48 20 58 20 48 20 4c 44 58 2c 20 41 20 41 4e 41 2c 20 42 20 44 53 42 43 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 TBVD JRZ, TBOK JP, | 54 42 56 44 20 4a 52 5a 2c 20 54 42 4f 4b 20 4a 50 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 LABEL TBVD L A MOV, C ADD, A C MOV, A XRA, A H MOV, A L MOV, | 4c 41 42 45 4c 20 54 42 56 44 20 4c 20 41 20 4d 4f 56 2c 20 43 20 41 44 44 2c 20 41 20 43 20 4d 4f 56 2c 20 41 20 58 52 41 2c 20 41 20 48 20 4d 4f 56 2c 20 41 20 4c 20 4d 4f 56 2c 20 20 20 20 A VATMR X STX, A PQTB X STX, PQSRH PQS X RESX, | 41 20 56 41 54 4d 52 20 58 20 53 54 58 2c 20 41 20 50 51 54 42 20 58 20 53 54 58 2c 20 50 51 53 52 48 20 50 51 53 20 58 20 52 45 53 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 LABEL TBOK L VTLL X STX, H VTLH X STX, | 4c 41 42 45 4c 20 54 42 4f 4b 20 4c 20 56 54 4c 4c 20 58 20 53 54 58 2c 20 48 20 56 54 4c 48 20 58 20 53 54 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 LABEL TBQUIT EI, RET, ASSEMBLE> | 4c 41 42 45 4c 20 54 42 51 55 49 54 20 45 49 2c 20 52 45 54 2c 20 41 53 53 45 4d 42 4c 45 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0147 } ( TIME BASED VECTOR UPDATE - IX=VECTOR ADDR, IY=QUEUE ENTRY ) | 28 20 54 49 4d 45 20 42 41 53 45 44 20 56 45 43 54 4f 52 20 55 50 44 41 54 45 20 2d 20 49 58 3d 56 45 43 54 4f 52 20 41 44 44 52 2c 20 49 59 3d 51 55 45 55 45 20 45 4e 54 52 59 20 29 20 20 20 ( THIS VERSION VECTORS LINEARLY WITH LIMIT CHECKING ) | 28 20 54 48 49 53 20 56 45 52 53 49 4f 4e 20 56 45 43 54 4f 52 53 20 4c 49 4e 45 41 52 4c 59 20 57 49 54 48 20 4c 49 4d 49 54 20 43 48 45 43 4b 49 4e 47 20 29 20 20 20 20 20 20 20 20 20 20 20 HEX F= .VLP1 F= .VLP2 F= NUD | 48 45 58 20 46 3d 20 2e 56 4c 50 31 20 46 3d 20 2e 56 4c 50 32 20 46 3d 20 4e 55 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR VECTLC | 4c 41 42 45 4c 20 4e 55 44 20 50 51 53 52 48 20 50 51 53 20 58 20 52 45 53 58 2c 20 50 51 53 44 57 20 50 51 53 20 58 20 53 45 54 58 2c 20 52 45 54 2c 20 41 53 53 45 4d 42 4c 45 3e 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0148 } ( INITIALIZE INTERRUPT VERBS ) | 28 20 49 4e 49 54 49 41 4c 49 5a 45 20 49 4e 54 45 52 52 55 50 54 20 56 45 52 42 53 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CC? NOT IFTRUE | 43 43 3f 20 4e 4f 54 20 49 46 54 52 55 45 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 LPINT IPNT 2 - U! TIMINT IPNT U! BGENDI BGINTVEC U! | 20 4c 50 49 4e 54 20 49 50 4e 54 20 32 20 2d 20 55 21 20 54 49 4d 49 4e 54 20 49 50 4e 54 20 55 21 20 42 47 45 4e 44 49 20 42 47 49 4e 54 56 45 43 20 55 21 20 20 20 20 20 20 20 20 20 20 20 20 : FIREUP INTSTART ; OTHERWISE | 3a 20 46 49 52 45 55 50 20 49 4e 54 53 54 41 52 54 20 3b 20 4f 54 48 45 52 57 49 53 45 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 : FIREUP LPINT IPNT 2 - U! TIMINT IPNT U! BGENDI BGINTVEC U! | 3a 20 46 49 52 45 55 50 20 4c 50 49 4e 54 20 49 50 4e 54 20 32 20 2d 20 55 21 20 54 49 4d 49 4e 54 20 49 50 4e 54 20 55 21 20 42 47 45 4e 44 49 20 42 47 49 4e 54 56 45 43 20 55 21 20 20 20 20 INTSTART ; IFEND | 49 4e 54 53 54 41 52 54 20 3b 20 49 46 45 4e 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CC? IFTRUE ROMIT IFEND | 43 43 3f 20 49 46 54 52 55 45 20 52 4f 4d 49 54 20 49 46 45 4e 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 : START DI INIT INITFREELIST NILVQ LOCKOUTCOUNTER ZERO | 3a 20 53 54 41 52 54 20 44 49 20 49 4e 49 54 20 49 4e 49 54 46 52 45 45 4c 49 53 54 20 4e 49 4c 56 51 20 4c 4f 43 4b 4f 55 54 43 4f 55 4e 54 45 52 20 5a 45 52 4f 20 20 20 20 20 20 20 20 20 20 BGTIMER ZERO LPFLAG ZERO 33 BGWINDOW ! 2 BGTLMT ! FIREUP ; | 42 47 54 49 4d 45 52 20 5a 45 52 4f 20 4c 50 46 4c 41 47 20 5a 45 52 4f 20 33 33 20 42 47 57 49 4e 44 4f 57 20 21 20 32 20 42 47 54 4c 4d 54 20 21 20 46 49 52 45 55 50 20 3b 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( ROUTINE TO VWRITE WITH INTERCEPT CHECKING ) | 28 20 52 4f 55 54 49 4e 45 20 54 4f 20 56 57 52 49 54 45 20 57 49 54 48 20 49 4e 54 45 52 43 45 50 54 20 43 48 45 43 4b 49 4e 47 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR VIWRITE .REL INTST IN, vwrite CALL, INTST IN, | 53 55 42 52 20 56 49 57 52 49 54 45 20 2e 52 45 4c 20 49 4e 54 53 54 20 49 4e 2c 20 76 77 72 69 74 65 20 43 41 4c 4c 2c 20 49 4e 54 53 54 20 49 4e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 A ANA, 0<>, IF, VIRL X L LDX, VIRH X H LDX, | 41 20 41 4e 41 2c 20 30 3c 3e 2c 20 49 46 2c 20 56 49 52 4c 20 58 20 4c 20 4c 44 58 2c 20 56 49 52 48 20 58 20 48 20 4c 44 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 H A MOV, L ORA, 0<>, IF, PCHL, THEN, THEN, RET, .ABS | 48 20 41 20 4d 4f 56 2c 20 4c 20 4f 52 41 2c 20 30 3c 3e 2c 20 49 46 2c 20 50 43 48 4c 2c 20 54 48 45 4e 2c 20 54 48 45 4e 2c 20 52 45 54 2c 20 2e 41 42 53 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL | 44 45 43 49 4d 41 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0149 } ( SUBROUTINE TO UPDATE PATTERN USING XOR ) | 28 20 53 55 42 52 4f 55 54 49 4e 45 20 54 4f 20 55 50 44 41 54 45 20 50 41 54 54 45 52 4e 20 55 53 49 4e 47 20 58 4f 52 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR XAWRITE TBCALC CALL, | 53 55 42 52 20 58 41 57 52 49 54 45 20 54 42 43 41 4c 43 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 VECTLC CALL, ( UPDATE VECTOR ) | 56 45 43 54 4c 43 20 43 41 4c 4c 2c 20 28 20 55 50 44 41 54 45 20 56 45 43 54 4f 52 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 PQSDE PQS X BITX, 0=, IF, verase CALL, ELSE, | 50 51 53 44 45 20 50 51 53 20 58 20 42 49 54 58 2c 20 30 3d 2c 20 49 46 2c 20 76 65 72 61 73 65 20 43 41 4c 4c 2c 20 45 4c 53 45 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 PQSDE PQS X RESX, | 50 51 53 44 45 20 50 51 53 20 58 20 52 45 53 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 THEN, aup CALL, PQSDW PQS X BITX, 0=, | 20 54 48 45 4e 2c 20 61 75 70 20 43 41 4c 4c 2c 20 50 51 53 44 57 20 50 51 53 20 58 20 42 49 54 58 2c 20 30 3d 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 IF, vwrite CALL, ELSE, PQSDW PQS X RESX, PQSDE PQS X SETX, | 49 46 2c 20 76 77 72 69 74 65 20 43 41 4c 4c 2c 20 45 4c 53 45 2c 20 50 51 53 44 57 20 50 51 53 20 58 20 52 45 53 58 2c 20 50 51 53 44 45 20 50 51 53 20 58 20 53 45 54 58 2c 20 20 20 20 20 20 THEN, KILLOFF JMP, | 54 48 45 4e 2c 20 4b 49 4c 4c 4f 46 46 20 4a 4d 50 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( SUBROUTINE TO XAWRITE WITH INTERCEPT CHECKING ) | 28 20 53 55 42 52 4f 55 54 49 4e 45 20 54 4f 20 58 41 57 52 49 54 45 20 57 49 54 48 20 49 4e 54 45 52 43 45 50 54 20 43 48 45 43 4b 49 4e 47 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR XIWRITE TBCALC CALL, | 53 55 42 52 20 58 49 57 52 49 54 45 20 54 42 43 41 4c 43 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 VECTLC CALL, ( UPDATE DA VECTOR ) | 56 45 43 54 4c 43 20 20 43 41 4c 4c 2c 20 28 20 55 50 44 41 54 45 20 44 41 20 56 45 43 54 4f 52 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 PQSDE PQS X BITX, 0=, IF, verase CALL, ELSE, | 50 51 53 44 45 20 50 51 53 20 58 20 42 49 54 58 2c 20 30 3d 2c 20 49 46 2c 20 76 65 72 61 73 65 20 43 41 4c 4c 2c 20 45 4c 53 45 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 PQSDE PQS X RESX, THEN, aup CALL, PQSDW PQS X BITX, 0=, | 50 51 53 44 45 20 50 51 53 20 58 20 52 45 53 58 2c 20 54 48 45 4e 2c 20 61 75 70 20 43 41 4c 4c 2c 20 50 51 53 44 57 20 50 51 53 20 58 20 42 49 54 58 2c 20 30 3d 2c 20 20 20 20 20 20 20 20 20 IF, VIWRITE CALL, ELSE, PQSDW PQS X RESX, PQSDE PQS X SETX, | 49 46 2c 20 56 49 57 52 49 54 45 20 43 41 4c 4c 2c 20 45 4c 53 45 2c 20 50 51 53 44 57 20 50 51 53 20 58 20 52 45 53 58 2c 20 50 51 53 44 45 20 50 51 53 20 58 20 53 45 54 58 2c 20 20 20 20 20 THEN, KILLOFF JMP, | 54 48 45 4e 2c 20 4b 49 4c 4c 4f 46 46 20 4a 4d 50 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0150 } ( SUBROUTINE TO VECTOR USING SECOND DERIVITIVE ) | 28 20 53 55 42 52 4f 55 54 49 4e 45 20 54 4f 20 56 45 43 54 4f 52 20 55 53 49 4e 47 20 53 45 43 4f 4e 44 20 44 45 52 49 56 49 54 49 56 45 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 F= VUPX F= VUPY | 46 3d 20 56 55 50 58 20 46 3d 20 56 55 50 59 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR VECTDD , IF, | 53 55 42 52 20 56 45 43 54 44 44 20 3c 41 53 53 45 4d 42 4c 45 20 50 51 53 46 52 5a 20 50 51 53 20 58 20 42 49 54 58 2c 20 30 3c 3e 2c 20 49 46 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 PQSDW PQS X SETX, RET, THEN, C A MOV, A ANA, RZ, PSW PUSH, | 50 51 53 44 57 20 50 51 53 20 58 20 53 45 54 58 2c 20 52 45 54 2c 20 54 48 45 4e 2c 20 43 20 41 20 4d 4f 56 2c 20 41 20 41 4e 41 2c 20 52 5a 2c 20 50 53 57 20 50 55 53 48 2c 20 20 20 20 20 20 VXL X L LDX, VXH X H LDX, VDXL X E LDX, VDXH X D LDX, | 56 58 4c 20 58 20 4c 20 4c 44 58 2c 20 56 58 48 20 58 20 48 20 4c 44 58 2c 20 56 44 58 4c 20 58 20 45 20 4c 44 58 2c 20 56 44 58 48 20 58 20 44 20 4c 44 58 2c 20 20 20 20 20 20 20 20 20 20 20 VDDXL X C LDX, VDDXH X B LDX, | 56 44 44 58 4c 20 58 20 43 20 4c 44 58 2c 20 56 44 44 58 48 20 58 20 42 20 4c 44 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 LABEL VUPX XCHG, B DAD, XCHG, D DAD, A DCR, VUPX JRNZ, | 4c 41 42 45 4c 20 56 55 50 58 20 58 43 48 47 2c 20 42 20 44 41 44 2c 20 58 43 48 47 2c 20 44 20 44 41 44 2c 20 41 20 44 43 52 2c 20 56 55 50 58 20 4a 52 4e 5a 2c 20 20 20 20 20 20 20 20 20 20 E VDXL X STX, D VDXH X STX, L VXL X STX, H VXH X STX, | 45 20 56 44 58 4c 20 58 20 53 54 58 2c 20 44 20 56 44 58 48 20 58 20 53 54 58 2c 20 4c 20 56 58 4c 20 58 20 53 54 58 2c 20 48 20 56 58 48 20 58 20 53 54 58 2c 20 20 20 20 20 20 20 20 20 20 20 H A MOV, 80 CPI, CY~, IF, PQSFRZ PQS X SETX, PQSDW PQS X SETX, | 48 20 41 20 4d 4f 56 2c 20 38 30 20 43 50 49 2c 20 43 59 7e 2c 20 49 46 2c 20 50 51 53 46 52 5a 20 50 51 53 20 58 20 53 45 54 58 2c 20 50 51 53 44 57 20 50 51 53 20 58 20 53 45 54 58 2c 20 20 THEN, PSW POP, VYL X L LDX, VYH X H LDX, VDYL X E LDX, | 54 48 45 4e 2c 20 50 53 57 20 50 4f 50 2c 20 56 59 4c 20 58 20 4c 20 4c 44 58 2c 20 56 59 48 20 58 20 48 20 4c 44 58 2c 20 56 44 59 4c 20 58 20 45 20 4c 44 58 2c 20 20 20 20 20 20 20 20 20 20 VDYH X D LDX, VDDYL X C LDX, VDDYH X B LDX, | 56 44 59 48 20 58 20 44 20 4c 44 58 2c 20 56 44 44 59 4c 20 58 20 43 20 4c 44 58 2c 20 56 44 44 59 48 20 58 20 42 20 4c 44 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 LABEL VUPY XCHG, B DAD, XCHG, D DAD, A DCR, VUPY JRNZ, | 4c 41 42 45 4c 20 56 55 50 59 20 58 43 48 47 2c 20 42 20 44 41 44 2c 20 58 43 48 47 2c 20 44 20 44 41 44 2c 20 41 20 44 43 52 2c 20 56 55 50 59 20 4a 52 4e 5a 2c 20 20 20 20 20 20 20 20 20 20 E VDYL X STX, D VDYH X STX, L VYL X STX, H VYH X STX, | 45 20 56 44 59 4c 20 58 20 53 54 58 2c 20 44 20 56 44 59 48 20 58 20 53 54 58 2c 20 4c 20 56 59 4c 20 58 20 53 54 58 2c 20 48 20 56 59 48 20 58 20 53 54 58 2c 20 20 20 20 20 20 20 20 20 20 20 H A MOV, 182 CPI, RC, PQSFRZ PQS X SETX, PQSDW PQS X SETX, RET, | 48 20 41 20 4d 4f 56 2c 20 31 38 32 20 43 50 49 2c 20 52 43 2c 20 50 51 53 46 52 5a 20 50 51 53 20 58 20 53 45 54 58 2c 20 50 51 53 44 57 20 50 51 53 20 58 20 53 45 54 58 2c 20 52 45 54 2c 20 ASSEMBLE> --> | 41 53 53 45 4d 42 4c 45 3e 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0151 } ( SUBROUTINE TO UPDATE PATTERN USING XOR AND 2ND DERV VECTOR ) | 28 20 53 55 42 52 4f 55 54 49 4e 45 20 54 4f 20 55 50 44 41 54 45 20 50 41 54 54 45 52 4e 20 55 53 49 4e 47 20 58 4f 52 20 41 4e 44 20 32 4e 44 20 44 45 52 56 20 56 45 43 54 4f 52 20 29 20 20 SUBR XADDWRITE TBCALC CALL, | 53 55 42 52 20 58 41 44 44 57 52 49 54 45 20 54 42 43 41 4c 43 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 VECTDD CALL, | 56 45 43 54 44 44 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 PQSDE PQS X BITX, 0=, IF, verase CALL, ELSE, | 50 51 53 44 45 20 50 51 53 20 58 20 42 49 54 58 2c 20 30 3d 2c 20 49 46 2c 20 76 65 72 61 73 65 20 43 41 4c 4c 2c 20 45 4c 53 45 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 PQSDE PQS X RESX, | 50 51 53 44 45 20 50 51 53 20 58 20 52 45 53 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 THEN, aup CALL, | 20 54 48 45 4e 2c 20 61 75 70 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 PQSDW PQS X BITX, 0=, IF, vwrite CALL, ELSE, | 50 51 53 44 57 20 50 51 53 20 58 20 42 49 54 58 2c 20 30 3d 2c 20 49 46 2c 20 76 77 72 69 74 65 20 43 41 4c 4c 2c 20 45 4c 53 45 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 PQSDE PQS X SETX, PQSDW PQS X RESX, THEN, KILLOFF JMP, | 50 51 53 44 45 20 50 51 53 20 58 20 53 45 54 58 2c 20 50 51 53 44 57 20 50 51 53 20 58 20 52 45 53 58 2c 20 54 48 45 4e 2c 20 4b 49 4c 4c 4f 46 46 20 4a 4d 50 2c 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0152 } ( UPDATE VECTOR FROM JOYSTICK ) HEX | 28 20 55 50 44 41 54 45 20 56 45 43 54 4f 52 20 46 52 4f 4d 20 4a 4f 59 53 54 49 43 4b 20 29 20 48 45 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 F= JYLP1 F= JYLP2 F= JXLP1 F= JXLP2 F= JXCK | 46 3d 20 4a 59 4c 50 31 20 46 3d 20 4a 59 4c 50 32 20 46 3d 20 4a 58 4c 50 31 20 46 3d 20 4a 58 4c 50 32 20 46 3d 20 4a 58 43 4b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR JOYUPD , IF, LABEL JXLP1 A ANA, D DSBC, H A MOV, | 32 20 41 4e 49 2c 20 30 3c 3e 2c 20 49 46 2c 20 4c 41 42 45 4c 20 4a 58 4c 50 31 20 41 20 41 4e 41 2c 20 44 20 44 53 42 43 2c 20 48 20 41 20 4d 4f 56 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 VDDXL X CMPX, CY, IF, VDDXL X H LDX, 0 L MVI, THEN, JXLP1 DJNZ, | 56 44 44 58 4c 20 58 20 43 4d 50 58 2c 20 43 59 2c 20 49 46 2c 20 56 44 44 58 4c 20 58 20 48 20 4c 44 58 2c 20 30 20 4c 20 4d 56 49 2c 20 54 48 45 4e 2c 20 4a 58 4c 50 31 20 44 4a 4e 5a 2c 20 ELSE, LABEL JXLP2 D DAD, H A MOV, VDDXH X CMPX, CY~, IF, | 45 4c 53 45 2c 20 4c 41 42 45 4c 20 4a 58 4c 50 32 20 44 20 44 41 44 2c 20 48 20 41 20 4d 4f 56 2c 20 56 44 44 58 48 20 58 20 43 4d 50 58 2c 20 43 59 7e 2c 20 49 46 2c 20 20 20 20 20 20 20 20 VDDXH X H LDX, 0 L MVI, THEN, JXLP2 DJNZ, THEN, L VXL X STX, | 56 44 44 58 48 20 58 20 48 20 4c 44 58 2c 20 30 20 4c 20 4d 56 49 2c 20 54 48 45 4e 2c 20 4a 58 4c 50 32 20 44 4a 4e 5a 2c 20 54 48 45 4e 2c 20 4c 20 56 58 4c 20 58 20 53 54 58 2c 20 20 20 20 H VXH X STX, RET, ASSEMBLE> DECIMAL --> | 48 20 56 58 48 20 58 20 53 54 58 2c 20 52 45 54 2c 20 41 53 53 45 4d 42 4c 45 3e 20 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0153 } ( SUBROUTINE TO UPDATE PATTERN FROM JOYSTICK ) | 28 20 53 55 42 52 4f 55 54 49 4e 45 20 54 4f 20 55 50 44 41 54 45 20 50 41 54 54 45 52 4e 20 46 52 4f 4d 20 4a 4f 59 53 54 49 43 4b 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR JOYWRITE TBCALC CALL, | 53 55 42 52 20 4a 4f 59 57 52 49 54 45 20 54 42 43 41 4c 43 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 JOYUPD CALL, ( UPDATE FROM JOYSTICK ) | 4a 4f 59 55 50 44 20 43 41 4c 4c 2c 20 28 20 55 50 44 41 54 45 20 46 52 4f 4d 20 4a 4f 59 53 54 49 43 4b 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 40 VXZW X MVIX, | 34 30 20 56 58 5a 57 20 58 20 4d 56 49 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 PQSDE PQS X BITX, 0=, IF, verase CALL, ELSE, | 50 51 53 44 45 20 50 51 53 20 58 20 42 49 54 58 2c 20 30 3d 2c 20 49 46 2c 20 76 65 72 61 73 65 20 43 41 4c 4c 2c 20 45 4c 53 45 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 PQSDE PQS X RESX, | 50 51 53 44 45 20 50 51 53 20 58 20 52 45 53 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 THEN, aup CALL, PQSDW PQS X BITX, 0=, | 20 54 48 45 4e 2c 20 61 75 70 20 43 41 4c 4c 2c 20 50 51 53 44 57 20 50 51 53 20 58 20 42 49 54 58 2c 20 30 3d 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 IF, VIWRITE CALL, | 49 46 2c 20 56 49 57 52 49 54 45 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ELSE, PQSDE PQS X SETX, PQSDW PQS X RESX, THEN, KILLOFF JMP, | 45 4c 53 45 2c 20 50 51 53 44 45 20 50 51 53 20 58 20 53 45 54 58 2c 20 50 51 53 44 57 20 50 51 53 20 58 20 52 45 53 58 2c 20 54 48 45 4e 2c 20 4b 49 4c 4c 4f 46 46 20 4a 4d 50 2c 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0154 } ( FIRE BASE EXPLOSION 6 CONTINUED ) | 28 20 46 49 52 45 20 42 41 53 45 20 45 58 50 4c 4f 53 49 4f 4e 20 36 20 43 4f 4e 54 49 4e 55 45 44 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0001 0000 0200 0003 0001 ^ | 7e 20 30 30 30 31 20 30 30 30 30 20 30 32 30 30 20 30 30 30 33 20 30 30 30 31 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 1000 0010 0003 0100 0020 ^ | 7e 20 31 30 30 30 20 30 30 31 30 20 30 30 30 33 20 30 31 30 30 20 30 30 32 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0000 0000 1000 0000 0000 ^ | 7e 20 30 30 30 30 20 30 30 30 30 20 31 30 30 30 20 30 30 30 30 20 30 30 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0030 0300 0000 0000 0200 ^ | 7e 20 30 30 33 30 20 30 33 30 30 20 30 30 30 30 20 30 30 30 30 20 30 32 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0000 0000 0000 0000 0000 ^ | 7e 20 30 30 30 30 20 30 30 30 30 20 30 30 30 30 20 30 30 30 30 20 30 30 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0000 3010 0000 1000 0200 ^ | 7e 20 30 30 30 30 20 33 30 31 30 20 30 30 30 30 20 31 30 30 30 20 30 32 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0000 0100 0200 0003 0000 ^ | 7e 20 30 30 30 30 20 30 31 30 30 20 30 32 30 30 20 30 30 30 33 20 30 30 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0000 0003 0010 0000 0000 ^ | 7e 20 30 30 30 30 20 30 30 30 33 20 30 30 31 30 20 30 30 30 30 20 30 30 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0000 0001 0020 1000 0000 ^ | 7e 20 30 30 30 30 20 30 30 30 31 20 30 30 32 30 20 31 30 30 30 20 30 30 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0155 } ( SUBROUTINE TO PUT VECTOR ON PROCESS Q ) | 28 20 53 55 42 52 4f 55 54 49 4e 45 20 54 4f 20 50 55 54 20 56 45 43 54 4f 52 20 4f 4e 20 50 52 4f 43 45 53 53 20 51 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR STARTVEC DI, Y PUSHX, | 53 55 42 52 20 53 54 41 52 54 56 45 43 20 44 49 2c 20 59 20 50 55 53 48 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 X PUSHX, H POP, 0 vqhead Y LXIX, ADDQ CALL, | 58 20 50 55 53 48 58 2c 20 48 20 50 4f 50 2c 20 30 20 76 71 68 65 61 64 20 59 20 4c 58 49 58 2c 20 41 44 44 51 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 Y POPX, EI, RET, | 59 20 50 4f 50 58 2c 20 45 49 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( SUBROUTINE TO INITIALIZE A STANDARD XOR WRITE ) | 28 20 53 55 42 52 4f 55 54 49 4e 45 20 54 4f 20 49 4e 49 54 49 41 4c 49 5a 45 20 41 20 53 54 41 4e 44 41 52 44 20 58 4f 52 20 57 52 49 54 45 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HEX | 48 45 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR SETSTDW 8 Y L LDX, 9 Y H LDX, CRASHA CALL, | 53 55 42 52 20 53 45 54 53 54 44 57 20 38 20 59 20 4c 20 4c 44 58 2c 20 39 20 59 20 48 20 4c 44 58 2c 20 43 52 41 53 48 41 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6 Y L LDX, 7 Y H LDX, L VTLL X STX, H VTLH X STX, L VRACK X STX, | 36 20 59 20 4c 20 4c 44 58 2c 20 37 20 59 20 48 20 4c 44 58 2c 20 4c 20 56 54 4c 4c 20 58 20 53 54 58 2c 20 48 20 56 54 4c 48 20 58 20 53 54 58 2c 20 4c 20 56 52 41 43 4b 20 58 20 53 54 58 2c 5 Y A LDX, A VIDENT X STX, ( SET ID BYTE WITH H.O. STATUS ) | 20 35 20 59 20 41 20 4c 44 58 2c 20 41 20 56 49 44 45 4e 54 20 58 20 53 54 58 2c 20 28 20 53 45 54 20 49 44 20 42 59 54 45 20 57 49 54 48 20 48 2e 4f 2e 20 53 54 41 54 55 53 20 29 20 20 20 20 4 Y A LDX, A PQS X STX, 20 VMAGIC X MVIX, | 34 20 59 20 41 20 4c 44 58 2c 20 41 20 50 51 53 20 58 20 53 54 58 2c 20 32 30 20 56 4d 41 47 49 43 20 58 20 4d 56 49 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 30 VXZW X MVIX, XAWRITE H LXI, | 33 30 20 56 58 5a 57 20 58 20 4d 56 49 58 2c 20 58 41 57 52 49 54 45 20 48 20 4c 58 49 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 L PQRL X STX, H PQRH X STX, RET, | 4c 20 50 51 52 4c 20 58 20 53 54 58 2c 20 48 20 50 51 52 48 20 58 20 53 54 58 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0156 } ( XVMOVE COMMAND - MOVE AN EXISTING VECTOR ) | 28 20 58 56 4d 4f 56 45 20 43 4f 4d 4d 41 4e 44 20 2d 20 4d 4f 56 45 20 41 4e 20 45 58 49 53 54 49 4e 47 20 56 45 43 54 4f 52 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( VRACK X1 Y1 X2 Y2 ALIST TIME STATUS VECTOR VMOVE ) | 28 20 56 52 41 43 4b 20 58 31 20 59 31 20 58 32 20 59 32 20 41 4c 49 53 54 20 54 49 4d 45 20 53 54 41 54 55 53 20 56 45 43 54 4f 52 20 56 4d 4f 56 45 20 29 20 20 20 20 20 20 20 20 20 20 20 20 CODE XVMOVE X PUSHX, H POP, Y PUSHX, D POP, EXX, | 43 4f 44 45 20 58 56 4d 4f 56 45 20 58 20 50 55 53 48 58 2c 20 48 20 50 4f 50 2c 20 59 20 50 55 53 48 58 2c 20 44 20 50 4f 50 2c 20 45 58 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 FRAME 2 Y L LDX, 3 Y H LDX, H PUSH, X POPX, CLRVEC CALL, | 46 52 41 4d 45 20 32 20 59 20 4c 20 4c 44 58 2c 20 33 20 59 20 48 20 4c 44 58 2c 20 48 20 50 55 53 48 2c 20 58 20 50 4f 50 58 2c 20 43 4c 52 56 45 43 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 16 Y C LDX, 17 Y B LDX, 12 Y L LDX, 13 Y H LDX, | 31 36 20 59 20 43 20 4c 44 58 2c 20 31 37 20 59 20 42 20 4c 44 58 2c 20 31 32 20 59 20 4c 20 4c 44 58 2c 20 31 33 20 59 20 48 20 4c 44 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6 Y E LDX, 7 Y D LDX, D PUSH, CDELTA CALL, | 36 20 59 20 45 20 4c 44 58 2c 20 37 20 59 20 44 20 4c 44 58 2c 20 44 20 50 55 53 48 2c 20 43 44 45 4c 54 41 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 L VXL X STX, H VXH X STX, E VDXL X STX, D VDXH X STX, | 4c 20 56 58 4c 20 58 20 53 54 58 2c 20 48 20 56 58 48 20 58 20 53 54 58 2c 20 45 20 56 44 58 4c 20 58 20 53 54 58 2c 20 44 20 56 44 58 48 20 58 20 53 54 58 2c 20 20 20 20 20 20 20 20 20 20 20 D POP, 14 Y C LDX, 15 Y B LDX, 10 Y L LDX, 11 Y H LDX, | 44 20 50 4f 50 2c 20 31 34 20 59 20 43 20 4c 44 58 2c 20 31 35 20 59 20 42 20 4c 44 58 2c 20 31 30 20 59 20 4c 20 4c 44 58 2c 20 31 31 20 59 20 48 20 4c 44 58 2c 20 20 20 20 20 20 20 20 20 20 CDELTA CALL, L VYL X STX, H VYH X STX, E VDYL X STX, | 43 44 45 4c 54 41 20 43 41 4c 4c 2c 20 4c 20 56 59 4c 20 58 20 53 54 58 2c 20 48 20 56 59 48 20 58 20 53 54 58 2c 20 45 20 56 44 59 4c 20 58 20 53 54 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 D VDYH X STX, SETSTDW CALL, 18 Y A LDX, A VRACK X STX, | 44 20 56 44 59 48 20 58 20 53 54 58 2c 20 53 45 54 53 54 44 57 20 43 41 4c 4c 2c 20 31 38 20 59 20 41 20 4c 44 58 2c 20 41 20 56 52 41 43 4b 20 58 20 53 54 58 2c 20 20 20 20 20 20 20 20 20 20 STARTVEC CALL, UNFRAME 18 H LXI, SP DAD, SPHL, | 53 54 41 52 54 56 45 43 20 43 41 4c 4c 2c 20 55 4e 46 52 41 4d 45 20 31 38 20 48 20 4c 58 49 2c 20 53 50 20 44 41 44 2c 20 53 50 48 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 EXX, D PUSH, Y POPX, H PUSH, X POPX, NEXT | 45 58 58 2c 20 44 20 50 55 53 48 2c 20 59 20 50 4f 50 58 2c 20 48 20 50 55 53 48 2c 20 58 20 50 4f 50 58 2c 20 4e 45 58 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 : VMOVE GETNODE XVMOVE ; | 3a 20 56 4d 4f 56 45 20 47 45 54 4e 4f 44 45 20 58 56 4d 4f 56 45 20 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0157 } ( XSTART COMMAND - START AN EXISTING VECTOR ) | 28 20 58 53 54 41 52 54 20 43 4f 4d 4d 41 4e 44 20 2d 20 53 54 41 52 54 20 41 4e 20 45 58 49 53 54 49 4e 47 20 56 45 43 54 4f 52 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( ALIST TIME STATUS VECTOR VMOVE ) | 28 20 41 4c 49 53 54 20 54 49 4d 45 20 53 54 41 54 55 53 20 56 45 43 54 4f 52 20 56 4d 4f 56 45 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE XVSTART X PUSHX, H POP, Y PUSHX, D POP, EXX, | 43 4f 44 45 20 58 56 53 54 41 52 54 20 58 20 50 55 53 48 58 2c 20 48 20 50 4f 50 2c 20 59 20 50 55 53 48 58 2c 20 44 20 50 4f 50 2c 20 45 58 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 FRAME 2 Y L LDX, 3 Y H LDX, H PUSH, X POPX, CLRVEC CALL, | 46 52 41 4d 45 20 32 20 59 20 4c 20 4c 44 58 2c 20 33 20 59 20 48 20 4c 44 58 2c 20 48 20 50 55 53 48 2c 20 58 20 50 4f 50 58 2c 20 43 4c 52 56 45 43 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 SETSTDW CALL, STARTVEC CALL, | 53 45 54 53 54 44 57 20 43 41 4c 4c 2c 20 53 54 41 52 54 56 45 43 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 UNFRAME 8 H LXI, SP DAD, SPHL, | 55 4e 46 52 41 4d 45 20 38 20 48 20 4c 58 49 2c 20 53 50 20 44 41 44 2c 20 53 50 48 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 EXX, D PUSH, Y POPX, H PUSH, X POPX, NEXT | 45 58 58 2c 20 44 20 50 55 53 48 2c 20 59 20 50 4f 50 58 2c 20 48 20 50 55 53 48 2c 20 58 20 50 4f 50 58 2c 20 4e 45 58 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 : VSTART GETNODE XVSTART ; | 3a 20 56 53 54 41 52 54 20 47 45 54 4e 4f 44 45 20 58 56 53 54 41 52 54 20 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0158 } ( START A VECTOR WITH JUST INITIAL X AND Y ) DECIMAL | 28 20 53 54 41 52 54 20 41 20 56 45 43 54 4f 52 20 57 49 54 48 20 4a 55 53 54 20 49 4e 49 54 49 41 4c 20 58 20 41 4e 44 20 59 20 29 20 44 45 43 49 4d 41 4c 20 20 20 20 20 20 20 20 20 20 20 20 ( X Y ANIMATION TIME STATUS XYVSTART ) | 28 20 58 20 59 20 41 4e 49 4d 41 54 49 4f 4e 20 54 49 4d 45 20 53 54 41 54 55 53 20 58 59 56 53 54 41 52 54 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR XYVSTART DI, getnode CALL, EI, H PUSH, | 53 55 42 52 20 58 59 56 53 54 41 52 54 20 44 49 2c 20 67 65 74 6e 6f 64 65 20 43 41 4c 4c 2c 20 45 49 2c 20 48 20 50 55 53 48 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 FRAME 2 Y L LDX, 3 Y H LDX, H PUSH, X POPX, | 46 52 41 4d 45 20 32 20 59 20 4c 20 4c 44 58 2c 20 33 20 59 20 48 20 4c 44 58 2c 20 48 20 50 55 53 48 2c 20 58 20 50 4f 50 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CLRVEC CALL, 6 Y C LDX, C VRACK X STX, | 43 4c 52 56 45 43 20 43 41 4c 4c 2c 20 36 20 59 20 43 20 4c 44 58 2c 20 43 20 56 52 41 43 4b 20 58 20 53 54 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 12 Y L LDX, 13 Y H LDX, L VXL X STX, H VXH X STX, | 31 32 20 59 20 4c 20 4c 44 58 2c 20 31 33 20 59 20 48 20 4c 44 58 2c 20 4c 20 56 58 4c 20 58 20 53 54 58 2c 20 48 20 56 58 48 20 58 20 53 54 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 10 Y L LDX, 11 Y H LDX, L VYL X STX, H VYH X STX, | 31 30 20 59 20 4c 20 4c 44 58 2c 20 31 31 20 59 20 48 20 4c 44 58 2c 20 4c 20 56 59 4c 20 58 20 53 54 58 2c 20 48 20 56 59 48 20 58 20 53 54 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SETSTDW CALL, STARTVEC CALL, | 53 45 54 53 54 44 57 20 43 41 4c 4c 2c 20 53 54 41 52 54 56 45 43 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 UNFRAME 12 H LXI, SP DAD, SPHL, RET, | 55 4e 46 52 41 4d 45 20 31 32 20 48 20 4c 58 49 2c 20 53 50 20 44 41 44 2c 20 53 50 48 4c 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( CLUDGE TO CALL AS A VERB - VERY BIZARRE BUT IT SHOULD WORK ) | 28 20 43 4c 55 44 47 45 20 54 4f 20 43 41 4c 4c 20 41 53 20 41 20 56 45 52 42 20 2d 20 56 45 52 59 20 42 49 5a 41 52 52 45 20 42 55 54 20 49 54 20 53 48 4f 55 4c 44 20 57 4f 52 4b 20 29 20 20 SUBR CLUDGEIT H PUSH, D PUSH, B PUSH, EXX, H PUSH, D PUSH, | 53 55 42 52 20 43 4c 55 44 47 45 49 54 20 48 20 50 55 53 48 2c 20 44 20 50 55 53 48 2c 20 42 20 50 55 53 48 2c 20 45 58 58 2c 20 48 20 50 55 53 48 2c 20 44 20 50 55 53 48 2c 20 20 20 20 20 20 X PUSHX, D POP, Y PUSHX, H POP, EXX, XYVSTART JMP, | 58 20 50 55 53 48 58 2c 20 44 20 50 4f 50 2c 20 59 20 50 55 53 48 58 2c 20 48 20 50 4f 50 2c 20 45 58 58 2c 20 58 59 56 53 54 41 52 54 20 4a 4d 50 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( X Y ANIMATION TIME STATUS XYVECTOR ) | 28 20 58 20 59 20 41 4e 49 4d 41 54 49 4f 4e 20 54 49 4d 45 20 53 54 41 54 55 53 20 58 59 56 45 43 54 4f 52 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE XYVECTOR D POP, H POP, EXX, B POP, D POP, H POP, | 43 4f 44 45 20 58 59 56 45 43 54 4f 52 20 44 20 50 4f 50 2c 20 48 20 50 4f 50 2c 20 45 58 58 2c 20 42 20 50 4f 50 2c 20 44 20 50 4f 50 2c 20 48 20 50 4f 50 2c 20 20 20 20 20 20 20 20 20 20 20 CLUDGEIT CALL, EXX, D PUSH, X POPX, H PUSH, Y POPX, NEXT | 43 4c 55 44 47 45 49 54 20 43 41 4c 4c 2c 20 45 58 58 2c 20 44 20 50 55 53 48 2c 20 58 20 50 4f 50 58 2c 20 48 20 50 55 53 48 2c 20 59 20 50 4f 50 58 2c 20 4e 45 58 54 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0159 } ( CHECK FOR INTERCEPT WITH VECTOR ) | 28 20 43 48 45 43 4b 20 46 4f 52 20 49 4e 54 45 52 43 45 50 54 20 57 49 54 48 20 56 45 43 54 4f 52 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 F= NOINT | 46 3d 20 4e 4f 49 4e 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR CHECKVEC =, IF, D CMP, | 56 59 48 20 58 20 41 20 4c 44 58 2c 20 56 59 48 20 59 20 53 55 42 58 2c 20 30 3e 3d 2c 20 49 46 2c 20 44 20 43 4d 50 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 NOINT JNC, ELSE, E ADD, NOINT JM, THEN, | 4e 4f 49 4e 54 20 4a 4e 43 2c 20 45 4c 53 45 2c 20 45 20 41 44 44 2c 20 20 4e 4f 49 4e 54 20 4a 4d 2c 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 VXH X A LDX, VXH Y SUBX, | 56 58 48 20 58 20 41 20 4c 44 58 2c 20 56 58 48 20 59 20 53 55 42 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0>=, IF, B CMP, | 30 3e 3d 2c 20 49 46 2c 20 42 20 43 4d 50 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 NOINT JNC, ELSE, C ADD, | 4e 4f 49 4e 54 20 4a 4e 43 2c 20 45 4c 53 45 2c 20 43 20 41 44 44 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 NOINT JM, THEN, 1 A MVI, A ANA, RET, | 4e 4f 49 4e 54 20 4a 4d 2c 20 54 48 45 4e 2c 20 31 20 41 20 4d 56 49 2c 20 41 20 41 4e 41 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 LABEL NOINT A XRA, RET, ASSEMBLE> | 4c 41 42 45 4c 20 4e 4f 49 4e 54 20 41 20 58 52 41 2c 20 52 45 54 2c 20 41 53 53 45 4d 42 4c 45 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0160 } ( CHECK GROUP OF VECTORS FOR INTERCEPT ) | 28 20 43 48 45 43 4b 20 47 52 4f 55 50 20 4f 46 20 56 45 43 54 4f 52 53 20 46 4f 52 20 49 4e 54 45 52 43 45 50 54 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( IX = ME, C=MASK SPECIFING SUBSET TO EXAMINE ) | 28 20 49 58 20 3d 20 4d 45 2c 20 43 3d 4d 41 53 4b 20 53 50 45 43 49 46 49 4e 47 20 53 55 42 53 45 54 20 54 4f 20 45 58 41 4d 49 4e 45 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( RETURNS NZ AND IY=CULPRIT IF FOUND, ELSE Z ) | 28 20 52 45 54 55 52 4e 53 20 4e 5a 20 41 4e 44 20 49 59 3d 43 55 4c 50 52 49 54 20 49 46 20 46 4f 55 4e 44 2c 20 45 4c 53 45 20 5a 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 F= ICKL F= NOTEND F= NOTHIM | 46 3d 20 49 43 4b 4c 20 46 3d 20 4e 4f 54 45 4e 44 20 46 3d 20 4e 4f 54 48 49 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR CHECKALL | 41 53 53 45 4d 42 4c 45 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL | 44 45 43 49 4d 41 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0161 } ( NUMBER PATTERNS , 5 X 7 ORDERED 0-9 ) | 28 20 4e 55 4d 42 45 52 20 50 41 54 54 45 52 4e 53 20 2c 20 35 20 58 20 37 20 4f 52 44 45 52 45 44 20 30 2d 39 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA NUMPATS BINARY | 44 41 54 41 20 4e 55 4d 50 41 54 53 20 42 49 4e 41 52 59 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 01111100 , 10000010 , 10000010 , 10000010 , 01111100 , | 30 31 31 31 31 31 30 30 20 2c 20 31 30 30 30 30 30 31 30 20 2c 20 31 30 30 30 30 30 31 30 20 2c 20 31 30 30 30 30 30 31 30 20 2c 20 30 31 31 31 31 31 30 30 20 2c 20 20 20 20 20 20 20 20 20 20 00000000 , 10000100 , 11111110 , 10000000 , 00000000 , | 30 30 30 30 30 30 30 30 20 2c 20 31 30 30 30 30 31 30 30 20 2c 20 31 31 31 31 31 31 31 30 20 2c 20 31 30 30 30 30 30 30 30 20 2c 20 30 30 30 30 30 30 30 30 20 2c 20 20 20 20 20 20 20 20 20 20 11100100 , 10010010 , 10010010 , 10010010 , 10001100 , | 31 31 31 30 30 31 30 30 20 2c 20 31 30 30 31 30 30 31 30 20 2c 20 31 30 30 31 30 30 31 30 20 2c 20 31 30 30 31 30 30 31 30 20 2c 20 31 30 30 30 31 31 30 30 20 2c 20 20 20 20 20 20 20 20 20 20 01000100 , 10000010 , 10010010 , 10010010 , 01101100 , | 30 31 30 30 30 31 30 30 20 2c 20 31 30 30 30 30 30 31 30 20 2c 20 31 30 30 31 30 30 31 30 20 2c 20 31 30 30 31 30 30 31 30 20 2c 20 30 31 31 30 31 31 30 30 20 2c 20 20 20 20 20 20 20 20 20 20 00110000 , 00101000 , 00100100 , 11111110 , 00100000 , | 30 30 31 31 30 30 30 30 20 2c 20 30 30 31 30 31 30 30 30 20 2c 20 30 30 31 30 30 31 30 30 20 2c 20 31 31 31 31 31 31 31 30 20 2c 20 30 30 31 30 30 30 30 30 20 2c 20 20 20 20 20 20 20 20 20 20 01001110 , 10001010 , 10001010 , 10001010 , 01110010 , | 30 31 30 30 31 31 31 30 20 2c 20 31 30 30 30 31 30 31 30 20 2c 20 31 30 30 30 31 30 31 30 20 2c 20 31 30 30 30 31 30 31 30 20 2c 20 30 31 31 31 30 30 31 30 20 2c 20 20 20 20 20 20 20 20 20 20 01111000 , 10010100 , 10010010 , 10010010 , 01100000 , | 30 31 31 31 31 30 30 30 20 2c 20 31 30 30 31 30 31 30 30 20 2c 20 31 30 30 31 30 30 31 30 20 2c 20 31 30 30 31 30 30 31 30 20 2c 20 30 31 31 30 30 30 30 30 20 2c 20 20 20 20 20 20 20 20 20 20 00000010 , 11100010 , 00010010 , 00001010 , 00000110 , | 30 30 30 30 30 30 31 30 20 2c 20 31 31 31 30 30 30 31 30 20 2c 20 30 30 30 31 30 30 31 30 20 2c 20 30 30 30 30 31 30 31 30 20 2c 20 30 30 30 30 30 31 31 30 20 2c 20 20 20 20 20 20 20 20 20 20 01101100 , 10010010 , 10010010 , 10010010 , 01101100 , | 30 31 31 30 31 31 30 30 20 2c 20 31 30 30 31 30 30 31 30 20 2c 20 31 30 30 31 30 30 31 30 20 2c 20 31 30 30 31 30 30 31 30 20 2c 20 30 31 31 30 31 31 30 30 20 2c 20 20 20 20 20 20 20 20 20 20 00001100 , 10010010 , 10010010 , 01010010 , 00111100 , | 30 30 30 30 31 31 30 30 20 2c 20 31 30 30 31 30 30 31 30 20 2c 20 31 30 30 31 30 30 31 30 20 2c 20 30 31 30 31 30 30 31 30 20 2c 20 30 30 31 31 31 31 30 30 20 2c 20 20 20 20 20 20 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0162 } ( DISPLAY 3 DIGIT BCD NUM IN 5 X 7 CHAR SET ) | 28 20 44 49 53 50 4c 41 59 20 33 20 44 49 47 49 54 20 42 43 44 20 4e 55 4d 20 49 4e 20 35 20 58 20 37 20 43 48 41 52 20 53 45 54 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HEX | 48 45 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 F= dispbcd57 | 46 3d 20 64 69 73 70 62 63 64 35 37 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR DISPBCD3 DECIMAL --> | 41 53 53 45 4d 42 4c 45 3e 20 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0163 } ( INTERRUPT WRITE NUMBER ROUTINE ) | 28 20 49 4e 54 45 52 52 55 50 54 20 57 52 49 54 45 20 4e 55 4d 42 45 52 20 52 4f 55 54 49 4e 45 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR NUMWRITE | 53 55 42 52 20 4e 55 4d 57 52 49 54 45 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 TBCALC CALL, | 54 42 43 41 4c 43 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 aup CALL, | 61 75 70 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 PQSDW PQS X BITX, 0=, IF, DISPBCD3 CALL, THEN, | 50 51 53 44 57 20 50 51 53 20 58 20 42 49 54 58 2c 20 30 3d 2c 20 49 46 2c 20 44 49 53 50 42 43 44 33 20 43 41 4c 4c 2c 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 KILLOFF JMP, | 4b 49 4c 4c 4f 46 46 20 4a 4d 50 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0164 } ( REVERSE PATTERNS FOR PLAYER UP INDICATION ) | 28 20 52 45 56 45 52 53 45 20 50 41 54 54 45 52 4e 53 20 46 4f 52 20 50 4c 41 59 45 52 20 55 50 20 49 4e 44 49 43 41 54 49 4f 4e 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL DATA PU1 2 B, 8 B, BINARY | 44 45 43 49 4d 41 4c 20 44 41 54 41 20 50 55 31 20 32 20 42 2c 20 38 20 42 2c 20 42 49 4e 41 52 59 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 11111111 11110000 11111111 11110000 ^ | 7e 20 31 31 31 31 31 31 31 31 20 31 31 31 31 30 30 30 30 20 31 31 31 31 31 31 31 31 20 31 31 31 31 30 30 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 10011111 01110000 ^ | 7e 20 31 30 30 31 31 31 31 31 20 30 31 31 31 30 30 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 10000000 00110000 ^ | 7e 20 31 30 30 30 30 30 30 30 20 30 30 31 31 30 30 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 10000000 00010000 ^ | 7e 20 31 30 30 30 30 30 30 30 20 30 30 30 31 30 30 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 10011111 11110000 ^ | 7e 20 31 30 30 31 31 31 31 31 20 31 31 31 31 30 30 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 11111111 11110000 11111111 11110000 ^ | 7e 20 31 31 31 31 31 31 31 31 20 31 31 31 31 30 30 30 30 20 31 31 31 31 31 31 31 31 20 31 31 31 31 30 30 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL DATA PU2 2 B, 8 B, BINARY ~ 11111111 11110000 ^ | 44 45 43 49 4d 41 4c 20 44 41 54 41 20 50 55 32 20 32 20 42 2c 20 38 20 42 2c 20 42 49 4e 41 52 59 20 7e 20 31 31 31 31 31 31 31 31 20 31 31 31 31 30 30 30 30 20 5e 20 20 20 20 20 20 20 20 20 ~ 10000011 00110000 ^ | 7e 20 31 30 30 30 30 30 31 31 20 30 30 31 31 30 30 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 10000001 00010000 ^ | 7e 20 31 30 30 30 30 30 30 31 20 30 30 30 31 30 30 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 10011001 10010000 ^ | 7e 20 31 30 30 31 31 30 30 31 20 31 30 30 31 30 30 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 10011001 10010000 ^ | 7e 20 31 30 30 31 31 30 30 31 20 31 30 30 31 30 30 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 10011001 00010000 ^ | 7e 20 31 30 30 31 31 30 30 31 20 30 30 30 31 30 30 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 10011100 00110000 ^ | 7e 20 31 30 30 31 31 31 30 30 20 30 30 31 31 30 30 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 11111111 11110000 ^ DECIMAL --> | 7e 20 31 31 31 31 31 31 31 31 20 31 31 31 31 30 30 30 30 20 5e 20 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0165 } ( BASE STATION ) | 28 20 42 41 53 45 20 53 54 41 54 49 4f 4e 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL DATA FIREBASE 4 B, 13 B, | 44 45 43 49 4d 41 4c 20 44 41 54 41 20 46 49 52 45 42 41 53 45 20 34 20 42 2c 20 31 33 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 QUAD 0222 B, 2222 B, 2000 B, 0000 B, | 51 55 41 44 20 30 32 32 32 20 42 2c 20 32 32 32 32 20 42 2c 20 32 30 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2111 B, 1111 B, 2220 B, 0000 B, | 32 31 31 31 20 42 2c 20 31 31 31 31 20 42 2c 20 32 32 32 30 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0222 B, 2222 B, 2000 B, 0000 B, | 30 32 32 32 20 42 2c 20 32 32 32 32 20 42 2c 20 32 30 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0000 B, 1110 B, 0022 B, 2200 B, | 30 30 30 30 20 42 2c 20 31 31 31 30 20 42 2c 20 30 30 32 32 20 42 2c 20 32 32 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0000 B, 0111 B, 0002 B, 2220 B, | 30 30 30 30 20 42 2c 20 30 31 31 31 20 42 2c 20 30 30 30 32 20 42 2c 20 32 32 32 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 1111 B, 1111 B, 1102 B, 2222 B, | 31 31 31 31 20 42 2c 20 31 31 31 31 20 42 2c 20 31 31 30 32 20 42 2c 20 32 32 32 32 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0002 B, 2222 B, 2222 B, 2222 B, | 30 30 30 32 20 42 2c 20 32 32 32 32 20 42 2c 20 32 32 32 32 20 42 2c 20 32 32 32 32 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 1111 B, 1111 B, 1102 B, 2222 B, | 31 31 31 31 20 42 2c 20 31 31 31 31 20 42 2c 20 31 31 30 32 20 42 2c 20 32 32 32 32 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0000 B, 0111 B, 0002 B, 2220 B, | 30 30 30 30 20 42 2c 20 30 31 31 31 20 42 2c 20 30 30 30 32 20 42 2c 20 32 32 32 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0000 B, 1110 B, 0022 B, 2200 B, | 30 30 30 30 20 42 2c 20 31 31 31 30 20 42 2c 20 30 30 32 32 20 42 2c 20 32 32 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0222 B, 2222 B, 2000 B, 0000 B, | 30 32 32 32 20 42 2c 20 32 32 32 32 20 42 2c 20 32 30 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2111 B, 1111 B, 2220 B, 0000 B, | 32 31 31 31 20 42 2c 20 31 31 31 31 20 42 2c 20 32 32 32 30 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0222 B, 2222 B, 2000 B, 0000 B, --> | 30 32 32 32 20 42 2c 20 32 32 32 32 20 42 2c 20 32 30 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0166 } ( SMALL BASE ) DECIMAL DATA SMALBASE 3 B, 11 B, QUAD | 28 20 53 4d 41 4c 4c 20 42 41 53 45 20 29 20 44 45 43 49 4d 41 4c 20 44 41 54 41 20 53 4d 41 4c 42 41 53 45 20 33 20 42 2c 20 31 31 20 42 2c 20 51 55 41 44 20 20 20 20 20 20 20 20 20 20 20 20 0222 B, 2220 B, 0000 B, | 30 32 32 32 20 42 2c 20 32 32 32 30 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2222 B, 2200 B, 0000 B, | 32 32 32 32 20 42 2c 20 32 32 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0011 B, 0000 B, 0000 B, | 30 30 31 31 20 42 2c 20 30 30 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0111 B, 1000 B, 2200 B, | 30 31 31 31 20 42 2c 20 31 30 30 30 20 42 2c 20 32 32 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 1111 B, 1110 B, 0220 B, | 31 31 31 31 20 42 2c 20 31 31 31 30 20 42 2c 20 30 32 32 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0002 B, 2222 B, 2222 B, | 30 30 30 32 20 42 2c 20 32 32 32 32 20 42 2c 20 32 32 32 32 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 1111 B, 1110 B, 0220 B, | 31 31 31 31 20 42 2c 20 31 31 31 30 20 42 2c 20 30 32 32 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0111 B, 1000 B, 2200 B, | 30 31 31 31 20 42 2c 20 31 30 30 30 20 42 2c 20 32 32 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0011 B, 0000 B, 0000 B, | 30 30 31 31 20 42 2c 20 30 30 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2222 B, 2200 B, 0000 B, | 32 32 32 32 20 42 2c 20 32 32 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0222 B, 2220 B, 0000 B, | 30 32 32 32 20 42 2c 20 32 32 32 30 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0167 } ( GORF ) DECIMAL DATA GORF 5 B, 15 B, QUAD | 28 20 47 4f 52 46 20 29 20 44 45 43 49 4d 41 4c 20 44 41 54 41 20 47 4f 52 46 20 35 20 42 2c 20 31 35 20 42 2c 20 51 55 41 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2000 B, 3330 B, 0000 B, 0000 B, 0010 B, | 32 30 30 30 20 42 2c 20 33 33 33 30 20 42 2c 20 30 30 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 30 30 31 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2003 B, 3333 B, 3300 B, 0000 B, 0100 B, | 32 30 30 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 30 31 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2223 B, 3333 B, 3333 B, 3000 B, 1000 B, | 32 32 32 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 30 30 30 20 42 2c 20 31 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0003 B, 3333 B, 3333 B, 3333 B, 0000 B, | 30 30 30 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0033 B, 3331 B, 1111 B, 3333 B, 3300 B, | 30 30 33 33 20 42 2c 20 33 33 33 31 20 42 2c 20 31 31 31 31 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0031 B, 1132 B, 2111 B, 3333 B, 3330 B, | 30 30 33 31 20 42 2c 20 31 31 33 32 20 42 2c 20 32 31 31 31 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 33 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0032 B, 1233 B, 3333 B, 3333 B, 3333 B, | 30 30 33 32 20 42 2c 20 31 32 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0031 B, 1133 B, 3333 B, 3333 B, 3333 B, | 30 30 33 31 20 42 2c 20 31 31 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0032 B, 1233 B, 3333 B, 3333 B, 3333 B, | 30 30 33 32 20 42 2c 20 31 32 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0031 B, 1131 B, 1111 B, 3333 B, 3330 B, | 30 30 33 31 20 42 2c 20 31 31 33 31 20 42 2c 20 31 31 31 31 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 33 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0033 B, 3332 B, 2111 B, 3333 B, 3300 B, | 30 30 33 33 20 42 2c 20 33 33 33 32 20 42 2c 20 32 31 31 31 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0003 B, 3333 B, 3333 B, 3333 B, 0000 B, | 30 30 30 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2223 B, 3333 B, 3333 B, 3000 B, 1000 B, | 32 32 32 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 30 30 30 20 42 2c 20 31 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2003 B, 3333 B, 3300 B, 0000 B, 0100 B, | 32 30 30 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 30 31 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2000 B, 3330 B, 0000 B, 0000 B, 0010 B, --> | 32 30 30 30 20 42 2c 20 33 33 33 30 20 42 2c 20 30 30 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 30 30 31 30 20 42 2c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0168 } ( GORFB ) DECIMAL DATA GORFB 5 B, 15 B, QUAD | 28 20 47 4f 52 46 42 20 29 20 44 45 43 49 4d 41 4c 20 44 41 54 41 20 47 4f 52 46 42 20 35 20 42 2c 20 31 35 20 42 2c 20 51 55 41 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0000 B, 3330 B, 0000 B, 0000 B, 2000 B, | 30 30 30 30 20 42 2c 20 33 33 33 30 20 42 2c 20 30 30 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 32 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0003 B, 3333 B, 3300 B, 0000 B, 0200 B, | 30 30 30 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 30 32 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 1113 B, 3333 B, 3333 B, 3000 B, 2000 B, | 31 31 31 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 30 30 30 20 42 2c 20 32 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 1003 B, 3333 B, 3333 B, 3333 B, 0000 B, | 31 30 30 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 1033 B, 3331 B, 1222 B, 3333 B, 3300 B, | 31 30 33 33 20 42 2c 20 33 33 33 31 20 42 2c 20 31 32 32 32 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0033 B, 2332 B, 2222 B, 3333 B, 3330 B, | 30 30 33 33 20 42 2c 20 32 33 33 32 20 42 2c 20 32 32 32 32 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 33 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0033 B, 2333 B, 3333 B, 3333 B, 3333 B, | 30 30 33 33 20 42 2c 20 32 33 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0033 B, 2333 B, 3333 B, 3333 B, 3333 B, | 30 30 33 33 20 42 2c 20 32 33 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0033 B, 2333 B, 3333 B, 3333 B, 3333 B, | 30 30 33 33 20 42 2c 20 32 33 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0033 B, 2331 B, 1222 B, 3333 B, 3330 B, | 30 30 33 33 20 42 2c 20 32 33 33 31 20 42 2c 20 31 32 32 32 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 33 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 1033 B, 3332 B, 2222 B, 3333 B, 3300 B, | 31 30 33 33 20 42 2c 20 33 33 33 32 20 42 2c 20 32 32 32 32 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 1003 B, 3333 B, 3333 B, 3333 B, 0000 B, | 31 30 30 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 1113 B, 3333 B, 3333 B, 3000 B, 2000 B, | 31 31 31 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 30 30 30 20 42 2c 20 32 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0003 B, 3333 B, 3300 B, 0000 B, 0200 B, | 30 30 30 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 30 32 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0000 B, 3330 B, 0000 B, 0000 B, 2000 B, DECIMAL --> | 30 30 30 30 20 42 2c 20 33 33 33 30 20 42 2c 20 30 30 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 32 30 30 30 20 42 2c 20 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0169 } ( GORF 2 AND GORF 3 ) | 28 20 47 4f 52 46 20 32 20 41 4e 44 20 47 4f 52 46 20 33 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL DATA GORF2 2 B, 5 B, QUAD | 44 45 43 49 4d 41 4c 20 44 41 54 41 20 47 4f 52 46 32 20 32 20 42 2c 20 35 20 42 2c 20 51 55 41 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 2033 0010 ^ | 7e 20 32 30 33 33 20 30 30 31 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 2333 1300 ^ | 7e 20 32 33 33 33 20 31 33 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0313 3330 ^ | 7e 20 30 33 31 33 20 33 33 33 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 2333 1300 ^ | 7e 20 32 33 33 33 20 31 33 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 2033 0010 ^ | 7e 20 32 30 33 33 20 30 30 31 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL DATA GORF3 3 B, 7 B, QUAD | 44 45 43 49 4d 41 4c 20 44 41 54 41 20 47 4f 52 46 33 20 33 20 42 2c 20 37 20 42 2c 20 51 55 41 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 2003 3300 1000 ^ | 7e 20 32 30 30 33 20 33 33 30 30 20 31 30 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 2233 3333 0000 ^ | 7e 20 32 32 33 33 20 33 33 33 33 20 30 30 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0032 3213 3000 ^ | 7e 20 30 30 33 32 20 33 32 31 33 20 33 30 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0332 3333 3000 ^ | 7e 20 30 33 33 32 20 33 33 33 33 20 33 30 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0032 3213 3000 ^ | 7e 20 30 30 33 32 20 33 32 31 33 20 33 30 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 2233 3333 0000 ^ | 7e 20 32 32 33 33 20 33 33 33 33 20 30 30 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 2003 3300 1000 ^ | 7e 20 32 30 30 33 20 33 33 30 30 20 31 30 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0170 } ( GORF 1 AND GORF 4 ) | 28 20 47 4f 52 46 20 31 20 41 4e 44 20 47 4f 52 46 20 34 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA GORF1 2 B, 3 B, QUAD | 44 41 54 41 20 47 4f 52 46 31 20 32 20 42 2c 20 33 20 42 2c 20 51 55 41 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 2033 0000 ^ | 7e 20 32 30 33 33 20 30 30 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0313 3000 ^ | 7e 20 30 33 31 33 20 33 30 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 2033 0000 ^ | 7e 20 32 30 33 33 20 30 30 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL DATA GORF4 3 B, 9 B, QUAD | 44 45 43 49 4d 41 4c 20 44 41 54 41 20 47 4f 52 46 34 20 33 20 42 2c 20 39 20 42 2c 20 51 55 41 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 2003 3300 0001 ^ | 7e 20 32 30 30 33 20 33 33 30 30 20 30 30 30 31 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 2033 3333 0010 ^ | 7e 20 32 30 33 33 20 33 33 33 33 20 30 30 31 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 2233 3333 3300 ^ | 7e 20 32 32 33 33 20 33 33 33 33 20 33 33 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0032 3211 3330 ^ | 7e 20 30 30 33 32 20 33 32 31 31 20 33 33 33 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0031 3333 3330 ^ | 7e 20 30 30 33 31 20 33 33 33 33 20 33 33 33 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0032 3211 3330 ^ | 7e 20 30 30 33 32 20 33 32 31 31 20 33 33 33 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 2233 3333 3300 ^ | 7e 20 32 32 33 33 20 33 33 33 33 20 33 33 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 2033 3333 0010 ^ | 7e 20 32 30 33 33 20 33 33 33 33 20 30 30 31 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 2003 3300 0001 ^ | 7e 20 32 30 30 33 20 33 33 30 30 20 30 30 30 31 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0171 } ( GORF 5 ) | 28 20 47 4f 52 46 20 35 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA GORF5 4 B, 12 B, QUAD | 44 41 54 41 20 47 4f 52 46 35 20 34 20 42 2c 20 31 32 20 42 2c 20 51 55 41 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 2000 3333 0000 0010 ^ | 7e 20 32 30 30 30 20 33 33 33 33 20 30 30 30 30 20 30 30 31 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 2003 3333 3330 0100 ^ | 7e 20 32 30 30 33 20 33 33 33 33 20 33 33 33 30 20 30 31 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 2223 3333 3333 3000 ^ | 7e 20 32 32 32 33 20 33 33 33 33 20 33 33 33 33 20 33 30 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0003 3332 2113 3300 ^ | 7e 20 30 30 30 33 20 33 33 33 32 20 32 31 31 33 20 33 33 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0033 1231 1113 3330 ^ | 7e 20 30 30 33 33 20 31 32 33 31 20 31 31 31 33 20 33 33 33 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0033 1133 3333 3333 ^ | 7e 20 30 30 33 33 20 31 31 33 33 20 33 33 33 33 20 33 33 33 33 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0033 2133 3333 3333 ^ | 7e 20 30 30 33 33 20 32 31 33 33 20 33 33 33 33 20 33 33 33 33 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0033 1232 2113 3330 ^ | 7e 20 30 30 33 33 20 31 32 33 32 20 32 31 31 33 20 33 33 33 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0003 3331 1113 3300 ^ | 7e 20 30 30 30 33 20 33 33 33 31 20 31 31 31 33 20 33 33 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 2223 3333 3333 3000 ^ | 7e 20 32 32 32 33 20 33 33 33 33 20 33 33 33 33 20 33 30 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 2003 3333 3330 0100 ^ | 7e 20 32 30 30 33 20 33 33 33 33 20 33 33 33 30 20 30 31 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 2000 3333 0000 0010 ^ | 7e 20 32 30 30 30 20 33 33 33 33 20 30 30 30 30 20 30 30 31 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0172 } ( FIRE BASE EXPLOSION PATTERN ) | 28 20 46 49 52 45 20 42 41 53 45 20 45 58 50 4c 4f 53 49 4f 4e 20 50 41 54 54 45 52 4e 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA FBEXP1 3 B, 12 B, QUAD | 44 41 54 41 20 46 42 45 58 50 31 20 33 20 42 2c 20 31 32 20 42 2c 20 51 55 41 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0000 B, 3000 B, 0010 B, | 30 30 30 30 20 42 2c 20 33 30 30 30 20 42 2c 20 30 30 31 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3000 B, 3303 B, 0000 B, | 33 30 30 30 20 42 2c 20 33 33 30 33 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0333 B, 3333 B, 0030 B, | 30 33 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 30 30 33 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0033 B, 3333 B, 3330 B, | 30 30 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 33 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0033 B, 3133 B, 1333 B, | 30 30 33 33 20 42 2c 20 33 31 33 33 20 42 2c 20 31 33 33 33 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3333 B, 1111 B, 1330 B, | 33 33 33 33 20 42 2c 20 31 31 31 31 20 42 2c 20 31 33 33 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3331 B, 1111 B, 1330 B, | 33 33 33 31 20 42 2c 20 31 31 31 31 20 42 2c 20 31 33 33 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0333 B, 3311 B, 1330 B, | 30 33 33 33 20 42 2c 20 33 33 31 31 20 42 2c 20 31 33 33 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0033 B, 0333 B, 3300 B, | 30 30 33 33 20 42 2c 20 30 33 33 33 20 42 2c 20 33 33 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 1030 B, 0033 B, 3001 B, | 31 30 33 30 20 42 2c 20 30 30 33 33 20 42 2c 20 33 30 30 31 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0000 B, 0033 B, 3000 B, | 30 30 30 30 20 42 2c 20 30 30 33 33 20 42 2c 20 33 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0000 B, 0003 B, 0000 B, | 30 30 30 30 20 42 2c 20 30 30 30 33 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0173 } ( ANOTHER FIREBASE EXPLOSION PATTERN ) | 28 20 41 4e 4f 54 48 45 52 20 46 49 52 45 42 41 53 45 20 45 58 50 4c 4f 53 49 4f 4e 20 50 41 54 54 45 52 4e 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA FBEXP2 4 B, 17 B, QUAD | 44 41 54 41 20 46 42 45 58 50 32 20 34 20 42 2c 20 31 37 20 42 2c 20 51 55 41 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0001 B, 0000 B, 0000 B, 0000 B, | 30 30 30 31 20 42 2c 20 30 30 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0000 B, 1000 B, 0000 B, 0000 B, | 30 30 30 30 20 42 2c 20 31 30 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0000 B, 1110 B, 0000 B, 0000 B, | 30 30 30 30 20 42 2c 20 31 31 31 30 20 42 2c 20 30 30 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0000 B, 0110 B, 0010 B, 0000 B, | 30 30 30 30 20 42 2c 20 30 31 31 30 20 42 2c 20 30 30 31 30 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0000 B, 0111 B, 1110 B, 0000 B, | 30 30 30 30 20 42 2c 20 30 31 31 31 20 42 2c 20 31 31 31 30 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0000 B, 0131 B, 1110 B, 0110 B, | 30 30 30 30 20 42 2c 20 30 31 33 31 20 42 2c 20 31 31 31 30 20 42 2c 20 30 31 31 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0000 B, 1133 B, 3111 B, 1111 B, | 30 30 30 30 20 42 2c 20 31 31 33 33 20 42 2c 20 33 31 31 31 20 42 2c 20 31 31 31 31 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0000 B, 1133 B, 3333 B, 3311 B, | 30 30 30 30 20 42 2c 20 31 31 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 31 31 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3001 B, 1333 B, 3333 B, 3310 B, | 33 30 30 31 20 42 2c 20 31 33 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 31 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0111 B, 1333 B, 3333 B, 3110 B, | 30 31 31 31 20 42 2c 20 31 33 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 31 31 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0111 B, 3333 B, 3333 B, 3110 B, | 30 31 31 31 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 31 31 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0011 B, 3333 B, 3333 B, 3311 B, | 30 30 31 31 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 31 31 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0011 B, 3311 B, 3331 B, 3310 B, | 30 30 31 31 20 42 2c 20 33 33 31 31 20 42 2c 20 33 33 33 31 20 42 2c 20 33 33 31 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0174 } | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 (( C | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 20 43 OONTINNUATTIONN OFF FBBEXPP2, PHASSOR ANDD NUULPAAT )) | 4f 4f 4e 54 49 4e 4e 55 41 54 54 49 4f 4e 4e 20 4f 46 46 20 46 42 42 45 58 50 50 32 2c 20 20 50 48 41 53 53 4f 52 20 20 41 4e 44 44 20 4e 55 55 4c 50 41 41 54 20 29 29 20 20 20 20 20 20 20 20 { BLOCK 0175 } ( FBEXP3 ) | 20 28 20 46 42 45 58 50 33 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA FBEXP3 6 B, 23 B, QUAD | 20 44 41 54 41 20 46 42 45 58 50 33 20 36 20 42 2c 20 32 33 20 42 2c 20 51 55 41 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0000 B, 0000 B, 2000 B, 0000 B, 0000 B, 0000 B, | 20 30 30 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 32 30 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0000 B, 0002 B, 1200 B, 0000 B, 0000 B, 0000 B, | 20 30 30 30 30 20 42 2c 20 30 30 30 32 20 42 2c 20 31 32 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0000 B, 2221 B, 1120 B, 0000 B, 0000 B, 0000 B, | 20 30 30 30 30 20 42 2c 20 32 32 32 31 20 42 2c 20 31 31 32 30 20 42 2c 20 30 30 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0002 B, 1111 B, 1112 B, 0022 B, 0000 B, 0000 B, | 20 30 30 30 32 20 42 2c 20 31 31 31 31 20 42 2c 20 31 31 31 32 20 42 2c 20 30 30 32 32 20 42 2c 20 30 30 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0023 B, 3133 B, 3311 B, 2212 B, 2000 B, 0000 B, | 20 30 30 32 33 20 42 2c 20 33 31 33 33 20 42 2c 20 33 33 31 31 20 42 2c 20 32 32 31 32 20 42 2c 20 32 30 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0211 B, 3333 B, 3331 B, 1331 B, 1200 B, 0000 B, | 20 30 32 31 31 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 33 31 20 42 2c 20 31 33 33 31 20 42 2c 20 31 32 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0021 B, 1333 B, 3333 B, 3331 B, 1120 B, 0000 B, | 20 30 30 32 31 20 42 2c 20 31 33 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 33 31 20 42 2c 20 31 31 32 30 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0002 B, 3333 B, 3333 B, 3333 B, 1112 B, 0000 B, | 20 30 30 30 32 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 31 31 31 32 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0000 B, 2333 B, 3333 B, 3333 B, 3111 B, 2000 B, | 20 30 30 30 30 20 42 2c 20 32 33 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 31 31 31 20 42 2c 20 32 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0002 B, 1133 B, 3333 B, 3333 B, 3331 B, 1200 B, | 20 30 30 30 32 20 42 2c 20 31 31 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 33 31 20 42 2c 20 31 32 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0021 B, 1333 B, 3333 B, 3333 B, 3311 B, 2000 B, | 20 30 30 32 31 20 42 2c 20 31 33 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 31 31 20 42 2c 20 32 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0211 B, 3333 B, 3333 B, 3333 B, 3112 B, 0000 B, | 20 30 32 31 31 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 31 31 32 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2211 B, 3333 B, 3333 B, 3333 B, 1120 B, 0000 B, | 20 32 32 31 31 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 31 31 32 30 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0176 } ( CONTINUED FBEXP3 ) | 28 20 43 4f 4e 54 49 4e 55 45 44 20 46 42 45 58 50 33 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0211 B, 1133 B, 3333 B, 3311 B, 1120 B, 0000 B, | 30 32 31 31 20 42 2c 20 31 31 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 31 31 20 42 2c 20 31 31 32 30 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0021 B, 3333 B, 3333 B, 3331 B, 2200 B, 0000 B, | 30 30 32 31 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 33 31 20 42 2c 20 32 32 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0002 B, 3323 B, 3333 B, 3332 B, 0000 B, 0000 B, | 30 30 30 32 20 42 2c 20 33 33 32 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 33 32 20 42 2c 20 30 30 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0000 B, 3231 B, 3333 B, 3332 B, 0000 B, 0000 B, | 30 30 30 30 20 42 2c 20 33 32 33 31 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 33 32 20 42 2c 20 30 30 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0000 B, 2133 B, 3333 B, 3332 B, 2200 B, 0000 B, | 30 30 30 30 20 42 2c 20 32 31 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 33 32 20 42 2c 20 32 32 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0002 B, 1113 B, 3133 B, 3331 B, 1120 B, 0000 B, | 30 30 30 32 20 42 2c 20 31 31 31 33 20 42 2c 20 33 31 33 33 20 42 2c 20 33 33 33 31 20 42 2c 20 31 31 32 30 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0000 B, 2111 B, 1123 B, 1311 B, 1200 B, 0000 B, | 30 30 30 30 20 42 2c 20 32 31 31 31 20 42 2c 20 31 31 32 33 20 42 2c 20 31 33 31 31 20 42 2c 20 31 32 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0000 B, 0211 B, 1202 B, 1111 B, 2000 B, 0000 B, | 30 30 30 30 20 42 2c 20 30 32 31 31 20 42 2c 20 31 32 30 32 20 42 2c 20 31 31 31 31 20 42 2c 20 32 30 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0000 B, 0021 B, 2000 B, 2112 B, 0000 B, 0000 B, | 30 30 30 30 20 42 2c 20 30 30 32 31 20 42 2c 20 32 30 30 30 20 42 2c 20 32 31 31 32 20 42 2c 20 30 30 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0000 B, 0002 B, 0000 B, 0220 B, 0000 B, 0000 B, | 30 30 30 30 20 42 2c 20 30 30 30 32 20 42 2c 20 30 30 30 30 20 42 2c 20 30 32 32 30 20 42 2c 20 30 30 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0177 } ( FBEXP4 ) | 28 20 46 42 45 58 50 34 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL DATA FBEXP4 5 B, 22 B, QUAD | 44 45 43 49 4d 41 4c 20 44 41 54 41 20 46 42 45 58 50 34 20 35 20 42 2c 20 32 32 20 42 2c 20 51 55 41 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2000 B, 0000 B, 0020 B, 0000 B, 0000 B, | 32 30 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 30 30 32 30 20 42 2c 20 30 30 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0200 B, 0000 B, 0200 B, 0000 B, 0002 B, | 30 32 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 30 32 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 30 30 30 32 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0020 B, 0000 B, 2000 B, 0000 B, 0020 B, | 30 30 32 30 20 42 2c 20 30 30 30 30 20 42 2c 20 32 30 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 30 30 32 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0002 B, 0000 B, 2000 B, 0000 B, 0200 B, | 30 30 30 32 20 42 2c 20 30 30 30 30 20 42 2c 20 32 30 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 30 32 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0000 B, 2202 B, 2201 B, 1000 B, 2000 B, | 30 30 30 30 20 42 2c 20 32 32 30 32 20 42 2c 20 32 32 30 31 20 42 2c 20 31 30 30 30 20 42 2c 20 32 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0000 B, 0223 B, 1332 B, 1102 B, 0000 B, | 30 30 30 30 20 42 2c 20 30 32 32 33 20 42 2c 20 31 33 33 32 20 42 2c 20 31 31 30 32 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0000 B, 2233 B, 3333 B, 2110 B, 0002 B, | 30 30 30 30 20 42 2c 20 32 32 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 32 31 31 30 20 42 2c 20 30 30 30 32 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0000 B, 0231 B, 3333 B, 3310 B, 0020 B, | 30 30 30 30 20 42 2c 20 30 32 33 31 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 31 30 20 42 2c 20 30 30 32 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0000 B, 0223 B, 1333 B, 3111 B, 2200 B, | 30 30 30 30 20 42 2c 20 30 32 32 33 20 42 2c 20 31 33 33 33 20 42 2c 20 33 31 31 31 20 42 2c 20 32 32 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0000 B, 0023 B, 1333 B, 3120 B, 0000 B, | 30 30 30 30 20 42 2c 20 30 30 32 33 20 42 2c 20 31 33 33 33 20 42 2c 20 33 31 32 30 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0000 B, 2223 B, 1333 B, 3122 B, 0000 B, | 30 30 30 30 20 42 2c 20 32 32 32 33 20 42 2c 20 31 33 33 33 20 42 2c 20 33 31 32 32 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0002 B, 2331 B, 3333 B, 3312 B, 0000 B, | 30 30 30 32 20 42 2c 20 32 33 33 31 20 42 2c 20 33 33 33 33 20 42 2c 20 33 33 31 32 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0022 B, 3133 B, 3333 B, 3220 B, 0000 B, | 30 30 32 32 20 42 2c 20 33 31 33 33 20 42 2c 20 33 33 33 33 20 42 2c 20 33 32 32 30 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0178 } ( FBEXP4 CONTINUED ) | 28 20 46 42 45 58 50 34 20 43 4f 4e 54 49 4e 55 45 44 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0223 B, 3113 B, 3333 B, 1200 B, 0000 B, | 30 32 32 33 20 42 2c 20 33 31 31 33 20 42 2c 20 33 33 33 33 20 42 2c 20 31 32 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0002 B, 2311 B, 3331 B, 1220 B, 0000 B, | 30 30 30 32 20 42 2c 20 32 33 31 31 20 42 2c 20 33 33 33 31 20 42 2c 20 31 32 32 30 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0002 B, 2233 B, 3331 B, 3322 B, 0000 B, | 30 30 30 32 20 42 2c 20 32 32 33 33 20 42 2c 20 33 33 33 31 20 42 2c 20 33 33 32 32 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0020 B, 0232 B, 2233 B, 3320 B, 0000 B, | 30 30 32 30 20 42 2c 20 30 32 33 32 20 42 2c 20 32 32 33 33 20 42 2c 20 33 33 32 30 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0200 B, 0220 B, 0223 B, 3222 B, 0000 B, | 30 32 30 30 20 42 2c 20 30 32 32 30 20 42 2c 20 30 32 32 33 20 42 2c 20 33 32 32 32 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2000 B, 0000 B, 0022 B, 2202 B, 2000 B, | 32 30 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 30 30 32 32 20 42 2c 20 32 32 30 32 20 42 2c 20 32 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0000 B, 0000 B, 0020 B, 0000 B, 0200 B, | 30 30 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 30 30 32 30 20 42 2c 20 30 30 30 30 20 42 2c 20 30 32 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0000 B, 0000 B, 0200 B, 0000 B, 0020 B, | 30 30 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 30 32 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 30 30 32 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0000 B, 0000 B, 2000 B, 0000 B, 0002 B, | 30 30 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 32 30 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 30 30 30 32 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0179 } ( FIREBASE EXPLOSION 5 ) | 28 20 46 49 52 45 42 41 53 45 20 45 58 50 4c 4f 53 49 4f 4e 20 35 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA FBEXP5 5 B, 23 B, QUAD | 44 41 54 41 20 46 42 45 58 50 35 20 35 20 42 2c 20 32 33 20 42 2c 20 51 55 41 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0000 0000 0010 0003 0000 ^ | 7e 20 30 30 30 30 20 30 30 30 30 20 30 30 31 30 20 30 30 30 33 20 30 30 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0000 0300 1001 1000 0300 ^ | 7e 20 30 30 30 30 20 30 33 30 30 20 31 30 30 31 20 31 30 30 30 20 30 33 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0000 2030 0200 0020 0000 ^ | 7e 20 30 30 30 30 20 32 30 33 30 20 30 32 30 30 20 30 30 32 30 20 30 30 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0000 0000 0001 0000 0000 ^ | 7e 20 30 30 30 30 20 30 30 30 30 20 30 30 30 31 20 30 30 30 30 20 30 30 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0300 2100 2000 3000 0200 ^ | 7e 20 30 33 30 30 20 32 31 30 30 20 32 30 30 30 20 33 30 30 30 20 30 32 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0030 0200 0002 0000 0033 ^ | 7e 20 30 30 33 30 20 30 32 30 30 20 30 30 30 32 20 30 30 30 30 20 30 30 33 33 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0300 0020 0220 0030 0300 ^ | 7e 20 30 33 30 30 20 30 30 32 30 20 30 32 32 30 20 30 30 33 30 20 30 33 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0000 0000 0300 0000 0003 ^ | 7e 20 30 30 30 30 20 30 30 30 30 20 30 33 30 30 20 30 30 30 30 20 30 30 30 33 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0033 3002 2200 0110 0011 ^ | 7e 20 30 30 33 33 20 33 30 30 32 20 32 32 30 30 20 30 31 31 30 20 30 30 31 31 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0003 3001 2000 1100 0122 ^ | 7e 20 30 30 30 33 20 33 30 30 31 20 32 30 30 30 20 31 31 30 30 20 30 31 32 32 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0033 2201 2201 1010 1022 ^ | 7e 20 30 30 33 33 20 32 32 30 31 20 32 32 30 31 20 31 30 31 30 20 31 30 32 32 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 3300 0221 2011 1100 1110 ^ | 7e 20 33 33 30 30 20 30 32 32 31 20 32 30 31 31 20 31 31 30 30 20 31 31 31 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 3330 0022 2001 1110 1100 ^ | 7e 20 33 33 33 30 20 30 30 32 32 20 32 30 30 31 20 31 31 31 30 20 31 31 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0030 2000 0222 2100 0000 ^ --> | 7e 20 30 30 33 30 20 32 30 30 30 20 30 32 32 32 20 32 31 30 30 20 30 30 30 30 20 5e 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0180 } ( FBEXP5 CONTINUED ) | 28 20 46 42 45 58 50 35 20 43 4f 4e 54 49 4e 55 45 44 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0033 1110 0020 1020 1100 ^ | 7e 20 30 30 33 33 20 31 31 31 30 20 30 30 32 30 20 31 30 32 30 20 31 31 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0300 0110 0200 1000 0100 ^ | 7e 20 30 33 30 30 20 30 31 31 30 20 30 32 30 30 20 31 30 30 30 20 30 31 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0001 0003 0030 0010 0030 ^ | 7e 20 30 30 30 31 20 30 30 30 33 20 30 30 33 30 20 30 30 31 30 20 30 30 33 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0000 0100 0000 0000 1000 ^ | 7e 20 30 30 30 30 20 30 31 30 30 20 30 30 30 30 20 30 30 30 30 20 31 30 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0200 0000 0010 0000 0000 ^ | 7e 20 30 32 30 30 20 30 30 30 30 20 30 30 31 30 20 30 30 30 30 20 30 30 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0001 0030 0000 0030 0010 ^ | 7e 20 30 30 30 31 20 30 30 33 30 20 30 30 30 30 20 30 30 33 30 20 30 30 31 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0000 0000 0020 0000 0000 ^ | 7e 20 30 30 30 30 20 30 30 30 30 20 30 30 32 30 20 30 30 30 30 20 30 30 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0000 0010 0000 0100 3000 ^ | 7e 20 30 30 30 30 20 30 30 31 30 20 30 30 30 30 20 30 31 30 30 20 33 30 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0000 0000 0102 0030 0000 ^ | 7e 20 30 30 30 30 20 30 30 30 30 20 30 31 30 32 20 30 30 33 30 20 30 30 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0181 } ( FIRE BASE EXPLOSION 6 ) | 28 20 46 49 52 45 20 42 41 53 45 20 45 58 50 4c 4f 53 49 4f 4e 20 36 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA FBEXP6 5 B, 23 B, QUAD | 44 41 54 41 20 46 42 45 58 50 36 20 35 20 42 2c 20 32 33 20 42 2c 20 51 55 41 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0000 0000 3000 0000 0000 ^ | 7e 20 30 30 30 30 20 30 30 30 30 20 33 30 30 30 20 30 30 30 30 20 30 30 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0000 0020 0000 0300 0000 ^ | 7e 20 30 30 30 30 20 30 30 32 30 20 30 30 30 30 20 30 33 30 30 20 30 30 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0000 0000 0300 0000 0010 ^ | 7e 20 30 30 30 30 20 30 30 30 30 20 30 33 30 30 20 30 30 30 30 20 30 30 31 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0001 0000 0000 0200 0000 ^ | 7e 20 30 30 30 31 20 30 30 30 30 20 30 30 30 30 20 30 32 30 30 20 30 30 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0000 0000 0000 0000 0000 ^ | 7e 20 30 30 30 30 20 30 30 30 30 20 30 30 30 30 20 30 30 30 30 20 30 30 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0002 0010 0031 0001 0200 ^ | 7e 20 30 30 30 32 20 30 30 31 30 20 30 30 33 31 20 30 30 30 31 20 30 32 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0002 0000 1000 0000 0000 ^ | 7e 20 30 30 30 32 20 30 30 30 30 20 31 30 30 30 20 30 30 30 30 20 30 30 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0000 0300 0001 0020 0000 ^ | 7e 20 30 30 30 30 20 30 33 30 30 20 30 30 30 31 20 30 30 32 30 20 30 30 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0100 0000 0000 2000 0000 ^ | 7e 20 30 31 30 30 20 30 30 30 30 20 30 30 30 30 20 32 30 30 30 20 30 30 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0001 0002 0000 0001 0300 ^ | 7e 20 30 30 30 31 20 30 30 30 32 20 30 30 30 30 20 30 30 30 31 20 30 33 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 3000 0000 0020 0000 0003 ^ | 7e 20 33 30 30 30 20 30 30 30 30 20 30 30 32 30 20 30 30 30 30 20 30 30 30 33 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0020 0200 0000 0030 0010 ^ | 7e 20 30 30 32 30 20 30 32 30 30 20 30 30 30 30 20 30 30 33 30 20 30 30 31 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0000 0001 0202 0000 2000 ^ | 7e 20 30 30 30 30 20 30 30 30 31 20 30 32 30 32 20 30 30 30 30 20 32 30 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 2030 1000 0000 0303 0000 ^ --> | 7e 20 32 30 33 30 20 31 30 30 30 20 30 30 30 30 20 30 33 30 33 20 30 30 30 30 20 5e 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0182 } ( FIRE BASE EXPLOSION 6 CONTINUED ) | 28 20 46 49 52 45 20 42 41 53 45 20 45 58 50 4c 4f 53 49 4f 4e 20 36 20 43 4f 4e 54 49 4e 55 45 44 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0001 0000 0200 0003 0001 ^ | 7e 20 30 30 30 31 20 30 30 30 30 20 30 32 30 30 20 30 30 30 33 20 30 30 30 31 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 1000 0010 0003 0100 0020 ^ | 7e 20 31 30 30 30 20 30 30 31 30 20 30 30 30 33 20 30 31 30 30 20 30 30 32 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0000 0000 1000 0000 0000 ^ | 7e 20 30 30 30 30 20 30 30 30 30 20 31 30 30 30 20 30 30 30 30 20 30 30 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0030 0300 0000 0000 0200 ^ | 7e 20 30 30 33 30 20 30 33 30 30 20 30 30 30 30 20 30 30 30 30 20 30 32 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0000 0000 0000 0000 0000 ^ | 7e 20 30 30 30 30 20 30 30 30 30 20 30 30 30 30 20 30 30 30 30 20 30 30 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0000 3010 0000 1000 0200 ^ | 7e 20 30 30 30 30 20 33 30 31 30 20 30 30 30 30 20 31 30 30 30 20 30 32 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0000 0100 0200 0003 0000 ^ | 7e 20 30 30 30 30 20 30 31 30 30 20 30 32 30 30 20 30 30 30 33 20 30 30 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0000 0003 0010 0000 0000 ^ | 7e 20 30 30 30 30 20 30 30 30 33 20 30 30 31 30 20 30 30 30 30 20 30 30 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ~ 0000 0001 0020 1000 0000 ^ | 7e 20 30 30 30 30 20 30 30 30 31 20 30 30 32 30 20 31 30 30 30 20 30 30 30 30 20 5e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0183 } ( ALIEN EXPLOSION PATTERN ) | 28 20 41 4c 49 45 4e 20 45 58 50 4c 4f 53 49 4f 4e 20 50 41 54 54 45 52 4e 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA EXPLOSION1 2 B, 11 B, QUAD | 44 41 54 41 20 45 58 50 4c 4f 53 49 4f 4e 31 20 32 20 42 2c 20 31 31 20 42 2c 20 51 55 41 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0000 B, 0000 B, 0000 B, 0000 B, | 30 30 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0000 B, 0010 B, 0100 B, 3000 B, | 30 30 30 30 20 42 2c 20 30 30 31 30 20 42 2c 20 30 31 30 30 20 42 2c 20 33 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0033 B, 3330 B, 0003 B, 1300 B, | 30 30 33 33 20 42 2c 20 33 33 33 30 20 42 2c 20 30 30 30 33 20 42 2c 20 31 33 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0031 B, 1130 B, 0033 B, 1330 B, | 30 30 33 31 20 42 2c 20 31 31 33 30 20 42 2c 20 30 30 33 33 20 42 2c 20 31 33 33 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0103 B, 3000 B, 0000 B, 0010 B, | 30 31 30 33 20 42 2c 20 33 30 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 30 30 31 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0000 B, 0000 B, | 30 30 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL DATA EXPLOSION2 2 B, 11 B, QUAD | 44 45 43 49 4d 41 4c 20 44 41 54 41 20 45 58 50 4c 4f 53 49 4f 4e 32 20 32 20 42 2c 20 31 31 20 42 2c 20 51 55 41 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 1001 B, 0001 B, 0100 B, 1010 B, | 31 30 30 31 20 42 2c 20 30 30 30 31 20 42 2c 20 30 31 30 30 20 42 2c 20 31 30 31 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0011 B, 1100 B, 0111 B, 3111 B, | 30 30 31 31 20 42 2c 20 31 31 30 30 20 42 2c 20 30 31 31 31 20 42 2c 20 33 31 31 31 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0013 B, 3310 B, 1011 B, 3110 B, | 30 30 31 33 20 42 2c 20 33 33 31 30 20 42 2c 20 31 30 31 31 20 42 2c 20 33 31 31 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0113 B, 1100 B, 0011 B, 0111 B, | 30 31 31 33 20 42 2c 20 31 31 30 30 20 42 2c 20 30 30 31 31 20 42 2c 20 30 31 31 31 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0101 B, 0110 B, 0000 B, 0010 B, | 30 31 30 31 20 42 2c 20 30 31 31 30 20 42 2c 20 30 30 30 30 20 42 2c 20 30 30 31 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 1000 B, 1001 B, | 31 30 30 30 20 42 2c 20 31 30 30 31 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0184 } ( MORE ALIEN EXPLOSIONS ) | 28 20 4d 4f 52 45 20 41 4c 49 45 4e 20 45 58 50 4c 4f 53 49 4f 4e 53 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA EXPLOSION3 2 B, 12 B, QUAD | 44 41 54 41 20 45 58 50 4c 4f 53 49 4f 4e 33 20 32 20 42 2c 20 31 32 20 42 2c 20 51 55 41 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0000 B, 0101 B, | 30 30 30 30 20 42 2c 20 30 31 30 31 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 1000 B, 0000 B, | 31 30 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0010 B, 0000 B, | 30 30 31 30 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0000 B, 3000 B, | 30 30 30 30 20 42 2c 20 33 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0003 B, 3301 B, | 30 30 30 33 20 42 2c 20 33 33 30 31 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0033 B, 2301 B, | 30 30 33 33 20 42 2c 20 32 33 30 31 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0003 B, 2300 B, | 30 30 30 33 20 42 2c 20 32 33 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0003 B, 3330 B, | 30 30 30 33 20 42 2c 20 33 33 33 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0100 B, 3000 B, | 30 31 30 30 20 42 2c 20 33 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0000 B, 0000 B, | 30 30 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0001 B, 0000 B, | 30 30 30 31 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0000 B, 0010 B, | 30 30 30 30 20 42 2c 20 30 30 31 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0185 } ( EXPLOSION PATTERNS ) DECIMAL | 28 20 45 58 50 4c 4f 53 49 4f 4e 20 50 41 54 54 45 52 4e 53 20 29 20 44 45 43 49 4d 41 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA EXPLOSION4 2 B, 11 B, QUAD | 44 41 54 41 20 45 58 50 4c 4f 53 49 4f 4e 34 20 32 20 42 2c 20 31 31 20 42 2c 20 51 55 41 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3001 B, 0020 B, 3001 B, 0030 B, | 33 30 30 31 20 42 2c 20 30 30 32 30 20 42 2c 20 33 30 30 31 20 42 2c 20 30 30 33 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0300 B, 0300 B, 0001 B, 1003 B, | 30 33 30 30 20 42 2c 20 30 33 30 30 20 42 2c 20 30 30 30 31 20 42 2c 20 31 30 30 33 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0111 B, 1100 B, 2110 B, 1102 B, | 30 31 31 31 20 42 2c 20 31 31 30 30 20 42 2c 20 32 31 31 30 20 42 2c 20 31 31 30 32 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0101 B, 1000 B, 0111 B, 1101 B, | 30 31 30 31 20 42 2c 20 31 30 30 30 20 42 2c 20 30 31 31 31 20 42 2c 20 31 31 30 31 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2001 B, 0000 B, 3001 B, 0220 B, | 32 30 30 31 20 42 2c 20 30 30 30 30 20 42 2c 20 33 30 30 31 20 42 2c 20 30 32 32 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0020 B, 0101 B, DECIMAL | 30 30 32 30 20 42 2c 20 30 31 30 31 20 42 2c 20 44 45 43 49 4d 41 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA EXPLOSION5 2 B, 11 B, QUAD | 44 41 54 41 20 45 58 50 4c 4f 53 49 4f 4e 35 20 32 20 42 2c 20 31 31 20 42 2c 20 51 55 41 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0000 B, 0010 B, 0200 B, 0000 B, | 30 30 30 30 20 42 2c 20 30 30 31 30 20 42 2c 20 30 32 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0000 B, 0300 B, 0000 B, 0000 B, | 30 30 30 30 20 42 2c 20 30 33 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2000 B, 0010 B, 0030 B, 0012 B, | 32 30 30 30 20 42 2c 20 30 30 31 30 20 42 2c 20 30 30 33 30 20 42 2c 20 30 30 31 32 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0000 B, 1000 B, 0100 B, 0000 B, | 30 30 30 30 20 42 2c 20 31 30 30 30 20 42 2c 20 30 31 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0020 B, 2030 B, 3000 B, 0000 B, | 30 30 32 30 20 42 2c 20 32 30 33 30 20 42 2c 20 33 30 30 30 20 42 2c 20 30 30 30 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0002 B, 0001 B, DECIMAL | 30 30 30 32 20 42 2c 20 30 30 30 31 20 42 2c 20 44 45 43 49 4d 41 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0186 } ( MISSIONS- PLAYER'S SHIP EXPLOSION, 1G, SHOOTING SOUND, 1D ) | 28 20 4d 49 53 53 49 4f 4e 53 2d 20 50 4c 41 59 45 52 27 53 20 53 48 49 50 20 45 58 50 4c 4f 53 49 4f 4e 2c 20 31 47 2c 20 53 48 4f 4f 54 49 4e 47 20 53 4f 55 4e 44 2c 20 31 44 20 29 20 20 20 HEX DATA IDSCORE ASM | 48 45 58 20 44 41 54 41 20 49 44 53 43 4f 52 45 20 41 53 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 A0 87 15 TONES 50 1 -2 2 MOVENOISE | 20 41 30 20 38 37 20 31 35 20 54 4f 4e 45 53 20 35 30 20 31 20 2d 32 20 32 20 4d 4f 56 45 4e 4f 49 53 45 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4A MASTER 1 4 6A 8 RAMBLE 3 COUNTLIMITS | 20 34 41 20 4d 41 53 54 45 52 20 31 20 34 20 36 41 20 38 20 52 41 4d 42 4c 45 20 33 20 43 4f 55 4e 54 4c 49 4d 49 54 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 34 ABVOLS 15 MCVOLS PLAY QUIET | 20 33 34 20 41 42 56 4f 4c 53 20 31 35 20 4d 43 56 4f 4c 53 20 50 4c 41 59 20 51 55 49 45 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 : ID IDSCORE BMUSIC ; | 3a 20 49 44 20 49 44 53 43 4f 52 45 20 42 4d 55 53 49 43 20 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA 1GSCORE ASM | 44 41 54 41 20 31 47 53 43 4f 52 45 20 41 53 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 66 75 TONES 1F MCVOLS 0FF ABVOLS | 20 35 33 20 36 36 20 37 35 20 54 4f 4e 45 53 20 31 46 20 4d 43 56 4f 4c 53 20 30 46 46 20 41 42 56 4f 4c 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4 5 1 01F MOVENOISE 3 MASTER 2A -1 3 2 RAMBLE 2 COUNTLIMITS | 20 34 20 35 20 31 20 30 31 46 20 4d 4f 56 45 4e 4f 49 53 45 20 33 20 4d 41 53 54 45 52 20 32 41 20 2d 31 20 33 20 32 20 52 41 4d 42 4c 45 20 32 20 43 4f 55 4e 54 4c 49 4d 49 54 53 20 20 20 20 PLAY FF 1F 08 -1 0 0F MOVEVOLS | 20 50 4c 41 59 20 46 46 20 31 46 20 30 38 20 2d 31 20 30 20 30 46 20 4d 4f 56 45 56 4f 4c 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3 COUNTLIMITS RERAMBLE PLAY QUIET | 20 33 20 43 4f 55 4e 54 4c 49 4d 49 54 53 20 52 45 52 41 4d 42 4c 45 20 50 4c 41 59 20 51 55 49 45 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0187 } ( MISSIONS- ZPIP & PZIP SOUNDS- ZP,PZ ) HEX | 28 20 4d 49 53 53 49 4f 4e 53 2d 20 5a 50 49 50 20 26 20 50 5a 49 50 20 53 4f 55 4e 44 53 2d 20 5a 50 2c 50 5a 20 29 20 48 45 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA PZSCORE ASM | 44 41 54 41 20 50 5a 53 43 4f 52 45 20 41 53 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 #G3 #F3 #CS3 TONES 10 MASTER | 20 23 47 33 20 23 46 33 20 23 43 53 33 20 54 4f 4e 45 53 20 31 30 20 4d 41 53 54 45 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 1 4 A0 10 RAMBLE 1 COUNTLIMITS | 20 31 20 34 20 41 30 20 31 30 20 52 41 4d 42 4c 45 20 31 20 43 4f 55 4e 54 4c 49 4d 49 54 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 10 1 4 70 MOVENOISE 66 ABVOLS 26 MCVOLS 4F VIBS PLAY QUIET | 20 31 30 20 31 20 34 20 37 30 20 4d 4f 56 45 4e 4f 49 53 45 20 36 36 20 41 42 56 4f 4c 53 20 32 36 20 4d 43 56 4f 4c 53 20 34 46 20 56 49 42 53 20 50 4c 41 59 20 51 55 49 45 54 20 20 20 20 20 DATA ZPSCORE ASM | 44 41 54 41 20 5a 50 53 43 4f 52 45 20 41 53 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 #G3 #F3 #CS3 TONES 0 1 4 30 MOVENOISE | 20 23 47 33 20 23 46 33 20 23 43 53 33 20 54 4f 4e 45 53 20 30 20 31 20 34 20 33 30 20 4d 4f 56 45 4e 4f 49 53 45 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 60 MASTER 1 -4 60 30 RAMBLE 1 COUNTLIMITS 66 ABVOLS 16 MCVOLS | 20 36 30 20 4d 41 53 54 45 52 20 31 20 2d 34 20 36 30 20 33 30 20 52 41 4d 42 4c 45 20 31 20 43 4f 55 4e 54 4c 49 4d 49 54 53 20 36 36 20 41 42 56 4f 4c 53 20 31 36 20 4d 43 56 4f 4c 53 20 20 PLAY 2B MASTER 1 -4 2F 5 RAMBLE 1 COUNTLIMITS | 20 50 4c 41 59 20 32 42 20 4d 41 53 54 45 52 20 31 20 2d 34 20 32 46 20 35 20 52 41 4d 42 4c 45 20 31 20 43 4f 55 4e 54 4c 49 4d 49 54 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 1E 1 -4 6 MOVENOISE PLAY QUIET | 20 31 45 20 31 20 2d 34 20 36 20 4d 4f 56 45 4e 4f 49 53 45 20 50 4c 41 59 20 51 55 49 45 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( SPACE MISSIONS BMUSIC BLOCK ) | 28 20 53 50 41 43 45 20 4d 49 53 53 49 4f 4e 53 20 42 4d 55 53 49 43 20 42 4c 4f 43 4b 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 : 1G 1GSCORE PMUSIC 8 MS 1GSCORE P2MUSIC ; | 3a 20 31 47 20 31 47 53 43 4f 52 45 20 50 4d 55 53 49 43 20 38 20 4d 53 20 31 47 53 43 4f 52 45 20 50 32 4d 55 53 49 43 20 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 : PZ PZSCORE BMUSIC ; | 3a 20 50 5a 20 50 5a 53 43 4f 52 45 20 42 4d 55 53 49 43 20 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 : ZP ZPSCORE BMUSIC ; | 3a 20 5a 50 20 5a 50 53 43 4f 52 45 20 42 4d 55 53 49 43 20 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0188 } ( MISSIONS- TAKE-OFF- TO ) HEX | 28 20 4d 49 53 53 49 4f 4e 53 2d 20 54 41 4b 45 2d 4f 46 46 2d 20 54 4f 20 29 20 48 45 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA TO1SCORE ASM | 44 41 54 41 20 54 4f 31 53 43 4f 52 45 20 41 53 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7 9 10 TONES 2 MASTER 3 0A 90 2 RAMP | 20 37 20 39 20 31 30 20 54 4f 4e 45 53 20 32 20 4d 41 53 54 45 52 20 33 20 30 41 20 39 30 20 32 20 52 41 4d 50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 1 COUNTLIMITS 3 1 3 73 MOVENOISE 1B MCVOLS BB ABVOLS PLAY | 20 31 20 43 4f 55 4e 54 4c 49 4d 49 54 53 20 33 20 31 20 33 20 37 33 20 4d 4f 56 45 4e 4f 49 53 45 20 31 42 20 4d 43 56 4f 4c 53 20 42 42 20 41 42 56 4f 4c 53 20 50 4c 41 59 20 20 20 20 20 20 90 MASTER 3E 44 11 TONES 4 -1 90 74 RAMBLE 1 COUNTLIMITS | 20 39 30 20 4d 41 53 54 45 52 20 33 45 20 34 34 20 31 31 20 54 4f 4e 45 53 20 34 20 2d 31 20 39 30 20 37 34 20 52 41 4d 42 4c 45 20 31 20 43 4f 55 4e 54 4c 49 4d 49 54 53 20 20 20 20 20 20 20 PLAY 74 MASTER 1 -1 74 2 RAMBLE | 20 50 4c 41 59 20 37 34 20 4d 41 53 54 45 52 20 31 20 2d 31 20 37 34 20 32 20 52 41 4d 42 4c 45 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6B 1 -1 3 MOVENOISE RERAMBLE 1 COUNTLIMITS PLAY QUIET | 20 36 42 20 31 20 2d 31 20 33 20 4d 4f 56 45 4e 4f 49 53 45 20 52 45 52 41 4d 42 4c 45 20 31 20 43 4f 55 4e 54 4c 49 4d 49 54 53 20 50 4c 41 59 20 51 55 49 45 54 20 20 20 20 20 20 20 20 20 20 DATA TO2SCORE ASM | 44 41 54 41 20 54 4f 32 53 43 4f 52 45 20 41 53 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3 5 14 TONES 2 MASTER 3 0A 90 2 RAMP | 20 33 20 35 20 31 34 20 54 4f 4e 45 53 20 32 20 4d 41 53 54 45 52 20 33 20 30 41 20 39 30 20 32 20 52 41 4d 50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 1 COUNTLIMITS 3 1 3 73 MOVENOISE 1B MCVOLS BB ABVOLS PLAY | 20 31 20 43 4f 55 4e 54 4c 49 4d 49 54 53 20 33 20 31 20 33 20 37 33 20 4d 4f 56 45 4e 4f 49 53 45 20 31 42 20 4d 43 56 4f 4c 53 20 42 42 20 41 42 56 4f 4c 53 20 50 4c 41 59 20 20 20 20 20 20 2 MASTER 54 31 13 TONES 1 1 22 2 RAMBLE 1 COUNTLIMITS | 20 32 20 4d 41 53 54 45 52 20 35 34 20 33 31 20 31 33 20 54 4f 4e 45 53 20 31 20 31 20 32 32 20 32 20 52 41 4d 42 4c 45 20 31 20 43 4f 55 4e 54 4c 49 4d 49 54 53 20 20 20 20 20 20 20 20 20 20 PLAY 22 MASTER 1 1 70 22 RAMBLE | 20 50 4c 41 59 20 32 32 20 4d 41 53 54 45 52 20 31 20 31 20 37 30 20 32 32 20 52 41 4d 42 4c 45 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6B 1 -2 3 MOVENOISE RERAMBLE 1 COUNTLIMITS PLAY QUIET | 20 36 42 20 31 20 2d 32 20 33 20 4d 4f 56 45 4e 4f 49 53 45 20 52 45 52 41 4d 42 4c 45 20 31 20 43 4f 55 4e 54 4c 49 4d 49 54 53 20 50 4c 41 59 20 51 55 49 45 54 20 20 20 20 20 20 20 20 20 20 : TO TO2SCORE P2MUSIC TO1SCORE PMUSIC ; | 3a 20 54 4f 20 54 4f 32 53 43 4f 52 45 20 50 32 4d 55 53 49 43 20 54 4f 31 53 43 4f 52 45 20 50 4d 55 53 49 43 20 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0189 } ( MISSIONS- DIVE SOUND AND COIN SOUND ) HEX | 28 20 4d 49 53 53 49 4f 4e 53 2d 20 44 49 56 45 20 53 4f 55 4e 44 20 41 4e 44 20 43 4f 49 4e 20 53 4f 55 4e 44 20 29 20 48 45 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA KBSCORE ASM ( no priority for background ) | 44 41 54 41 20 4b 42 53 43 4f 52 45 20 41 53 4d 20 28 20 6e 6f 20 70 72 69 6f 72 69 74 79 20 66 6f 72 20 62 61 63 6b 67 72 6f 75 6e 64 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 #G0 #B0 #D4 TONES 77 ABVOLS 7 MCVOLS 48 VIBS | 20 23 47 30 20 23 42 30 20 23 44 34 20 54 4f 4e 45 53 20 37 37 20 41 42 56 4f 4c 53 20 37 20 4d 43 56 4f 4c 53 20 34 38 20 56 49 42 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2 MASTER 1 1 50 2 RAMBLE 1 COUNTLIMITS PLAY | 20 32 20 4d 41 53 54 45 52 20 31 20 31 20 35 30 20 32 20 52 41 4d 42 4c 45 20 31 20 43 4f 55 4e 54 4c 49 4d 49 54 53 20 50 4c 41 59 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 ABVOLS 3 MCVOLS 1 -1 50 30 RAMBLE HERE 0 1 2 3A MOVENOISE | 20 32 32 20 41 42 56 4f 4c 53 20 33 20 20 4d 43 56 4f 4c 53 20 31 20 2d 31 20 35 30 20 33 30 20 52 41 4d 42 4c 45 20 48 45 52 45 20 30 20 31 20 32 20 33 41 20 4d 4f 56 45 4e 4f 49 53 45 20 20 1D DURATION 3A 1 -2 0 MOVENOISE | 20 31 44 20 44 55 52 41 54 49 4f 4e 20 33 41 20 31 20 2d 32 20 30 20 4d 4f 56 45 4e 4f 49 53 45 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 1D DURATION LDPCC | 20 31 44 20 44 55 52 41 54 49 4f 4e 20 4c 44 50 43 43 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR PLAYKBS KBSCORE H LXI, MB2 Y LXIX, bmusic JMP, | 53 55 42 52 20 50 4c 41 59 4b 42 53 20 4b 42 53 43 4f 52 45 20 48 20 4c 58 49 2c 20 4d 42 32 20 59 20 4c 58 49 58 2c 20 62 6d 75 73 69 63 20 4a 4d 50 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CC? IFTRUE TIMOR IFEND | 43 43 3f 20 49 46 54 52 55 45 20 54 49 4d 4f 52 20 49 46 45 4e 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0190 } | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0191 } ( GAME VARIABLES AND CONSTANTS ) | 20 28 20 47 41 4d 45 20 56 41 52 49 41 42 4c 45 53 20 41 4e 44 20 43 4f 4e 53 54 41 4e 54 53 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 TIMER0 C= WTIMER TIMER1 C= BOMBTIMER TIMER2 C= ATTACKTIMER | 20 54 49 4d 45 52 30 20 43 3d 20 57 54 49 4d 45 52 20 54 49 4d 45 52 31 20 43 3d 20 42 4f 4d 42 54 49 4d 45 52 20 54 49 4d 45 52 32 20 43 3d 20 41 54 54 41 43 4b 54 49 4d 45 52 20 20 20 20 20 TIMER3 C= RACKTIMER 0 V= FIREACTION 0 V= SPIRALRATE 0 V= LOWFLG | 20 54 49 4d 45 52 33 20 43 3d 20 52 41 43 4b 54 49 4d 45 52 20 30 20 56 3d 20 46 49 52 45 41 43 54 49 4f 4e 20 30 20 56 3d 20 53 50 49 52 41 4c 52 41 54 45 20 30 20 56 3d 20 4c 4f 57 46 4c 47 0 BV= WOAFLAG | 20 30 20 42 56 3d 20 57 4f 41 46 4c 41 47 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 V= RACKDONE 0 V= INVADERSLEFT 0 V= PLAYERHIT 0 V= ENDOFFRAME | 20 30 20 56 3d 20 52 41 43 4b 44 4f 4e 45 20 30 20 56 3d 20 49 4e 56 41 44 45 52 53 4c 45 46 54 20 30 20 56 3d 20 50 4c 41 59 45 52 48 49 54 20 30 20 56 3d 20 45 4e 44 4f 46 46 52 41 4d 45 20 0 V= GAMEOVER 0 V= PHASINTR 0 V= FIRETRACK 0 V= ATTACKWAITER | 20 30 20 56 3d 20 47 41 4d 45 4f 56 45 52 20 30 20 56 3d 20 50 48 41 53 49 4e 54 52 20 30 20 56 3d 20 46 49 52 45 54 52 41 43 4b 20 30 20 56 3d 20 41 54 54 41 43 4b 57 41 49 54 45 52 20 20 20 0 V= SCRPTR 0 V= PV1 2 V= MAXBOMBS 4 ARRAY BVLIST | 20 30 20 56 3d 20 53 43 52 50 54 52 20 30 20 56 3d 20 50 56 31 20 32 20 56 3d 20 4d 41 58 42 4f 4d 42 53 20 34 20 41 52 52 41 59 20 42 56 4c 49 53 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 V= FBANIM 0 V= REINIT ( MUST REINITIALIZE ) | 20 30 20 56 3d 20 46 42 41 4e 49 4d 20 30 20 56 3d 20 52 45 49 4e 49 54 20 28 20 4d 55 53 54 20 52 45 49 4e 49 54 49 41 4c 49 5a 45 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HEX 40 BA= FBVECTOR | 20 48 45 58 20 34 30 20 42 41 3d 20 46 42 56 45 43 54 4f 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 V= PINTERFLAG 0 V= PINTERN 0 V= PINTERX 0 V= PINTERY | 20 30 20 56 3d 20 50 49 4e 54 45 52 46 4c 41 47 20 30 20 56 3d 20 50 49 4e 54 45 52 4e 20 30 20 56 3d 20 50 49 4e 54 45 52 58 20 30 20 56 3d 20 50 49 4e 54 45 52 59 20 20 20 20 20 20 20 20 20 10 C= COINSW 10 C= SW1PG 10 C= SWFIRE 9 C= PLYRINTX 0F C= FFXLL | 20 31 30 20 43 3d 20 43 4f 49 4e 53 57 20 31 30 20 43 3d 20 53 57 31 50 47 20 31 30 20 43 3d 20 53 57 46 49 52 45 20 39 20 43 3d 20 50 4c 59 52 49 4e 54 58 20 30 46 20 43 3d 20 46 46 58 4c 4c 0 C= INIVLL 4200 C= INIVUL -200 C= BOMBDX 700 C= BOMBDY | 20 30 20 43 3d 20 49 4e 49 56 4c 4c 20 34 32 30 30 20 43 3d 20 49 4e 49 56 55 4c 20 2d 32 30 30 20 43 3d 20 42 4f 4d 42 44 58 20 37 30 30 20 43 3d 20 42 4f 4d 42 44 59 20 20 20 20 20 20 20 20 200 C= INIDMY | 20 32 30 30 20 43 3d 20 49 4e 49 44 4d 59 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL | 20 44 45 43 49 4d 41 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0192 } ( INITIALIZE GAME SCREEN ) HEX | 28 20 49 4e 49 54 49 41 4c 49 5a 45 20 47 41 4d 45 20 53 43 52 45 45 4e 20 29 20 48 45 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 : DP1 4D00 1000 PU1 428 WRITEP ; | 3a 20 44 50 31 20 34 44 30 30 20 31 30 30 30 20 50 55 31 20 34 32 38 20 57 52 49 54 45 50 20 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 : DP2 4D00 A600 PU2 428 WRITEP ; | 3a 20 44 50 32 20 34 44 30 30 20 41 36 30 30 20 50 55 32 20 34 32 38 20 57 52 49 54 45 50 20 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 : BLINK DEMOMODE B@ 0= IF | 3a 20 42 4c 49 4e 4b 20 44 45 4d 4f 4d 4f 44 45 20 42 40 20 30 3d 20 49 46 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 BLINKTIMER B@ 0= IF DI PLAYERUP B@ IF DP2 ELSE DP1 THEN | 42 4c 49 4e 4b 54 49 4d 45 52 20 42 40 20 30 3d 20 49 46 20 44 49 20 50 4c 41 59 45 52 55 50 20 42 40 20 49 46 20 44 50 32 20 45 4c 53 45 20 44 50 31 20 54 48 45 4e 20 20 20 20 20 20 20 20 20 EI 10 BLINKTIMER B! THEN THEN ; | 45 49 20 31 30 20 42 4c 49 4e 4b 54 49 4d 45 52 20 42 21 20 54 48 45 4e 20 54 48 45 4e 20 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 : EVS BARK BMS BLINK ; | 3a 20 45 56 53 20 42 41 52 4b 20 42 4d 53 20 42 4c 49 4e 4b 20 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 : INITSCREEN DI GRAPHICS 1 CONCM OUTP INITFREELIST | 3a 20 49 4e 49 54 53 43 52 45 45 4e 20 44 49 20 47 52 41 50 48 49 43 53 20 31 20 43 4f 4e 43 4d 20 4f 55 54 50 20 49 4e 49 54 46 52 45 45 4c 49 53 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 NILVQ FIREUP CL CC VERBL OUTP 0D HORCB OUTP ; | 4e 49 4c 56 51 20 46 49 52 45 55 50 20 43 4c 20 43 43 20 56 45 52 42 4c 20 4f 55 54 50 20 30 44 20 48 4f 52 43 42 20 4f 55 54 50 20 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 : UPDATESCORE PLAYERUP B@ IF p2s BCD+! 4900 9600 408 p2s | 3a 20 55 50 44 41 54 45 53 43 4f 52 45 20 50 4c 41 59 45 52 55 50 20 42 40 20 49 46 20 70 32 73 20 42 43 44 2b 21 20 34 39 30 30 20 39 36 30 30 20 34 30 38 20 70 32 73 20 20 20 20 20 20 20 20 ELSE p1s BCD+! 4900 0 408 p1s THEN DI DISPBCD6 | 45 4c 53 45 20 70 31 73 20 42 43 44 2b 21 20 34 39 30 30 20 30 20 34 30 38 20 70 31 73 20 54 48 45 4e 20 44 49 20 44 49 53 50 42 43 44 36 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 EI ; --> | 45 49 20 3b 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0193 } ( DRAWMISSIONSCREEN ) | 28 20 44 52 41 57 4d 49 53 53 49 4f 4e 53 43 52 45 45 4e 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 : YY2 NPLAYERS B@ IF HS2 ELSE HS4 THEN ; | 3a 20 59 59 32 20 4e 50 4c 41 59 45 52 53 20 42 40 20 49 46 20 48 53 32 20 45 4c 53 45 20 48 53 34 20 54 48 45 4e 20 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 : INI1PG 4900 0 408 p1s DISPBCD6 DP1 | 3a 20 49 4e 49 31 50 47 20 34 39 30 30 20 30 20 34 30 38 20 70 31 73 20 44 49 53 50 42 43 44 36 20 44 50 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4D00 3D00 428 0 ICSPOST 4D00 7500 428 MISSIONCTR B@ DISPBCD2 | 34 44 30 30 20 33 44 30 30 20 34 32 38 20 30 20 49 43 53 50 4f 53 54 20 34 44 30 30 20 37 35 30 30 20 34 32 38 20 4d 49 53 53 49 4f 4e 43 54 52 20 42 40 20 44 49 53 50 42 43 44 32 20 20 20 20 4980 4B00 428 INITFB B@ | 34 39 38 30 20 34 42 30 30 20 34 32 38 20 49 4e 49 54 46 42 20 42 40 20 3c 46 4f 52 4b 20 48 53 32 20 48 53 32 20 59 59 32 20 59 59 32 20 48 53 34 20 46 4f 52 4b 3e 20 20 20 20 20 20 20 20 20 DISPBCD6 | 44 49 53 50 42 43 44 36 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DEMOMODE B@ IF 4600 1 SPELL ELSE REDRAWFB THEN ; | 44 45 4d 4f 4d 4f 44 45 20 42 40 20 49 46 20 34 36 30 30 20 31 20 53 50 45 4c 4c 20 45 4c 53 45 20 52 45 44 52 41 57 46 42 20 54 48 45 4e 20 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE S110V EXX, 0E16 B LXI, DEMOMODE LDA, A ANA, 0<>, IF, | 43 4f 44 45 20 53 31 31 30 56 20 45 58 58 2c 20 30 45 31 36 20 42 20 4c 58 49 2c 20 44 45 4d 4f 4d 4f 44 45 20 4c 44 41 2c 20 41 20 41 4e 41 2c 20 30 3c 3e 2c 20 49 46 2c 20 20 20 20 20 20 20 0 B SET, THEN, A INP, EXX, NEXT | 30 20 42 20 53 45 54 2c 20 54 48 45 4e 2c 20 41 20 49 4e 50 2c 20 45 58 58 2c 20 4e 45 58 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 : INI2PG INI1PG 4900 9600 408 p2s DISPBCD6 DP2 ; | 3a 20 49 4e 49 32 50 47 20 49 4e 49 31 50 47 20 34 39 30 30 20 39 36 30 30 20 34 30 38 20 70 32 73 20 44 49 53 50 42 43 44 36 20 44 50 32 20 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 : DRAWMISSIONSCREEN INITSCREEN NPLAYERS B@ IF INI2PG ELSE INI1PG | 3a 20 44 52 41 57 4d 49 53 53 49 4f 4e 53 43 52 45 45 4e 20 49 4e 49 54 53 43 52 45 45 4e 20 4e 50 4c 41 59 45 52 53 20 42 40 20 49 46 20 49 4e 49 32 50 47 20 45 4c 53 45 20 49 4e 49 31 50 47 THEN START GETNODE DUP PV1 ! ZERO S110V ; DECIMAL --> | 20 54 48 45 4e 20 53 54 41 52 54 20 47 45 54 4e 4f 44 45 20 44 55 50 20 50 56 31 20 21 20 5a 45 52 4f 20 53 31 31 30 56 20 3b 20 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0194 } ( RACK UPDATOR ) | 28 20 52 41 43 4b 20 55 50 44 41 54 4f 52 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HEX 0 V= INVADERNUM 0 V= MASTERY 0 V= DMASTERY | 48 45 58 20 30 20 56 3d 20 49 4e 56 41 44 45 52 4e 55 4d 20 30 20 56 3d 20 4d 41 53 54 45 52 59 20 30 20 56 3d 20 44 4d 41 53 54 45 52 59 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 V= MASTERX 0 V= DMASTERX 0 V= INVLL 0 V= INVUL | 30 20 56 3d 20 4d 41 53 54 45 52 58 20 30 20 56 3d 20 44 4d 41 53 54 45 52 58 20 30 20 56 3d 20 49 4e 56 4c 4c 20 30 20 56 3d 20 49 4e 56 55 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 V= LEFTINVN 0 V= RIGHTINVN 0 V= LASTRACK | 30 20 56 3d 20 4c 45 46 54 49 4e 56 4e 20 30 20 56 3d 20 52 49 47 48 54 49 4e 56 4e 20 30 20 56 3d 20 4c 41 53 54 52 41 43 4b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 V= BUMPMASTERROUTINE 0 V= NORMLP1 0 V= NORMLP2 | 30 20 56 3d 20 42 55 4d 50 4d 41 53 54 45 52 52 4f 55 54 49 4e 45 20 30 20 56 3d 20 4e 4f 52 4d 4c 50 31 20 30 20 56 3d 20 4e 4f 52 4d 4c 50 32 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 8 BARRAY ALIVEBITS | 38 20 42 41 52 52 41 59 20 41 4c 49 56 45 42 49 54 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 8 BARRAY RACKBITS DATA BITMASK 1 B, 2 B, 4 B, 8 B, 10 B, 20 B, | 38 20 42 41 52 52 41 59 20 52 41 43 4b 42 49 54 53 20 44 41 54 41 20 42 49 54 4d 41 53 4b 20 31 20 42 2c 20 32 20 42 2c 20 34 20 42 2c 20 38 20 42 2c 20 31 30 20 42 2c 20 32 30 20 42 2c 20 20 40 B, 80 B, 80 ARRAY ANIMSTATE | 34 30 20 42 2c 20 38 30 20 42 2c 20 38 30 20 41 52 52 41 59 20 41 4e 49 4d 53 54 41 54 45 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 8 BARRAY RACKEXPS 0 V= INVPATAB | 38 20 42 41 52 52 41 59 20 52 41 43 4b 45 58 50 53 20 30 20 56 3d 20 49 4e 56 50 41 54 41 42 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 : RESETRACK | 3a 20 52 45 53 45 54 52 41 43 4b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 INIDMY DMASTERY ! 40 LASTRACK ! | 49 4e 49 44 4d 59 20 44 4d 41 53 54 45 52 59 20 21 20 34 30 20 4c 41 53 54 52 41 43 4b 20 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 FE00 DMASTERX ! INIVLL INVLL ! INIVUL INVUL ! ; | 46 45 30 30 20 44 4d 41 53 54 45 52 58 20 21 20 49 4e 49 56 4c 4c 20 49 4e 56 4c 4c 20 21 20 49 4e 49 56 55 4c 20 49 4e 56 55 4c 20 21 20 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0195 } ( SPECIAL ROUTINE TO MOVE PHASOR BLAST ) | 28 20 53 50 45 43 49 41 4c 20 52 4f 55 54 49 4e 45 20 54 4f 20 4d 4f 56 45 20 50 48 41 53 4f 52 20 42 4c 41 53 54 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( SUBROUTINE TO XAWRITE WITH INTERCEPT CHECKING ) | 28 20 53 55 42 52 4f 55 54 49 4e 45 20 54 4f 20 58 41 57 52 49 54 45 20 57 49 54 48 20 49 4e 54 45 52 43 45 50 54 20 43 48 45 43 4b 49 4e 47 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HEX F= PHL | 48 45 58 20 46 3d 20 50 48 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR PHWRITE , IF, | 50 51 53 44 45 20 50 51 53 20 58 20 52 45 53 58 2c 20 54 48 45 4e 2c 20 50 51 53 52 48 20 50 51 53 20 58 20 42 49 54 58 2c 20 30 3c 3e 2c 20 49 46 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 VIWRITE CALL, THEN, | 56 49 57 52 49 54 45 20 43 41 4c 4c 2c 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 B POP, PQSRH PQS X BITX, 0<>, IF, C DCR, PHL JRNZ, | 42 20 50 4f 50 2c 20 50 51 53 52 48 20 50 51 53 20 58 20 42 49 54 58 2c 20 30 3c 3e 2c 20 49 46 2c 20 43 20 44 43 52 2c 20 50 48 4c 20 4a 52 4e 5a 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 THEN, KILLOFF JMP, | 54 48 45 4e 2c 20 4b 49 4c 4c 4f 46 46 20 4a 4d 50 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ASSEMBLE> | 41 53 53 45 4d 42 4c 45 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0196 } ( START OR RESTART THE PHASOR MOVING ) | 28 20 53 54 41 52 54 20 4f 52 20 52 45 53 54 41 52 54 20 54 48 45 20 50 48 41 53 4f 52 20 4d 4f 56 49 4e 47 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR DOFIREACT C M MOV, FIREACTION LHLD, PCHL, | 53 55 42 52 20 44 4f 46 49 52 45 41 43 54 20 43 20 4d 20 4d 4f 56 2c 20 46 49 52 45 41 43 54 49 4f 4e 20 4c 48 4c 44 2c 20 50 43 48 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HEX SUBR SETPXY | 48 45 58 20 53 55 42 52 20 53 45 54 50 58 59 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 FBVECTOR Y LXIX, VXL Y L LDX, VXH Y H LDX, 500 D LXI, | 30 20 46 42 56 45 43 54 4f 52 20 59 20 4c 58 49 58 2c 20 56 58 4c 20 59 20 4c 20 4c 44 58 2c 20 56 58 48 20 59 20 48 20 4c 44 58 2c 20 35 30 30 20 44 20 4c 58 49 2c 20 20 20 20 20 20 20 20 20 D DAD, L VXL X STX, H VXH X STX, VYL Y L LDX, VYH Y H LDX, | 44 20 44 41 44 2c 20 4c 20 56 58 4c 20 58 20 53 54 58 2c 20 48 20 56 58 48 20 58 20 53 54 58 2c 20 56 59 4c 20 59 20 4c 20 4c 44 58 2c 20 56 59 48 20 59 20 48 20 4c 44 58 2c 20 20 20 20 20 20 700 D LXI, D DAD, L VYL X STX, H VYH X STX, 60 VATMR X MVIX, | 37 30 30 20 44 20 4c 58 49 2c 20 44 20 44 41 44 2c 20 4c 20 56 59 4c 20 58 20 53 54 58 2c 20 48 20 56 59 48 20 58 20 53 54 58 2c 20 36 30 20 56 41 54 4d 52 20 58 20 4d 56 49 58 2c 20 20 20 20 RET, | 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR SHOOTPHASOR DOFIREACT CALL, | 53 55 42 52 20 53 48 4f 4f 54 50 48 41 53 4f 52 20 44 4f 46 49 52 45 41 43 54 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CLRVEC CALL, SETPXY CALL, 0B6 PQS X MVIX, | 43 4c 52 56 45 43 20 43 41 4c 4c 2c 20 53 45 54 50 58 59 20 43 41 4c 4c 2c 20 30 42 36 20 50 51 53 20 58 20 4d 56 49 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 VMAGIC X MVIX, 30 VXZW X MVIX, PHWRITE H LXI, | 32 30 20 56 4d 41 47 49 43 20 58 20 4d 56 49 58 2c 20 33 30 20 56 58 5a 57 20 58 20 4d 56 49 58 2c 20 50 48 57 52 49 54 45 20 48 20 4c 58 49 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 L PQRL X STX, H PQRH X STX, PHASINTR LHLD, L VIRL X STX, | 4c 20 50 51 52 4c 20 58 20 53 54 58 2c 20 48 20 50 51 52 48 20 58 20 53 54 58 2c 20 50 48 41 53 49 4e 54 52 20 4c 48 4c 44 2c 20 4c 20 56 49 52 4c 20 58 20 53 54 58 2c 20 20 20 20 20 20 20 20 H VIRH X STX, | 48 20 56 49 52 48 20 58 20 53 54 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 PBURST H LXI, L VPATL X STX, H VPATH X STX, 1 VDXH X MVIX, | 50 42 55 52 53 54 20 48 20 4c 58 49 2c 20 4c 20 56 50 41 54 4c 20 58 20 53 54 58 2c 20 48 20 56 50 41 54 48 20 58 20 53 54 58 2c 20 31 20 56 44 58 48 20 58 20 4d 56 49 58 2c 20 20 20 20 20 20 STARTVEC CALL, RET, | 53 54 41 52 54 56 45 43 20 43 41 4c 4c 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR RESHOOTPHASOR DOFIREACT CALL, SETPXY CALL, RET, | 53 55 42 52 20 52 45 53 48 4f 4f 54 50 48 41 53 4f 52 20 44 4f 46 49 52 45 41 43 54 20 43 41 4c 4c 2c 20 53 45 54 50 58 59 20 43 41 4c 4c 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0197 } ( CHECK FIRE SWITCH ) | 28 20 43 48 45 43 4b 20 46 49 52 45 20 53 57 49 54 43 48 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 F= FIREBUT | 46 3d 20 46 49 52 45 42 55 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR FIRESWCK , IF, | 4c 41 42 45 4c 20 46 49 52 45 42 55 54 20 50 56 31 20 4c 49 58 44 2c 20 44 49 2c 20 50 51 53 52 48 20 50 51 53 20 58 20 42 49 54 58 2c 20 30 3c 3e 2c 20 49 46 2c 20 20 20 20 20 20 20 20 20 20 ( KICKOUT IF PHASOR EXPLOSION IN PROGRESS ) | 28 20 4b 49 43 4b 4f 55 54 20 49 46 20 50 48 41 53 4f 52 20 45 58 50 4c 4f 53 49 4f 4e 20 49 4e 20 50 52 4f 47 52 45 53 53 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 PQSFRZ PQS X BITX, RNZ, RESHOOTPHASOR CALL, | 50 51 53 46 52 5a 20 50 51 53 20 58 20 42 49 54 58 2c 20 52 4e 5a 2c 20 52 45 53 48 4f 4f 54 50 48 41 53 4f 52 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ELSE, PQS X A LDX, A ANA, RNZ, SHOOTPHASOR CALL, THEN, | 45 4c 53 45 2c 20 50 51 53 20 58 20 41 20 4c 44 58 2c 20 41 20 41 4e 41 2c 20 52 4e 5a 2c 20 53 48 4f 4f 54 50 48 41 53 4f 52 20 43 41 4c 4c 2c 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 20 IDSCORE H LXI, 0 MUSIC-BARRAY-1 Y LXIX, bmusic JMP, | 49 44 53 43 4f 52 45 20 48 20 4c 58 49 2c 20 30 20 4d 55 53 49 43 2d 42 41 52 52 41 59 2d 31 20 59 20 4c 58 49 58 2c 20 62 6d 75 73 69 63 20 4a 4d 50 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 ASSEMBLE> | 41 53 53 45 4d 42 4c 45 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HEX SUBR FSLITE 0E15 B LXI, PV1 LIXD, PQSRH PQS X BITX, 0=, IF, | 48 45 58 20 53 55 42 52 20 46 53 4c 49 54 45 20 30 45 31 35 20 42 20 4c 58 49 2c 20 50 56 31 20 4c 49 58 44 2c 20 50 51 53 52 48 20 50 51 53 20 58 20 42 49 54 58 2c 20 30 3d 2c 20 49 46 2c 20 0 B SET, THEN, A INP, RET, | 30 20 42 20 53 45 54 2c 20 54 48 45 4e 2c 20 41 20 49 4e 50 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE FIRECHECK X PUSHX, Y PUSHX, B PUSH, FSLITE CALL, | 43 4f 44 45 20 46 49 52 45 43 48 45 43 4b 20 58 20 50 55 53 48 58 2c 20 59 20 50 55 53 48 58 2c 20 42 20 50 55 53 48 2c 20 46 53 4c 49 54 45 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 20 FIRESWCK CALL, EI, B POP, Y POPX, X POPX, NEXT | 46 49 52 45 53 57 43 4b 20 43 41 4c 4c 2c 20 45 49 2c 20 42 20 50 4f 50 2c 20 59 20 50 4f 50 58 2c 20 58 20 50 4f 50 58 2c 20 4e 45 58 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0198 } ( RADIAL LINE GENERATOR ) | 28 20 52 41 44 49 41 4c 20 4c 49 4e 45 20 47 45 4e 45 52 41 54 4f 52 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 C= LTMR | 30 20 43 3d 20 4c 54 4d 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 1 C= LDXL | 31 20 43 3d 20 4c 44 58 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2 C= LDXH | 32 20 43 3d 20 4c 44 58 48 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3 C= LXL | 33 20 43 3d 20 4c 58 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4 C= LXH | 34 20 43 3d 20 4c 58 48 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 5 C= LDYL | 35 20 43 3d 20 4c 44 59 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6 C= LDYH | 36 20 43 3d 20 4c 44 59 48 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7 C= LYL | 37 20 43 3d 20 4c 59 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 8 C= LYH | 38 20 43 3d 20 4c 59 48 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 9 C= LXRL | 39 20 43 3d 20 4c 58 52 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 10 C= LXRH | 31 30 20 43 3d 20 4c 58 52 48 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 11 C= LYR | 31 31 20 43 3d 20 4c 59 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 12 C= LRTMR | 31 32 20 43 3d 20 4c 52 54 4d 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 13 C= LPXV | 31 33 20 43 3d 20 4c 50 58 56 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0199 } ( RADIAL EFFECT VARIABLES ) | 28 20 52 41 44 49 41 4c 20 45 46 46 45 43 54 20 56 41 52 49 41 42 4c 45 53 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 14 C= LMSIZ 32 C= LACOUNT | 31 34 20 43 3d 20 4c 4d 53 49 5a 20 33 32 20 43 3d 20 4c 41 43 4f 55 4e 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 LMSIZ LACOUNT * C= LASIZ | 4c 4d 53 49 5a 20 4c 41 43 4f 55 4e 54 20 2a 20 43 3d 20 4c 41 53 49 5a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 LASIZ BA= LARRAY | 4c 41 53 49 5a 20 42 41 3d 20 4c 41 52 52 41 59 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 V= LINIT ( INITIALIZE LINE ROUTINE ) | 30 20 56 3d 20 4c 49 4e 49 54 20 28 20 49 4e 49 54 49 41 4c 49 5a 45 20 4c 49 4e 45 20 52 4f 55 54 49 4e 45 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 V= LQUAD ( QUADRANT COUNTER ) 0 V= LRADIAL ( ANGLE ) | 30 20 56 3d 20 4c 51 55 41 44 20 28 20 51 55 41 44 52 41 4e 54 20 43 4f 55 4e 54 45 52 20 29 20 30 20 56 3d 20 4c 52 41 44 49 41 4c 20 28 20 41 4e 47 4c 45 20 29 20 20 20 20 20 20 20 20 20 20 0 V= XB 0 V= YB ( BIASES ) | 30 20 56 3d 20 58 42 20 30 20 56 3d 20 59 42 20 28 20 42 49 41 53 45 53 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 V= XS 0 V= YS 0 V= XF 0 V= YF ( LINE ENDPOINTS ) | 30 20 56 3d 20 58 53 20 30 20 56 3d 20 59 53 20 30 20 56 3d 20 58 46 20 30 20 56 3d 20 59 46 20 28 20 4c 49 4e 45 20 45 4e 44 50 4f 49 4e 54 53 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 V= SFBX 0 V= SFFX 0 V= SFBY 0 V= SFFY ( SCALE FACTORS ) | 30 20 56 3d 20 53 46 42 58 20 30 20 56 3d 20 53 46 46 58 20 30 20 56 3d 20 53 46 42 59 20 30 20 56 3d 20 53 46 46 59 20 28 20 53 43 41 4c 45 20 46 41 43 54 4f 52 53 20 29 20 20 20 20 20 20 20 0 V= XLP 0 V= XLM 0 V= YLP 0 V= YLM ( LIMIT FACTORS ) | 30 20 56 3d 20 58 4c 50 20 30 20 56 3d 20 58 4c 4d 20 30 20 56 3d 20 59 4c 50 20 30 20 56 3d 20 59 4c 4d 20 28 20 4c 49 4d 49 54 20 46 41 43 54 4f 52 53 20 29 20 20 20 20 20 20 20 20 20 20 20 0 V= SVCX 0 V= SVCY | 30 20 56 3d 20 53 56 43 58 20 30 20 56 3d 20 53 56 43 59 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0200 } ( NEAT SUBROUTINES ) | 28 20 4e 45 41 54 20 53 55 42 52 4f 55 54 49 4e 45 53 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( UNSIGNED MULTIPLY ) | 28 20 55 4e 53 49 47 4e 45 44 20 4d 55 4c 54 49 50 4c 59 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 F= MNOSW F= MMPL F= NOADD | 46 3d 20 4d 4e 4f 53 57 20 46 3d 20 4d 4d 50 4c 20 46 3d 20 4e 4f 41 44 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR UMPY | 41 53 53 45 4d 42 4c 45 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR COMHL H A MOV, CMA, A H MOV, L A MOV, CMA, A L MOV, | 53 55 42 52 20 43 4f 4d 48 4c 20 48 20 41 20 4d 4f 56 2c 20 43 4d 41 2c 20 41 20 48 20 4d 4f 56 2c 20 4c 20 41 20 4d 4f 56 2c 20 43 4d 41 2c 20 41 20 4c 20 4d 4f 56 2c 20 20 20 20 20 20 20 20 H INX, RET, | 48 20 49 4e 58 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR SINE H PUSH, A E MOV, 0 D MVI, 0 sin-table H LXI, D DAD, | 53 55 42 52 20 53 49 4e 45 20 48 20 50 55 53 48 2c 20 41 20 45 20 4d 4f 56 2c 20 30 20 44 20 4d 56 49 2c 20 30 20 73 69 6e 2d 74 61 62 6c 65 20 48 20 4c 58 49 2c 20 44 20 44 41 44 2c 20 20 20 M E MOV, H POP, UMPY CALL, H A MOV, RET, | 4d 20 45 20 4d 4f 56 2c 20 48 20 50 4f 50 2c 20 55 4d 50 59 20 43 41 4c 4c 2c 20 48 20 41 20 4d 4f 56 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR COSINE LRADIAL LDA, A E MOV, 63 A MVI, E SUB, SINE JMPR, | 53 55 42 52 20 43 4f 53 49 4e 45 20 4c 52 41 44 49 41 4c 20 4c 44 41 2c 20 41 20 45 20 4d 4f 56 2c 20 36 33 20 41 20 4d 56 49 2c 20 45 20 53 55 42 2c 20 53 49 4e 45 20 4a 4d 50 52 2c 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0201 } ( SUBR TO WRITE NEXT PIXEL IN A LINE ) | 28 20 53 55 42 52 20 54 4f 20 57 52 49 54 45 20 4e 45 58 54 20 50 49 58 45 4c 20 49 4e 20 41 20 4c 49 4e 45 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HEX F= TMRZ F= RTZ | 48 45 58 20 46 3d 20 54 4d 52 5a 20 46 3d 20 52 54 5a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR STEPLINE | 41 53 53 45 4d 42 4c 45 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0202 } ( OTHER NEAT VERBS ) | 28 20 4f 54 48 45 52 20 4e 45 41 54 20 56 45 52 42 53 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 : LSTART LINIT ! LASIZ 0 DO 0 I LARRAY B! LOOP ; | 3a 20 4c 53 54 41 52 54 20 4c 49 4e 49 54 20 21 20 4c 41 53 49 5a 20 30 20 44 4f 20 30 20 49 20 4c 41 52 52 41 59 20 42 21 20 4c 4f 4f 50 20 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 F= UPAL | 46 3d 20 55 50 41 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE UPDATEALL | 45 58 58 2c 20 59 20 50 4f 50 58 2c 20 58 20 50 4f 50 58 2c 20 4e 45 58 54 20 41 53 53 45 4d 42 4c 45 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0203 } ( GENERATE A LINE ) | 28 20 47 45 4e 45 52 41 54 45 20 41 20 4c 49 4e 45 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HEX F= DOY F= OKX | 48 45 58 20 46 3d 20 44 4f 59 20 46 3d 20 4f 4b 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR GENLINE | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0204 } ( LINE GENERATOR - CLIP CHECK ) | 28 20 4c 49 4e 45 20 47 45 4e 45 52 41 54 4f 52 20 2d 20 43 4c 49 50 20 43 48 45 43 4b 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 LQUAD LDA, 2 ANI, 0=, IF, XLM LDA, ELSE, XLP LDA, THEN, | 4c 51 55 41 44 20 4c 44 41 2c 20 32 20 41 4e 49 2c 20 30 3d 2c 20 49 46 2c 20 58 4c 4d 20 4c 44 41 2c 20 45 4c 53 45 2c 20 58 4c 50 20 4c 44 41 2c 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 A C MOV, XF LDA, C CMP, DOY JRC, ( JUMP IF OK ) | 41 20 43 20 4d 4f 56 2c 20 58 46 20 4c 44 41 2c 20 43 20 43 4d 50 2c 20 44 4f 59 20 4a 52 43 2c 20 28 20 4a 55 4d 50 20 49 46 20 4f 4b 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 B PUSH, YS LDED, YF LDA, E SUB, A E MOV, | 42 20 50 55 53 48 2c 20 59 53 20 4c 44 45 44 2c 20 59 46 20 4c 44 41 2c 20 45 20 53 55 42 2c 20 41 20 45 20 4d 4f 56 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 XF LDA, C SUB, A L MOV, 0 H MVI, H D MOV, UMPY CALL, | 58 46 20 4c 44 41 2c 20 43 20 53 55 42 2c 20 41 20 4c 20 4d 4f 56 2c 20 30 20 48 20 4d 56 49 2c 20 48 20 44 20 4d 4f 56 2c 20 55 4d 50 59 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 XS LDED, XF LDA, E SUB, A E MOV, 0 D MVI, UNSDIV CALL, | 58 53 20 4c 44 45 44 2c 20 58 46 20 4c 44 41 2c 20 45 20 53 55 42 2c 20 41 20 45 20 4d 4f 56 2c 20 30 20 44 20 4d 56 49 2c 20 55 4e 53 44 49 56 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 YF LDA, E SUB, YF STA, B POP, C A MOV, XF STA, | 59 46 20 4c 44 41 2c 20 45 20 53 55 42 2c 20 59 46 20 53 54 41 2c 20 42 20 50 4f 50 2c 20 43 20 41 20 4d 4f 56 2c 20 58 46 20 53 54 41 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( Y STUFF ) | 28 20 59 20 53 54 55 46 46 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 LABEL DOY LQUAD LDA, A INR, 3 ANI, 2 CPI, CY, IF, YLM LDA, | 4c 41 42 45 4c 20 44 4f 59 20 4c 51 55 41 44 20 4c 44 41 2c 20 41 20 49 4e 52 2c 20 33 20 41 4e 49 2c 20 32 20 43 50 49 2c 20 43 59 2c 20 49 46 2c 20 59 4c 4d 20 4c 44 41 2c 20 20 20 20 20 20 ELSE, YLP LDA, THEN, A C MOV, YF LDA, C CMP, OKX JRC, | 45 4c 53 45 2c 20 59 4c 50 20 4c 44 41 2c 20 54 48 45 4e 2c 20 41 20 43 20 4d 4f 56 2c 20 59 46 20 4c 44 41 2c 20 43 20 43 4d 50 2c 20 4f 4b 58 20 4a 52 43 2c 20 20 20 20 20 20 20 20 20 20 20 B PUSH, XS LDED, XF LDA, E SUB, A E MOV, | 42 20 50 55 53 48 2c 20 58 53 20 4c 44 45 44 2c 20 58 46 20 4c 44 41 2c 20 45 20 53 55 42 2c 20 41 20 45 20 4d 4f 56 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 YF LDA, C SUB, A L MOV, 0 H MVI, UMPY CALL, | 59 46 20 4c 44 41 2c 20 43 20 53 55 42 2c 20 41 20 4c 20 4d 4f 56 2c 20 30 20 48 20 4d 56 49 2c 20 55 4d 50 59 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 YS LDED, YF LDA, E SUB, A E MOV, 0 D MVI, UNSDIV CALL, | 59 53 20 4c 44 45 44 2c 20 59 46 20 4c 44 41 2c 20 45 20 53 55 42 2c 20 41 20 45 20 4d 4f 56 2c 20 30 20 44 20 4d 56 49 2c 20 55 4e 53 44 49 56 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 XF LDA, E SUB, XF STA, B POP, C A MOV, YF STA, | 58 46 20 4c 44 41 2c 20 45 20 53 55 42 2c 20 58 46 20 53 54 41 2c 20 42 20 50 4f 50 2c 20 43 20 41 20 4d 4f 56 2c 20 59 46 20 53 54 41 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0205 } ( LINE GENERATOR - SET DELTAS ) | 28 20 4c 49 4e 45 20 47 45 4e 45 52 41 54 4f 52 20 2d 20 53 45 54 20 44 45 4c 54 41 53 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 LABEL OKX XS LDED, XF LDA, E SUB, A C MOV, YS LDED, YF LDA, | 4c 41 42 45 4c 20 4f 4b 58 20 58 53 20 4c 44 45 44 2c 20 58 46 20 4c 44 41 2c 20 45 20 53 55 42 2c 20 41 20 43 20 4d 4f 56 2c 20 59 53 20 4c 44 45 44 2c 20 59 46 20 4c 44 41 2c 20 20 20 20 20 E SUB, A B MOV, C CMP, CY, IF, ( X IS LARGER ) | 45 20 53 55 42 2c 20 41 20 42 20 4d 4f 56 2c 20 43 20 43 4d 50 2c 20 43 59 2c 20 49 46 2c 20 28 20 58 20 49 53 20 4c 41 52 47 45 52 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 C LRTMR X STX, C LTMR X STX, 40 LDXL X MVIX, 0 LDXH X MVIX, | 43 20 4c 52 54 4d 52 20 58 20 53 54 58 2c 20 43 20 4c 54 4d 52 20 58 20 53 54 58 2c 20 34 30 20 4c 44 58 4c 20 58 20 4d 56 49 58 2c 20 30 20 4c 44 58 48 20 58 20 4d 56 49 58 2c 20 20 20 20 20 B H MOV, 0 L MVI, C E MOV, L D MOV, UNSDIV CALL, | 42 20 48 20 4d 4f 56 2c 20 30 20 4c 20 4d 56 49 2c 20 43 20 45 20 4d 4f 56 2c 20 4c 20 44 20 4d 4f 56 2c 20 55 4e 53 44 49 56 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 E LDYL X STX, D LDYH X STX, | 45 20 4c 44 59 4c 20 58 20 53 54 58 2c 20 44 20 4c 44 59 48 20 58 20 53 54 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ELSE, ( Y IS LARGER ) | 45 4c 53 45 2c 20 28 20 59 20 49 53 20 4c 41 52 47 45 52 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 B LRTMR X STX, B LTMR X STX, 0 LDYL X MVIX, | 42 20 4c 52 54 4d 52 20 58 20 53 54 58 2c 20 42 20 4c 54 4d 52 20 58 20 53 54 58 2c 20 30 20 4c 44 59 4c 20 58 20 4d 56 49 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 1 LDYH X MVIX, C A MOV, RRC, RRC, A H MOV, 0C0 ANI, A L MOV, | 31 20 4c 44 59 48 20 58 20 4d 56 49 58 2c 20 43 20 41 20 4d 4f 56 2c 20 52 52 43 2c 20 52 52 43 2c 20 41 20 48 20 4d 4f 56 2c 20 30 43 30 20 41 4e 49 2c 20 41 20 4c 20 4d 4f 56 2c 20 20 20 20 H A MOV, 3F ANI, A H MOV, B E MOV, 0 D MVI, UNSDIV CALL, | 48 20 41 20 4d 4f 56 2c 20 33 46 20 41 4e 49 2c 20 41 20 48 20 4d 4f 56 2c 20 42 20 45 20 4d 4f 56 2c 20 30 20 44 20 4d 56 49 2c 20 55 4e 53 44 49 56 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 E LDXL X STX, D LDXH X STX, | 45 20 4c 44 58 4c 20 58 20 53 54 58 2c 20 44 20 4c 44 58 48 20 58 20 53 54 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 THEN, | 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0206 } ( ADJUST DELTAS TO QUADRANT, AND BIAS TO EFFECT CENTER ) | 28 20 41 44 4a 55 53 54 20 44 45 4c 54 41 53 20 54 4f 20 51 55 41 44 52 41 4e 54 2c 20 41 4e 44 20 42 49 41 53 20 54 4f 20 45 46 46 45 43 54 20 43 45 4e 54 45 52 20 29 20 20 20 20 20 20 20 20 XS LDA, RRC, RRC, A D MOV, 0C0 ANI, A E MOV, D A MOV, | 58 53 20 4c 44 41 2c 20 52 52 43 2c 20 52 52 43 2c 20 41 20 44 20 4d 4f 56 2c 20 30 43 30 20 41 4e 49 2c 20 41 20 45 20 4d 4f 56 2c 20 44 20 41 20 4d 4f 56 2c 20 20 20 20 20 20 20 20 20 20 20 3F ANI, A D MOV, XB LHLD, | 33 46 20 41 4e 49 2c 20 41 20 44 20 4d 4f 56 2c 20 58 42 20 4c 48 4c 44 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 LQUAD LDA, | 4c 51 55 41 44 20 4c 44 41 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2 ANI, 0<>, IF, A ANA, D DSBC, XCHG, LDXL X L LDX, | 32 20 41 4e 49 2c 20 30 3c 3e 2c 20 49 46 2c 20 41 20 41 4e 41 2c 20 44 20 44 53 42 43 2c 20 58 43 48 47 2c 20 4c 44 58 4c 20 58 20 4c 20 4c 44 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 LDXH X H LDX, COMHL CALL, L LDXL X STX, H LDXH X STX, | 4c 44 58 48 20 58 20 48 20 4c 44 58 2c 20 43 4f 4d 48 4c 20 43 41 4c 4c 2c 20 4c 20 4c 44 58 4c 20 58 20 53 54 58 2c 20 48 20 4c 44 58 48 20 58 20 53 54 58 2c 20 20 20 20 20 20 20 20 20 20 20 XCHG, ELSE, D DAD, | 58 43 48 47 2c 20 45 4c 53 45 2c 20 44 20 44 41 44 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 THEN, L LXL X STX, H LXH X STX, L LXRL X STX, H LXRH X STX, | 54 48 45 4e 2c 20 4c 20 4c 58 4c 20 58 20 53 54 58 2c 20 48 20 4c 58 48 20 58 20 53 54 58 2c 20 4c 20 4c 58 52 4c 20 58 20 53 54 58 2c 20 48 20 4c 58 52 48 20 58 20 53 54 58 2c 20 20 20 20 20 YS LDA, A D MOV, 0 E MVI, YB LHLD, | 59 53 20 4c 44 41 2c 20 41 20 44 20 4d 4f 56 2c 20 30 20 45 20 4d 56 49 2c 20 59 42 20 4c 48 4c 44 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 LQUAD LDA, A INR, 3 ANI, 2 CPI, CY~, IF, A ANA, D DSBC, | 4c 51 55 41 44 20 4c 44 41 2c 20 41 20 49 4e 52 2c 20 33 20 41 4e 49 2c 20 32 20 43 50 49 2c 20 43 59 7e 2c 20 49 46 2c 20 41 20 41 4e 41 2c 20 44 20 44 53 42 43 2c 20 20 20 20 20 20 20 20 20 XCHG, LDYL X L LDX, LDYH X H LDX, COMHL CALL, | 58 43 48 47 2c 20 4c 44 59 4c 20 58 20 4c 20 4c 44 58 2c 20 4c 44 59 48 20 58 20 48 20 4c 44 58 2c 20 43 4f 4d 48 4c 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 L LDYL X STX, H LDYH X STX, XCHG, | 4c 20 4c 44 59 4c 20 58 20 53 54 58 2c 20 48 20 4c 44 59 48 20 58 20 53 54 58 2c 20 58 43 48 47 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ELSE, D DAD, THEN, | 45 4c 53 45 2c 20 44 20 44 41 44 2c 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 LYL X MVIX, H LYH X STX, H LYR X STX, | 30 20 4c 59 4c 20 58 20 4d 56 49 58 2c 20 48 20 4c 59 48 20 58 20 53 54 58 2c 20 48 20 4c 59 52 20 58 20 53 54 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 RET, ASSEMBLE> | 52 45 54 2c 20 41 53 53 45 4d 42 4c 45 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0207 } ( WRITE ONLY ENTRY AND SET CENTER OF LINE EFFECT ) | 28 20 57 52 49 54 45 20 4f 4e 4c 59 20 45 4e 54 52 59 20 41 4e 44 20 53 45 54 20 43 45 4e 54 45 52 20 4f 46 20 4c 49 4e 45 20 45 46 46 45 43 54 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR WRTONLY GENLINE CALL, 0 LRTMR X MVIX, RET, | 53 55 42 52 20 57 52 54 4f 4e 4c 59 20 47 45 4e 4c 49 4e 45 20 43 41 4c 4c 2c 20 30 20 4c 52 54 4d 52 20 58 20 4d 56 49 58 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 : SETLXY 2DUP YB ! XB ! | 3a 20 53 45 54 4c 58 59 20 32 44 55 50 20 59 42 20 21 20 58 42 20 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 256 / DUP YLP ! 192 SWAP - YLM ! | 32 35 36 20 2f 20 44 55 50 20 59 4c 50 20 21 20 31 39 32 20 53 57 41 50 20 2d 20 59 4c 4d 20 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 / DUP DUP 255 > IF DROP 255 THEN XLP ! | 36 34 20 2f 20 44 55 50 20 44 55 50 20 32 35 35 20 3e 20 49 46 20 44 52 4f 50 20 32 35 35 20 54 48 45 4e 20 58 4c 50 20 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 292 SWAP - DUP 255 > IF DROP 255 THEN XLM ! ; | 32 39 32 20 53 57 41 50 20 2d 20 44 55 50 20 32 35 35 20 3e 20 49 46 20 44 52 4f 50 20 32 35 35 20 54 48 45 4e 20 58 4c 4d 20 21 20 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 : SETSF SFFY ! SFFX ! SFBY ! SFBX ! ; | 3a 20 53 45 54 53 46 20 53 46 46 59 20 21 20 53 46 46 58 20 21 20 53 46 42 59 20 21 20 53 46 42 58 20 21 20 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( SHIFT RIGHT ARITHMETIC BY N ROUTINE ) | 28 20 53 48 49 46 54 20 52 49 47 48 54 20 41 52 49 54 48 4d 45 54 49 43 20 42 59 20 4e 20 52 4f 55 54 49 4e 45 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( ENTER AT SRHLC TO CHECK FOR 0 S.A. ) | 28 20 45 4e 54 45 52 20 41 54 20 53 52 48 4c 43 20 54 4f 20 43 48 45 43 4b 20 46 4f 52 20 30 20 53 2e 41 2e 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 F= SRHL F= SAZ | 46 3d 20 53 52 48 4c 20 46 3d 20 53 41 5a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR SRHLC | 4c 41 42 45 4c 20 53 41 5a 20 41 20 4c 20 4d 4f 56 2c 20 41 20 48 20 4d 4f 56 2c 20 52 45 54 2c 20 41 53 53 45 4d 42 4c 45 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0208 } ( ANIMATION LIST AND ROUTINE TO EXPLODE THE FIREBASE ) | 28 20 41 4e 49 4d 41 54 49 4f 4e 20 4c 49 53 54 20 41 4e 44 20 52 4f 55 54 49 4e 45 20 54 4f 20 45 58 50 4c 4f 44 45 20 54 48 45 20 46 49 52 45 42 41 53 45 20 29 20 20 20 20 20 20 20 20 20 20 HEX DATA KRUNCH ASM 08 SWAIT A0 SETM 08 SWAIT 20 SETM ARET | 48 45 58 20 44 41 54 41 20 4b 52 55 4e 43 48 20 41 53 4d 20 30 38 20 53 57 41 49 54 20 41 30 20 53 45 54 4d 20 30 38 20 53 57 41 49 54 20 32 30 20 53 45 54 4d 20 41 52 45 54 20 20 20 20 20 20 DATA FBEXPSUB ASM 0 0 SETDC | 44 41 54 41 20 46 42 45 58 50 53 55 42 20 41 53 4d 20 30 20 30 20 53 45 54 44 43 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4 6 DISPL FBEXP1 SETP KRUNCH ACALL | 34 20 36 20 44 49 53 50 4c 20 46 42 45 58 50 31 20 53 45 54 50 20 4b 52 55 4e 43 48 20 41 43 41 4c 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 -4 -6 DISPL FBEXP4 KRUNCH ACALL | 2d 34 20 2d 36 20 44 49 53 50 4c 20 46 42 45 58 50 34 20 4b 52 55 4e 43 48 20 41 43 41 4c 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 1 2 DISPL FBEXP2 SETP KRUNCH ACALL | 31 20 32 20 44 49 53 50 4c 20 46 42 45 58 50 32 20 53 45 54 50 20 4b 52 55 4e 43 48 20 41 43 41 4c 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 -1 -2 DISPL FBEXP3 SETP KRUNCH AJMP | 2d 31 20 2d 32 20 44 49 53 50 4c 20 46 42 45 58 50 33 20 53 45 54 50 20 4b 52 55 4e 43 48 20 41 4a 4d 50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA FBEXP ASM FBEXPSUB ACALL FBEXP5 SETP KRUNCH ACALL | 44 41 54 41 20 46 42 45 58 50 20 41 53 4d 20 46 42 45 58 50 53 55 42 20 41 43 41 4c 4c 20 46 42 45 58 50 35 20 53 45 54 50 20 4b 52 55 4e 43 48 20 41 43 41 4c 4c 20 20 20 20 20 20 20 20 20 20 FBEXP6 SETP KRUNCH ACALL NULPAT SETP | 46 42 45 58 50 36 20 53 45 54 50 20 4b 52 55 4e 43 48 20 41 43 41 4c 4c 20 4e 55 4c 50 41 54 20 53 45 54 50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 1 SWAIT AHALT | 31 20 53 57 41 49 54 20 41 48 41 4c 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( ROUTINE TO EFFECT THE EXPLOSION ) | 28 20 52 4f 55 54 49 4e 45 20 54 4f 20 45 46 46 45 43 54 20 54 48 45 20 45 58 50 4c 4f 53 49 4f 4e 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR EXPLODEFB PLAYERHIT LDA, A ANA, RNZ, | 53 55 42 52 20 45 58 50 4c 4f 44 45 46 42 20 50 4c 41 59 45 52 48 49 54 20 4c 44 41 2c 20 41 20 41 4e 41 2c 20 52 4e 5a 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ENDOFFRAME LDA, A ANA, RNZ, | 45 4e 44 4f 46 46 52 41 4d 45 20 4c 44 41 2c 20 41 20 41 4e 41 2c 20 52 4e 5a 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 1 A MVI, PLAYERHIT STA, FBEXP H LXI, | 31 20 41 20 4d 56 49 2c 20 50 4c 41 59 45 52 48 49 54 20 53 54 41 2c 20 46 42 45 58 50 20 48 20 4c 58 49 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CRASHA CALL, XAWRITE H LXI, L PQRL X STX, H PQRH X STX, | 43 52 41 53 48 41 20 43 41 4c 4c 2c 20 58 41 57 52 49 54 45 20 48 20 4c 58 49 2c 20 4c 20 50 51 52 4c 20 58 20 53 54 58 2c 20 48 20 50 51 52 48 20 58 20 53 54 58 2c 20 20 20 20 20 20 20 20 20 RET, DECIMAL --> | 52 45 54 2c 20 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0209 } ( INTERRUPT ROUTINE TO SPIRAL VECTOR ) --> | 28 20 49 4e 54 45 52 52 55 50 54 20 52 4f 55 54 49 4e 45 20 54 4f 20 53 50 49 52 41 4c 20 56 45 43 54 4f 52 20 29 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 F= SPIL | 46 3d 20 53 50 49 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR SPWRITE .REL | 4b 49 4c 4c 4f 46 46 20 4a 4d 50 2c 20 2e 41 42 53 20 41 53 53 45 4d 42 4c 45 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0210 } ( SUBROUTINES TO CALCULATE DISPLACEMENTS FOR RACK MEMBER ) HEX | 28 20 53 55 42 52 4f 55 54 49 4e 45 53 20 54 4f 20 43 41 4c 43 55 4c 41 54 45 20 44 49 53 50 4c 41 43 45 4d 45 4e 54 53 20 46 4f 52 20 52 41 43 4b 20 4d 45 4d 42 45 52 20 29 20 48 45 58 20 20 SUBR CALCINVX 7 ANI, RLC, RLC, A H MOV, 0 L MVI, RET, | 53 55 42 52 20 43 41 4c 43 49 4e 56 58 20 37 20 41 4e 49 2c 20 52 4c 43 2c 20 52 4c 43 2c 20 41 20 48 20 4d 4f 56 2c 20 30 20 4c 20 4d 56 49 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 SUBR CALCINVY 38 ANI, RLC, A H MOV, 0 L MVI, RET, | 53 55 42 52 20 43 41 4c 43 49 4e 56 59 20 33 38 20 41 4e 49 2c 20 52 4c 43 2c 20 41 20 48 20 4d 4f 56 2c 20 30 20 4c 20 4d 56 49 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( CHECK FOR SCREEN EDGE, NEGATE DELTA AND BUMP X IF AT IT ) | 28 20 43 48 45 43 4b 20 46 4f 52 20 53 43 52 45 45 4e 20 45 44 47 45 2c 20 4e 45 47 41 54 45 20 44 45 4c 54 41 20 41 4e 44 20 42 55 4d 50 20 58 20 49 46 20 41 54 20 49 54 20 29 20 20 20 20 20 SUBR FLIPCHECK H A MOV, B CMP, RNZ, L A MOV, C CMP, RNZ, | 53 55 42 52 20 46 4c 49 50 43 48 45 43 4b 20 48 20 41 20 4d 4f 56 2c 20 42 20 43 4d 50 2c 20 52 4e 5a 2c 20 4c 20 41 20 4d 4f 56 2c 20 43 20 43 4d 50 2c 20 52 4e 5a 2c 20 20 20 20 20 20 20 20 D A MOV, CMA, A D MOV, E A MOV, CMA, A E MOV, D INX, A XRA, | 44 20 41 20 4d 4f 56 2c 20 43 4d 41 2c 20 41 20 44 20 4d 4f 56 2c 20 45 20 41 20 4d 4f 56 2c 20 43 4d 41 2c 20 41 20 45 20 4d 4f 56 2c 20 44 20 49 4e 58 2c 20 41 20 58 52 41 2c 20 20 20 20 20 RET, | 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( INDEX RACK BITS AND ALIVE BITS ) | 28 20 49 4e 44 45 58 20 52 41 43 4b 20 42 49 54 53 20 41 4e 44 20 41 4c 49 56 45 20 42 49 54 53 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR XRACKBITS C A MOV, 7 ANI, A E MOV, 0 D MVI, | 53 55 42 52 20 58 52 41 43 4b 42 49 54 53 20 43 20 41 20 4d 4f 56 2c 20 37 20 41 4e 49 2c 20 41 20 45 20 4d 4f 56 2c 20 30 20 44 20 4d 56 49 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 BITMASK H LXI, D DAD, M B MOV, C A MOV, RRC, RRC, | 42 49 54 4d 41 53 4b 20 48 20 4c 58 49 2c 20 44 20 44 41 44 2c 20 4d 20 42 20 4d 4f 56 2c 20 43 20 41 20 4d 4f 56 2c 20 52 52 43 2c 20 52 52 43 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 RRC, 7 ANI, A E MOV, 0 RACKBITS H LXI, D DAD, | 52 52 43 2c 20 37 20 41 4e 49 2c 20 41 20 45 20 4d 4f 56 2c 20 30 20 52 41 43 4b 42 49 54 53 20 48 20 4c 58 49 2c 20 44 20 44 41 44 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 M A MOV, B ANA, RET, | 4d 20 41 20 4d 4f 56 2c 20 42 20 41 4e 41 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR XALIVEBITS C A MOV, 7 ANI, A E MOV, 0 D MVI, | 53 55 42 52 20 58 41 4c 49 56 45 42 49 54 53 20 43 20 41 20 4d 4f 56 2c 20 37 20 41 4e 49 2c 20 41 20 45 20 4d 4f 56 2c 20 30 20 44 20 4d 56 49 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 BITMASK H LXI, D DAD, M B MOV, C A MOV, RRC, RRC, RRC, 7 ANI, | 42 49 54 4d 41 53 4b 20 48 20 4c 58 49 2c 20 44 20 44 41 44 2c 20 4d 20 42 20 4d 4f 56 2c 20 43 20 41 20 4d 4f 56 2c 20 52 52 43 2c 20 52 52 43 2c 20 52 52 43 2c 20 37 20 41 4e 49 2c 20 20 20 A E MOV, 0 ALIVEBITS H LXI, D DAD, M A MOV, B ANA, RET, | 41 20 45 20 4d 4f 56 2c 20 30 20 41 4c 49 56 45 42 49 54 53 20 48 20 4c 58 49 2c 20 44 20 44 41 44 2c 20 4d 20 41 20 4d 4f 56 2c 20 42 20 41 4e 41 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0211 } ( CHECK FOR COIN INSERTION OR CREDITS ) | 28 20 43 48 45 43 4b 20 46 4f 52 20 43 4f 49 4e 20 49 4e 53 45 52 54 49 4f 4e 20 4f 52 20 43 52 45 44 49 54 53 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HEX F= EVENT F= NOFREB | 48 45 58 20 46 3d 20 45 56 45 4e 54 20 46 3d 20 4e 4f 46 52 45 42 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA COINLINK NULRET , | 44 41 54 41 20 43 4f 49 4e 4c 49 4e 4b 20 4e 55 4c 52 45 54 20 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR creditcheck | 41 53 53 45 4d 42 4c 45 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE CREDITS? B PUSH, X PUSHX, Y PUSHX, creditcheck CALL, | 43 4f 44 45 20 43 52 45 44 49 54 53 3f 20 42 20 50 55 53 48 2c 20 58 20 50 55 53 48 58 2c 20 59 20 50 55 53 48 58 2c 20 63 72 65 64 69 74 63 68 65 63 6b 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 Y POPX, X POPX, B POP, NEXT DECIMAL --> | 59 20 50 4f 50 58 2c 20 58 20 50 4f 50 58 2c 20 42 20 50 4f 50 2c 20 4e 45 58 54 20 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0212 } ( WAIT AND ANIMATION TRACKING TABLE ROUTINES ) HEX | 28 20 57 41 49 54 20 41 4e 44 20 41 4e 49 4d 41 54 49 4f 4e 20 54 52 41 43 4b 49 4e 47 20 54 41 42 4c 45 20 52 4f 55 54 49 4e 45 53 20 29 20 48 45 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 : WAIT WTIMER ! BEGIN CREDITS? WTIMER @ 0= END ; | 3a 20 57 41 49 54 20 57 54 49 4d 45 52 20 21 20 42 45 47 49 4e 20 43 52 45 44 49 54 53 3f 20 57 54 49 4d 45 52 20 40 20 30 3d 20 45 4e 44 20 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR NOTEANIM INVADERNUM LDA, RLC, | 53 55 42 52 20 4e 4f 54 45 41 4e 49 4d 20 49 4e 56 41 44 45 52 4e 55 4d 20 4c 44 41 2c 20 52 4c 43 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 RLC, A E MOV, 0 D MVI, 0 ANIMSTATE H LXI, D DAD, XCHG, | 52 4c 43 2c 20 41 20 45 20 4d 4f 56 2c 20 30 20 44 20 4d 56 49 2c 20 30 20 41 4e 49 4d 53 54 41 54 45 20 48 20 4c 58 49 2c 20 44 20 44 41 44 2c 20 58 43 48 47 2c 20 20 20 20 20 20 20 20 20 20 MASTERY LHLD, DMASTERY LBCD, 7 B BIT, 0=, IF, B DAD, THEN, | 4d 41 53 54 45 52 59 20 4c 48 4c 44 2c 20 44 4d 41 53 54 45 52 59 20 4c 42 43 44 2c 20 37 20 42 20 42 49 54 2c 20 30 3d 2c 20 49 46 2c 20 42 20 44 41 44 2c 20 54 48 45 4e 2c 20 20 20 20 20 20 XCHG, DI, E M MOV, H INX, D M MOV, H INX, MASTERX LDED, | 58 43 48 47 2c 20 44 49 2c 20 45 20 4d 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 44 20 4d 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 4d 41 53 54 45 52 58 20 4c 44 45 44 2c 20 20 20 20 20 20 20 20 20 E M MOV, H INX, D M MOV, EI, RET, | 45 20 4d 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 44 20 4d 20 4d 4f 56 2c 20 45 49 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR GETASTATE C A MOV, RLC, RLC, A E MOV, 0 D MVI, | 53 55 42 52 20 47 45 54 41 53 54 41 54 45 20 43 20 41 20 4d 4f 56 2c 20 52 4c 43 2c 20 52 4c 43 2c 20 41 20 45 20 4d 4f 56 2c 20 30 20 44 20 4d 56 49 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 0 ANIMSTATE H LXI, D DAD, M E MOV, H INX, M D MOV, H INX, | 30 20 41 4e 49 4d 53 54 41 54 45 20 48 20 4c 58 49 2c 20 44 20 44 41 44 2c 20 4d 20 45 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 4d 20 44 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 20 20 20 20 20 20 H PUSH, C A MOV, CALCINVY CALL, D DAD, D POP, H PUSH, D PUSH, | 48 20 50 55 53 48 2c 20 43 20 41 20 4d 4f 56 2c 20 43 41 4c 43 49 4e 56 59 20 43 41 4c 4c 2c 20 44 20 44 41 44 2c 20 44 20 50 4f 50 2c 20 48 20 50 55 53 48 2c 20 44 20 50 55 53 48 2c 20 20 20 1 H BIT, NORMLP1 LHLD, 0<>, IF, 10 D LXI, D DAD, THEN, | 31 20 48 20 42 49 54 2c 20 4e 4f 52 4d 4c 50 31 20 4c 48 4c 44 2c 20 30 3c 3e 2c 20 49 46 2c 20 31 30 20 44 20 4c 58 49 2c 20 44 20 44 41 44 2c 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 20 C A MOV, 7 ANI, RLC, A E MOV, 0 D MVI, D DAD, | 43 20 41 20 4d 4f 56 2c 20 37 20 41 4e 49 2c 20 52 4c 43 2c 20 41 20 45 20 4d 4f 56 2c 20 30 20 44 20 4d 56 49 2c 20 44 20 44 41 44 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 M E MOV, H INX, M D MOV, D PUSH, Y POPX, | 4d 20 45 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 4d 20 44 20 4d 4f 56 2c 20 44 20 50 55 53 48 2c 20 59 20 50 4f 50 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 C A MOV, H POP, M E MOV, H INX, M D MOV, CALCINVX CALL, D DAD, | 43 20 41 20 4d 4f 56 2c 20 48 20 50 4f 50 2c 20 4d 20 45 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 4d 20 44 20 4d 4f 56 2c 20 43 41 4c 43 49 4e 56 58 20 43 41 4c 4c 2c 20 44 20 44 41 44 2c 20 20 XCHG, H POP, RET, --> | 58 43 48 47 2c 20 48 20 50 4f 50 2c 20 52 45 54 2c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0213 } ( RECOMPUTE LIMITS ) HEX | 28 20 52 45 43 4f 4d 50 55 54 45 20 4c 49 4d 49 54 53 20 29 20 48 45 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 F= LLFL F= LLFND F= ULFL F= ULFND | 46 3d 20 4c 4c 46 4c 20 46 3d 20 4c 4c 46 4e 44 20 46 3d 20 55 4c 46 4c 20 46 3d 20 55 4c 46 4e 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR RELMT | 38 20 41 44 49 2c 20 4c 41 53 54 52 41 43 4b 20 53 54 41 2c 20 52 45 54 2c 20 41 53 53 45 4d 42 4c 45 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0214 } ( SUBR TO STEP MASTER COORDS ONE TICK AND LIMIT CHECK ) HEX | 28 20 53 55 42 52 20 54 4f 20 53 54 45 50 20 4d 41 53 54 45 52 20 43 4f 4f 52 44 53 20 4f 4e 45 20 54 49 43 4b 20 41 4e 44 20 4c 49 4d 49 54 20 43 48 45 43 4b 20 29 20 48 45 58 20 20 20 20 20 ( ROUTINE TO WRITE ONE INVADER, IF POSSIBLE ) | 28 20 52 4f 55 54 49 4e 45 20 54 4f 20 57 52 49 54 45 20 4f 4e 45 20 49 4e 56 41 44 45 52 2c 20 49 46 20 50 4f 53 53 49 42 4c 45 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 F= INVFIND F= STEPMASTER F= NONERD | 46 3d 20 49 4e 56 46 49 4e 44 20 46 3d 20 53 54 45 50 4d 41 53 54 45 52 20 46 3d 20 4e 4f 4e 45 52 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR WRITEINVADER | 50 43 48 4c 2c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0215 } ( WE FOUND AN INVADER - WRITE HIM ) | 28 20 57 45 20 46 4f 55 4e 44 20 41 4e 20 49 4e 56 41 44 45 52 20 2d 20 57 52 49 54 45 20 48 49 4d 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 LABEL INVFIND INVADERNUM LDA, CALCINVY CALL, MASTERY LDED, | 4c 41 42 45 4c 20 49 4e 56 46 49 4e 44 20 49 4e 56 41 44 45 52 4e 55 4d 20 4c 44 41 2c 20 43 41 4c 43 49 4e 56 59 20 43 41 4c 4c 2c 20 4d 41 53 54 45 52 59 20 4c 44 45 44 2c 20 20 20 20 20 20 D DAD, XCHG, INVADERNUM LDA, 7 ANI, RLC, A C MOV, | 44 20 44 41 44 2c 20 58 43 48 47 2c 20 49 4e 56 41 44 45 52 4e 55 4d 20 4c 44 41 2c 20 37 20 41 4e 49 2c 20 52 4c 43 2c 20 41 20 43 20 4d 4f 56 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 B MVI, INVPATAB LHLD, B DAD, M C MOV, H INX, M B MOV, | 30 20 42 20 4d 56 49 2c 20 49 4e 56 50 41 54 41 42 20 4c 48 4c 44 2c 20 42 20 44 41 44 2c 20 4d 20 43 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 4d 20 42 20 4d 4f 56 2c 20 20 20 20 20 20 20 20 20 B PUSH, XTIY, 20 B LXI, 1 D BIT, 0<>, IF, 1 Y H LDX, H DCR, | 42 20 50 55 53 48 2c 20 58 54 49 59 2c 20 32 30 20 42 20 4c 58 49 2c 20 31 20 44 20 42 49 54 2c 20 30 3c 3e 2c 20 49 46 2c 20 31 20 59 20 48 20 4c 44 58 2c 20 48 20 44 43 52 2c 20 20 20 20 20 0 L MVI, D DAD, XCHG, A0 C MVI, THEN, B PUSH, | 30 20 4c 20 4d 56 49 2c 20 44 20 44 41 44 2c 20 58 43 48 47 2c 20 41 30 20 43 20 4d 56 49 2c 20 54 48 45 4e 2c 20 42 20 50 55 53 48 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 INVADERNUM LDA, | 49 4e 56 41 44 45 52 4e 55 4d 20 4c 44 41 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CALCINVX CALL, MASTERX LBCD, B DAD, XCHG, B POP, | 43 41 4c 43 49 4e 56 58 20 43 41 4c 4c 2c 20 4d 41 53 54 45 52 58 20 4c 42 43 44 2c 20 42 20 44 41 44 2c 20 58 43 48 47 2c 20 42 20 50 4f 50 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7 D BIT, 0<>, IF, DI, 0 FBVECTOR X LXIX, EXPLODEFB CALL, | 37 20 44 20 42 49 54 2c 20 30 3c 3e 2c 20 49 46 2c 20 44 49 2c 20 30 20 46 42 56 45 43 54 4f 52 20 58 20 4c 58 49 58 2c 20 45 58 50 4c 4f 44 45 46 42 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 A XRA, INVADERSLEFT STA, Y POPX, EI, RET, THEN, | 41 20 58 52 41 2c 20 49 4e 56 41 44 45 52 53 4c 45 46 54 20 53 54 41 2c 20 59 20 50 4f 50 58 2c 20 45 49 2c 20 52 45 54 2c 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 relabs CALL, DI, writep CALL, NOTEANIM CALL, Y POPX, | 72 65 6c 61 62 73 20 43 41 4c 4c 2c 20 44 49 2c 20 77 72 69 74 65 70 20 43 41 4c 4c 2c 20 4e 4f 54 45 41 4e 49 4d 20 43 41 4c 4c 2c 20 59 20 50 4f 50 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 INVADERNUM D LXI, LASTRACK H LXI, D LDAX, A INR, D STAX, | 49 4e 56 41 44 45 52 4e 55 4d 20 44 20 4c 58 49 2c 20 4c 41 53 54 52 41 43 4b 20 48 20 4c 58 49 2c 20 44 20 4c 44 41 58 2c 20 41 20 49 4e 52 2c 20 44 20 53 54 41 58 2c 20 20 20 20 20 20 20 20 M CMP, STEPMASTER JNC, RET, ASSEMBLE> | 4d 20 43 4d 50 2c 20 53 54 45 50 4d 41 53 54 45 52 20 4a 4e 43 2c 20 52 45 54 2c 20 41 53 53 45 4d 42 4c 45 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE WRTINV RACKTIMER LDA, A ANA, 0=, IF, B PUSH, X PUSHX, | 43 4f 44 45 20 57 52 54 49 4e 56 20 52 41 43 4b 54 49 4d 45 52 20 4c 44 41 2c 20 41 20 41 4e 41 2c 20 30 3d 2c 20 49 46 2c 20 42 20 50 55 53 48 2c 20 58 20 50 55 53 48 58 2c 20 20 20 20 20 20 WRITEINVADER CALL, X POPX, B POP, THEN, NEXT DECIMAL --> | 57 52 49 54 45 49 4e 56 41 44 45 52 20 43 41 4c 4c 2c 20 58 20 50 4f 50 58 2c 20 42 20 50 4f 50 2c 20 54 48 45 4e 2c 20 4e 45 58 54 20 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0216 } ( REWRITE A RACK MEMBER USING NORMAL PATTERNS ) | 28 20 52 45 57 52 49 54 45 20 41 20 52 41 43 4b 20 4d 45 4d 42 45 52 20 55 53 49 4e 47 20 4e 4f 52 4d 41 4c 20 50 41 54 54 45 52 4e 53 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HEX | 48 45 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( USED FOR GAME INITIALIZATION ) | 28 20 55 53 45 44 20 46 4f 52 20 47 41 4d 45 20 49 4e 49 54 49 41 4c 49 5a 41 54 49 4f 4e 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 F= TOGGLEMEMBER | 46 3d 20 54 4f 47 47 4c 45 4d 45 4d 42 45 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR REWRITEMEMBER | 41 53 53 45 4d 42 4c 45 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE REWRITER H POP, B PUSH, Y PUSHX, L C MOV, | 43 4f 44 45 20 52 45 57 52 49 54 45 52 20 48 20 50 4f 50 2c 20 42 20 50 55 53 48 2c 20 59 20 50 55 53 48 58 2c 20 4c 20 43 20 4d 4f 56 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 REWRITEMEMBER CALL, Y POPX, B POP, NEXT | 52 45 57 52 49 54 45 4d 45 4d 42 45 52 20 43 41 4c 4c 2c 20 59 20 50 4f 50 58 2c 20 42 20 50 4f 50 2c 20 4e 45 58 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0217 } ( REENTER RACK ) HEX | 28 20 52 45 45 4e 54 45 52 20 52 41 43 4b 20 29 20 48 45 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR PLOTREENTRY | 53 55 42 52 20 50 4c 4f 54 52 45 45 4e 54 52 59 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 VRACK X C LDX, GETASTATE CALL, | 56 52 41 43 4b 20 58 20 43 20 4c 44 58 2c 20 47 45 54 41 53 54 41 54 45 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 B MVI, H VYH X STX, | 30 20 42 20 4d 56 49 2c 20 48 20 56 59 48 20 58 20 53 54 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 VXZW X MVIX, | 32 38 20 56 58 5a 57 20 58 20 4d 56 49 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 XCHG, VXL X A LDX, 0C0 ANI, A E MOV, | 58 43 48 47 2c 20 56 58 4c 20 58 20 41 20 4c 44 58 2c 20 30 43 30 20 41 4e 49 2c 20 41 20 45 20 4d 4f 56 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 VXH X D LDX, A ANA, D DSBC, | 56 58 48 20 58 20 44 20 4c 44 58 2c 20 41 20 41 4e 41 2c 20 44 20 44 53 42 43 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0<>, IF, H A MOV, A ANA, 0<, IF, -80 H LXI, ELSE, 40 H LXI, | 30 3c 3e 2c 20 49 46 2c 20 48 20 41 20 4d 4f 56 2c 20 41 20 41 4e 41 2c 20 30 3c 2c 20 49 46 2c 20 2d 38 30 20 48 20 4c 58 49 2c 20 45 4c 53 45 2c 20 34 30 20 48 20 4c 58 49 2c 20 20 20 20 20 THEN, D DAD, L VXL X STX, H VXH X STX, B INR, THEN, | 54 48 45 4e 2c 20 44 20 44 41 44 2c 20 4c 20 56 58 4c 20 58 20 53 54 58 2c 20 48 20 56 58 48 20 58 20 53 54 58 2c 20 42 20 49 4e 52 2c 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 B A MOV, A ANA, 0=, IF, | 42 20 41 20 4d 4f 56 2c 20 41 20 41 4e 41 2c 20 30 3d 2c 20 49 46 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 Y PUSHX, H POP, L VPATL X STX, H VPATH X STX, | 59 20 50 55 53 48 58 2c 20 48 20 50 4f 50 2c 20 4c 20 56 50 41 54 4c 20 58 20 53 54 58 2c 20 48 20 56 50 41 54 48 20 58 20 53 54 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 PQSRH PQS X RESX, VRACK X C LDX, XRACKBITS CALL, | 50 51 53 52 48 20 50 51 53 20 58 20 52 45 53 58 2c 20 56 52 41 43 4b 20 58 20 43 20 4c 44 58 2c 20 58 52 41 43 4b 42 49 54 53 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 B A MOV, M ORA, A M MOV, 20 VMAGIC X MVIX, | 42 20 41 20 4d 4f 56 2c 20 4d 20 4f 52 41 2c 20 41 20 4d 20 4d 4f 56 2c 20 32 30 20 56 4d 41 47 49 43 20 58 20 4d 56 49 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 THEN, RET, | 54 48 45 4e 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0218 } ( INTERRUPT ROUTINE TO REENTER A GALAXIAN ) DECIMAL | 28 20 49 4e 54 45 52 52 55 50 54 20 52 4f 55 54 49 4e 45 20 54 4f 20 52 45 45 4e 54 45 52 20 41 20 47 41 4c 41 58 49 41 4e 20 29 20 44 45 43 49 4d 41 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 F= ROGER | 46 3d 20 52 4f 47 45 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR RENTGAL , IF, | 50 51 53 52 48 20 50 51 53 20 58 20 42 49 54 58 2c 20 30 3c 3e 2c 20 49 46 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 LABEL ROGER B PUSH, PLOTREENTRY CALL, B POP, | 4c 41 42 45 4c 20 52 4f 47 45 52 20 42 20 50 55 53 48 2c 20 50 4c 4f 54 52 45 45 4e 54 52 59 20 43 41 4c 4c 2c 20 42 20 50 4f 50 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 PQSRH PQS X BITX, 0<>, IF, C DCR, ROGER JRNZ, THEN, | 50 51 53 52 48 20 50 51 53 20 58 20 42 49 54 58 2c 20 30 3c 3e 2c 20 49 46 2c 20 43 20 44 43 52 2c 20 52 4f 47 45 52 20 4a 52 4e 5a 2c 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 THEN, PQSDW PQS X BITX, 0=, IF, vwrite CALL, ELSE, | 54 48 45 4e 2c 20 50 51 53 44 57 20 50 51 53 20 58 20 42 49 54 58 2c 20 30 3d 2c 20 49 46 2c 20 76 77 72 69 74 65 20 43 41 4c 4c 2c 20 45 4c 53 45 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 PQSRH PQS X BITX, 0<>, IF, PQSDW PQS X RESX, | 50 51 53 52 48 20 50 51 53 20 58 20 42 49 54 58 2c 20 30 3c 3e 2c 20 49 46 2c 20 50 51 53 44 57 20 50 51 53 20 58 20 52 45 53 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 PQSDE PQS X SETX, THEN, THEN, | 50 51 53 44 45 20 50 51 53 20 58 20 53 45 54 58 2c 20 54 48 45 4e 2c 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 KILLOFF JMP, .ABS ASSEMBLE> | 4b 49 4c 4c 4f 46 46 20 4a 4d 50 2c 20 2e 41 42 53 20 41 53 53 45 4d 42 4c 45 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0219 } ( CHECK FOR INTERCEPT WITH RACK MEMBER ) | 28 20 43 48 45 43 4b 20 46 4f 52 20 49 4e 54 45 52 43 45 50 54 20 57 49 54 48 20 52 41 43 4b 20 4d 45 4d 42 45 52 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( RETURNS NZ, C=INVADERNUM IF DETECTED, ELSE Z ) | 28 20 52 45 54 55 52 4e 53 20 4e 5a 2c 20 43 3d 49 4e 56 41 44 45 52 4e 55 4d 20 49 46 20 44 45 54 45 43 54 45 44 2c 20 45 4c 53 45 20 5a 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 F= NORKI | 46 3d 20 4e 4f 52 4b 49 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HEX SUBR RACKCHECK | 41 53 53 45 4d 42 4c 45 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0220 } ( SCORIN ) HEX TABLE ASTBL 60 , 60 , 80 , 100 , 300 , 200 , | 28 20 53 43 4f 52 49 4e 20 29 20 48 45 58 20 54 41 42 4c 45 20 41 53 54 42 4c 20 36 30 20 2c 20 36 30 20 2c 20 38 30 20 2c 20 31 30 30 20 2c 20 33 30 30 20 2c 20 32 30 30 20 2c 20 20 20 20 20 150 , 250 , | 31 35 30 20 2c 20 32 35 30 20 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL DATA EXPISUB ASM EXPLOSION1 SETP 5 SWAIT EXPLOSION2 | 44 45 43 49 4d 41 4c 20 44 41 54 41 20 45 58 50 49 53 55 42 20 41 53 4d 20 45 58 50 4c 4f 53 49 4f 4e 31 20 53 45 54 50 20 35 20 53 57 41 49 54 20 45 58 50 4c 4f 53 49 4f 4e 32 20 20 20 20 20 SETP 5 SWAIT EXPLOSION3 SETP 5 SWAIT EXPLOSION4 SETP 5 SWAIT | 53 45 54 50 20 35 20 53 57 41 49 54 20 45 58 50 4c 4f 53 49 4f 4e 33 20 53 45 54 50 20 35 20 53 57 41 49 54 20 45 58 50 4c 4f 53 49 4f 4e 34 20 53 45 54 50 20 35 20 53 57 41 49 54 20 20 20 20 EXPLOSION5 SETP 5 SWAIT NULPAT SETP ARET | 45 58 50 4c 4f 53 49 4f 4e 35 20 53 45 54 50 20 35 20 53 57 41 49 54 20 4e 55 4c 50 41 54 20 53 45 54 50 20 41 52 45 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA EXPINV ASM EXPISUB ACALL AHALT | 44 41 54 41 20 45 58 50 49 4e 56 20 41 53 4d 20 45 58 50 49 53 55 42 20 41 43 41 4c 4c 20 41 48 41 4c 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA EXPNS ASM EXPISUB ACALL NUMWRITE SETR 1 SWAIT ARET | 44 41 54 41 20 45 58 50 4e 53 20 41 53 4d 20 45 58 50 49 53 55 42 20 41 43 41 4c 4c 20 4e 55 4d 57 52 49 54 45 20 53 45 54 52 20 31 20 53 57 41 49 54 20 41 52 45 54 20 20 20 20 20 20 20 20 20 DATA EXPNF ASM 1 SWAIT HEX BF 40 SETS 1C SWAIT BF 0 SETS AHALT | 44 41 54 41 20 45 58 50 4e 46 20 41 53 4d 20 31 20 53 57 41 49 54 20 48 45 58 20 42 46 20 34 30 20 53 45 54 53 20 31 43 20 53 57 41 49 54 20 42 46 20 30 20 53 45 54 53 20 41 48 41 4c 54 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0221 } ( MORE SCORING GOODIES ) | 28 20 4d 4f 52 45 20 53 43 4f 52 49 4e 47 20 47 4f 4f 44 49 45 53 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA SCR60 ASM EXPNS ACALL 0 ASTBL SETP EXPNF AJMP | 44 41 54 41 20 53 43 52 36 30 20 41 53 4d 20 45 58 50 4e 53 20 41 43 41 4c 4c 20 30 20 41 53 54 42 4c 20 53 45 54 50 20 45 58 50 4e 46 20 41 4a 4d 50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA SCR80 ASM EXPNS ACALL 2 ASTBL SETP EXPNF AJMP | 44 41 54 41 20 53 43 52 38 30 20 41 53 4d 20 45 58 50 4e 53 20 41 43 41 4c 4c 20 32 20 41 53 54 42 4c 20 53 45 54 50 20 45 58 50 4e 46 20 41 4a 4d 50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA SCR100 ASM EXPNS ACALL 3 ASTBL SETP EXPNF AJMP | 44 41 54 41 20 53 43 52 31 30 30 20 41 53 4d 20 45 58 50 4e 53 20 41 43 41 4c 4c 20 33 20 41 53 54 42 4c 20 53 45 54 50 20 45 58 50 4e 46 20 41 4a 4d 50 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA SCR300 ASM EXPNS ACALL 4 ASTBL SETP EXPNF AJMP | 44 41 54 41 20 53 43 52 33 30 30 20 41 53 4d 20 45 58 50 4e 53 20 41 43 41 4c 4c 20 34 20 41 53 54 42 4c 20 53 45 54 50 20 45 58 50 4e 46 20 41 4a 4d 50 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA SCR200 ASM EXPNS ACALL 5 ASTBL SETP EXPNF AJMP | 44 41 54 41 20 53 43 52 32 30 30 20 41 53 4d 20 45 58 50 4e 53 20 41 43 41 4c 4c 20 35 20 41 53 54 42 4c 20 53 45 54 50 20 45 58 50 4e 46 20 41 4a 4d 50 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA SCR150 ASM EXPNS ACALL 6 ASTBL SETP EXPNF AJMP | 44 41 54 41 20 53 43 52 31 35 30 20 41 53 4d 20 45 58 50 4e 53 20 41 43 41 4c 4c 20 36 20 41 53 54 42 4c 20 53 45 54 50 20 45 58 50 4e 46 20 41 4a 4d 50 20 20 20 20 20 20 20 20 20 20 20 20 20 HEX DATA EXPTHEGORF ASM FBEXPSUB ACALL FBEXP5 SETP 40 SWAIT | 48 45 58 20 44 41 54 41 20 45 58 50 54 48 45 47 4f 52 46 20 41 53 4d 20 46 42 45 58 50 53 55 42 20 41 43 41 4c 4c 20 46 42 45 58 50 35 20 53 45 54 50 20 34 30 20 53 57 41 49 54 20 20 20 20 20 A0 SETM 40 SWAIT 20 SETM FBEXP6 SETP 40 SWAIT A0 SETM 40 SWAIT | 41 30 20 53 45 54 4d 20 34 30 20 53 57 41 49 54 20 32 30 20 53 45 54 4d 20 46 42 45 58 50 36 20 53 45 54 50 20 34 30 20 53 57 41 49 54 20 41 30 20 53 45 54 4d 20 34 30 20 53 57 41 49 54 20 20 20 SETM NULPAT SETP NUMWRITE SETR 1 SWAIT 7 ASTBL SETP | 32 30 20 53 45 54 4d 20 4e 55 4c 50 41 54 20 53 45 54 50 20 4e 55 4d 57 52 49 54 45 20 53 45 54 52 20 31 20 53 57 41 49 54 20 37 20 41 53 54 42 4c 20 53 45 54 50 20 20 20 20 20 20 20 20 20 20 EXPNF AJMP | 45 58 50 4e 46 20 41 4a 4d 50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA ATTACKEXPTBL SCR60 , SCR60 , SCR80 , SCR100 , SCR300 , | 44 41 54 41 20 41 54 54 41 43 4b 45 58 50 54 42 4c 20 53 43 52 36 30 20 2c 20 53 43 52 36 30 20 2c 20 53 43 52 38 30 20 2c 20 53 43 52 31 30 30 20 2c 20 53 43 52 33 30 30 20 2c 20 20 20 20 20 SCR200 , SCR150 , EXPTHEGORF , DECIMAL --> | 53 43 52 32 30 30 20 2c 20 53 43 52 31 35 30 20 2c 20 45 58 50 54 48 45 47 4f 52 46 20 2c 20 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0222 } ( BACKGROUND PHASOR INTERCEPT PROCESSING ROUTINES ) | 28 20 42 41 43 4b 47 52 4f 55 4e 44 20 50 48 41 53 4f 52 20 49 4e 54 45 52 43 45 50 54 20 50 52 4f 43 45 53 53 49 4e 47 20 52 4f 55 54 49 4e 45 53 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 ( ROUTINE TO EXPLODE AN INVADER ) | 28 20 52 4f 55 54 49 4e 45 20 54 4f 20 45 58 50 4c 4f 44 45 20 41 4e 20 49 4e 56 41 44 45 52 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HEX SUBR PINTERPROC A DCR, 0=, IF, PINTERN LDA, 7 ANI, RLC, | 48 45 58 20 53 55 42 52 20 50 49 4e 54 45 52 50 52 4f 43 20 41 20 44 43 52 2c 20 30 3d 2c 20 49 46 2c 20 50 49 4e 54 45 52 4e 20 4c 44 41 2c 20 37 20 41 4e 49 2c 20 52 4c 43 2c 20 20 20 20 20 A C MOV, 0 B MVI, ATTACKEXPTBL H LXI, B DAD, M C MOV, H INX, | 41 20 43 20 4d 4f 56 2c 20 30 20 42 20 4d 56 49 2c 20 41 54 54 41 43 4b 45 58 50 54 42 4c 20 48 20 4c 58 49 2c 20 42 20 44 41 44 2c 20 4d 20 43 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 20 20 20 M B MOV, PINTERX LDED, PINTERY LHLD, | 4d 20 42 20 4d 4f 56 2c 20 50 49 4e 54 45 52 58 20 4c 44 45 44 2c 20 50 49 4e 54 45 52 59 20 4c 48 4c 44 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ELSE, PINTERN LDA, A C MOV, | 45 4c 53 45 2c 20 50 49 4e 54 45 52 4e 20 4c 44 41 2c 20 41 20 43 20 4d 4f 56 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DI, XRACKBITS CALL, M XRA, A M MOV, XALIVEBITS CALL, M XRA, | 44 49 2c 20 58 52 41 43 4b 42 49 54 53 20 43 41 4c 4c 2c 20 4d 20 58 52 41 2c 20 41 20 4d 20 4d 4f 56 2c 20 58 41 4c 49 56 45 42 49 54 53 20 43 41 4c 4c 2c 20 4d 20 58 52 41 2c 20 20 20 20 20 A M MOV, EI, B PUSH, TOGGLEMEMBER CALL, B POP, GETASTATE CALL, | 41 20 4d 20 4d 4f 56 2c 20 45 49 2c 20 42 20 50 55 53 48 2c 20 54 4f 47 47 4c 45 4d 45 4d 42 45 52 20 43 41 4c 4c 2c 20 42 20 50 4f 50 2c 20 47 45 54 41 53 54 41 54 45 20 43 41 4c 4c 2c 20 20 EXPINV B LXI, THEN, D PUSH, H PUSH, B PUSH, | 45 58 50 49 4e 56 20 42 20 4c 58 49 2c 20 54 48 45 4e 2c 20 44 20 50 55 53 48 2c 20 48 20 50 55 53 48 2c 20 42 20 50 55 53 48 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 PINTERN LBCD, B PUSH, 6 C BIT, 0=, IF, INVADERSLEFT H LXI, | 50 49 4e 54 45 52 4e 20 4c 42 43 44 2c 20 42 20 50 55 53 48 2c 20 36 20 43 20 42 49 54 2c 20 30 3d 2c 20 49 46 2c 20 49 4e 56 41 44 45 52 53 4c 45 46 54 20 48 20 4c 58 49 2c 20 20 20 20 20 20 M DCR, THEN, 0A2 B LXI, B PUSH, XYVSTART JMP, | 4d 20 44 43 52 2c 20 54 48 45 4e 2c 20 30 41 32 20 42 20 4c 58 49 2c 20 42 20 50 55 53 48 2c 20 58 59 56 53 54 41 52 54 20 4a 4d 50 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( ROUTINE TO CHECK FOR INTERCEPT ) | 28 20 52 4f 55 54 49 4e 45 20 54 4f 20 43 48 45 43 4b 20 46 4f 52 20 49 4e 54 45 52 43 45 50 54 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR PINTERCHECK PINTERFLAG LDA, A ANA, RZ, PINTERPROC CALL, | 53 55 42 52 20 50 49 4e 54 45 52 43 48 45 43 4b 20 50 49 4e 54 45 52 46 4c 41 47 20 4c 44 41 2c 20 41 20 41 4e 41 2c 20 52 5a 2c 20 50 49 4e 54 45 52 50 52 4f 43 20 43 41 4c 4c 2c 20 20 20 20 RELMT CALL, | 52 45 4c 4d 54 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 PINTERFLAG LDED, PINTERN LHLD, A XRA, PINTERFLAG STA, A INR, | 50 49 4e 54 45 52 46 4c 41 47 20 4c 44 45 44 2c 20 50 49 4e 54 45 52 4e 20 4c 48 4c 44 2c 20 41 20 58 52 41 2c 20 50 49 4e 54 45 52 46 4c 41 47 20 53 54 41 2c 20 41 20 49 4e 52 2c 20 20 20 20 RET, DECIMAL --> | 52 45 54 2c 20 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0223 } ( ROUTINE TO CALL FROM SCAN LOOP ) | 28 20 52 4f 55 54 49 4e 45 20 54 4f 20 43 41 4c 4c 20 46 52 4f 4d 20 53 43 41 4e 20 4c 4f 4f 50 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE PIFCHECK .REL X PUSHX, Y PUSHX, EXX, PINTERCHECK CALL, | 43 4f 44 45 20 50 49 46 43 48 45 43 4b 20 2e 52 45 4c 20 58 20 50 55 53 48 58 2c 20 59 20 50 55 53 48 58 2c 20 45 58 58 2c 20 50 49 4e 54 45 52 43 48 45 43 4b 20 43 41 4c 4c 2c 20 20 20 20 20 Y POPX, X POPX, 0<>, IF, H PUSH, D PUSH, 1 H LXI, ELSE, | 59 20 50 4f 50 58 2c 20 58 20 50 4f 50 58 2c 20 30 3c 3e 2c 20 49 46 2c 20 48 20 50 55 53 48 2c 20 44 20 50 55 53 48 2c 20 31 20 48 20 4c 58 49 2c 20 45 4c 53 45 2c 20 20 20 20 20 20 20 20 20 0 H LXI, THEN, H PUSH, EXX, .ABS NEXT | 30 20 48 20 4c 58 49 2c 20 54 48 45 4e 2c 20 48 20 50 55 53 48 2c 20 45 58 58 2c 20 2e 41 42 53 20 4e 45 58 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HEX : PHASORINTERCEPTCHECK PIFCHECK IF 1 = IF 7 AND ASTBL @ ZP | 48 45 58 20 3a 20 50 48 41 53 4f 52 49 4e 54 45 52 43 45 50 54 43 48 45 43 4b 20 50 49 46 43 48 45 43 4b 20 49 46 20 31 20 3d 20 49 46 20 37 20 41 4e 44 20 41 53 54 42 4c 20 40 20 5a 50 20 20 ELSE DROP 50 PZ THEN | 45 4c 53 45 20 44 52 4f 50 20 35 30 20 50 5a 20 54 48 45 4e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 UPDATESCORE THEN BLINK ; | 55 50 44 41 54 45 53 43 4f 52 45 20 54 48 45 4e 20 42 4c 49 4e 4b 20 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 : PWAIT WTIMER ! BEGIN PHASORINTERCEPTCHECK CREDITS? | 3a 20 50 57 41 49 54 20 57 54 49 4d 45 52 20 21 20 42 45 47 49 4e 20 50 48 41 53 4f 52 49 4e 54 45 52 43 45 50 54 43 48 45 43 4b 20 43 52 45 44 49 54 53 3f 20 20 20 20 20 20 20 20 20 20 20 20 EVS WTIMER @ 0= END ; | 45 56 53 20 57 54 49 4d 45 52 20 40 20 30 3d 20 45 4e 44 20 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0224 } ( ANIMATION SUBR TO INITIALIZE THE FIRE BASE ) | 28 20 41 4e 49 4d 41 54 49 4f 4e 20 53 55 42 52 20 54 4f 20 49 4e 49 54 49 41 4c 49 5a 45 20 54 48 45 20 46 49 52 45 20 42 41 53 45 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HEX SUBR FBSETDC | 48 45 58 20 53 55 42 52 20 46 42 53 45 54 44 43 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 H PUSH, 30 D LXI, 100 H LXI, SKILLFACTOR LDA, | 48 20 50 55 53 48 2c 20 33 30 20 44 20 4c 58 49 2c 20 31 30 30 20 48 20 4c 58 49 2c 20 53 4b 49 4c 4c 46 41 43 54 4f 52 20 4c 44 41 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 A ANA, 0<>, IF, 120 H LXI, 36 D LXI, THEN, | 41 20 41 4e 41 2c 20 30 3c 3e 2c 20 49 46 2c 20 31 32 30 20 48 20 4c 58 49 2c 20 33 36 20 44 20 4c 58 49 2c 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 L VDYL X STX, H VDYH X STX, E VDXL X STX, D VDXH X STX, | 4c 20 56 44 59 4c 20 58 20 53 54 58 2c 20 48 20 56 44 59 48 20 58 20 53 54 58 2c 20 45 20 56 44 58 4c 20 58 20 53 54 58 2c 20 44 20 56 44 58 48 20 58 20 53 54 58 2c 20 20 20 20 20 20 20 20 20 H POP, RET, | 48 20 50 4f 50 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HEX DATA FBCOMMON ASM 5700 SETYC 0600 SETXC | 48 45 58 20 44 41 54 41 20 46 42 43 4f 4d 4d 4f 4e 20 41 53 4d 20 35 37 30 30 20 53 45 54 59 43 20 30 36 30 30 20 53 45 54 58 43 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 FOREVER FIREBASE SETP 78 SWAIT EVERFOR | 46 4f 52 45 56 45 52 20 46 49 52 45 42 41 53 45 20 53 45 54 50 20 37 38 20 53 57 41 49 54 20 45 56 45 52 46 4f 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA DEMOANIM ASM XIWRITE SETR EXPLODEFB SETI FBCOMMON AJMP | 44 41 54 41 20 44 45 4d 4f 41 4e 49 4d 20 41 53 4d 20 58 49 57 52 49 54 45 20 53 45 54 52 20 45 58 50 4c 4f 44 45 46 42 20 53 45 54 49 20 46 42 43 4f 4d 4d 4f 4e 20 41 4a 4d 50 20 20 20 20 20 DATA PLAYERANIM ASM JOYWRITE SETR FBSETDC ASMCALL FBCOMMON AJMP | 44 41 54 41 20 50 4c 41 59 45 52 41 4e 49 4d 20 41 53 4d 20 4a 4f 59 57 52 49 54 45 20 53 45 54 52 20 46 42 53 45 54 44 43 20 41 53 4d 43 41 4c 4c 20 46 42 43 4f 4d 4d 4f 4e 20 41 4a 4d 50 20 ( ROUTINE TO ACTIVATE THE FIREBASE ) | 28 20 52 4f 55 54 49 4e 45 20 54 4f 20 41 43 54 49 56 41 54 45 20 54 48 45 20 46 49 52 45 42 41 53 45 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 : ACTFB DEMOMODE B@ IF DEMOANIM 0 0B2 0 FBVECTOR XVSTART | 3a 20 41 43 54 46 42 20 44 45 4d 4f 4d 4f 44 45 20 42 40 20 49 46 20 44 45 4d 4f 41 4e 49 4d 20 30 20 30 42 32 20 30 20 46 42 56 45 43 54 4f 52 20 58 56 53 54 41 52 54 20 20 20 20 20 20 20 20 ELSE FBANIM @ 0 0B2 0 FBVECTOR XVSTART 2 PWAIT THEN ; | 45 4c 53 45 20 46 42 41 4e 49 4d 20 40 20 30 20 30 42 32 20 30 20 46 42 56 45 43 54 4f 52 20 58 56 53 54 41 52 54 20 32 20 50 57 41 49 54 20 54 48 45 4e 20 3b 20 20 20 20 20 20 20 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0225 } ( EXPLODE THE FINAL FIREBASE SOMEWHAT MORE SPECTACULAR ) | 28 20 45 58 50 4c 4f 44 45 20 54 48 45 20 46 49 4e 41 4c 20 46 49 52 45 42 41 53 45 20 53 4f 4d 45 57 48 41 54 20 4d 4f 52 45 20 53 50 45 43 54 41 43 55 4c 41 52 20 29 20 20 20 20 20 20 20 20 HEX | 48 45 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( 0D, 13 ARE VXL AND VYL ) | 28 20 30 44 2c 20 31 33 20 41 52 45 20 56 58 4c 20 41 4e 44 20 56 59 4c 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 : KILLLAST WRTONLY LINIT ! 0D FBVECTOR @ 200 + | 3a 20 4b 49 4c 4c 4c 41 53 54 20 57 52 54 4f 4e 4c 59 20 4c 49 4e 49 54 20 21 20 30 44 20 46 42 56 45 43 54 4f 52 20 40 20 32 30 30 20 2b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 13 FBVECTOR @ 600 + SETLXY | 31 33 20 46 42 56 45 43 54 4f 52 20 40 20 36 30 30 20 2b 20 53 45 54 4c 58 59 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2 2 28 28 SETSF | 32 20 32 20 32 38 20 32 38 20 53 45 54 53 46 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0A0 0 DO UPDATEALL 0 FBVECTOR B@ 0= IF LOCKOUTCOUNTER BONE | 30 41 30 20 30 20 44 4f 20 55 50 44 41 54 45 41 4c 4c 20 30 20 46 42 56 45 43 54 4f 52 20 42 40 20 30 3d 20 49 46 20 4c 4f 43 4b 4f 55 54 43 4f 55 4e 54 45 52 20 42 4f 4e 45 20 20 20 20 20 20 THEN EVS I 40 = IF LBYAK THEN LOOP | 54 48 45 4e 20 45 56 53 20 49 20 34 30 20 3d 20 49 46 20 4c 42 59 41 4b 20 54 48 45 4e 20 4c 4f 4f 50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 LOCKOUTCOUNTER BZERO ; | 4c 4f 43 4b 4f 55 54 43 4f 55 4e 54 45 52 20 42 5a 45 52 4f 20 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0226 } ( CHECK FOR PLAYER HIT ) HEX | 28 20 43 48 45 43 4b 20 46 4f 52 20 50 4c 41 59 45 52 20 48 49 54 20 29 20 48 45 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE ENDCHECK 0 H LXI, INVADERSLEFT LDA, A ANA, 0=, IF, | 43 4f 44 45 20 45 4e 44 43 48 45 43 4b 20 30 20 48 20 4c 58 49 2c 20 49 4e 56 41 44 45 52 53 4c 45 46 54 20 4c 44 41 2c 20 41 20 41 4e 41 2c 20 30 3d 2c 20 49 46 2c 20 20 20 20 20 20 20 20 20 L INR, THEN, COINPORT IN, 14 ANI, 0=, IF, L INR, THEN, | 4c 20 49 4e 52 2c 20 54 48 45 4e 2c 20 43 4f 49 4e 50 4f 52 54 20 49 4e 2c 20 31 34 20 41 4e 49 2c 20 30 3d 2c 20 49 46 2c 20 4c 20 49 4e 52 2c 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 20 H PUSH, NEXT | 48 20 50 55 53 48 2c 20 4e 45 58 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 : PLAYERHITCHECK PLAYERHIT @ IF FBCOUNTER 1-WPB! 1G | 3a 20 50 4c 41 59 45 52 48 49 54 43 48 45 43 4b 20 50 4c 41 59 45 52 48 49 54 20 40 20 49 46 20 46 42 43 4f 55 4e 54 45 52 20 31 2d 57 50 42 21 20 31 47 20 20 20 20 20 20 20 20 20 20 20 20 20 FBCOUNTER B@ 0= IF PHASORINTERCEPTCHECK | 46 42 43 4f 55 4e 54 45 52 20 42 40 20 30 3d 20 49 46 20 50 48 41 53 4f 52 49 4e 54 45 52 43 45 50 54 43 48 45 43 4b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 KILLLAST SHUTUP GAMEOVER BONE ENDOFFRAME BONE | 4b 49 4c 4c 4c 41 53 54 20 53 48 55 54 55 50 20 47 41 4d 45 4f 56 45 52 20 42 4f 4e 45 20 45 4e 44 4f 46 46 52 41 4d 45 20 42 4f 4e 45 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ELSE LOWFLG B@ IF ENDOFFRAME BONE THEN | 45 4c 53 45 20 4c 4f 57 46 4c 47 20 42 40 20 49 46 20 45 4e 44 4f 46 46 52 41 4d 45 20 42 4f 4e 45 20 54 48 45 4e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 8 0 DO 12 PWAIT P1FBCTR B@ IF P2FBCTR B@ IF | 38 20 30 20 44 4f 20 31 32 20 50 57 41 49 54 20 50 31 46 42 43 54 52 20 42 40 20 49 46 20 50 32 46 42 43 54 52 20 42 40 20 49 46 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ENDOFFRAME B@ 0= IF DI 480 0 428 30 ICSPOST EI THEN THEN THEN | 45 4e 44 4f 46 46 52 41 4d 45 20 42 40 20 30 3d 20 49 46 20 44 49 20 34 38 30 20 30 20 34 32 38 20 33 30 20 49 43 53 50 4f 53 54 20 45 49 20 54 48 45 4e 20 54 48 45 4e 20 54 48 45 4e 20 20 20 I 4 = IF HITYAK THEN LOOP WOAFLAG BONE REINIT @ DOIT | 49 20 34 20 3d 20 49 46 20 48 49 54 59 41 4b 20 54 48 45 4e 20 4c 4f 4f 50 20 57 4f 41 46 4c 41 47 20 42 4f 4e 45 20 52 45 49 4e 49 54 20 40 20 44 4f 49 54 20 20 20 20 20 20 20 20 20 20 20 20 WOAFLAG BZERO FBCOUNTER B@ 1- DI FBWRITE PLAYERHIT ZERO EI | 57 4f 41 46 4c 41 47 20 42 5a 45 52 4f 20 46 42 43 4f 55 4e 54 45 52 20 42 40 20 31 2d 20 44 49 20 46 42 57 52 49 54 45 20 50 4c 41 59 45 52 48 49 54 20 5a 45 52 4f 20 45 49 20 20 20 20 20 20 INVADERSLEFT @ IF MISSION B@ 1 <> IF 40 ATTACKTIMER ! THEN | 49 4e 56 41 44 45 52 53 4c 45 46 54 20 40 20 49 46 20 4d 49 53 53 49 4f 4e 20 42 40 20 31 20 3c 3e 20 49 46 20 34 30 20 41 54 54 41 43 4b 54 49 4d 45 52 20 21 20 54 48 45 4e 20 20 20 20 20 20 ELSE ENDOFFRAME BONE THEN | 45 4c 53 45 20 45 4e 44 4f 46 46 52 41 4d 45 20 42 4f 4e 45 20 54 48 45 4e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ACTFB THEN ELSE ENDCHECK IF ENDOFFRAME BONE TO | 41 43 54 46 42 20 54 48 45 4e 20 45 4c 53 45 20 45 4e 44 43 48 45 43 4b 20 49 46 20 45 4e 44 4f 46 46 52 41 4d 45 20 42 4f 4e 45 20 54 4f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 30 PWAIT THEN THEN ; DECIMAL --> | 33 30 20 50 57 41 49 54 20 54 48 45 4e 20 54 48 45 4e 20 3b 20 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0227 } ( REPAINTRACK AND INITMISSIONRAM ) | 28 20 52 45 50 41 49 4e 54 52 41 43 4b 20 41 4e 44 20 49 4e 49 54 4d 49 53 53 49 4f 4e 52 41 4d 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE NULCODE NEXT | 43 4f 44 45 20 4e 55 4c 43 4f 44 45 20 4e 45 58 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 : REPAINTRACK 64 0 DO I REWRITER LOOP ; | 3a 20 52 45 50 41 49 4e 54 52 41 43 4b 20 36 34 20 30 20 44 4f 20 49 20 52 45 57 52 49 54 45 52 20 4c 4f 4f 50 20 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HEX CODE FASTZAP EXX, 3 B MVI, 1STFASTADDR D LXI, BEGIN, | 48 45 58 20 43 4f 44 45 20 46 41 53 54 5a 41 50 20 45 58 58 2c 20 33 20 42 20 4d 56 49 2c 20 31 53 54 46 41 53 54 41 44 44 52 20 44 20 4c 58 49 2c 20 42 45 47 49 4e 2c 20 20 20 20 20 20 20 20 clear1k CALL, D A MOV, 4 ADI, A D MOV, LOOP, EXX, NEXT | 63 6c 65 61 72 31 6b 20 43 41 4c 4c 2c 20 44 20 41 20 4d 4f 56 2c 20 34 20 41 44 49 2c 20 41 20 44 20 4d 4f 56 2c 20 4c 4f 4f 50 2c 20 45 58 58 2c 20 4e 45 58 54 20 20 20 20 20 20 20 20 20 20 : SETLINKS 0C3 0 rellink B! | 3a 20 53 45 54 4c 49 4e 4b 53 20 30 43 33 20 30 20 72 65 6c 6c 69 6e 6b 20 42 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0C3 0 fflink B! COCKTAIL B@ IF cockrel 1 rellink ! | 30 43 33 20 30 20 66 66 6c 69 6e 6b 20 42 21 20 43 4f 43 4b 54 41 49 4c 20 42 40 20 49 46 20 63 6f 63 6b 72 65 6c 20 31 20 72 65 6c 6c 69 6e 6b 20 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 cockff 1 fflink ! ELSE | 63 6f 63 6b 66 66 20 31 20 66 66 6c 69 6e 6b 20 21 20 45 4c 53 45 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 norrel 1 rellink ! ffnorrel 1 fflink ! THEN ; | 6e 6f 72 72 65 6c 20 31 20 72 65 6c 6c 69 6e 6b 20 21 20 66 66 6e 6f 72 72 65 6c 20 31 20 66 66 6c 69 6e 6b 20 21 20 54 48 45 4e 20 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 : INITMISSIONRAM XDI GRAPHICS SETLINKS | 3a 20 49 4e 49 54 4d 49 53 53 49 4f 4e 52 41 4d 20 58 44 49 20 47 52 41 50 48 49 43 53 20 53 45 54 4c 49 4e 4b 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 1STCLRADDR SLOWCLRSIZE FILL FASTZAP 0 TIMER0 8 FILL | 30 20 31 53 54 43 4c 52 41 44 44 52 20 53 4c 4f 57 43 4c 52 53 49 5a 45 20 46 49 4c 4c 20 46 41 53 54 5a 41 50 20 30 20 54 49 4d 45 52 30 20 38 20 46 49 4c 4c 20 20 20 20 20 20 20 20 20 20 20 SKILLFACTOR B@ HARDNESS B! | 53 4b 49 4c 4c 46 41 43 54 4f 52 20 42 40 20 48 41 52 44 4e 45 53 53 20 42 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 04B0 GAMTMR ! | 30 34 42 30 20 47 41 4d 54 4d 52 20 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 GOYFLAG BZERO ' SHUTUP REINIT ! NULRET FIREACTION ! ; | 47 4f 59 46 4c 41 47 20 42 5a 45 52 4f 20 27 20 53 48 55 54 55 50 20 52 45 49 4e 49 54 20 21 20 4e 55 4c 52 45 54 20 46 49 52 45 41 43 54 49 4f 4e 20 21 20 3b 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0228 } ( STARTGAME INITIALIZER ) ?@ | 28 20 53 54 41 52 54 47 41 4d 45 20 49 4e 49 54 49 41 4c 49 5a 45 52 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3f 40 7f 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 h MQ IQ j) R* z z ) R* {44uH? | e8 81 4d 51 05 49 51 1d 05 6a 29 03 81 8b 99 02 d2 2a 92 7a 9a 1a 7a 92 29 03 81 93 99 02 d2 2a 92 7b 34 34 f5 48 bf 08 08 08 08 08 08 08 08 08 08 08 08 08 08 08 08 08 08 08 08 08 08 08 08 0c UU V H UU VH H RTTRSS U +(!''" | 8e 0c 0c 08 13 55 55 12 10 56 08 08 48 0d 8d 0c 0c 08 13 55 55 12 10 56 48 08 48 13 52 54 d4 d2 53 d3 90 d5 17 10 2b a8 21 27 a7 22 90 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 19 ( #!!*) +(! (& ,")*( +(!-")' N | 10 28 18 a3 21 21 aa 29 10 2b a8 21 10 90 28 26 20 ac a2 a9 2a a8 10 2b a8 21 2d 22 a9 27 90 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 1f 20 4e PLAYERS WPBZE @M!UQU@ M | 50 4c 41 59 45 52 53 20 57 50 42 5a 45 7f 9e 40 4d 21 55 51 55 40 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 81 4d -%11 Q=H ]A i I< l | 2d 25 31 31 19 05 0d 51 3d 48 81 5d 41 09 69 15 49 3c 80 ec 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 a0 ] %P Q! II%Y 0 = Q! Y IQ% 0 %9Q IY 0 $ ! | 81 05 5d 05 25 50 81 51 21 14 81 05 49 49 25 59 05 30 81 3d 18 81 51 21 14 81 59 15 49 51 25 0d 05 30 81 25 39 51 15 49 59 05 30 80 a4 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 81 21 ` t ]Y%0 = ]Y$ q MM 5 1 | 15 60 81 18 f4 81 5d 59 25 30 81 0d 3d 11 14 81 5d 59 24 80 f1 05 4d 4d 15 35 09 31 14 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 81 11 $0 DD 5Y$0 %95= =UP0 Y | 24 b0 80 c4 c4 81 04 81 35 59 24 b0 81 25 39 35 3d 10 81 3d 55 50 b0 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 81 59 I %80 5=X0 1 | 15 49 05 18 81 25 38 b0 81 04 81 14 81 35 3d 58 b0 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 81 31 0 ]Y%0 Y I %80 5@0 ]Y%0 )h0 A @ A$0 ]Y%0 ) 0 A | 05 09 15 30 81 5d 59 25 30 81 59 15 49 05 18 81 25 38 b0 81 14 81 0d 35 40 b0 81 5d 59 25 30 81 29 68 b0 80 c1 10 c0 81 0d 41 24 b0 81 5d 59 25 30 81 29 0c b0 80 80 80 80 80 80 80 80 80 80 c1 @ A$0 ]Y%0 )9 0 ` | 14 c0 81 0d 41 24 b0 81 5d 59 25 30 81 29 39 0c b0 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 e0 5Y$0 %95= =UP0 9 | 81 04 81 35 59 24 b0 81 25 39 35 3d 10 81 3d 55 50 b0 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 81 39 aP MM 5 1 x | 15 61 50 81 05 4d 4d 15 35 09 31 14 f8 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 81 11 %5 0 44x | 15 0d 25 35 05 30 80 b4 b4 f8 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 > | 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 80 3e { BLOCK 0229 } ( NEW COLOR ROUTINES ) | 28 20 4e 45 57 20 43 4f 4c 4f 52 20 52 4f 55 54 49 4e 45 53 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HEX 8 BA= COLTBL 0 V= TARGETCT | 48 45 58 20 38 20 42 41 3d 20 43 4f 4c 54 42 4c 20 30 20 56 3d 20 54 41 52 47 45 54 43 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE MAKECOLS EXX, B POP, 0 COLTBL H LXI, TARGETCT LDED, | 43 4f 44 45 20 4d 41 4b 45 43 4f 4c 53 20 45 58 58 2c 20 42 20 50 4f 50 2c 20 30 20 43 4f 4c 54 42 4c 20 48 20 4c 58 49 2c 20 54 41 52 47 45 54 43 54 20 4c 44 45 44 2c 20 20 20 20 20 20 20 20 8 B MVI, BEGIN, D LDAX, F8 ANI, C ORA, A M MOV, H INX, | 38 20 42 20 4d 56 49 2c 20 42 45 47 49 4e 2c 20 44 20 4c 44 41 58 2c 20 46 38 20 41 4e 49 2c 20 43 20 4f 52 41 2c 20 41 20 4d 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 20 20 20 20 20 20 20 20 20 D INX, LOOP, EXX, NEXT | 44 20 49 4e 58 2c 20 4c 4f 4f 50 2c 20 45 58 58 2c 20 4e 45 58 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE APPROACHL EXX, B POP, 0 COLTBL H LXI, 0 E MVI, 8 B MVI, | 43 4f 44 45 20 41 50 50 52 4f 41 43 48 4c 20 45 58 58 2c 20 42 20 50 4f 50 2c 20 30 20 43 4f 4c 54 42 4c 20 48 20 4c 58 49 2c 20 30 20 45 20 4d 56 49 2c 20 38 20 42 20 4d 56 49 2c 20 20 20 20 BEGIN, M A MOV, 7 ANI, C CMP, 0<>, IF, | 42 45 47 49 4e 2c 20 4d 20 41 20 4d 4f 56 2c 20 37 20 41 4e 49 2c 20 43 20 43 4d 50 2c 20 30 3c 3e 2c 20 49 46 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 C A MOV, A ANA, 0=, IF, M DCR, ELSE, M INR, THEN, E INR, | 43 20 41 20 4d 4f 56 2c 20 41 20 41 4e 41 2c 20 30 3d 2c 20 49 46 2c 20 4d 20 44 43 52 2c 20 45 4c 53 45 2c 20 4d 20 49 4e 52 2c 20 54 48 45 4e 2c 20 45 20 49 4e 52 2c 20 20 20 20 20 20 20 20 THEN, H INX, LOOP, 0 H LXI, E A MOV, A ANA, 0=, IF, H INX, | 54 48 45 4e 2c 20 48 20 49 4e 58 2c 20 4c 4f 4f 50 2c 20 30 20 48 20 4c 58 49 2c 20 45 20 41 20 4d 4f 56 2c 20 41 20 41 4e 41 2c 20 30 3d 2c 20 49 46 2c 20 48 20 49 4e 58 2c 20 20 20 20 20 20 THEN, H PUSH, EXX, NEXT | 54 48 45 4e 2c 20 48 20 50 55 53 48 2c 20 45 58 58 2c 20 4e 45 58 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE APPROACHC EXX, 0 COLTBL H LXI, TARGETCT LDED, 800 B LXI, | 43 4f 44 45 20 41 50 50 52 4f 41 43 48 43 20 45 58 58 2c 20 30 20 43 4f 4c 54 42 4c 20 48 20 4c 58 49 2c 20 54 41 52 47 45 54 43 54 20 4c 44 45 44 2c 20 38 30 30 20 42 20 4c 58 49 2c 20 20 20 BEGIN, D LDAX, M CMP, 0<>, IF, CY, IF, M DCR, ELSE, M INR, | 42 45 47 49 4e 2c 20 44 20 4c 44 41 58 2c 20 4d 20 43 4d 50 2c 20 30 3c 3e 2c 20 49 46 2c 20 43 59 2c 20 49 46 2c 20 4d 20 44 43 52 2c 20 45 4c 53 45 2c 20 4d 20 49 4e 52 2c 20 20 20 20 20 20 THEN, C INR, THEN, H INX, D INX, LOOP, | 54 48 45 4e 2c 20 43 20 49 4e 52 2c 20 54 48 45 4e 2c 20 48 20 49 4e 58 2c 20 44 20 49 4e 58 2c 20 4c 4f 4f 50 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 H LXI, C A MOV, A ANA, 0=, IF, H INX, THEN, H PUSH, EXX, NEXT | 30 20 48 20 4c 58 49 2c 20 43 20 41 20 4d 4f 56 2c 20 41 20 41 4e 41 2c 20 30 3d 2c 20 49 46 2c 20 48 20 49 4e 58 2c 20 54 48 45 4e 2c 20 48 20 50 55 53 48 2c 20 45 58 58 2c 20 4e 45 58 54 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0230 } ( FADE UP/DOWN ROUTINES ) | 28 20 46 41 44 45 20 55 50 2f 44 4f 57 4e 20 52 4f 55 54 49 4e 45 53 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 F= STL | 46 3d 20 53 54 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE STARZ | 45 20 41 20 4d 4f 56 2c 20 32 20 53 55 49 2c 20 41 20 45 20 4d 4f 56 2c 20 32 20 43 50 49 2c 20 53 54 4c 20 4a 52 4e 5a 2c 20 45 58 58 2c 20 4e 45 58 54 20 41 53 53 45 4d 42 4c 45 3e 20 20 20 0 V= CWTMR | 30 20 56 3d 20 43 57 54 4d 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 : DC 0 COLTBL WVI COLOR EI ; | 3a 20 44 43 20 30 20 43 4f 4c 54 42 4c 20 57 56 49 20 43 4f 4c 4f 52 20 45 49 20 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 : CWAIT CWTMR @ PWAIT ; : SCT CWTMR ! ; | 3a 20 43 57 41 49 54 20 43 57 54 4d 52 20 40 20 50 57 41 49 54 20 3b 20 3a 20 53 43 54 20 43 57 54 4d 52 20 21 20 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 : STC TARGETCT ! ; | 3a 20 53 54 43 20 54 41 52 47 45 54 43 54 20 21 20 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 : SC STC 8 0 DO I TARGETCT @ + B@ I COLTBL B! LOOP DC ; | 3a 20 53 43 20 53 54 43 20 38 20 30 20 44 4f 20 49 20 54 41 52 47 45 54 43 54 20 40 20 2b 20 42 40 20 49 20 43 4f 4c 54 42 4c 20 42 21 20 4c 4f 4f 50 20 44 43 20 3b 20 20 20 20 20 20 20 20 20 : FUC STC SCT 0 FLOOD STARZ CWAIT 0 MAKECOLS DC CWAIT | 3a 20 46 55 43 20 53 54 43 20 53 43 54 20 30 20 46 4c 4f 4f 44 20 53 54 41 52 5a 20 43 57 41 49 54 20 30 20 4d 41 4b 45 43 4f 4c 53 20 44 43 20 43 57 41 49 54 20 20 20 20 20 20 20 20 20 20 20 BEGIN APPROACHC DC CWAIT END ; | 42 45 47 49 4e 20 41 50 50 52 4f 41 43 48 43 20 44 43 20 43 57 41 49 54 20 45 4e 44 20 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 : FDB SCT BEGIN 0 APPROACHL DC CWAIT END 0 WVI FLOOD | 3a 20 46 44 42 20 53 43 54 20 42 45 47 49 4e 20 30 20 41 50 50 52 4f 41 43 48 4c 20 44 43 20 43 57 41 49 54 20 45 4e 44 20 30 20 57 56 49 20 46 4c 4f 4f 44 20 20 20 20 20 20 20 20 20 20 20 20 0 STARZ EI ; | 30 20 53 54 41 52 5a 20 45 49 20 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0231 } ( FORCE FIELD DRAWER ) DECIMAL | 28 20 46 4f 52 43 45 20 46 49 45 4c 44 20 44 52 41 57 45 52 20 29 20 44 45 43 49 4d 41 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 TIMER2 C= FFTIMER F= FFLOOP F= FFCOCK | 54 49 4d 45 52 32 20 43 3d 20 46 46 54 49 4d 45 52 20 46 3d 20 46 46 4c 4f 4f 50 20 46 3d 20 46 46 43 4f 43 4b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 193 BARRAY FIELDADR 0 V= FFBIAS 0 V= FFLAG | 31 39 33 20 42 41 52 52 41 59 20 46 49 45 4c 44 41 44 52 20 30 20 56 3d 20 46 46 42 49 41 53 20 30 20 56 3d 20 46 46 4c 41 47 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HEX SUBR FIELDRAW , IF, | 43 4f 43 4b 54 41 49 4c 20 4c 44 41 2c 20 41 20 41 4e 41 2c 20 30 3c 3e 2c 20 49 46 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3FBF H LXI, FFBIAS LDED, A ANA, D DSBC, H PUSH, | 33 46 42 46 20 48 20 4c 58 49 2c 20 46 46 42 49 41 53 20 4c 44 45 44 2c 20 41 20 41 4e 41 2c 20 44 20 44 53 42 43 2c 20 48 20 50 55 53 48 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 FIELDADR H LXI, | 30 20 46 49 45 4c 44 41 44 52 20 48 20 4c 58 49 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 LABEL FFCOCK M A MOV, A ANA, XTHL, 0<>, IF, A C MOV, | 4c 41 42 45 4c 20 46 46 43 4f 43 4b 20 4d 20 41 20 4d 4f 56 2c 20 41 20 41 4e 41 2c 20 58 54 48 4c 2c 20 30 3c 3e 2c 20 49 46 2c 20 41 20 43 20 4d 4f 56 2c 20 20 20 20 20 20 20 20 20 20 20 20 3 ANI, 60 ORI, MAGIC OUT, C A MOV, RRC, RRC, 3F ANI, | 33 20 41 4e 49 2c 20 36 30 20 4f 52 49 2c 20 4d 41 47 49 43 20 4f 55 54 2c 20 43 20 41 20 4d 4f 56 2c 20 52 52 43 2c 20 52 52 43 2c 20 33 46 20 41 4e 49 2c 20 20 20 20 20 20 20 20 20 20 20 20 A E MOV, 0 D MVI, H PUSH, D DSBC, 0FF M MVI, | 41 20 45 20 4d 4f 56 2c 20 30 20 44 20 4d 56 49 2c 20 48 20 50 55 53 48 2c 20 44 20 44 53 42 43 2c 20 30 46 46 20 4d 20 4d 56 49 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 H DCX, 0 M MVI, H POP, THEN, | 48 20 44 43 58 2c 20 30 20 4d 20 4d 56 49 2c 20 48 20 50 4f 50 2c 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 -50 D LXI, D DAD, XTHL, H INX, FFCOCK DJNZ, H POP, | 2d 35 30 20 44 20 4c 58 49 2c 20 44 20 44 41 44 2c 20 58 54 48 4c 2c 20 48 20 49 4e 58 2c 20 46 46 43 4f 43 4b 20 44 4a 4e 5a 2c 20 48 20 50 4f 50 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0232 } ( MORE FORCE FIELD DRAWER ) | 28 20 4d 4f 52 45 20 46 4f 52 43 45 20 46 49 45 4c 44 20 44 52 41 57 45 52 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ELSE, | 45 4c 53 45 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 FFBIAS LHLD, H PUSH, 0 FIELDADR H LXI, | 46 46 42 49 41 53 20 4c 48 4c 44 2c 20 48 20 50 55 53 48 2c 20 30 20 46 49 45 4c 44 41 44 52 20 48 20 4c 58 49 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 LABEL FFLOOP M A MOV, A ANA, XTHL, 0<>, IF, A C MOV, | 4c 41 42 45 4c 20 46 46 4c 4f 4f 50 20 4d 20 41 20 4d 4f 56 2c 20 41 20 41 4e 41 2c 20 58 54 48 4c 2c 20 30 3c 3e 2c 20 49 46 2c 20 41 20 43 20 4d 4f 56 2c 20 20 20 20 20 20 20 20 20 20 20 20 3 ANI, 20 ORI, MAGIC OUT, C A MOV, XCHG, RRC, RRC, 3F ANI, | 33 20 41 4e 49 2c 20 32 30 20 4f 52 49 2c 20 4d 41 47 49 43 20 4f 55 54 2c 20 43 20 41 20 4d 4f 56 2c 20 58 43 48 47 2c 20 52 52 43 2c 20 52 52 43 2c 20 33 46 20 41 4e 49 2c 20 20 20 20 20 20 A L MOV, 0 H MVI, D DAD, FF M MVI, H INX, 0 M MVI, XCHG, THEN, | 41 20 4c 20 4d 4f 56 2c 20 30 20 48 20 4d 56 49 2c 20 44 20 44 41 44 2c 20 46 46 20 4d 20 4d 56 49 2c 20 48 20 49 4e 58 2c 20 30 20 4d 20 4d 56 49 2c 20 58 43 48 47 2c 20 54 48 45 4e 2c 20 20 50 D LXI, D DAD, XTHL, H INX, FFLOOP DJNZ, H POP, THEN, RET, | 35 30 20 44 20 4c 58 49 2c 20 44 20 44 41 44 2c 20 58 54 48 4c 2c 20 48 20 49 4e 58 2c 20 46 46 4c 4f 4f 50 20 44 4a 4e 5a 2c 20 48 20 50 4f 50 2c 20 54 48 45 4e 2c 20 52 45 54 2c 20 20 20 20 ASSEMBLE> | 41 53 53 45 4d 42 4c 45 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HEX DATA CKSM4 F0 B, | 48 45 58 20 44 41 54 41 20 43 4b 53 4d 34 20 46 30 20 42 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0233 } ( FASTER FORCE FIELD INITIALIZER ) | 28 20 46 41 53 54 45 52 20 46 4f 52 43 45 20 46 49 45 4c 44 20 49 4e 49 54 49 41 4c 49 5a 45 52 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE INITFF EXX, B POP, 0 D LXI, 25600 H LXI, | 43 4f 44 45 20 49 4e 49 54 46 46 20 45 58 58 2c 20 42 20 50 4f 50 2c 20 30 20 44 20 4c 58 49 2c 20 32 35 36 30 30 20 48 20 4c 58 49 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 EXX, B PUSH, 97 B MVI, 95 FIELDADR D LXI, | 45 58 58 2c 20 42 20 50 55 53 48 2c 20 39 37 20 42 20 4d 56 49 2c 20 39 35 20 46 49 45 4c 44 41 44 52 20 44 20 4c 58 49 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 96 FIELDADR H LXI, | 39 36 20 46 49 45 4c 44 41 44 52 20 48 20 4c 58 49 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 BEGIN, EXX, XCHG, B DAD, XCHG, D DAD, H A MOV, | 42 45 47 49 4e 2c 20 45 58 58 2c 20 58 43 48 47 2c 20 42 20 44 41 44 2c 20 58 43 48 47 2c 20 44 20 44 41 44 2c 20 48 20 41 20 4d 4f 56 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 EXX, A M MOV, H DCX, D STAX, D INX, LOOP, | 45 58 58 2c 20 41 20 4d 20 4d 4f 56 2c 20 48 20 44 43 58 2c 20 44 20 53 54 41 58 2c 20 44 20 49 4e 58 2c 20 4c 4f 4f 50 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 B POP, NEXT | 42 20 50 4f 50 2c 20 4e 45 58 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( MORE FORCE FIELD GOODIES ) | 28 20 4d 4f 52 45 20 46 4f 52 43 45 20 46 49 45 4c 44 20 47 4f 4f 44 49 45 53 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE DRAWFF B PUSH, FFLAG LDA, A ANA, 0=, IF, FFTIMER LDA, | 43 4f 44 45 20 44 52 41 57 46 46 20 42 20 50 55 53 48 2c 20 46 46 4c 41 47 20 4c 44 41 2c 20 41 20 41 4e 41 2c 20 30 3d 2c 20 49 46 2c 20 46 46 54 49 4d 45 52 20 4c 44 41 2c 20 20 20 20 20 20 A ANA, 0=, IF, DI, A INR, FFLAG STA, FIELDRAW CALL, EI, | 41 20 41 4e 41 2c 20 30 3d 2c 20 49 46 2c 20 44 49 2c 20 41 20 49 4e 52 2c 20 46 46 4c 41 47 20 53 54 41 2c 20 46 49 45 4c 44 52 41 57 20 43 41 4c 4c 2c 20 45 49 2c 20 20 20 20 20 20 20 20 20 THEN, THEN, B POP, NEXT | 54 48 45 4e 2c 20 54 48 45 4e 2c 20 42 20 50 4f 50 2c 20 4e 45 58 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE ERASEFF B PUSH, FFLAG LDA, A ANA, 0<>, IF, DI, A XRA, | 43 4f 44 45 20 45 52 41 53 45 46 46 20 42 20 50 55 53 48 2c 20 46 46 4c 41 47 20 4c 44 41 2c 20 41 20 41 4e 41 2c 20 30 3c 3e 2c 20 49 46 2c 20 44 49 2c 20 41 20 58 52 41 2c 20 20 20 20 20 20 FFLAG STA, FIELDRAW CALL, EI, THEN, B POP, NEXT | 46 46 4c 41 47 20 53 54 41 2c 20 46 49 45 4c 44 52 41 57 20 43 41 4c 4c 2c 20 45 49 2c 20 54 48 45 4e 2c 20 42 20 50 4f 50 2c 20 4e 45 58 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0234 } ( CHECK FOR FORCE FIELD INTERCEPT ) HEX | 28 20 43 48 45 43 4b 20 46 4f 52 20 46 4f 52 43 45 20 46 49 45 4c 44 20 49 4e 54 45 52 43 45 50 54 20 29 20 48 45 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 F= FFSL F= FFOK F= FFZL F= NOFF | 46 3d 20 46 46 53 4c 20 46 3d 20 46 46 4f 4b 20 46 3d 20 46 46 5a 4c 20 46 3d 20 4e 4f 46 46 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR FFCHECK | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0235 } ( FORCE FIELD INTERCEPT CHECKER CONTINUED ) | 28 20 46 4f 52 43 45 20 46 49 45 4c 44 20 49 4e 54 45 52 43 45 50 54 20 43 48 45 43 4b 45 52 20 43 4f 4e 54 49 4e 55 45 44 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 5 B MVI, | 35 20 42 20 4d 56 49 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 LABEL FFZL XTHL, M A MOV, A ANA, 0<>, IF, | 4c 41 42 45 4c 20 46 46 5a 4c 20 58 54 48 4c 2c 20 4d 20 41 20 4d 4f 56 2c 20 41 20 41 4e 41 2c 20 30 3c 3e 2c 20 49 46 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 M MVI, H INX, XTHL, A C MOV, RRC, RRC, | 30 20 4d 20 4d 56 49 2c 20 48 20 49 4e 58 2c 20 58 54 48 4c 2c 20 41 20 43 20 4d 4f 56 2c 20 52 52 43 2c 20 52 52 43 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3F ANI, A E MOV, 0 D MVI, XCHG, D DAD, | 33 46 20 41 4e 49 2c 20 41 20 45 20 4d 4f 56 2c 20 30 20 44 20 4d 56 49 2c 20 58 43 48 47 2c 20 44 20 44 41 44 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 COCKTAIL LDA, A ANA, C A MOV, 0=, IF, 3 ANI, 20 ORI, MAGIC OUT, | 43 4f 43 4b 54 41 49 4c 20 4c 44 41 2c 20 41 20 41 4e 41 2c 20 43 20 41 20 4d 4f 56 2c 20 30 3d 2c 20 49 46 2c 20 33 20 41 4e 49 2c 20 32 30 20 4f 52 49 2c 20 4d 41 47 49 43 20 4f 55 54 2c 20 0FF M MVI, H INX, 0 M MVI, XCHG, ELSE, 3 ANI, 60 ORI, | 30 46 46 20 4d 20 4d 56 49 2c 20 48 20 49 4e 58 2c 20 30 20 4d 20 4d 56 49 2c 20 58 43 48 47 2c 20 45 4c 53 45 2c 20 33 20 41 4e 49 2c 20 36 30 20 4f 52 49 2c 20 20 20 20 20 20 20 20 20 20 20 MAGIC OUT, D PUSH, XCHG, 3FBF H LXI, A ANA, D DSBC, | 4d 41 47 49 43 20 4f 55 54 2c 20 44 20 50 55 53 48 2c 20 58 43 48 47 2c 20 33 46 42 46 20 48 20 4c 58 49 2c 20 41 20 41 4e 41 2c 20 44 20 44 53 42 43 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 0FF M MVI, H DCX, 0 M MVI, H POP, THEN, | 30 46 46 20 4d 20 4d 56 49 2c 20 48 20 44 43 58 2c 20 30 20 4d 20 4d 56 49 2c 20 48 20 50 4f 50 2c 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ELSE, H INX, XTHL, THEN, | 45 4c 53 45 2c 20 48 20 49 4e 58 2c 20 58 54 48 4c 2c 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 D LXI, D DAD, FFZL DJNZ, | 35 30 20 44 20 4c 58 49 2c 20 44 20 44 41 44 2c 20 46 46 5a 4c 20 44 4a 4e 5a 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 H POP, 1 A MVI, A ANA, RET, | 48 20 50 4f 50 2c 20 31 20 41 20 4d 56 49 2c 20 41 20 41 4e 41 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 LABEL NOFF A XRA, RET, | 4c 41 42 45 4c 20 4e 4f 46 46 20 41 20 58 52 41 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ASSEMBLE> | 41 53 53 45 4d 42 4c 45 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0236 } ( CHECK FOR INTERCEPT WITH ANY OF THE ATTACKERS ) | 28 20 43 48 45 43 4b 20 46 4f 52 20 49 4e 54 45 52 43 45 50 54 20 57 49 54 48 20 41 4e 59 20 4f 46 20 54 48 45 20 41 54 54 41 43 4b 45 52 53 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 F= CNH | 46 3d 20 43 4e 48 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR CKATRS | 41 53 53 45 4d 42 4c 45 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0237 } ( POSITION OBJECT RELATIVE TO FORMATION LEADER ) | 28 20 50 4f 53 49 54 49 4f 4e 20 4f 42 4a 45 43 54 20 52 45 4c 41 54 49 56 45 20 54 4f 20 46 4f 52 4d 41 54 49 4f 4e 20 4c 45 41 44 45 52 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR POSREL VFVPL X L LDX, VFVPH X H LDX, H PUSH, Y POPX, | 53 55 42 52 20 50 4f 53 52 45 4c 20 56 46 56 50 4c 20 58 20 4c 20 4c 44 58 2c 20 56 46 56 50 48 20 58 20 48 20 4c 44 58 2c 20 48 20 50 55 53 48 2c 20 59 20 50 4f 50 58 2c 20 20 20 20 20 20 20 VFXBL X L LDX, VFXBH X H LDX, VXL Y E LDX, VXH Y D LDX, | 56 46 58 42 4c 20 58 20 4c 20 4c 44 58 2c 20 56 46 58 42 48 20 58 20 48 20 4c 44 58 2c 20 56 58 4c 20 59 20 45 20 4c 44 58 2c 20 56 58 48 20 59 20 44 20 4c 44 58 2c 20 20 20 20 20 20 20 20 20 D DAD, L VXL X STX, H VXH X STX, | 44 20 44 41 44 2c 20 4c 20 56 58 4c 20 58 20 53 54 58 2c 20 48 20 56 58 48 20 58 20 53 54 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 VFYBL X L LDX, VFYBH X H LDX, VYL Y E LDX, VYH Y D LDX, | 56 46 59 42 4c 20 58 20 4c 20 4c 44 58 2c 20 56 46 59 42 48 20 58 20 48 20 4c 44 58 2c 20 56 59 4c 20 59 20 45 20 4c 44 58 2c 20 56 59 48 20 59 20 44 20 4c 44 58 2c 20 20 20 20 20 20 20 20 20 D DAD, L VYL X STX, H VYH X STX, RET, | 44 20 44 41 44 2c 20 4c 20 56 59 4c 20 58 20 53 54 58 2c 20 48 20 56 59 48 20 58 20 53 54 58 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( INTERRUPT ROUTINE TO WRITE RELATIVE FORMATION MEMBER ) | 28 20 49 4e 54 45 52 52 55 50 54 20 52 4f 55 54 49 4e 45 20 54 4f 20 57 52 49 54 45 20 52 45 4c 41 54 49 56 45 20 46 4f 52 4d 41 54 49 4f 4e 20 4d 45 4d 42 45 52 20 29 20 20 20 20 20 20 20 20 SUBR FWRITE TBCALC CALL, | 53 55 42 52 20 46 57 52 49 54 45 20 54 42 43 41 4c 43 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 PQSDE PQS X BITX, 0=, IF, verase CALL, ELSE, PQSDE PQS X RESX, | 50 51 53 44 45 20 50 51 53 20 58 20 42 49 54 58 2c 20 30 3d 2c 20 49 46 2c 20 76 65 72 61 73 65 20 43 41 4c 4c 2c 20 45 4c 53 45 2c 20 50 51 53 44 45 20 50 51 53 20 58 20 52 45 53 58 2c 20 20 THEN, aup CALL, POSREL CALL, | 54 48 45 4e 2c 20 61 75 70 20 43 41 4c 4c 2c 20 50 4f 53 52 45 4c 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 PQSDW PQS X BITX, 0=, IF, vwrite CALL, ELSE, PQSDW PQS X RESX, | 50 51 53 44 57 20 50 51 53 20 58 20 42 49 54 58 2c 20 30 3d 2c 20 49 46 2c 20 76 77 72 69 74 65 20 43 41 4c 4c 2c 20 45 4c 53 45 2c 20 50 51 53 44 57 20 50 51 53 20 58 20 52 45 53 58 2c 20 20 PQSDE PQS X SETX, THEN, KILLOFF JMP, | 50 51 53 44 45 20 50 51 53 20 58 20 53 45 54 58 2c 20 54 48 45 4e 2c 20 4b 49 4c 4c 4f 46 46 20 4a 4d 50 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0238 } ( LEADER X Y ANIMATION TIME STATUS VECTOR FSTART ) | 28 20 4c 45 41 44 45 52 20 58 20 59 20 41 4e 49 4d 41 54 49 4f 4e 20 54 49 4d 45 20 53 54 41 54 55 53 20 56 45 43 54 4f 52 20 46 53 54 41 52 54 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE FSTART X PUSHX, H POP, Y PUSHX, D POP, EXX, | 43 4f 44 45 20 46 53 54 41 52 54 20 58 20 50 55 53 48 58 2c 20 48 20 50 4f 50 2c 20 59 20 50 55 53 48 58 2c 20 44 20 50 4f 50 2c 20 45 58 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 FRAME 2 Y L LDX, 3 Y H LDX, H PUSH, X POPX, | 46 52 41 4d 45 20 32 20 59 20 4c 20 4c 44 58 2c 20 33 20 59 20 48 20 4c 44 58 2c 20 48 20 50 55 53 48 2c 20 58 20 50 4f 50 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CLRVEC CALL, 6 Y C LDX, C VRACK X STX, | 43 4c 52 56 45 43 20 43 41 4c 4c 2c 20 36 20 59 20 43 20 4c 44 58 2c 20 43 20 56 52 41 43 4b 20 58 20 53 54 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 14 Y L LDX, 15 Y H LDX, L VFVPL X STX, H VFVPH X STX, | 31 34 20 59 20 4c 20 4c 44 58 2c 20 31 35 20 59 20 48 20 4c 44 58 2c 20 4c 20 56 46 56 50 4c 20 58 20 53 54 58 2c 20 48 20 56 46 56 50 48 20 58 20 53 54 58 2c 20 20 20 20 20 20 20 20 20 20 20 VXL D LXI, D DAD, M E MOV, H INX, | 56 58 4c 20 44 20 4c 58 49 2c 20 44 20 44 41 44 2c 20 4d 20 45 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 M D MOV, 12 Y L LDX, 13 Y H LDX, L VFXBL X STX, H VFXBH X STX, | 4d 20 44 20 4d 4f 56 2c 20 31 32 20 59 20 4c 20 4c 44 58 2c 20 31 33 20 59 20 48 20 4c 44 58 2c 20 4c 20 56 46 58 42 4c 20 58 20 53 54 58 2c 20 48 20 56 46 58 42 48 20 58 20 53 54 58 2c 20 20 D DAD, L VXL X STX, H VXH X STX, | 44 20 44 41 44 2c 20 4c 20 56 58 4c 20 58 20 53 54 58 2c 20 48 20 56 58 48 20 58 20 53 54 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 14 Y L LDX, 15 Y H LDX, VYL D LXI, D DAD, M E MOV, H INX, | 31 34 20 59 20 4c 20 4c 44 58 2c 20 31 35 20 59 20 48 20 4c 44 58 2c 20 56 59 4c 20 44 20 4c 58 49 2c 20 44 20 44 41 44 2c 20 4d 20 45 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 20 20 20 20 20 20 M E MOV, 10 Y L LDX, 11 Y H LDX, L VFYBL X STX, H VFYBH X STX, | 4d 20 45 20 4d 4f 56 2c 20 31 30 20 59 20 4c 20 4c 44 58 2c 20 31 31 20 59 20 48 20 4c 44 58 2c 20 4c 20 56 46 59 42 4c 20 58 20 53 54 58 2c 20 48 20 56 46 59 42 48 20 58 20 53 54 58 2c 20 20 D DAD, L VYL X STX, H VYH X STX, | 44 20 44 41 44 2c 20 4c 20 56 59 4c 20 58 20 53 54 58 2c 20 48 20 56 59 48 20 58 20 53 54 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SETSTDW CALL, FWRITE H LXI, L PQRL X STX, H PQRH X STX, | 53 45 54 53 54 44 57 20 43 41 4c 4c 2c 20 46 57 52 49 54 45 20 48 20 4c 58 49 2c 20 4c 20 50 51 52 4c 20 58 20 53 54 58 2c 20 48 20 50 51 52 48 20 58 20 53 54 58 2c 20 20 20 20 20 20 20 20 20 ASFLOK VAUXS X SETX, | 41 53 46 4c 4f 4b 20 56 41 55 58 53 20 58 20 53 45 54 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 STARTVEC CALL, UNFRAME 14 H LXI, SP DAD, SPHL, | 53 54 41 52 54 56 45 43 20 43 41 4c 4c 2c 20 55 4e 46 52 41 4d 45 20 31 34 20 48 20 4c 58 49 2c 20 53 50 20 44 41 44 2c 20 53 50 48 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 EXX, D PUSH, Y POPX, H PUSH, X POPX, NEXT | 45 58 58 2c 20 44 20 50 55 53 48 2c 20 59 20 50 4f 50 58 2c 20 48 20 50 55 53 48 2c 20 58 20 50 4f 50 58 2c 20 4e 45 58 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0239 } ( EFFECT REENTRY INTO RACK OR FORMATION ) | 28 20 45 46 46 45 43 54 20 52 45 45 4e 54 52 59 20 49 4e 54 4f 20 52 41 43 4b 20 4f 52 20 46 4f 52 4d 41 54 49 4f 4e 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( HL=TARGET X DE=TARGET Y A=TIME BASE ) | 28 20 48 4c 3d 54 41 52 47 45 54 20 58 20 44 45 3d 54 41 52 47 45 54 20 59 20 41 3d 54 49 4d 45 20 42 41 53 45 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HEX F= TBCD F= YESLOK F= NOTLOK F= STUFX | 48 45 58 20 46 3d 20 54 42 43 44 20 46 3d 20 59 45 53 4c 4f 4b 20 46 3d 20 4e 4f 54 4c 4f 4b 20 46 3d 20 53 54 55 46 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR PLOTRENT DECIMAL --> | 41 53 53 45 4d 42 4c 45 3e 20 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0240 } ( INTERRUPT ROUTINE TO REENTER KAMIKAZE ) | 28 20 49 4e 54 45 52 52 55 50 54 20 52 4f 55 54 49 4e 45 20 54 4f 20 52 45 45 4e 54 45 52 20 4b 41 4d 49 4b 41 5a 45 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR REKAMI .REL PQSDE PQS X BITX, 0=, IF, verase CALL, ELSE, | 53 55 42 52 20 52 45 4b 41 4d 49 20 2e 52 45 4c 20 50 51 53 44 45 20 50 51 53 20 58 20 42 49 54 58 2c 20 30 3d 2c 20 49 46 2c 20 76 65 72 61 73 65 20 43 41 4c 4c 2c 20 45 4c 53 45 2c 20 20 20 PQSDE PQS X RESX, THEN, TBCALC CALL, C A MOV, ( NOTE! ) | 50 51 53 44 45 20 50 51 53 20 58 20 52 45 53 58 2c 20 54 48 45 4e 2c 20 54 42 43 41 4c 43 20 43 41 4c 4c 2c 20 43 20 41 20 4d 4f 56 2c 20 28 20 4e 4f 54 45 21 20 29 20 20 20 20 20 20 20 20 20 VFVPL X L LDX, VFVPH X H LDX, H PUSH, Y POPX, | 56 46 56 50 4c 20 58 20 4c 20 4c 44 58 2c 20 56 46 56 50 48 20 58 20 48 20 4c 44 58 2c 20 48 20 50 55 53 48 2c 20 59 20 50 4f 50 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 VFXBL X L LDX, VFXBH X H LDX, VXL Y C LDX, VXH Y B LDX, B DAD, | 56 46 58 42 4c 20 58 20 4c 20 4c 44 58 2c 20 56 46 58 42 48 20 58 20 48 20 4c 44 58 2c 20 56 58 4c 20 59 20 43 20 4c 44 58 2c 20 56 58 48 20 59 20 42 20 4c 44 58 2c 20 42 20 44 41 44 2c 20 20 XCHG, VFYBL X L LDX, VFYBH X H LDX, VYL Y C LDX, VYH Y B LDX, | 58 43 48 47 2c 20 56 46 59 42 4c 20 58 20 4c 20 4c 44 58 2c 20 56 46 59 42 48 20 58 20 48 20 4c 44 58 2c 20 56 59 4c 20 59 20 43 20 4c 44 58 2c 20 56 59 48 20 59 20 42 20 4c 44 58 2c 20 20 20 B DAD, PLOTRENT CALL, | 42 20 44 41 44 2c 20 50 4c 4f 54 52 45 4e 54 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0=, IF, FWRITE H LXI, L PQRL X STX, H PQRH X STX, | 30 3d 2c 20 49 46 2c 20 46 57 52 49 54 45 20 48 20 4c 58 49 2c 20 4c 20 50 51 52 4c 20 58 20 53 54 58 2c 20 48 20 50 51 52 48 20 58 20 53 54 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ASFLOK VAUXS X SETX, PQSFRZ PQS X RESX, THEN, | 41 53 46 4c 4f 4b 20 56 41 55 58 53 20 58 20 53 45 54 58 2c 20 50 51 53 46 52 5a 20 50 51 53 20 58 20 52 45 53 58 2c 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 aup CALL, | 61 75 70 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 PQSDW PQS X BITX, 0=, IF, vwrite CALL, ELSE, PQSDW PQS X RESX, | 50 51 53 44 57 20 50 51 53 20 58 20 42 49 54 58 2c 20 30 3d 2c 20 49 46 2c 20 76 77 72 69 74 65 20 43 41 4c 4c 2c 20 45 4c 53 45 2c 20 50 51 53 44 57 20 50 51 53 20 58 20 52 45 53 58 2c 20 20 PQSDE PQS X SETX, THEN, KILLOFF JMP, .ABS | 50 51 53 44 45 20 50 51 53 20 58 20 53 45 54 58 2c 20 54 48 45 4e 2c 20 4b 49 4c 4c 4f 46 46 20 4a 4d 50 2c 20 2e 41 42 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0241 } ( ROUTINE TO RETARGET AN ATTACKER ) | 28 20 52 4f 55 54 49 4e 45 20 54 4f 20 52 45 54 41 52 47 45 54 20 41 4e 20 41 54 54 41 43 4b 45 52 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HEX SUBR AABS A ANA, RP, CMA, A INR, RET, | 48 45 58 20 53 55 42 52 20 41 41 42 53 20 41 20 41 4e 41 2c 20 52 50 2c 20 43 4d 41 2c 20 41 20 49 4e 52 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ( ACTUAL TARGETER ) | 28 20 41 43 54 55 41 4c 20 54 41 52 47 45 54 45 52 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR KTARGET H PUSH, VYH X A LDX, A SRLR, A SRLR, A C MOV, | 53 55 42 52 20 4b 54 41 52 47 45 54 20 48 20 50 55 53 48 2c 20 56 59 48 20 58 20 41 20 4c 44 58 2c 20 41 20 53 52 4c 52 2c 20 41 20 53 52 4c 52 2c 20 41 20 43 20 4d 4f 56 2c 20 20 20 20 20 20 VYH FBVECTOR LDA, A SRLR, A SRLR, C SUB, A SRAR, A SRAR, | 56 59 48 20 46 42 56 45 43 54 4f 52 20 4c 44 41 2c 20 41 20 53 52 4c 52 2c 20 41 20 53 52 4c 52 2c 20 43 20 53 55 42 2c 20 41 20 53 52 41 52 2c 20 41 20 53 52 41 52 2c 20 20 20 20 20 20 20 20 A E MOV, | 41 20 45 20 4d 4f 56 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 VDYH X B LDX, B SUB, A C MOV, E A MOV, B XRA, C A MOV, | 56 44 59 48 20 58 20 42 20 4c 44 58 2c 20 42 20 53 55 42 2c 20 41 20 43 20 4d 4f 56 2c 20 45 20 41 20 4d 4f 56 2c 20 42 20 58 52 41 2c 20 43 20 41 20 4d 4f 56 2c 20 20 20 20 20 20 20 20 20 20 0<, IF, C ADD, THEN, | 30 3c 2c 20 49 46 2c 20 43 20 41 44 44 2c 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 A VDDYL X STX, 7 A BIT, 0 A MVI, | 41 20 56 44 44 59 4c 20 58 20 53 54 58 2c 20 37 20 41 20 42 49 54 2c 20 30 20 41 20 4d 56 49 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0<>, IF, CMA, THEN, A VDDYH X STX, | 30 3c 3e 2c 20 49 46 2c 20 43 4d 41 2c 20 54 48 45 4e 2c 20 41 20 56 44 44 59 48 20 58 20 53 54 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 VDDYL X A LDX, AABS CALL, 0E ANI, 6 CPI, CY~, IF, 6 A MVI, | 56 44 44 59 4c 20 58 20 41 20 4c 44 58 2c 20 41 41 42 53 20 43 41 4c 4c 2c 20 30 45 20 41 4e 49 2c 20 36 20 43 50 49 2c 20 43 59 7e 2c 20 49 46 2c 20 36 20 41 20 4d 56 49 2c 20 20 20 20 20 20 THEN, A C MOV, 0 B MVI, VPTBL X L LDX, VPTBH X H LDX, | 54 48 45 4e 2c 20 41 20 43 20 4d 4f 56 2c 20 30 20 42 20 4d 56 49 2c 20 56 50 54 42 4c 20 58 20 4c 20 4c 44 58 2c 20 56 50 54 42 48 20 58 20 48 20 4c 44 58 2c 20 20 20 20 20 20 20 20 20 20 20 B DAD, M E MOV, H INX, M D MOV, E VPATL X STX, | 42 20 44 41 44 2c 20 4d 20 45 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 4d 20 44 20 4d 4f 56 2c 20 45 20 56 50 41 54 4c 20 58 20 53 54 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 D VPATH X STX, H POP, RET, | 44 20 56 50 41 54 48 20 58 20 53 54 58 2c 20 48 20 50 4f 50 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0242 } ( ROUTINE TO FLIP OVER ATTACKER ) | 28 20 52 4f 55 54 49 4e 45 20 54 4f 20 46 4c 49 50 20 4f 56 45 52 20 41 54 54 41 43 4b 45 52 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA FLIPOVER ASM | 44 41 54 41 20 46 4c 49 50 4f 56 45 52 20 41 53 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HEX A0 SETM DECIMAL 0 PATI 2 SWAIT | 48 45 58 20 41 30 20 53 45 54 4d 20 44 45 43 49 4d 41 4c 20 30 20 50 41 54 49 20 32 20 53 57 41 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2 PATI 2 SWAIT | 32 20 50 41 54 49 20 32 20 53 57 41 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4 PATI 2 SWAIT | 34 20 50 41 54 49 20 32 20 53 57 41 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6 PATI 2 SWAIT | 36 20 50 41 54 49 20 32 20 53 57 41 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 8 PATI 2 SWAIT | 38 20 50 41 54 49 20 32 20 53 57 41 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HEX 20 SETM DECIMAL | 48 45 58 20 32 30 20 53 45 54 4d 20 44 45 43 49 4d 41 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6 PATI 2 SWAIT | 36 20 50 41 54 49 20 32 20 53 57 41 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4 PATI 2 SWAIT | 34 20 50 41 54 49 20 32 20 53 57 41 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2 PATI 2 SWAIT | 32 20 50 41 54 49 20 32 20 53 57 41 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 PATI 4 SWAIT | 30 20 50 41 54 49 20 34 20 53 57 41 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ARET | 41 52 45 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HEX | 48 45 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA GOTOP ASM 4800 SETXC NULPAT SETP 0 0 SETDC 0 0 SETDDC ARET | 44 41 54 41 20 47 4f 54 4f 50 20 41 53 4d 20 34 38 30 30 20 53 45 54 58 43 20 4e 55 4c 50 41 54 20 53 45 54 50 20 30 20 30 20 53 45 54 44 43 20 30 20 30 20 53 45 54 44 44 43 20 41 52 45 54 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0243 } ( LEFT ROLL SEQUENCE ) | 28 20 4c 45 46 54 20 52 4f 4c 4c 20 53 45 51 55 45 4e 43 45 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA LEFTROLL ASM | 44 41 54 41 20 4c 45 46 54 52 4f 4c 4c 20 41 53 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 XADDWRITE SETR | 58 41 44 44 57 52 49 54 45 20 53 45 54 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 -3 -2 SETDDC 64 -128 SETDC 0 PATI 8 SWAIT | 2d 33 20 2d 32 20 53 45 54 44 44 43 20 36 34 20 2d 31 32 38 20 53 45 54 44 43 20 30 20 50 41 54 49 20 38 20 53 57 41 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2 PATI 4 SWAIT | 32 20 50 41 54 49 20 34 20 53 57 41 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4 PATI 4 SWAIT | 34 20 50 41 54 49 20 34 20 53 57 41 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6 PATI 4 SWAIT | 36 20 50 41 54 49 20 34 20 53 57 41 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 8 PATI 4 SWAIT | 38 20 50 41 54 49 20 34 20 53 57 41 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 -3 4 SETDDC 4 SWAIT | 2d 33 20 34 20 53 45 54 44 44 43 20 34 20 53 57 41 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HEX A0 SETM DECIMAL 6 PATI 4 SWAIT | 48 45 58 20 41 30 20 53 45 54 4d 20 44 45 43 49 4d 41 4c 20 36 20 50 41 54 49 20 34 20 53 57 41 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4 PATI 4 SWAIT | 34 20 50 41 54 49 20 34 20 53 57 41 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2 PATI 4 SWAIT 0 PATI 4 SWAIT HEX 20 SETM DECIMAL | 32 20 50 41 54 49 20 34 20 53 57 41 49 54 20 30 20 50 41 54 49 20 34 20 53 57 41 49 54 20 48 45 58 20 32 30 20 53 45 54 4d 20 44 45 43 49 4d 41 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 8 SWAIT 0 1 SETDDC ARET | 38 20 53 57 41 49 54 20 30 20 31 20 53 45 54 44 44 43 20 41 52 45 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA REENTER ASM GOTOP ACALL | 44 41 54 41 20 52 45 45 4e 54 45 52 20 41 53 4d 20 47 4f 54 4f 50 20 41 43 41 4c 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 1 SWAIT RENTGAL SETR 1 SWAIT HEX FE 00 SETS DECIMAL | 31 20 53 57 41 49 54 20 52 45 4e 54 47 41 4c 20 53 45 54 52 20 31 20 53 57 41 49 54 20 48 45 58 20 46 45 20 30 30 20 53 45 54 53 20 44 45 43 49 4d 41 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 0 PATI 4 SWAIT FLIPOVER ACALL 120 SWAIT AHALT --> | 30 20 50 41 54 49 20 34 20 53 57 41 49 54 20 46 4c 49 50 4f 56 45 52 20 41 43 41 4c 4c 20 31 32 30 20 53 57 41 49 54 20 41 48 41 4c 54 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0244 } ( RIGHT ROLL SEQUENCE ) | 28 20 52 49 47 48 54 20 52 4f 4c 4c 20 53 45 51 55 45 4e 43 45 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA RIGHTROLL ASM | 44 41 54 41 20 52 49 47 48 54 52 4f 4c 4c 20 41 53 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 XADDWRITE SETR HEX A0 SETM DECIMAL | 58 41 44 44 57 52 49 54 45 20 53 45 54 52 20 48 45 58 20 41 30 20 53 45 54 4d 20 44 45 43 49 4d 41 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 -3 2 SETDDC 64 128 SETDC 0 PATI 8 SWAIT | 2d 33 20 32 20 53 45 54 44 44 43 20 36 34 20 31 32 38 20 53 45 54 44 43 20 30 20 50 41 54 49 20 38 20 53 57 41 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2 PATI 4 SWAIT | 32 20 50 41 54 49 20 34 20 53 57 41 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4 PATI 4 SWAIT | 34 20 50 41 54 49 20 34 20 53 57 41 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6 PATI 4 SWAIT | 36 20 50 41 54 49 20 34 20 53 57 41 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 8 PATI 4 SWAIT | 38 20 50 41 54 49 20 34 20 53 57 41 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 -3 -4 SETDDC 4 SWAIT | 2d 33 20 2d 34 20 53 45 54 44 44 43 20 34 20 53 57 41 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HEX 20 SETM DECIMAL 6 PATI 4 SWAIT | 48 45 58 20 32 30 20 53 45 54 4d 20 44 45 43 49 4d 41 4c 20 36 20 50 41 54 49 20 34 20 53 57 41 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4 PATI 4 SWAIT | 34 20 50 41 54 49 20 34 20 53 57 41 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2 PATI 4 SWAIT 0 PATI 4 SWAIT HEX A0 SETM DECIMAL 8 SWAIT | 32 20 50 41 54 49 20 34 20 53 57 41 49 54 20 30 20 50 41 54 49 20 34 20 53 57 41 49 54 20 48 45 58 20 41 30 20 53 45 54 4d 20 44 45 43 49 4d 41 4c 20 38 20 53 57 41 49 54 20 20 20 20 20 20 20 0 -1 SETDDC ARET | 30 20 2d 31 20 53 45 54 44 44 43 20 41 52 45 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0245 } ( LEAVE RACK OR FORMATION FOREVER, RELATIVLY SPEAKING ) | 28 20 4c 45 41 56 45 20 52 41 43 4b 20 4f 52 20 46 4f 52 4d 41 54 49 4f 4e 20 46 4f 52 45 56 45 52 2c 20 52 45 4c 41 54 49 56 4c 59 20 53 50 45 41 4b 49 4e 47 20 29 20 20 20 20 20 20 20 20 20 HEX SUBR RANDOMYSX .REL LDAR, 7F ANI, 20 ADI, A VYH X STX, | 48 45 58 20 53 55 42 52 20 52 41 4e 44 4f 4d 59 53 58 20 2e 52 45 4c 20 20 4c 44 41 52 2c 20 37 46 20 41 4e 49 2c 20 32 30 20 41 44 49 2c 20 41 20 56 59 48 20 58 20 53 54 58 2c 20 20 20 20 20 HARDNESS LDA, 0A CPI, CY~, IF, 0A A MVI, THEN, RLC, RLC, | 48 41 52 44 4e 45 53 53 20 4c 44 41 2c 20 30 41 20 43 50 49 2c 20 43 59 7e 2c 20 49 46 2c 20 30 41 20 41 20 4d 56 49 2c 20 54 48 45 4e 2c 20 52 4c 43 2c 20 52 4c 43 2c 20 20 20 20 20 20 20 20 48 ADI, CMA, A VDXL X STX, 0FF VDXH X MVIX, RET, | 34 38 20 41 44 49 2c 20 43 4d 41 2c 20 41 20 56 44 58 4c 20 58 20 53 54 58 2c 20 30 46 46 20 56 44 58 48 20 58 20 4d 56 49 58 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR RRK M E MOV, H INX, M D MOV, H INX, WOAFLAG LDA, A ANA, | 53 55 42 52 20 52 52 4b 20 4d 20 45 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 4d 20 44 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 57 4f 41 46 4c 41 47 20 4c 44 41 2c 20 41 20 41 4e 41 2c 20 20 20 20 0<>, IF, XCHG, THEN, RET, | 30 3c 3e 2c 20 49 46 2c 20 58 43 48 47 2c 20 54 48 45 4e 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR FREEFLOW M E MOV, H INX, M D MOV, H INX, HARDNESS LDA, | 53 55 42 52 20 46 52 45 45 46 4c 4f 57 20 4d 20 45 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 4d 20 44 20 4d 4f 56 2c 20 48 20 49 4e 58 2c 20 48 41 52 44 4e 45 53 53 20 4c 44 41 2c 20 20 20 20 20 RLC, RLC, 18 CPI, CY~, IF, 18 A MVI, THEN, | 52 4c 43 2c 20 52 4c 43 2c 20 31 38 20 43 50 49 2c 20 43 59 7e 2c 20 49 46 2c 20 31 38 20 41 20 4d 56 49 2c 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 A C MOV, | 41 20 43 20 4d 4f 56 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 INVADERSLEFT LDA, C CMP, CY, IF, XCHG, THEN, RET, .ABS | 49 4e 56 41 44 45 52 53 4c 45 46 54 20 4c 44 41 2c 20 43 20 43 4d 50 2c 20 43 59 2c 20 49 46 2c 20 58 43 48 47 2c 20 54 48 45 4e 2c 20 52 45 54 2c 20 2e 41 42 53 20 20 20 20 20 20 20 20 20 20 DATA RETAT ASM GOTOP ACALL RANDOMYSX ASMCALL 1 SWAIT 0FE 0 SETS | 44 41 54 41 20 52 45 54 41 54 20 41 53 4d 20 47 4f 54 4f 50 20 41 43 41 4c 4c 20 52 41 4e 44 4f 4d 59 53 58 20 41 53 4d 43 41 4c 4c 20 31 20 53 57 41 49 54 20 30 46 45 20 30 20 53 45 54 53 20 ARET | 41 52 45 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR SKILDDY HARDNESS LDA, A ANA, RZ, -1 A MVI, | 53 55 42 52 20 53 4b 49 4c 44 44 59 20 48 41 52 44 4e 45 53 53 20 4c 44 41 2c 20 41 20 41 4e 41 2c 20 52 5a 2c 20 2d 31 20 41 20 4d 56 49 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 A VDDXL X STX, A VDDXH X STX, RET, DECIMAL --> | 41 20 56 44 44 58 4c 20 58 20 53 54 58 2c 20 41 20 56 44 44 58 48 20 58 20 53 54 58 2c 20 52 45 54 2c 20 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0246 } ( KAMIKAZE GOODIES ) | 28 20 4b 41 4d 49 4b 41 5a 45 20 47 4f 4f 44 49 45 53 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA ZMD ASM 16 AREPEAT KTARGET ASMCALL 20 SWAIT SKILDDY ASMCALL | 44 41 54 41 20 5a 4d 44 20 41 53 4d 20 31 36 20 41 52 45 50 45 41 54 20 4b 54 41 52 47 45 54 20 41 53 4d 43 41 4c 4c 20 32 30 20 53 57 41 49 54 20 53 4b 49 4c 44 44 59 20 41 53 4d 43 41 4c 4c ALOOP 120 SWAIT ARET | 20 41 4c 4f 4f 50 20 31 32 30 20 53 57 41 49 54 20 41 52 45 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA KAMREN ASM GOTOP ACALL 1 SWAIT | 44 41 54 41 20 4b 41 4d 52 45 4e 20 41 53 4d 20 47 4f 54 4f 50 20 41 43 41 4c 4c 20 31 20 53 57 41 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HEX FE 0 SETS DECIMAL | 48 45 58 20 46 45 20 30 20 53 45 54 53 20 44 45 43 49 4d 41 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 REKAMI SETR 128 0 SETDC 10 SWAIT FLIPOVER ACALL | 52 45 4b 41 4d 49 20 53 45 54 52 20 31 32 38 20 30 20 53 45 54 44 43 20 31 30 20 53 57 41 49 54 20 46 4c 49 50 4f 56 45 52 20 41 43 41 4c 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 FOREVER 0 PATI 120 SWAIT EVERFOR | 46 4f 52 45 56 45 52 20 30 20 50 41 54 49 20 31 32 30 20 53 57 41 49 54 20 45 56 45 52 46 4f 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA KAMLV ASM FOREVER RRK ASMCALL KAMREN , RETAT ACALL | 44 41 54 41 20 4b 41 4d 4c 56 20 41 53 4d 20 46 4f 52 45 56 45 52 20 52 52 4b 20 41 53 4d 43 41 4c 4c 20 4b 41 4d 52 45 4e 20 2c 20 52 45 54 41 54 20 41 43 41 4c 4c 20 20 20 20 20 20 20 20 20 ZMD ACALL EVERFOR | 5a 4d 44 20 41 43 41 4c 4c 20 45 56 45 52 46 4f 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA KAMIATA ASM ZMD ACALL | 44 41 54 41 20 4b 41 4d 49 41 54 41 20 41 53 4d 20 5a 4d 44 20 41 43 41 4c 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 FREEFLOW ASMCALL KAMLV , KAMREN AJMP | 46 52 45 45 46 4c 4f 57 20 41 53 4d 43 41 4c 4c 20 4b 41 4d 4c 56 20 2c 20 4b 41 4d 52 45 4e 20 41 4a 4d 50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA KAMIATL ASM LEFTROLL ACALL KAMIATA AJMP | 44 41 54 41 20 4b 41 4d 49 41 54 4c 20 41 53 4d 20 4c 45 46 54 52 4f 4c 4c 20 41 43 41 4c 4c 20 4b 41 4d 49 41 54 41 20 41 4a 4d 50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA KAMIATR ASM RIGHTROLL ACALL KAMIATA AJMP | 44 41 54 41 20 4b 41 4d 49 41 54 52 20 41 53 4d 20 52 49 47 48 54 52 4f 4c 4c 20 41 43 41 4c 4c 20 4b 41 4d 49 41 54 41 20 41 4a 4d 50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DATA AGORFPT GORF4 , GORF4 , GORF4 , GORF4 , GORF4 , | 44 41 54 41 20 41 47 4f 52 46 50 54 20 47 4f 52 46 34 20 2c 20 47 4f 52 46 34 20 2c 20 47 4f 52 46 34 20 2c 20 47 4f 52 46 34 20 2c 20 47 4f 52 46 34 20 2c 20 20 20 20 20 20 20 20 20 20 20 20 DATA AKGORF ASM AGORFPT SETPT 0 PATI FOREVER 120 SWAIT EVERFOR | 44 41 54 41 20 41 4b 47 4f 52 46 20 41 53 4d 20 41 47 4f 52 46 50 54 20 53 45 54 50 54 20 30 20 50 41 54 49 20 46 4f 52 45 56 45 52 20 31 32 30 20 53 57 41 49 54 20 45 56 45 52 46 4f 52 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0247 } ( CHARACTER VECTORING ROUTINE ) --> | 28 20 43 48 41 52 41 43 54 45 52 20 56 45 43 54 4f 52 49 4e 47 20 52 4f 55 54 49 4e 45 20 29 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL | 44 45 43 49 4d 41 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR VWRITEC VXL X E LDX, VXH X D LDX, | 53 55 42 52 20 56 57 52 49 54 45 43 20 56 58 4c 20 58 20 45 20 4c 44 58 2c 20 56 58 48 20 58 20 44 20 4c 44 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 VYL X L LDX, VYH X H LDX, | 56 59 4c 20 58 20 4c 20 4c 44 58 2c 20 56 59 48 20 58 20 48 20 4c 44 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 VMAGIC X C LDX, VXPAND X B LDX, | 56 4d 41 47 49 43 20 58 20 43 20 4c 44 58 2c 20 56 58 50 41 4e 44 20 58 20 42 20 4c 44 58 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 VRACK X A LDX, drawchar CALL, RET, | 56 52 41 43 4b 20 58 20 41 20 4c 44 58 2c 20 64 72 61 77 63 68 61 72 20 43 41 4c 4c 2c 20 52 45 54 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 SUBR CHARI TBCALC CALL, B PUSH, | 53 55 42 52 20 43 48 41 52 49 20 54 42 43 41 4c 43 20 43 41 4c 4c 2c 20 42 20 50 55 53 48 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 PQSDE PQS X BITX, 0=, IF, VWRITEC CALL, ELSE, | 50 51 53 44 45 20 50 51 53 20 58 20 42 49 54 58 2c 20 30 3d 2c 20 49 46 2c 20 56 57 52 49 54 45 43 20 43 41 4c 4c 2c 20 45 4c 53 45 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 PQSDE PQS X RESX, THEN, | 50 51 53 44 45 20 50 51 53 20 58 20 52 45 53 58 2c 20 54 48 45 4e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 B POP, VECTLC CALL, aup CALL, | 42 20 50 4f 50 2c 20 56 45 43 54 4c 43 20 43 41 4c 4c 2c 20 61 75 70 20 43 41 4c 4c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 PQSDW PQS X BITX, 0=, IF, VWRITEC CALL, ELSE, | 50 51 53 44 57 20 50 51 53 20 58 20 42 49 54 58 2c 20 30 3d 2c 20 49 46 2c 20 56 57 52 49 54 45 43 20 43 41 4c 4c 2c 20 45 4c 53 45 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 PQSDE PQS X SETX, PQSDW PQS X RESX, THEN, KILLOFF JMP, | 50 51 53 44 45 20 50 51 53 20 58 20 53 45 54 58 2c 20 50 51 53 44 57 20 50 51 53 20 58 20 52 45 53 58 2c 20 54 48 45 4e 2c 20 4b 49 4c 4c 4f 46 46 20 4a 4d 50 2c 20 20 20 20 20 20 20 20 20 20 --> | 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0248 } ( SCROLL SIDEWAYS COMMAND - USES THE PATTERN BOARD ) | 28 20 53 43 52 4f 4c 4c 20 53 49 44 45 57 41 59 53 20 43 4f 4d 4d 41 4e 44 20 2d 20 55 53 45 53 20 54 48 45 20 50 41 54 54 45 52 4e 20 42 4f 41 52 44 20 29 20 20 20 20 20 20 20 20 20 20 20 20 HEX F= SWLL F= OSL F= CSL | 48 45 58 20 46 3d 20 53 57 4c 4c 20 46 3d 20 4f 53 4c 20 46 3d 20 43 53 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE SCROLL DECIMAL --> | 4e 45 58 54 20 41 53 53 45 4d 42 4c 45 3e 20 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0249 } ( ROUTINE TO LIGHT UP PLAYERS RANK, RANK # ON STACK ) | 28 20 52 4f 55 54 49 4e 45 20 54 4f 20 4c 49 47 48 54 20 55 50 20 50 4c 41 59 45 52 53 20 52 41 4e 4b 2c 20 52 41 4e 4b 20 23 20 4f 4e 20 53 54 41 43 4b 20 29 20 20 20 20 20 20 20 20 20 20 20 HEX | 48 45 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 CODE LITERANK .REL EXX, 16 B LXI, BEGIN, A INP, B A MOV, 2 ADI, | 43 4f 44 45 20 4c 49 54 45 52 41 4e 4b 20 2e 52 45 4c 20 45 58 58 2c 20 31 36 20 42 20 4c 58 49 2c 20 42 45 47 49 4e 2c 20 41 20 49 4e 50 2c 20 42 20 41 20 4d 4f 56 2c 20 32 20 41 44 49 2c 20 A B MOV, 0C CPI, 0=, END, | 41 20 42 20 4d 4f 56 2c 20 30 43 20 43 50 49 2c 20 30 3d 2c 20 45 4e 44 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 D POP, E A MOV, 6 CPI, CY~, IF, 5 A MVI, THEN, STC, RAL, | 44 20 50 4f 50 2c 20 45 20 41 20 4d 4f 56 2c 20 36 20 43 50 49 2c 20 43 59 7e 2c 20 49 46 2c 20 35 20 41 20 4d 56 49 2c 20 54 48 45 4e 2c 20 53 54 43 2c 20 52 41 4c 2c 20 20 20 20 20 20 20 20 A B MOV, A INP, EXX, .ABS NEXT | 41 20 42 20 4d 4f 56 2c 20 41 20 49 4e 50 2c 20 45 58 58 2c 20 2e 41 42 53 20 4e 45 58 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DECIMAL --> | 44 45 43 49 4d 41 4c 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0250 } ( ASCII MESSAGE TABLE ) | 28 20 41 53 43 49 49 20 4d 45 53 53 41 47 45 20 54 41 42 4c 45 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 HEX CC? IFTRUE : ," 22 DELIM ! WORD HERE B@ 1+ DP+! ; IMMED | 48 45 58 20 43 43 3f 20 49 46 54 52 55 45 20 3a 20 2c 22 20 32 32 20 44 45 4c 49 4d 20 21 20 57 4f 52 44 20 48 45 52 45 20 42 40 20 31 2b 20 44 50 2b 21 20 3b 20 49 4d 4d 45 44 20 20 20 20 20 OTHERWISE { : ," } { 22 DELIM ! WORD HERE DUP COUNT + 1- DO | 4f 54 48 45 52 57 49 53 45 20 7b 20 3a 20 2c 22 20 7d 20 7b 20 32 32 20 44 45 4c 49 4d 20 21 20 57 4f 52 44 20 48 45 52 45 20 44 55 50 20 43 4f 55 4e 54 20 2b 20 31 2d 20 44 4f 20 20 20 20 20 I B@ -1 +LOOP HERE B@ } p { 1+ 0 DO } B, { LOOP } p { ; IMMED } | 49 20 42 40 20 2d 31 20 2b 4c 4f 4f 50 20 48 45 52 45 20 42 40 20 7d 20 70 20 7b 20 31 2b 20 30 20 44 4f 20 7d 20 42 2c 20 7b 20 4c 4f 4f 50 20 7d 20 70 20 7b 20 3b 20 49 4d 4d 45 44 20 7d 20 IFEND DATA ASCMSGT ," MISSION[" ," GAME OVER" | 49 46 45 4e 44 20 44 41 54 41 20 41 53 43 4d 53 47 54 20 2c 22 20 4d 49 53 53 49 4f 4e 5b 22 20 2c 22 20 47 41 4d 45 20 4f 56 45 52 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ," PLAYER" | 2c 22 20 50 4c 41 59 45 52 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ," 2" | 2c 22 20 32 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ," 1" | 2c 22 20 31 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ," GAME" | 2c 22 20 47 41 4d 45 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ," OVER" | 2c 22 20 4f 56 45 52 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ," GET" | 2c 22 20 47 45 54 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ," READY" | 2c 22 20 52 45 41 44 59 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ," INSERT ADDITIONAL COIN" | 2c 22 20 49 4e 53 45 52 54 20 41 44 44 49 54 49 4f 4e 41 4c 20 43 4f 49 4e 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ," SELECT 1 PLAYER GAME" | 2c 22 20 53 45 4c 45 43 54 20 31 20 50 4c 41 59 45 52 20 47 41 4d 45 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ," OR" | 2c 22 20 4f 52 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ," SELECT 1 OR 2 PLAYER GAME" --> | 2c 22 20 53 45 4c 45 43 54 20 31 20 4f 52 20 32 20 50 4c 41 59 45 52 20 47 41 4d 45 22 20 2d 2d 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 { BLOCK 0251 } ( CONTINUED ASCII MESSAGE TABLE ) | 28 20 43 4f 4e 54 49 4e 55 45 44 20 41 53 43 49 49 20 4d 45 53 53 41 47 45 20 54 41 42 4c 45 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ," FOR 2 PLAYER GAME" | 2c 22 20 46 4f 52 20 32 20 50 4c 41 59 45 52 20 47 41 4d 4