home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1995-02-08 | 15.4 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| file
| data
| default
| |
| 100%
| xdgMime
| image/x-tga
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 10 f4 20 45 2d | 54 65 6d 70 6c 61 74 65 |..... E-|Template|
|00000010| 0d 00 14 05 f4 0d 00 1e | 2e f4 20 54 65 6d 70 6c |........|.. Templ|
|00000020| 61 74 65 20 70 72 6f 67 | 72 61 6d 20 66 6f 72 20 |ate prog|ram for |
|00000030| 63 72 65 61 74 69 6e 67 | 20 5a 61 70 20 6d 6f 64 |creating| Zap mod|
|00000040| 65 73 2e 0d 00 28 31 f4 | 20 54 68 65 20 6d 6f 64 |es...(1.| The mod|
|00000050| 75 6c 65 20 77 69 6c 6c | 20 62 65 20 73 61 76 65 |ule will| be save|
|00000060| 64 20 74 6f 20 77 6f 72 | 6b 5f 64 69 72 65 63 74 |d to wor|k_direct|
|00000070| 6f 72 79 24 0d 00 32 40 | f4 20 59 6f 75 20 73 68 |ory$..2@|. You sh|
|00000080| 6f 75 6c 64 20 72 75 6e | 20 5a 61 70 20 66 69 72 |ould run| Zap fir|
|00000090| 73 74 20 74 6f 20 65 6e | 73 75 72 65 20 5a 61 70 |st to en|sure Zap|
|000000a0| 24 44 69 72 20 61 6e 64 | 20 5a 61 70 57 6f 72 6b |$Dir and| ZapWork|
|000000b0| 24 44 69 72 0d 00 3c 11 | f4 20 61 72 65 20 73 65 |$Dir..<.|. are se|
|000000c0| 74 20 75 70 2e 0d 00 46 | 04 0d 00 50 1e f4 20 64 |t up...F|...P.. d|
|000000d0| 69 72 65 63 74 6f 72 79 | 20 74 6f 20 73 61 76 65 |irectory| to save|
|000000e0| 20 6d 6f 64 75 6c 65 0d | 00 5a 23 77 6f 72 6b 5f | module.|.Z#work_|
|000000f0| 64 69 72 65 63 74 6f 72 | 79 24 3d 22 3c 5a 61 70 |director|y$="<Zap|
|00000100| 57 6f 72 6b 24 44 69 72 | 3e 22 0d 00 64 04 0d 00 |Work$Dir|>"..d...|
|00000110| 6e 12 f4 20 6e 61 6d 65 | 20 6f 66 20 6d 6f 64 65 |n.. name| of mode|
|00000120| 0d 00 78 16 6d 6f 64 65 | 5f 6e 61 6d 65 24 3d 22 |..x.mode|_name$="|
|00000130| 45 6d 61 69 6c 22 0d 00 | 82 04 0d 00 8c 12 f4 20 |Email"..|....... |
|00000140| 61 75 74 68 6f 72 73 20 | 6e 61 6d 65 0d 00 96 1e |authors |name....|
|00000150| 6d 6f 64 65 5f 61 75 74 | 68 6f 72 24 3d 22 4d 69 |mode_aut|hor$="Mi|
|00000160| 6c 65 73 20 53 61 62 69 | 6e 22 0d 00 a0 04 0d 00 |les Sabi|n"......|
|00000170| aa 1e f4 20 76 65 72 73 | 69 6f 6e 20 6e 75 6d 62 |... vers|ion numb|
|00000180| 65 72 20 6f 66 20 6d 6f | 64 75 6c 65 0d 00 b4 0f |er of mo|dule....|
|00000190| 76 65 72 24 3d 22 30 2e | 30 31 22 0d 00 be 04 0d |ver$="0.|01".....|
|000001a0| 00 c8 20 f4 20 6d 6f 64 | 65 20 6e 75 6d 62 65 72 |.. . mod|e number|
|000001b0| 20 79 6f 75 20 77 61 6e | 74 20 74 6f 20 62 65 0d | you wan|t to be.|
|000001c0| 00 d2 3f f4 20 79 6f 75 | 20 4d 55 53 54 20 6e 6f |..?. you| MUST no|
|000001d0| 74 20 68 61 72 64 20 77 | 69 72 65 20 74 68 69 73 |t hard w|ire this|
|000001e0| 20 69 6e 20 61 73 20 49 | 20 6d 61 79 20 68 61 76 | in as I| may hav|
|000001f0| 65 20 61 6c 6c 6f 63 61 | 74 65 64 20 69 74 0d 00 |e alloca|ted it..|
|00000200| dc 16 f4 20 74 6f 20 73 | 6f 6d 65 6f 6e 65 20 65 |... to s|omeone e|
|00000210| 6c 73 65 21 0d 00 e6 11 | 6d 6f 64 65 5f 6e 75 6d |lse!....|mode_num|
|00000220| 62 65 72 3d 30 0d 00 f0 | 04 0d 00 fa 26 f4 20 6d |ber=0...|....&. m|
|00000230| 6f 64 65 20 74 6f 20 62 | 61 73 65 20 74 68 69 73 |ode to b|ase this|
|00000240| 20 6d 6f 64 65 20 6f 6e | 20 28 74 65 78 74 29 0d | mode on| (text).|
|00000250| 01 04 13 6d 6f 64 65 5f | 62 61 73 65 6d 6f 64 65 |...mode_|basemode|
|00000260| 3d 30 0d 01 0e 04 0d 01 | 18 3e f4 20 64 65 66 69 |=0......|.>. defi|
|00000270| 6e 65 20 61 20 70 72 6f | 63 20 65 72 72 6f 72 20 |ne a pro|c error |
|00000280| 74 6f 20 70 72 69 6e 74 | 20 6c 69 6e 65 20 6e 75 |to print| line nu|
|00000290| 6d 62 65 72 20 65 76 65 | 6e 20 69 66 20 72 75 6e |mber eve|n if run|
|000002a0| 6e 69 6e 67 0d 01 22 11 | f4 20 75 6e 64 65 72 20 |ning..".|. under |
|000002b0| 77 69 6d 70 2e 0d 01 2c | 0e ee 20 85 20 f2 65 72 |wimp...,|.. . .er|
|000002c0| 72 6f 72 0d 01 36 04 0d | 01 40 28 f4 20 72 65 73 |ror..6..|.@(. res|
|000002d0| 65 72 76 65 20 73 70 61 | 63 65 20 66 6f 72 20 63 |erve spa|ce for c|
|000002e0| 6f 64 65 20 2f 20 77 6f | 72 6b 73 70 61 63 65 0d |ode / wo|rkspace.|
|000002f0| 01 4a 14 f4 20 64 65 66 | 61 75 6c 74 20 6f 66 20 |.J.. def|ault of |
|00000300| 36 34 6b 0d 01 54 15 63 | 6f 64 65 5f 73 69 7a 65 |64k..T.c|ode_size|
|00000310| 25 3d 26 31 30 30 30 30 | 0d 01 5e 16 de 20 63 6f |%=&10000|..^.. co|
|00000320| 64 65 25 20 63 6f 64 65 | 5f 73 69 7a 65 25 0d 01 |de% code|_size%..|
|00000330| 68 17 4c 25 3d 63 6f 64 | 65 25 2b 63 6f 64 65 5f |h.L%=cod|e%+code_|
|00000340| 73 69 7a 65 25 0d 01 72 | 04 0d 01 7c 30 f4 20 6c |size%..r|...|0. l|
|00000350| 6f 61 64 20 74 68 65 20 | 6c 69 62 72 61 72 79 20 |oad the |library |
|00000360| 64 65 66 69 6e 65 69 6e | 67 20 7a 61 70 27 73 20 |definein|g zap's |
|00000370| 76 61 72 69 61 62 6c 65 | 73 0d 01 86 25 c8 9b 20 |variable|s...%.. |
|00000380| 22 3c 5a 61 70 57 6f 72 | 6b 24 44 69 72 3e 2e 44 |"<ZapWor|k$Dir>.D|
|00000390| 6f 63 73 2e 45 2d 4c 69 | 62 72 61 72 79 22 0d 01 |ocs.E-Li|brary"..|
|000003a0| 90 04 0d 01 9a 2c f4 20 | 64 65 66 69 6e 65 20 7a |.....,. |define z|
|000003b0| 61 70 73 20 63 6f 6e 73 | 74 61 6e 74 73 20 28 63 |aps cons|tants (c|
|000003c0| 61 6c 6c 20 45 2d 4c 69 | 62 72 61 72 79 29 0d 01 |all E-Li|brary)..|
|000003d0| a4 19 f2 64 65 66 69 6e | 65 5f 7a 61 70 5f 76 61 |...defin|e_zap_va|
|000003e0| 72 69 61 62 6c 65 73 0d | 01 ae 04 0d 01 b8 2b f4 |riables.|......+.|
|000003f0| 20 64 65 66 69 6e 65 20 | 61 6e 79 20 76 61 72 69 | define |any vari|
|00000400| 61 62 6c 65 73 20 69 6e | 20 6f 75 72 20 77 6f 72 |ables in| our wor|
|00000410| 6b 73 70 61 63 65 0d 01 | c2 15 f2 73 65 74 5f 75 |kspace..|...set_u|
|00000420| 70 5f 76 61 72 69 61 62 | 6c 65 73 0d 01 cc 04 0d |p_variab|les.....|
|00000430| 01 d6 17 f4 20 61 73 73 | 65 6d 62 6c 65 20 74 68 |.... ass|emble th|
|00000440| 65 20 63 6f 64 65 0d 01 | e0 12 f2 61 73 73 65 6d |e code..|...assem|
|00000450| 62 6c 65 5f 63 6f 64 65 | 0d 01 ea 04 0d 01 f4 15 |ble_code|........|
|00000460| f4 20 73 61 76 65 20 74 | 68 65 20 6d 6f 64 75 6c |. save t|he modul|
|00000470| 65 0d 01 fe 65 c8 99 20 | 22 4f 53 5f 46 69 6c 65 |e...e.. |"OS_File|
|00000480| 22 2c 26 30 41 2c 77 6f | 72 6b 5f 64 69 72 65 63 |",&0A,wo|rk_direc|
|00000490| 74 6f 72 79 24 2b 22 2e | 33 72 64 50 61 72 74 79 |tory$+".|3rdParty|
|000004a0| 2e 4d 69 6c 65 73 53 61 | 62 69 6e 2e 5a 61 70 22 |.MilesSa|bin.Zap"|
|000004b0| 2b 6d 6f 64 65 5f 6e 61 | 6d 65 24 2c 26 46 46 41 |+mode_na|me$,&FFA|
|000004c0| 2c 30 2c 63 6f 64 65 25 | 2c 63 6f 64 65 25 2b 6c |,0,code%|,code%+l|
|000004d0| 65 6e 67 74 68 25 0d 02 | 08 32 f1 20 22 5a 61 70 |ength%..|.2. "Zap|
|000004e0| 22 3b 6d 6f 64 65 5f 6e | 61 6d 65 24 2b 22 20 6d |";mode_n|ame$+" m|
|000004f0| 6f 64 75 6c 65 20 63 72 | 65 61 74 65 64 20 61 6e |odule cr|eated an|
|00000500| 64 20 73 61 76 65 64 22 | 0d 02 12 04 0d 02 1c 05 |d saved"|........|
|00000510| e0 0d 02 26 04 0d 02 30 | 43 f4 20 64 65 66 69 6e |...&...0|C. defin|
|00000520| 65 20 61 6e 79 20 76 61 | 72 69 61 62 6c 65 73 20 |e any va|riables |
|00000530| 77 65 20 77 61 6e 74 20 | 74 6f 20 73 74 6f 72 65 |we want |to store|
|00000540| 20 69 6e 20 74 68 65 20 | 6d 6f 64 75 6c 65 20 77 | in the |module w|
|00000550| 6f 72 6b 73 70 61 63 65 | 0d 02 3a 04 0d 02 44 17 |orkspace|..:...D.|
|00000560| dd 20 f2 73 65 74 5f 75 | 70 5f 76 61 72 69 61 62 |. .set_u|p_variab|
|00000570| 6c 65 73 0d 02 4e 33 e3 | 20 70 61 73 73 3d 25 31 |les..N3.| pass=%1|
|00000580| 31 30 30 20 b8 20 25 31 | 31 31 30 20 88 20 32 3a |100 . %1|110 . 2:|
|00000590| 50 25 3d 30 3a 4f 25 3d | 63 6f 64 65 25 3a 5b 4f |P%=0:O%=|code%:[O|
|000005a0| 50 54 70 61 73 73 0d 02 | 58 04 0d 02 62 07 5d 3a |PTpass..|X...b.]:|
|000005b0| ed 0d 02 6c 15 76 61 72 | 69 61 62 6c 65 5f 73 69 |...l.var|iable_si|
|000005c0| 7a 65 25 3d 50 25 0d 02 | 76 05 e1 0d 02 80 04 0d |ze%=P%..|v.......|
|000005d0| 02 8a 1c f4 20 61 73 73 | 65 6d 62 6c 65 20 74 68 |.... ass|emble th|
|000005e0| 65 20 6d 61 69 6e 20 63 | 6f 64 65 0d 02 94 04 0d |e main c|ode.....|
|000005f0| 02 9e 14 dd 20 f2 61 73 | 73 65 6d 62 6c 65 5f 63 |.... .as|semble_c|
|00000600| 6f 64 65 0d 02 a8 04 0d | 02 b2 12 f4 20 64 65 66 |ode.....|.... def|
|00000610| 69 6e 65 20 66 6c 61 67 | 73 0d 02 bc 04 0d 02 c6 |ine flag|s.......|
|00000620| 10 49 66 6c 61 67 25 3d | 31 3c 3c 32 37 0d 02 d0 |.Iflag%=|1<<27...|
|00000630| 10 56 66 6c 61 67 25 3d | 31 3c 3c 32 38 0d 02 da |.Vflag%=|1<<28...|
|00000640| 10 43 66 6c 61 67 25 3d | 31 3c 3c 32 39 0d 02 e4 |.Cflag%=|1<<29...|
|00000650| 04 0d 02 ee 2a f4 20 64 | 65 66 69 6e 65 20 72 65 |....*. d|efine re|
|00000660| 67 69 73 74 65 72 20 6e | 75 6d 62 65 72 73 20 28 |gister n|umbers (|
|00000670| 66 6f 72 20 6d 61 63 72 | 6f 73 29 0d 02 f8 04 0d |for macr|os).....|
|00000680| 03 02 3c 52 30 3d 30 3a | 52 31 3d 31 3a 52 32 3d |..<R0=0:|R1=1:R2=|
|00000690| 32 3a 52 33 3d 33 3a 52 | 34 3d 34 3a 52 35 3d 35 |2:R3=3:R|4=4:R5=5|
|000006a0| 3a 52 36 3d 36 3a 52 37 | 3d 37 3a 52 38 3d 38 3a |:R6=6:R7|=7:R8=8:|
|000006b0| 52 39 3d 39 3a 52 31 30 | 3d 31 30 0d 03 0c 2c 52 |R9=9:R10|=10...,R|
|000006c0| 31 31 3d 31 31 3a 52 31 | 32 3d 31 32 3a 52 31 33 |11=11:R1|2=12:R13|
|000006d0| 3d 31 33 3a 52 31 34 3d | 31 34 3a 52 31 35 3d 31 |=13:R14=|14:R15=1|
|000006e0| 35 3a 50 43 3d 31 35 0d | 03 16 04 0d 03 20 2a e3 |5:PC=15.|..... *.|
|000006f0| 20 70 61 73 73 3d 25 31 | 31 30 30 20 b8 20 25 31 | pass=%1|100 . %1|
|00000700| 31 31 30 20 88 20 32 3a | 50 25 3d 30 3a 4f 25 3d |110 . 2:|P%=0:O%=|
|00000710| 63 6f 64 65 25 0d 03 2a | 0c 5b 4f 50 54 70 61 73 |code%..*|.[OPTpas|
|00000720| 73 0d 03 34 04 0d 03 3e | 12 2e 4d 6f 64 75 6c 65 |s..4...>|..Module|
|00000730| 5f 68 65 61 64 65 72 0d | 03 48 20 2e 53 74 61 72 |_header.|.H .Star|
|00000740| 74 5f 63 6f 64 65 20 20 | 20 20 20 20 20 20 20 20 |t_code | |
|00000750| 20 45 51 55 44 20 30 0d | 03 52 2e 2e 49 6e 69 74 | EQUD 0.|.R..Init|
|00000760| 69 61 6c 69 73 61 74 69 | 6f 6e 5f 63 6f 64 65 20 |ialisati|on_code |
|00000770| 20 45 51 55 44 20 69 6e | 69 74 69 61 6c 69 73 65 | EQUD in|itialise|
|00000780| 5f 63 6f 64 65 0d 03 5c | 2c 2e 46 69 6e 61 6c 69 |_code..\|,.Finali|
|00000790| 73 61 74 69 6f 6e 5f 63 | 6f 64 65 20 20 20 20 45 |sation_c|ode E|
|000007a0| 51 55 44 20 66 69 6e 61 | 6c 69 73 65 5f 63 6f 64 |QUD fina|lise_cod|
|000007b0| 65 0d 03 66 20 2e 53 65 | 72 76 69 63 65 5f 63 61 |e..f .Se|rvice_ca|
|000007c0| 6c 6c 5f 68 61 6e 64 6c | 65 72 20 45 51 55 44 20 |ll_handl|er EQUD |
|000007d0| 30 0d 03 70 2b 2e 54 69 | 74 6c 65 5f 73 74 72 69 |0..p+.Ti|tle_stri|
|000007e0| 6e 67 20 20 20 20 20 20 | 20 20 20 45 51 55 44 20 |ng | EQUD |
|000007f0| 74 69 74 6c 65 5f 73 74 | 72 69 6e 67 0d 03 7a 2a |title_st|ring..z*|
|00000800| 2e 48 65 6c 70 5f 73 74 | 72 69 6e 67 20 20 20 20 |.Help_st|ring |
|00000810| 20 20 20 20 20 20 45 51 | 55 44 20 68 65 6c 70 5f | EQ|UD help_|
|00000820| 73 74 72 69 6e 67 0d 03 | 84 20 2e 43 6f 6d 6d 61 |string..|. .Comma|
|00000830| 6e 64 5f 6b 65 79 77 6f | 72 64 5f 74 61 62 20 20 |nd_keywo|rd_tab |
|00000840| 45 51 55 44 20 30 0d 03 | 8e 20 2e 53 57 49 5f 63 |EQUD 0..|. .SWI_c|
|00000850| 68 75 6e 6b 5f 6e 75 6d | 62 65 72 20 20 20 20 20 |hunk_num|ber |
|00000860| 45 51 55 44 20 30 0d 03 | 98 20 2e 53 57 49 5f 68 |EQUD 0..|. .SWI_h|
|00000870| 61 6e 64 6c 65 72 5f 63 | 6f 64 65 20 20 20 20 20 |andler_c|ode |
|00000880| 45 51 55 44 20 30 0d 03 | a2 20 2e 53 57 49 5f 64 |EQUD 0..|. .SWI_d|
|00000890| 65 63 6f 64 69 6e 67 5f | 74 61 62 6c 65 20 20 20 |ecoding_|table |
|000008a0| 45 51 55 44 20 30 0d 03 | ac 20 2e 53 57 49 5f 64 |EQUD 0..|. .SWI_d|
|000008b0| 65 63 6f 64 69 6e 67 5f | 63 6f 64 65 20 20 20 20 |ecoding_|code |
|000008c0| 45 51 55 44 20 30 0d 03 | b6 04 0d 03 c0 44 5c 5c |EQUD 0..|.....D\\|
|000008d0| 5c 5c 5c 5c 5c 5c 5c 5c | 5c 5c 5c 5c 5c 5c 5c 5c |\\\\\\\\|\\\\\\\\|
|000008e0| 5c 5c 5c 5c 5c 5c 5c 5c | 5c 5c 5c 5c 5c 5c 5c 5c |\\\\\\\\|\\\\\\\\|
|000008f0| 5c 5c 5c 5c 5c 5c 5c 5c | 5c 5c 5c 5c 5c 5c 5c 5c |\\\\\\\\|\\\\\\\\|
|00000900| 5c 5c 5c 5c 5c 5c 5c 5c | 5c 5c 5c 5c 5c 5c 0d 03 |\\\\\\\\|\\\\\\..|
|00000910| ca 42 5c 20 54 49 54 4c | 45 53 20 80 20 43 4f 4d |.B\ TITL|ES . COM|
|00000920| 4d 41 4e 44 20 54 41 42 | 4c 45 53 20 20 20 20 20 |MAND TAB|LES |
|00000930| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000940| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 5c | | \|
|00000950| 0d 03 d4 44 5c 5c 5c 5c | 5c 5c 5c 5c 5c 5c 5c 5c |...D\\\\|\\\\\\\\|
|00000960| 5c 5c 5c 5c 5c 5c 5c 5c | 5c 5c 5c 5c 5c 5c 5c 5c |\\\\\\\\|\\\\\\\\|
|00000970| 5c 5c 5c 5c 5c 5c 5c 5c | 5c 5c 5c 5c 5c 5c 5c 5c |\\\\\\\\|\\\\\\\\|
|00000980| 5c 5c 5c 5c 5c 5c 5c 5c | 5c 5c 5c 5c 5c 5c 5c 5c |\\\\\\\\|\\\\\\\\|
|00000990| 5c 5c 5c 5c 0d 03 de 04 | 0d 03 e8 55 2e 68 65 6c |\\\\....|...U.hel|
|000009a0| 70 5f 73 74 72 69 6e 67 | 20 20 20 20 20 20 20 20 |p_string| |
|000009b0| 20 20 a4 53 28 22 5a 61 | 70 22 2b 6d 6f 64 65 5f | .S("Za|p"+mode_|
|000009c0| 6e 61 6d 65 24 2b bd 39 | 2b 76 65 72 24 2b 22 20 |name$+.9|+ver$+" |
|000009d0| 28 22 2b a4 64 61 74 65 | 2b 22 29 20 a9 20 22 2b |("+.date|+") . "+|
|000009e0| 6d 6f 64 65 5f 61 75 74 | 68 6f 72 24 29 0d 03 f2 |mode_aut|hor$)...|
|000009f0| 2e 2e 74 69 74 6c 65 5f | 73 74 72 69 6e 67 20 20 |..title_|string |
|00000a00| 20 20 20 20 20 20 20 a4 | 53 28 22 5a 61 70 22 2b | .|S("Zap"+|
|00000a10| 6d 6f 64 65 5f 6e 61 6d | 65 24 29 0d 03 fc 04 0d |mode_nam|e$).....|
|00000a20| 04 06 44 5c 5c 5c 5c 5c | 5c 5c 5c 5c 5c 5c 5c 5c |..D\\\\\|\\\\\\\\|
|00000a30| 5c 5c 5c 5c 5c 5c 5c 5c | 5c 5c 5c 5c 5c 5c 5c 5c |\\\\\\\\|\\\\\\\\|
|00000a40| 5c 5c 5c 5c 5c 5c 5c 5c | 5c 5c 5c 5c 5c 5c 5c 5c |\\\\\\\\|\\\\\\\\|
|00000a50| 5c 5c 5c 5c 5c 5c 5c 5c | 5c 5c 5c 5c 5c 5c 5c 5c |\\\\\\\\|\\\\\\\\|
|00000a60| 5c 5c 5c 0d 04 10 42 5c | 20 49 4e 49 54 49 41 4c |\\\...B\| INITIAL|
|00000a70| 49 53 45 20 80 20 46 49 | 4e 41 4c 49 53 45 20 20 |ISE . FI|NALISE |
|00000a80| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000a90| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000aa0| 20 20 20 20 5c 0d 04 1a | 44 5c 5c 5c 5c 5c 5c 5c | \...|D\\\\\\\|
|00000ab0| 5c 5c 5c 5c 5c 5c 5c 5c | 5c 5c 5c 5c 5c 5c 5c 5c |\\\\\\\\|\\\\\\\\|
|00000ac0| 5c 5c 5c 5c 5c 5c 5c 5c | 5c 5c 5c 5c 5c 5c 5c 5c |\\\\\\\\|\\\\\\\\|
|00000ad0| 5c 5c 5c 5c 5c 5c 5c 5c | 5c 5c 5c 5c 5c 5c 5c 5c |\\\\\\\\|\\\\\\\\|
|00000ae0| 5c 5c 5c 5c 5c 5c 5c 5c | 5c 0d 04 24 04 0d 04 2e |\\\\\\\\|\..$....|
|00000af0| 1e 2e 69 6e 69 74 69 61 | 6c 69 73 65 5f 63 6f 64 |..initia|lise_cod|
|00000b00| 65 20 20 20 20 20 20 a4 | 4a 53 52 0d 04 38 27 20 |e .|JSR..8' |
|00000b10| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000b20| 20 20 20 20 20 4d 4f 56 | 20 20 20 20 20 52 30 2c | MOV| R0,|
|00000b30| 23 36 0d 04 42 34 20 20 | 20 20 20 20 20 20 20 20 |#6..B4 | |
|00000b40| 20 20 20 20 20 20 20 20 | 20 20 20 20 4d 4f 56 20 | | MOV |
|00000b50| 20 20 20 20 52 33 2c 23 | 76 61 72 69 61 62 6c 65 | R3,#|variable|
|00000b60| 5f 73 69 7a 65 25 0d 04 | 4c 55 20 20 20 20 20 20 |_size%..|LU |
|00000b70| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000b80| 53 57 49 20 20 20 20 20 | 22 58 4f 53 5f 4d 6f 64 |SWI |"XOS_Mod|
|00000b90| 75 6c 65 22 20 20 20 20 | 20 20 20 20 20 20 20 20 |ule" | |
|00000ba0| 20 20 5c 20 63 6c 61 69 | 6d 20 76 61 72 61 62 6c | \ clai|m varabl|
|00000bb0| 65 20 77 6f 72 6b 73 70 | 61 63 65 0d 04 56 20 20 |e worksp|ace..V |
|00000bc0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000bd0| 20 20 20 20 20 a4 52 54 | 53 56 53 0d 04 60 5d 20 | .RT|SVS..`] |
|00000be0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000bf0| 20 20 20 20 20 4d 4f 56 | 20 20 20 20 20 52 31 31 | MOV| R11|
|00000c00| 2c 52 32 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |,R2 | |
|00000c10| 20 20 20 20 20 20 20 5c | 20 63 6c 61 69 6d 65 64 | \| claimed|
|00000c20| 20 62 6c 6f 63 6b 20 28 | 52 31 31 20 66 72 6f 6d | block (|R11 from|
|00000c30| 20 6e 6f 77 20 6f 6e 29 | 0d 04 6a 5a 20 20 20 20 | now on)|..jZ |
|00000c40| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000c50| 20 20 53 54 52 20 20 20 | 20 20 52 31 31 2c 5b 52 | STR | R11,[R|
|00000c60| 31 32 5d 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |12] | |
|00000c70| 20 20 20 20 5c 20 73 61 | 76 65 20 61 73 20 6d 79 | \ sa|ve as my|
|00000c80| 20 77 6f 72 6b 73 70 61 | 63 65 20 70 6f 69 6e 74 | workspa|ce point|
|00000c90| 65 72 0d 04 74 57 20 20 | 20 20 20 20 20 20 20 20 |er..tW | |
|00000ca0| 20 20 20 20 20 20 20 20 | 20 20 20 20 53 54 52 20 | | STR |
|00000cb0| 20 20 20 20 52 31 31 2c | 77 6f 72 6b 73 70 61 63 | R11,|workspac|
|00000cc0| 65 5f 61 64 64 72 65 73 | 73 20 20 20 20 20 5c 20 |e_addres|s \ |
|00000cd0| 73 61 76 65 20 69 74 20 | 69 6e 20 74 68 65 20 6d |save it |in the m|
|00000ce0| 6f 64 75 6c 65 20 66 6f | 72 0d 04 7e 51 20 20 20 |odule fo|r..~Q |
|00000cf0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000d00| 20 20 20 4d 4f 56 20 20 | 20 20 20 52 30 2c 23 31 | MOV | R0,#1|
|00000d10| 38 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |8 | |
|00000d20| 20 20 20 20 20 5c 20 61 | 63 63 65 73 73 69 6e 67 | \ a|ccessing|
|00000d30| 20 63 6f 6d 6d 61 6e 64 | 73 2e 0d 04 88 2e 20 20 | command|s..... |
|00000d40| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000d50| 20 20 20 20 41 44 52 20 | 20 20 20 20 52 31 2c 7a | ADR | R1,z|
|00000d60| 61 70 5f 74 69 74 6c 65 | 0d 04 92 46 20 20 20 20 |ap_title|...F |
|00000d70| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000d80| 20 20 53 57 49 20 20 20 | 20 20 22 58 4f 53 5f 4d | SWI | "XOS_M|
|00000d90| 6f 64 75 6c 65 22 20 20 | 20 20 20 20 20 20 20 20 |odule" | |
|00000da0| 20 20 20 20 5c 20 66 69 | 6e 64 20 7a 61 70 0d 04 | \ fi|nd zap..|
|00000db0| 9c 46 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.F | |
|00000dc0| 20 20 20 20 20 20 20 20 | a4 52 54 53 56 53 20 20 | |.RTSVS |
|00000dd0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000de0| 20 20 20 20 20 20 20 20 | 20 5c 20 6e 6f 74 20 66 | | \ not f|
|00000df0| 6f 75 6e 64 0d 04 a6 4b | 20 20 20 20 20 20 20 20 |ound...K| |
|00000e00| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 4d 4f | | MO|
|00000e10| 56 20 20 20 20 20 52 31 | 32 2c 52 34 20 20 20 20 |V R1|2,R4 |
|00000e20| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000e30| 5c 20 7a 61 70 20 77 6f | 72 6b 73 70 61 63 65 0d |\ zap wo|rkspace.|
|00000e40| 04 b0 2d 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |..- | |
|00000e50| 20 20 20 20 20 20 20 20 | 20 a4 41 44 52 28 52 30 | | .ADR(R0|
|00000e60| 2c 6d 6f 64 65 5f 74 61 | 62 6c 65 29 0d 04 ba 51 |,mode_ta|ble)...Q|
|00000e70| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000e80| 20 20 20 20 20 20 a4 63 | 61 6c 6c 28 5a 61 70 5f | .c|all(Zap_|
|00000e90| 41 64 64 4d 6f 64 65 29 | 20 20 20 20 20 20 20 20 |AddMode)| |
|00000ea0| 20 20 20 20 20 20 20 5c | 20 61 64 64 20 74 68 69 | \| add thi|
|00000eb0| 73 20 6d 6f 64 65 20 74 | 6f 20 7a 61 70 0d 04 c4 |s mode t|o zap...|
|00000ec0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000ed0| 20 20 20 20 20 20 20 a4 | 52 54 53 56 53 0d 04 ce | .|RTSVS...|
|00000ee0| 27 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |' | |
|00000ef0| 20 20 20 20 20 20 20 4d | 4f 56 20 20 20 20 20 52 | M|OV R|
|00000f00| 31 2c 23 30 0d 04 d8 28 | 20 20 20 20 20 20 20 20 |1,#0...(| |
|00000f10| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 4d 4f | | MO|
|00000f20| 56 20 20 20 20 20 52 32 | 2c 52 31 31 0d 04 e2 34 |V R2|,R11...4|
|00000f30| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000f40| 20 20 20 20 20 20 4d 4f | 56 20 20 20 20 20 52 33 | MO|V R3|
|00000f50| 2c 23 76 61 72 69 61 62 | 6c 65 5f 73 69 7a 65 25 |,#variab|le_size%|
|00000f60| 0d 04 ec 55 20 20 20 20 | 20 20 20 20 20 20 20 20 |...U | |
|00000f70| 20 20 20 20 20 20 20 20 | 20 20 a4 63 61 6c 6c 28 | | .call(|
|00000f80| 5a 61 70 5f 46 69 6c 6c | 57 6f 72 64 73 29 20 20 |Zap_Fill|Words) |
|00000f90| 20 20 20 20 20 20 20 20 | 20 20 20 5c 20 63 6c 65 | | \ cle|
|00000fa0| 61 72 20 77 6f 72 6b 73 | 70 61 63 65 20 74 6f 20 |ar works|pace to |
|00000fb0| 7a 65 72 6f 73 0d 04 f6 | 1e 20 20 20 20 20 20 20 |zeros...|. |
|00000fc0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 a4 | | .|
|00000fd0| 52 54 53 0d 05 00 04 0d | 05 0a 23 2e 7a 61 70 5f |RTS.....|..#.zap_|
|00000fe0| 74 69 74 6c 65 20 20 20 | 20 20 20 20 20 20 20 20 |title | |
|00000ff0| 20 a4 53 28 22 5a 61 70 | 22 29 0d 05 14 04 0d 05 | .S("Zap|")......|
|00001000| 1e 20 2e 77 6f 72 6b 73 | 70 61 63 65 5f 61 64 64 |. .works|pace_add|
|00001010| 72 65 73 73 20 20 20 20 | 45 51 55 44 20 30 0d 05 |ress |EQUD 0..|
|00001020| 28 04 0d 05 32 1d 5c 58 | 20 52 31 31 3d 6d 6f 64 |(...2.\X| R11=mod|
|00001030| 75 6c 65 20 77 6f 72 6b | 73 70 61 63 65 20 7c 0d |ule work|space |.|
|00001040| 05 3c 04 0d 05 46 37 2e | 67 65 74 5f 77 6f 72 6b |.<...F7.|get_work|
|00001050| 73 70 61 63 65 20 20 20 | 20 20 20 20 20 4c 44 52 |space | LDR|
|00001060| 20 20 20 20 20 52 31 31 | 2c 77 6f 72 6b 73 70 61 | R11|,workspa|
|00001070| 63 65 5f 61 64 64 72 65 | 73 73 0d 05 50 28 20 20 |ce_addre|ss..P( |
|00001080| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001090| 20 20 20 20 4d 4f 56 20 | 20 20 20 20 50 43 2c 52 | MOV | PC,R|
|000010a0| 31 34 0d 05 5a 04 0d 05 | 64 1e 2e 66 69 6e 61 6c |14..Z...|d..final|
|000010b0| 69 73 65 5f 63 6f 64 65 | 20 20 20 20 20 20 20 20 |ise_code| |
|000010c0| a4 4a 53 52 0d 05 6e 27 | 20 20 20 20 20 20 20 20 |.JSR..n'| |
|000010d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 4d 4f | | MO|
|000010e0| 56 20 20 20 20 20 52 30 | 2c 23 37 0d 05 78 2a 20 |V R0|,#7..x* |
|000010f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001100| 20 20 20 20 20 4c 44 52 | 20 20 20 20 20 52 32 2c | LDR| R2,|
|00001110| 5b 52 31 32 5d 0d 05 82 | 4c 20 20 20 20 20 20 20 |[R12]...|L |
|00001120| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 53 | | S|
|00001130| 57 49 20 20 20 20 20 22 | 58 4f 53 5f 4d 6f 64 75 |WI "|XOS_Modu|
|00001140| 6c 65 22 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |le" | |
|00001150| 20 5c 20 66 72 65 65 20 | 77 6f 72 6b 73 70 61 63 | \ free |workspac|
|00001160| 65 0d 05 8c 20 20 20 20 | 20 20 20 20 20 20 20 20 |e... | |
|00001170| 20 20 20 20 20 20 20 20 | 20 20 20 a4 52 54 53 56 | | .RTSV|
|00001180| 53 0d 05 96 27 20 20 20 | 20 20 20 20 20 20 20 20 |S...' | |
|00001190| 20 20 20 20 20 20 20 20 | 20 20 20 4d 4f 56 20 20 | | MOV |
|000011a0| 20 20 20 52 30 2c 23 30 | 0d 05 a0 4f 20 20 20 20 | R0,#0|...O |
|000011b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000011c0| 20 20 53 54 52 20 20 20 | 20 20 52 30 2c 5b 52 31 | STR | R0,[R1|
|000011d0| 32 5d 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |2] | |
|000011e0| 20 20 20 20 5c 20 6e 75 | 6c 6c 20 70 72 69 76 61 | \ nu|ll priva|
|000011f0| 74 65 20 77 6f 72 64 0d | 05 aa 1e 20 20 20 20 20 |te word.|... |
|00001200| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001210| 20 a4 52 54 53 0d 05 b4 | 04 0d 05 be 44 5c 5c 5c | .RTS...|....D\\\|
|00001220| 5c 5c 5c 5c 5c 5c 5c 5c | 5c 5c 5c 5c 5c 5c 5c 5c |\\\\\\\\|\\\\\\\\|
|00001230| 5c 5c 5c 5c 5c 5c 5c 5c | 5c 5c 5c 5c 5c 5c 5c 5c |\\\\\\\\|\\\\\\\\|
|00001240| 5c 5c 5c 5c 5c 5c 5c 5c | 5c 5c 5c 5c 5c 5c 5c 5c |\\\\\\\\|\\\\\\\\|
|00001250| 5c 5c 5c 5c 5c 5c 5c 5c | 5c 5c 5c 5c 5c 0d 05 c8 |\\\\\\\\|\\\\\...|
|00001260| 44 5c 20 4d 6f 64 65 20 | 54 61 62 6c 65 20 20 20 |D\ Mode |Table |
|00001270| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001280| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001290| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000012a0| 5c 0d 05 d2 44 5c 5c 5c | 5c 5c 5c 5c 5c 5c 5c 5c |\...D\\\|\\\\\\\\|
|000012b0| 5c 5c 5c 5c 5c 5c 5c 5c | 5c 5c 5c 5c 5c 5c 5c 5c |\\\\\\\\|\\\\\\\\|
|000012c0| 5c 5c 5c 5c 5c 5c 5c 5c | 5c 5c 5c 5c 5c 5c 5c 5c |\\\\\\\\|\\\\\\\\|
|000012d0| 5c 5c 5c 5c 5c 5c 5c 5c | 5c 5c 5c 5c 5c 5c 5c 5c |\\\\\\\\|\\\\\\\\|
|000012e0| 5c 5c 5c 5c 5c 0d 05 dc | 04 0d 05 e6 0f 2e 6d 6f |\\\\\...|......mo|
|000012f0| 64 65 5f 74 61 62 6c 65 | 0d 05 f0 38 45 51 55 44 |de_table|...8EQUD|
|00001300| 20 6d 6f 64 65 5f 74 61 | 62 6c 65 20 20 20 20 20 | mode_ta|ble |
|00001310| 20 20 20 20 20 20 20 20 | 20 20 5c 20 6f 66 66 73 | | \ offs|
|00001320| 65 74 20 6f 66 20 6d 6f | 64 65 20 74 61 62 6c 65 |et of mo|de table|
|00001330| 0d 05 fa 35 45 51 55 44 | 20 6d 6f 64 65 5f 74 69 |...5EQUD| mode_ti|
|00001340| 74 6c 65 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |tle | |
|00001350| 20 20 5c 20 6d 6f 64 65 | 20 74 69 74 6c 65 20 73 | \ mode| title s|
|00001360| 74 72 69 6e 67 0d 06 04 | 31 45 51 55 44 20 6d 6f |tring...|1EQUD mo|
|00001370| 64 65 5f 61 75 74 68 6f | 72 20 20 20 20 20 20 20 |de_autho|r |
|00001380| 20 20 20 20 20 20 20 5c | 20 61 75 74 68 6f 72 20 | \| author |
|00001390| 73 74 72 69 6e 67 0d 06 | 0e 34 45 51 55 44 20 6d |string..|.4EQUD m|
|000013a0| 6f 64 65 5f 62 61 73 65 | 6d 6f 64 65 20 20 20 20 |ode_base|mode |
|000013b0| 20 20 20 20 20 20 20 20 | 5c 20 62 61 73 65 20 6d | |\ base m|
|000013c0| 6f 64 65 20 6e 75 6d 62 | 65 72 0d 06 18 37 45 51 |ode numb|er...7EQ|
|000013d0| 55 44 20 6d 6f 64 65 5f | 6e 75 6d 62 65 72 20 20 |UD mode_|number |
|000013e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 5c 20 6d 6f | | \ mo|
|000013f0| 64 65 20 79 6f 75 20 77 | 61 6e 74 20 74 6f 20 62 |de you w|ant to b|
|00001400| 65 0d 06 22 41 45 51 55 | 44 20 6d 6f 64 65 5f 69 |e.."AEQU|D mode_i|
|00001410| 6e 69 74 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |nit | |
|00001420| 20 20 20 5c 20 6f 66 66 | 73 65 74 20 6f 66 20 69 | \ off|set of i|
|00001430| 6e 69 74 69 61 6c 69 73 | 61 74 69 6f 6e 20 63 6f |nitialis|ation co|
|00001440| 64 65 0d 06 2c 37 45 51 | 55 44 20 30 20 20 20 20 |de..,7EQ|UD 0 |
|00001450| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001460| 20 20 20 20 5c 20 6f 66 | 66 73 65 74 20 6f 66 20 | \ of|fset of |
|00001470| 79 6f 75 72 20 6d 65 6e | 75 0d 06 36 34 45 51 55 |your men|u..64EQU|
|00001480| 44 20 6d 6f 64 65 5f 74 | 61 62 6c 65 5f 65 6e 64 |D mode_t|able_end|
|00001490| 2d 6d 6f 64 65 5f 74 61 | 62 6c 65 20 5c 20 6c 65 |-mode_ta|ble \ le|
|000014a0| 6e 67 74 68 20 6f 66 20 | 74 61 62 6c 65 0d 06 40 |ngth of |table..@|
|000014b0| 04 0d 06 4a 31 45 51 55 | 44 20 30 20 20 20 20 20 |...J1EQU|D 0 |
|000014c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000014d0| 20 20 20 5c 20 6d 6f 64 | 65 5f 70 6f 73 74 6c 6f | \ mod|e_postlo|
|000014e0| 61 64 0d 06 54 30 45 51 | 55 44 20 30 20 20 20 20 |ad..T0EQ|UD 0 |
|000014f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001500| 20 20 20 20 5c 20 6d 6f | 64 65 5f 70 72 65 73 61 | \ mo|de_presa|
|00001510| 76 65 0d 06 5e 30 45 51 | 55 44 20 30 20 20 20 20 |ve..^0EQ|UD 0 |
|00001520| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001530| 20 20 20 20 5c 20 6d 6f | 64 65 5f 6c 6f 61 64 69 | \ mo|de_loadi|
|00001540| 6e 67 0d 06 68 13 45 51 | 55 44 20 6d 6f 64 65 5f |ng..h.EQ|UD mode_|
|00001550| 73 74 61 72 74 0d 06 72 | 11 45 51 55 44 20 6d 6f |start..r|.EQUD mo|
|00001560| 64 65 5f 65 6e 64 0d 06 | 7c 2e 45 51 55 44 20 30 |de_end..||.EQUD 0|
|00001570| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001580| 20 20 20 20 20 20 20 20 | 5c 20 6d 6f 64 65 5f 77 | |\ mode_w|
|00001590| 69 64 74 68 0d 06 86 30 | 45 51 55 44 20 30 20 20 |idth...0|EQUD 0 |
|000015a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000015b0| 20 20 20 20 20 20 5c 20 | 6d 6f 64 65 5f 6c 69 6e | \ |mode_lin|
|000015c0| 65 63 6f 6c 0d 06 90 30 | 45 51 55 44 20 30 20 20 |ecol...0|EQUD 0 |
|000015d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000015e0| 20 20 20 20 20 20 5c 20 | 6d 6f 64 65 5f 6c 69 6e | \ |mode_lin|
|000015f0| 65 6f 66 66 0d 06 9a 2f | 45 51 55 44 20 30 20 20 |eoff.../|EQUD 0 |
|00001600| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001610| 20 20 20 20 20 20 5c 20 | 6d 6f 64 65 5f 63 6c 6e | \ |mode_cln|
|00001620| 6c 6f 67 0d 06 a4 2f 45 | 51 55 44 20 30 20 20 20 |log.../E|QUD 0 |
|00001630| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001640| 20 20 20 20 20 5c 20 6d | 6f 64 65 5f 63 6c 6e 70 | \ m|ode_clnp|
|00001650| 68 79 0d 06 ae 2f 45 51 | 55 44 20 30 20 20 20 20 |hy.../EQ|UD 0 |
|00001660| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001670| 20 20 20 20 5c 20 6d 6f | 64 65 5f 63 6c 6e 6f 66 | \ mo|de_clnof|
|00001680| 66 0d 06 b8 31 45 51 55 | 44 20 30 20 20 20 20 20 |f...1EQU|D 0 |
|00001690| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000016a0| 20 20 20 5c 20 6d 6f 64 | 65 5f 6e 65 78 74 6c 69 | \ mod|e_nextli|
|000016b0| 6e 65 0d 06 c2 2e 45 51 | 55 44 20 30 20 20 20 20 |ne....EQ|UD 0 |
|000016c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000016d0| 20 20 20 20 5c 20 6d 6f | 64 65 5f 6d 69 6e 75 73 | \ mo|de_minus|
|000016e0| 0d 06 cc 2d 45 51 55 44 | 20 30 20 20 20 20 20 20 |...-EQUD| 0 |
|000016f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001700| 20 20 5c 20 6d 6f 64 65 | 5f 70 6c 75 73 0d 06 d6 | \ mode|_plus...|
|00001710| 2f 45 51 55 44 20 30 20 | 20 20 20 20 20 20 20 20 |/EQUD 0 | |
|00001720| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 5c | | \|
|00001730| 20 6d 6f 64 65 5f 73 6d | 69 6e 75 73 0d 06 e0 2e | mode_sm|inus....|
|00001740| 45 51 55 44 20 30 20 20 | 20 20 20 20 20 20 20 20 |EQUD 0 | |
|00001750| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 5c 20 | | \ |
|00001760| 6d 6f 64 65 5f 73 70 6c | 75 73 0d 06 ea 2f 45 51 |mode_spl|us.../EQ|
|00001770| 55 44 20 30 20 20 20 20 | 20 20 20 20 20 20 20 20 |UD 0 | |
|00001780| 20 20 20 20 20 20 20 20 | 20 20 20 20 5c 20 6d 6f | | \ mo|
|00001790| 64 65 5f 63 6d 69 6e 75 | 73 0d 06 f4 2e 45 51 55 |de_cminu|s....EQU|
|000017a0| 44 20 30 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |D 0 | |
|000017b0| 20 20 20 20 20 20 20 20 | 20 20 20 5c 20 6d 6f 64 | | \ mod|
|000017c0| 65 5f 63 70 6c 75 73 0d | 06 fe 33 45 51 55 44 20 |e_cplus.|..3EQUD |
|000017d0| 30 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |0 | |
|000017e0| 20 20 20 20 20 20 20 20 | 20 5c 20 6d 6f 64 65 5f | | \ mode_|
|000017f0| 72 65 64 72 61 77 6c 69 | 6e 65 0d 07 08 33 45 51 |redrawli|ne...3EQ|
|00001800| 55 44 20 30 20 20 20 20 | 20 20 20 20 20 20 20 20 |UD 0 | |
|00001810| 20 20 20 20 20 20 20 20 | 20 20 20 20 5c 20 6d 6f | | \ mo|
|00001820| 64 65 5f 72 65 64 72 61 | 77 6c 6e 75 6d 0d 07 12 |de_redra|wlnum...|
|00001830| 2d 45 51 55 44 20 30 20 | 20 20 20 20 20 20 20 20 |-EQUD 0 | |
|00001840| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 5c | | \|
|00001850| 20 6d 6f 64 65 5f 63 68 | 61 72 0d 07 1c 2f 45 51 | mode_ch|ar.../EQ|
|00001860| 55 44 20 30 20 20 20 20 | 20 20 20 20 20 20 20 20 |UD 0 | |
|00001870| 20 20 20 20 20 20 20 20 | 20 20 20 20 5c 20 6d 6f | | \ mo|
|00001880| 64 65 5f 64 65 6c 65 74 | 65 0d 07 26 2c 45 51 55 |de_delet|e..&,EQU|
|00001890| 44 20 30 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |D 0 | |
|000018a0| 20 20 20 20 20 20 20 20 | 20 20 20 5c 20 6d 6f 64 | | \ mod|
|000018b0| 65 5f 74 61 62 0d 07 30 | 2f 45 51 55 44 20 30 20 |e_tab..0|/EQUD 0 |
|000018c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000018d0| 20 20 20 20 20 20 20 5c | 20 6d 6f 64 65 5f 72 65 | \| mode_re|
|000018e0| 74 75 72 6e 0d 07 3a 31 | 45 51 55 44 20 30 20 20 |turn..:1|EQUD 0 |
|000018f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001900| 20 20 20 20 20 20 5c 20 | 6d 6f 64 65 5f 72 65 6e | \ |mode_ren|
|00001910| 75 6d 62 65 72 0d 07 44 | 33 45 51 55 44 20 30 20 |umber..D|3EQUD 0 |
|00001920| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001930| 20 20 20 20 20 20 20 5c | 20 6d 6f 64 65 5f 73 61 | \| mode_sa|
|00001940| 76 65 61 6e 64 72 75 6e | 0d 07 4e 32 45 51 55 44 |veandrun|..N2EQUD|
|00001950| 20 30 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | 0 | |
|00001960| 20 20 20 20 20 20 20 20 | 20 20 5c 20 6d 6f 64 65 | | \ mode|
|00001970| 5f 6c 69 6e 65 73 74 61 | 72 74 0d 07 58 30 45 51 |_linesta|rt..X0EQ|
|00001980| 55 44 20 30 20 20 20 20 | 20 20 20 20 20 20 20 20 |UD 0 | |
|00001990| 20 20 20 20 20 20 20 20 | 20 20 20 20 5c 20 6d 6f | | \ mo|
|000019a0| 64 65 5f 6c 69 6e 65 65 | 6e 64 0d 07 62 31 45 51 |de_linee|nd..b1EQ|
|000019b0| 55 44 20 30 20 20 20 20 | 20 20 20 20 20 20 20 20 |UD 0 | |
|000019c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 5c 20 6d 6f | | \ mo|
|000019d0| 64 65 5f 6c 69 6e 65 6e | 65 78 74 0d 07 6c 31 45 |de_linen|ext..l1E|
|000019e0| 51 55 44 20 30 20 20 20 | 20 20 20 20 20 20 20 20 |QUD 0 | |
|000019f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 5c 20 6d | | \ m|
|00001a00| 6f 64 65 5f 6c 69 6e 65 | 70 72 65 76 0d 07 76 2d |ode_line|prev..v-|
|00001a10| 45 51 55 44 20 30 20 20 | 20 20 20 20 20 20 20 20 |EQUD 0 | |
|00001a20| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 5c 20 | | \ |
|00001a30| 6d 6f 64 65 5f 63 6f 70 | 79 0d 07 80 31 45 51 55 |mode_cop|y...1EQU|
|00001a40| 44 20 30 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |D 0 | |
|00001a50| 20 20 20 20 20 20 20 20 | 20 20 20 5c 20 6d 6f 64 | | \ mod|
|00001a60| 65 5f 6a 6f 69 6e 6c 69 | 6e 65 0d 07 8a 32 45 51 |e_joinli|ne...2EQ|
|00001a70| 55 44 20 30 20 20 20 20 | 20 20 20 20 20 20 20 20 |UD 0 | |
|00001a80| 20 20 20 20 20 20 20 20 | 20 20 20 20 5c 20 6d 6f | | \ mo|
|00001a90| 64 65 5f 73 70 6c 69 74 | 6c 69 6e 65 0d 07 94 33 |de_split|line...3|
|00001aa0| 45 51 55 44 20 30 20 20 | 20 20 20 20 20 20 20 20 |EQUD 0 | |
|00001ab0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 5c 20 | | \ |
|00001ac0| 6d 6f 64 65 5f 61 6c 69 | 67 6e 63 61 72 65 74 0d |mode_ali|gncaret.|
|00001ad0| 07 9e 30 45 51 55 44 20 | 30 20 20 20 20 20 20 20 |..0EQUD |0 |
|00001ae0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001af0| 20 5c 20 6d 6f 64 65 5f | 63 6f 6d 6d 61 6e 64 0d | \ mode_|command.|
|00001b00| 07 a8 30 45 51 55 44 20 | 30 20 20 20 20 20 20 20 |..0EQUD |0 |
|00001b10| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001b20| 20 5c 20 6d 6f 64 65 5f | 63 6f 6d 70 69 6c 65 0d | \ mode_|compile.|
|00001b30| 07 b2 33 45 51 55 44 20 | 30 20 20 20 20 20 20 20 |..3EQUD |0 |
|00001b40| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001b50| 20 5c 20 6d 6f 64 65 5f | 66 6f 72 6d 61 74 74 65 | \ mode_|formatte|
|00001b60| 78 74 0d 07 bc 2c 45 51 | 55 44 20 30 20 20 20 20 |xt...,EQ|UD 0 |
|00001b70| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001b80| 20 20 20 20 5c 20 6d 6f | 64 65 5f 72 75 6e 0d 07 | \ mo|de_run..|
|00001b90| c6 33 45 51 55 44 20 30 | 20 20 20 20 20 20 20 20 |.3EQUD 0| |
|00001ba0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001bb0| 5c 20 6d 6f 64 65 5f 72 | 75 6e 61 6e 64 71 75 69 |\ mode_r|unandqui|
|00001bc0| 74 0d 07 d0 2e 45 51 55 | 44 20 30 20 20 20 20 20 |t....EQU|D 0 |
|00001bd0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001be0| 20 20 20 5c 20 6d 6f 64 | 65 5f 62 61 73 69 63 0d | \ mod|e_basic.|
|00001bf0| 07 da 2f 45 51 55 44 20 | 30 20 20 20 20 20 20 20 |../EQUD |0 |
|00001c00| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001c10| 20 5c 20 6d 6f 64 65 5f | 73 65 61 72 63 68 0d 07 | \ mode_|search..|
|00001c20| e4 30 45 51 55 44 20 30 | 20 20 20 20 20 20 20 20 |.0EQUD 0| |
|00001c30| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001c40| 5c 20 6d 6f 64 65 5f 72 | 65 70 6c 61 63 65 0d 07 |\ mode_r|eplace..|
|00001c50| ee 32 45 51 55 44 20 30 | 20 20 20 20 20 20 20 20 |.2EQUD 0| |
|00001c60| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001c70| 5c 20 6d 6f 64 65 5f 73 | 65 6c 65 63 74 69 6f 6e |\ mode_s|election|
|00001c80| 0d 07 f8 2e 45 51 55 44 | 20 30 20 20 20 20 20 20 |....EQUD| 0 |
|00001c90| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001ca0| 20 20 5c 20 6d 6f 64 65 | 5f 63 6c 69 63 6b 0d 08 | \ mode|_click..|
|00001cb0| 02 30 45 51 55 44 20 30 | 20 20 20 20 20 20 20 20 |.0EQUD 0| |
|00001cc0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001cd0| 5c 20 6d 6f 64 65 5f 6d | 65 73 73 61 67 65 0d 08 |\ mode_m|essage..|
|00001ce0| 0c 31 45 51 55 44 20 30 | 20 20 20 20 20 20 20 20 |.1EQUD 0| |
|00001cf0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001d00| 5c 20 6d 6f 64 65 5f 73 | 65 74 77 69 64 74 68 0d |\ mode_s|etwidth.|
|00001d10| 08 16 13 2e 6d 6f 64 65 | 5f 74 61 62 6c 65 5f 65 |....mode|_table_e|
|00001d20| 6e 64 0d 08 20 04 0d 08 | 2a 28 2e 6d 6f 64 65 5f |nd.. ...|*(.mode_|
|00001d30| 74 69 74 6c 65 20 20 20 | 20 20 20 20 20 20 20 20 |title | |
|00001d40| a4 53 28 6d 6f 64 65 5f | 6e 61 6d 65 24 29 0d 08 |.S(mode_|name$)..|
|00001d50| 34 2a 2e 6d 6f 64 65 5f | 61 75 74 68 6f 72 20 20 |4*.mode_|author |
|00001d60| 20 20 20 20 20 20 20 20 | a4 53 28 6d 6f 64 65 5f | |.S(mode_|
|00001d70| 61 75 74 68 6f 72 24 29 | 0d 08 3e 04 0d 08 48 28 |author$)|..>...H(|
|00001d80| 2e 4e 75 6c 6c 20 20 20 | 20 20 20 20 20 20 20 20 |.Null | |
|00001d90| 20 20 20 20 20 20 4d 4f | 56 20 20 20 20 20 50 43 | MO|V PC|
|00001da0| 2c 52 31 34 0d 08 52 04 | 0d 08 5c 34 2e 6d 6f 64 |,R14..R.|..\4.mod|
|00001db0| 65 5f 73 74 61 72 74 20 | 20 20 20 20 20 20 20 20 |e_start | |
|00001dc0| 20 20 53 54 4d 46 44 20 | 20 20 52 31 33 21 2c 20 | STMFD | R13!, |
|00001dd0| 7b 52 31 2d 52 33 2c 20 | 52 31 34 7d 0d 08 66 31 |{R1-R3, |R14}..f1|
|00001de0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001df0| 20 20 20 20 20 20 42 4c | 20 20 20 20 20 20 67 65 | BL| ge|
|00001e00| 74 5f 6d 6f 64 65 5f 6e | 75 6d 62 65 72 0d 08 70 |t_mode_n|umber..p|
|00001e10| 28 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |( | |
|00001e20| 20 20 20 20 20 20 20 4d | 4f 56 20 20 20 20 20 52 | M|OV R|
|00001e30| 31 2c 20 52 30 0d 08 7a | 34 20 20 20 20 20 20 20 |1, R0..z|4 |
|00001e40| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 a4 | | .|
|00001e50| 63 61 6c 6c 28 5a 61 70 | 5f 52 65 73 74 6f 72 65 |call(Zap|_Restore|
|00001e60| 4d 6f 64 65 57 6f 72 64 | 29 0d 08 84 28 20 20 20 |ModeWord|)...( |
|00001e70| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001e80| 20 20 20 54 45 51 20 20 | 20 20 20 52 38 2c 20 23 | TEQ | R8, #|
|00001e90| 30 0d 08 8e 33 20 20 20 | 20 20 20 20 20 20 20 20 |0...3 | |
|00001ea0| 20 20 20 20 20 20 20 20 | 20 20 20 4c 44 4d 45 51 | | LDMEQ|
|00001eb0| 46 44 20 52 31 33 21 2c | 20 7b 52 31 2d 52 33 2c |FD R13!,| {R1-R3,|
|00001ec0| 20 50 43 7d 0d 08 98 04 | 0d 08 a2 2f 20 20 20 20 | PC}....|.../ |
|00001ed0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001ee0| 20 20 a4 63 61 6c 6c 28 | 5a 61 70 5f 47 65 74 57 | .call(|Zap_GetW|
|00001ef0| 69 6e 64 4f 66 66 29 0d | 08 ac 28 20 20 20 20 20 |indOff).|..( |
|00001f00| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001f10| 20 4d 4f 56 20 20 20 20 | 20 52 33 2c 20 52 30 0d | MOV | R3, R0.|
|00001f20| 08 b6 28 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |..( | |
|00001f30| 20 20 20 20 20 20 20 20 | 20 4d 4f 56 20 20 20 20 | | MOV |
|00001f40| 20 52 31 2c 20 23 30 0d | 08 c0 2e 20 20 20 20 20 | R1, #0.|... |
|00001f50| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001f60| 20 41 44 52 20 20 20 20 | 20 52 32 2c 20 63 61 6c | ADR | R2, cal|
|00001f70| 6c 62 61 63 6b 0d 08 ca | 2d 20 20 20 20 20 20 20 |lback...|- |
|00001f80| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 a4 | | .|
|00001f90| 63 61 6c 6c 28 5a 61 70 | 5f 43 61 6c 6c 42 61 63 |call(Zap|_CallBac|
|00001fa0| 6b 29 0d 08 d4 33 20 20 | 20 20 20 20 20 20 20 20 |k)...3 | |
|00001fb0| 20 20 20 20 20 20 20 20 | 20 20 20 20 4c 44 4d 46 | | LDMF|
|00001fc0| 44 20 20 20 52 31 33 21 | 2c 20 7b 52 31 2d 52 33 |D R13!|, {R1-R3|
|00001fd0| 2c 20 50 43 7d 0d 08 de | 04 0d 08 e8 2d 2e 6d 6f |, PC}...|....-.mo|
|00001fe0| 64 65 5f 65 6e 64 20 20 | 20 20 20 20 20 20 20 20 |de_end | |
|00001ff0| 20 20 20 53 54 4d 46 44 | 20 20 20 52 31 33 21 2c | STMFD| R13!,|
|00002000| 20 7b 52 31 34 7d 0d 08 | f2 31 20 20 20 20 20 20 | {R14}..|.1 |
|00002010| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002020| 42 4c 20 20 20 20 20 20 | 67 65 74 5f 6d 6f 64 65 |BL |get_mode|
|00002030| 5f 6e 75 6d 62 65 72 0d | 08 fc 31 20 20 20 20 20 |_number.|..1 |
|00002040| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002050| 20 a4 63 61 6c 6c 28 5a | 61 70 5f 53 61 76 65 4d | .call(Z|ap_SaveM|
|00002060| 6f 64 65 57 6f 72 64 29 | 0d 09 06 2c 20 20 20 20 |odeWord)|..., |
|00002070| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002080| 20 20 4c 44 4d 46 44 20 | 20 20 52 31 33 21 2c 20 | LDMFD | R13!, |
|00002090| 7b 50 43 7d 0d 09 10 04 | 0d 09 1a 3c 2e 63 61 6c |{PC}....|...<.cal|
|000020a0| 6c 62 61 63 6b 20 20 20 | 20 20 20 20 20 20 20 20 |lback | |
|000020b0| 20 20 53 54 4d 46 44 20 | 20 20 52 31 33 21 2c 20 | STMFD | R13!, |
|000020c0| 7b 52 31 2d 52 33 2c 20 | 52 38 2d 52 31 30 2c 20 |{R1-R3, |R8-R10, |
|000020d0| 52 31 34 7d 0d 09 24 29 | 20 20 20 20 20 20 20 20 |R14}..$)| |
|000020e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 4d 4f | | MO|
|000020f0| 56 20 20 20 20 20 52 30 | 2c 20 52 31 31 0d 09 2e |V R0|, R11...|
|00002100| 30 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |0 | |
|00002110| 20 20 20 20 20 20 20 a4 | 63 61 6c 6c 28 5a 61 70 | .|call(Zap|
|00002120| 5f 43 6f 6e 76 57 69 6e | 64 4f 66 66 29 0d 09 38 |_ConvWin|dOff)..8|
|00002130| 28 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |( | |
|00002140| 20 20 20 20 20 20 20 4d | 4f 56 20 20 20 20 20 52 | M|OV R|
|00002150| 31 2c 20 23 35 0d 09 42 | 2c 20 20 20 20 20 20 20 |1, #5..B|, |
|00002160| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 a4 | | .|
|00002170| 63 61 6c 6c 28 5a 61 70 | 5f 52 65 61 64 56 61 72 |call(Zap|_ReadVar|
|00002180| 29 0d 09 4c 29 20 20 20 | 20 20 20 20 20 20 20 20 |)..L) | |
|00002190| 20 20 20 20 20 20 20 20 | 20 20 20 4d 4f 56 20 20 | | MOV |
|000021a0| 20 20 20 52 31 30 2c 20 | 52 30 0d 09 56 04 0d 09 | R10, |R0..V...|
|000021b0| c4 28 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.( | |
|000021c0| 20 20 20 20 20 20 20 20 | 4d 4f 56 20 20 20 20 20 | |MOV |
|000021d0| 52 30 2c 20 23 30 0d 09 | ce 28 20 20 20 20 20 20 |R0, #0..|.( |
|000021e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000021f0| 4d 4f 56 20 20 20 20 20 | 52 32 2c 20 23 30 0d 09 |MOV |R2, #0..|
|00002200| d8 32 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.2 | |
|00002210| 20 20 20 20 20 20 20 20 | 4c 44 52 20 20 20 20 20 | |LDR |
|00002220| 52 33 2c 20 5b 52 39 2c | 20 23 66 5f 6c 65 6e 5d |R3, [R9,| #f_len]|
|00002230| 0d 09 e2 28 2e 73 72 63 | 68 6c 70 20 20 20 20 20 |...(.src|hlp |
|00002240| 20 20 20 20 20 20 20 20 | 20 20 54 45 51 20 20 20 | | TEQ |
|00002250| 20 20 72 30 2c 20 72 33 | 0d 09 ec 3b 20 20 20 20 | r0, r3|...; |
|00002260| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002270| 20 20 4c 44 4d 45 51 46 | 44 20 52 31 33 21 2c 20 | LDMEQF|D R13!, |
|00002280| 7b 52 31 2d 52 33 2c 20 | 52 38 2d 52 31 30 2c 20 |{R1-R3, |R8-R10, |
|00002290| 50 43 7d 0d 09 f6 32 20 | 20 20 20 20 20 20 20 20 |PC}...2 | |
|000022a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 42 4c 20 | | BL |
|000022b0| 20 20 20 20 20 72 65 61 | 64 62 79 74 65 61 74 6f | rea|dbyteato|
|000022c0| 66 66 73 65 74 0d 0a 00 | 2c 20 20 20 20 20 20 20 |ffset...|, |
|000022d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 41 | | A|
|000022e0| 44 44 20 20 20 20 20 52 | 30 2c 20 52 30 2c 20 23 |DD R|0, R0, #|
|000022f0| 31 0d 0a 0a 2a 20 20 20 | 20 20 20 20 20 20 20 20 |1...* | |
|00002300| 20 20 20 20 20 20 20 20 | 20 20 20 54 45 51 20 20 | | TEQ |
|00002310| 20 20 20 52 31 2c 20 23 | 26 30 61 0d 0a 14 2c 20 | R1, #|&0a..., |
|00002320| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002330| 20 20 20 20 20 41 44 44 | 45 51 20 20 20 52 32 2c | ADD|EQ R2,|
|00002340| 20 52 32 2c 20 23 31 0d | 0a 1e 28 20 20 20 20 20 | R2, #1.|..( |
|00002350| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002360| 20 4d 4f 56 4e 45 20 20 | 20 52 32 2c 20 23 30 0d | MOVNE | R2, #0.|
|00002370| 0a 28 28 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.(( | |
|00002380| 20 20 20 20 20 20 20 20 | 20 54 45 51 20 20 20 20 | | TEQ |
|00002390| 20 52 32 2c 20 23 32 0d | 0a 32 28 20 20 20 20 20 | R2, #2.|.2( |
|000023a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000023b0| 20 42 4e 45 20 20 20 20 | 20 73 72 63 68 6c 70 0d | BNE | srchlp.|
|000023c0| 0a 3c 04 0d 0a 46 33 2e | 66 6f 75 6e 64 20 20 20 |.<...F3.|found |
|000023d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 53 54 52 | | STR|
|000023e0| 20 20 20 20 20 52 30 2c | 20 5b 52 31 30 2c 20 23 | R0,| [R10, #|
|000023f0| 63 5f 6f 66 66 5d 0d 0a | 50 31 20 20 20 20 20 20 |c_off]..|P1 |
|00002400| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002410| a4 63 61 6c 6c 28 5a 61 | 70 5f 52 65 66 6c 65 63 |.call(Za|p_Reflec|
|00002420| 74 43 61 72 65 74 29 0d | 0a 5a 3b 20 20 20 20 20 |tCaret).|.Z; |
|00002430| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002440| 20 4c 44 4d 46 44 20 20 | 20 52 31 33 21 2c 20 7b | LDMFD | R13!, {|
|00002450| 52 31 2d 52 33 2c 20 52 | 38 2d 52 31 30 2c 20 50 |R1-R3, R|8-R10, P|
|00002460| 43 7d 0d 0a 64 04 0d 0a | 6e 31 2e 72 65 61 64 62 |C}..d...|n1.readb|
|00002470| 79 74 65 61 74 6f 66 66 | 73 65 74 20 20 20 20 20 |yteatoff|set |
|00002480| 53 54 4d 46 44 20 20 20 | 52 31 33 21 2c 20 7b 52 |STMFD |R13!, {R|
|00002490| 30 2c 20 52 31 34 7d 0d | 0a 78 35 20 20 20 20 20 |0, R14}.|.x5 |
|000024a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000024b0| 20 4c 44 52 20 20 20 20 | 20 52 31 2c 20 5b 52 39 | LDR | R1, [R9|
|000024c0| 2c 20 23 66 5f 73 70 6c | 69 74 6f 5d 0d 0a 82 28 |, #f_spl|ito]...(|
|000024d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000024e0| 20 20 20 20 20 20 43 4d | 50 20 20 20 20 20 52 30 | CM|P R0|
|000024f0| 2c 20 52 31 0d 0a 8c 35 | 20 20 20 20 20 20 20 20 |, R1...5| |
|00002500| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 4c 44 | | LD|
|00002510| 52 43 53 20 20 20 52 31 | 2c 20 5b 52 39 2c 20 23 |RCS R1|, [R9, #|
|00002520| 66 5f 73 70 6c 69 74 73 | 5d 0d 0a 96 2c 20 20 20 |f_splits|]..., |
|00002530| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002540| 20 20 20 41 44 44 43 53 | 20 20 20 52 30 2c 20 52 | ADDCS| R0, R|
|00002550| 30 2c 20 52 31 0d 0a a0 | 32 20 20 20 20 20 20 20 |0, R1...|2 |
|00002560| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 4c | | L|
|00002570| 44 52 20 20 20 20 20 52 | 31 2c 20 5b 52 39 2c 20 |DR R|1, [R9, |
|00002580| 23 66 5f 70 74 72 5d 0d | 0a aa 2e 20 20 20 20 20 |#f_ptr].|... |
|00002590| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000025a0| 20 4c 44 52 42 20 20 20 | 20 52 31 2c 20 5b 52 31 | LDRB | R1, [R1|
|000025b0| 2c 20 52 30 5d 0d 0a b4 | 31 20 20 20 20 20 20 20 |, R0]...|1 |
|000025c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 4c | | L|
|000025d0| 44 4d 46 44 20 20 20 52 | 31 33 21 2c 20 7b 52 30 |DMFD R|13!, {R0|
|000025e0| 2c 20 50 43 7d 5e 0d 0a | be 04 0d 0a c8 44 5c 5c |, PC}^..|.....D\\|
|000025f0| 5c 5c 5c 5c 5c 5c 5c 5c | 5c 5c 5c 5c 5c 5c 5c 5c |\\\\\\\\|\\\\\\\\|
|00002600| 5c 5c 5c 5c 5c 5c 5c 5c | 5c 5c 5c 5c 5c 5c 5c 5c |\\\\\\\\|\\\\\\\\|
|00002610| 5c 5c 5c 5c 5c 5c 5c 5c | 5c 5c 5c 5c 5c 5c 5c 5c |\\\\\\\\|\\\\\\\\|
|00002620| 5c 5c 5c 5c 5c 5c 5c 5c | 5c 5c 5c 5c 5c 5c 0d 0a |\\\\\\\\|\\\\\\..|
|00002630| d2 44 5c 20 49 6e 69 74 | 69 61 6c 69 73 65 20 62 |.D\ Init|ialise b|
|00002640| 75 66 66 65 72 73 20 20 | 20 20 20 20 20 20 20 20 |uffers | |
|00002650| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002660| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002670| 20 5c 0d 0a dc 44 5c 5c | 5c 5c 5c 5c 5c 5c 5c 5c | \...D\\|\\\\\\\\|
|00002680| 5c 5c 5c 5c 5c 5c 5c 5c | 5c 5c 5c 5c 5c 5c 5c 5c |\\\\\\\\|\\\\\\\\|
|00002690| 5c 5c 5c 5c 5c 5c 5c 5c | 5c 5c 5c 5c 5c 5c 5c 5c |\\\\\\\\|\\\\\\\\|
|000026a0| 5c 5c 5c 5c 5c 5c 5c 5c | 5c 5c 5c 5c 5c 5c 5c 5c |\\\\\\\\|\\\\\\\\|
|000026b0| 5c 5c 5c 5c 5c 5c 0d 0a | e6 04 0d 0a f0 27 2e 6d |\\\\\\..|.....'.m|
|000026c0| 6f 64 65 5f 69 6e 69 74 | 20 20 20 20 20 20 20 20 |ode_init| |
|000026d0| 20 20 20 20 54 45 51 20 | 20 20 20 20 52 31 2c 23 | TEQ | R1,#|
|000026e0| 31 0d 0a fa 33 20 20 20 | 20 20 20 20 20 20 20 20 |1...3 | |
|000026f0| 20 20 20 20 20 20 20 20 | 20 20 20 42 45 51 20 20 | | BEQ |
|00002700| 20 20 20 73 74 6f 72 65 | 5f 6d 6f 64 65 5f 6e 75 | store|_mode_nu|
|00002710| 6d 62 65 72 0d 0b 04 27 | 20 20 20 20 20 20 20 20 |mber...'| |
|00002720| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 54 45 | | TE|
|00002730| 51 20 20 20 20 20 52 31 | 2c 23 32 0d 0b 0e 2e 20 |Q R1|,#2.... |
|00002740| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002750| 20 20 20 20 20 42 45 51 | 20 20 20 20 20 7a 61 70 | BEQ| zap|
|00002760| 5f 73 74 61 72 74 69 6e | 67 0d 0b 18 28 20 20 20 |_startin|g...( |
|00002770| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002780| 20 20 20 4d 4f 56 20 20 | 20 20 20 50 43 2c 52 31 | MOV | PC,R1|
|00002790| 34 0d 0b 22 04 0d 0b 2c | 38 2e 7a 61 70 5f 73 74 |4.."...,|8.zap_st|
|000027a0| 61 72 74 69 6e 67 20 20 | 20 20 20 20 20 20 20 53 |arting | S|
|000027b0| 54 4d 46 44 20 20 20 52 | 31 33 21 2c 7b 52 31 2c |TMFD R|13!,{R1,|
|000027c0| 20 52 32 2c 20 52 38 2c | 20 52 31 34 7d 0d 0b 36 | R2, R8,| R14}..6|
|000027d0| 4a 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |J | |
|000027e0| 20 20 20 20 20 20 20 4d | 4f 56 20 20 20 20 20 52 | M|OV R|
|000027f0| 38 2c 23 30 20 20 20 20 | 20 20 20 20 20 20 20 20 |8,#0 | |
|00002800| 20 20 20 20 20 20 20 20 | 20 5c 20 6f 70 74 69 6f | | \ optio|
|00002810| 6e 73 20 77 6f 72 64 0d | 0b 40 31 20 20 20 20 20 |ns word.|.@1 |
|00002820| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002830| 20 42 4c 20 20 20 20 20 | 20 67 65 74 5f 6d 6f 64 | BL | get_mod|
|00002840| 65 5f 6e 75 6d 62 65 72 | 0d 0b 4a 27 20 20 20 20 |e_number|..J' |
|00002850| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002860| 20 20 4d 4f 56 20 20 20 | 20 20 52 31 2c 52 30 0d | MOV | R1,R0.|
|00002870| 0b 54 30 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.T0 | |
|00002880| 20 20 20 20 20 20 20 20 | 20 a4 63 61 6c 6c 28 5a | | .call(Z|
|00002890| 61 70 5f 47 65 74 4d 6f | 64 65 57 6f 72 64 29 0d |ap_GetMo|deWord).|
|000028a0| 0b 5e 37 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.^7 | |
|000028b0| 20 20 20 20 20 20 20 20 | 20 4c 44 4d 56 53 46 44 | | LDMVSFD|
|000028c0| 20 52 31 33 21 2c 7b 52 | 31 2c 20 52 32 2c 20 52 | R13!,{R|1, R2, R|
|000028d0| 38 2c 20 50 43 7d 0d 0b | 68 5b 20 20 20 20 20 20 |8, PC}..|h[ |
|000028e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000028f0| 54 45 51 20 20 20 20 20 | 52 30 2c 23 30 20 20 20 |TEQ |R0,#0 |
|00002900| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002910| 20 20 5c 20 68 61 76 65 | 20 61 6e 79 20 6f 70 74 | \ have| any opt|
|00002920| 69 6f 6e 73 20 62 65 65 | 6e 20 73 65 74 20 66 6f |ions bee|n set fo|
|00002930| 72 0d 0b 72 56 20 20 20 | 20 20 20 20 20 20 20 20 |r..rV | |
|00002940| 20 20 20 20 20 20 20 20 | 20 20 20 4c 44 4d 4e 45 | | LDMNE|
|00002950| 46 44 20 52 31 33 21 2c | 7b 52 31 2c 20 52 32 2c |FD R13!,|{R1, R2,|
|00002960| 20 52 38 2c 50 43 7d 20 | 20 20 20 20 20 5c 20 74 | R8,PC} | \ t|
|00002970| 68 69 73 20 6d 6f 64 65 | 20 2d 20 72 65 74 75 72 |his mode| - retur|
|00002980| 6e 20 69 66 20 73 6f 0d | 0b 7c 36 20 20 20 20 20 |n if so.|.|6 |
|00002990| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000029a0| 20 4c 44 52 20 20 20 20 | 20 52 30 2c 64 65 66 61 | LDR | R0,defa|
|000029b0| 75 6c 74 5f 6d 6f 64 65 | 5f 77 6f 72 64 0d 0b 86 |ult_mode|_word...|
|000029c0| 28 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |( | |
|000029d0| 20 20 20 20 20 20 20 4d | 4f 56 20 20 20 20 20 52 | M|OV R|
|000029e0| 32 2c 20 23 30 0d 0b 90 | 2d 20 20 20 20 20 20 20 |2, #0...|- |
|000029f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 a4 | | .|
|00002a00| 63 61 6c 6c 28 5a 61 70 | 5f 4d 6f 64 65 44 61 74 |call(Zap|_ModeDat|
|00002a10| 61 29 0d 0b 9a 37 20 20 | 20 20 20 20 20 20 20 20 |a)...7 | |
|00002a20| 20 20 20 20 20 20 20 20 | 20 20 20 20 4c 44 4d 46 | | LDMF|
|00002a30| 44 20 20 20 52 31 33 21 | 2c 7b 52 31 2c 20 52 32 |D R13!|,{R1, R2|
|00002a40| 2c 20 52 38 2c 20 50 43 | 7d 0d 0b a4 04 0d 0b ae |, R8, PC|}.......|
|00002a50| 56 2e 64 65 66 61 75 6c | 74 5f 6d 6f 64 65 5f 77 |V.defaul|t_mode_w|
|00002a60| 6f 72 64 20 20 20 20 45 | 51 55 44 20 20 20 20 26 |ord E|QUD &|
|00002a70| 31 30 30 31 30 30 34 45 | 20 20 20 20 20 20 20 20 |1001004E| |
|00002a80| 20 20 20 20 20 20 20 20 | 20 5c 20 61 75 74 6f 20 | | \ auto |
|00002a90| 69 6e 64 65 6e 74 2b 74 | 61 62 73 2b 37 38 20 63 |indent+t|abs+78 c|
|00002aa0| 6f 6c 73 0d 0b b8 04 0d | 0b c2 15 5c 45 20 52 30 |ols.....|...\E R0|
|00002ab0| 3d 6d 6f 64 65 20 6e 75 | 6d 62 65 72 0d 0b cc 08 |=mode nu|mber....|
|00002ac0| 5c 58 20 2d 0d 0b d6 04 | 0d 0b e0 37 2e 73 74 6f |\X -....|...7.sto|
|00002ad0| 72 65 5f 6d 6f 64 65 5f | 6e 75 6d 62 65 72 20 20 |re_mode_|number |
|00002ae0| 20 20 53 54 52 20 20 20 | 20 20 52 30 2c 61 63 74 | STR | R0,act|
|00002af0| 75 61 6c 5f 6d 6f 64 65 | 5f 6e 75 6d 62 65 72 0d |ual_mode|_number.|
|00002b00| 0b ea 28 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |..( | |
|00002b10| 20 20 20 20 20 20 20 20 | 20 4d 4f 56 20 20 20 20 | | MOV |
|00002b20| 20 50 43 2c 52 31 34 0d | 0b f4 04 0d 0b fe 08 5c | PC,R14.|.......\|
|00002b30| 45 20 2d 0d 0c 08 15 5c | 58 20 52 30 3d 6d 6f 64 |E -....\|X R0=mod|
|00002b40| 65 20 6e 75 6d 62 65 72 | 0d 0c 12 04 0d 0c 1c 37 |e number|.......7|
|00002b50| 2e 67 65 74 5f 6d 6f 64 | 65 5f 6e 75 6d 62 65 72 |.get_mod|e_number|
|00002b60| 20 20 20 20 20 20 4c 44 | 52 20 20 20 20 20 52 30 | LD|R R0|
|00002b70| 2c 61 63 74 75 61 6c 5f | 6d 6f 64 65 5f 6e 75 6d |,actual_|mode_num|
|00002b80| 62 65 72 0d 0c 26 28 20 | 20 20 20 20 20 20 20 20 |ber..&( | |
|00002b90| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 4d 4f 56 | | MOV|
|00002ba0| 20 20 20 20 20 50 43 2c | 52 31 34 0d 0c 30 04 0d | PC,|R14..0..|
|00002bb0| 0c 3a 23 2e 61 63 74 75 | 61 6c 5f 6d 6f 64 65 5f |.:#.actu|al_mode_|
|00002bc0| 6e 75 6d 62 65 72 20 20 | 20 45 51 55 44 20 20 20 |number | EQUD |
|00002bd0| 20 30 0d 0c 44 04 0d 0c | 4e 40 5c 5c 5c 5c 5c 5c | 0..D...|N@\\\\\\|
|00002be0| 5c 5c 5c 5c 20 45 6e 64 | 20 4f 66 20 41 73 73 65 |\\\\ End| Of Asse|
|00002bf0| 6d 62 6c 79 20 5c 5c 5c | 5c 5c 5c 5c 5c 5c 5c 5c |mbly \\\|\\\\\\\\|
|00002c00| 5c 5c 5c 5c 5c 5c 5c 5c | 5c 5c 5c 5c 5c 5c 5c 5c |\\\\\\\\|\\\\\\\\|
|00002c10| 5c 5c 5c 5c 5c 5c 0d 0c | 58 04 0d 0c 62 05 5d 0d |\\\\\\..|X...b.].|
|00002c20| 0c 6c 04 0d 0c 76 0a ed | 20 70 61 73 73 0d 0c 80 |.l...v..| pass...|
|00002c30| 0e 6c 65 6e 67 74 68 25 | 3d 50 25 0d 0c 8a 05 e1 |.length%|=P%.....|
|00002c40| 0d 0c 94 04 0d 0c 9e 30 | dd 20 a4 53 28 41 24 29 |.......0|. .S(A$)|
|00002c50| 20 20 20 20 3a 5b 4f 50 | 54 70 61 73 73 3a 45 51 | :[OP|Tpass:EQ|
|00002c60| 55 53 20 41 24 2b bd 30 | 3a 41 4c 49 47 4e 3a 5d |US A$+.0|:ALIGN:]|
|00002c70| 3a 3d 22 22 0d 0c a8 41 | dd 20 a4 53 53 28 41 24 |:=""...A|. .SS(A$|
|00002c80| 29 20 20 20 3a 5b 4f 50 | 54 70 61 73 73 3a 53 57 |) :[OP|Tpass:SW|
|00002c90| 49 20 22 58 4f 53 5f 57 | 72 69 74 65 53 22 3a 45 |I "XOS_W|riteS":E|
|00002ca0| 51 55 53 20 41 24 2b bd | 30 3a 41 4c 49 47 4e 3a |QUS A$+.|0:ALIGN:|
|00002cb0| 5d 3a 3d 22 22 0d 0c b2 | 32 dd 20 a4 4a 53 52 20 |]:=""...|2. .JSR |
|00002cc0| 20 20 20 20 20 3a 5b 4f | 50 54 70 61 73 73 3a 53 | :[O|PTpass:S|
|00002cd0| 54 4d 46 44 20 20 20 52 | 31 33 21 2c 7b 52 31 34 |TMFD R|13!,{R14|
|00002ce0| 7d 3a 5d 3a 3d 22 22 0d | 0c bc 45 dd 20 a4 52 54 |}:]:="".|..E. .RT|
|00002cf0| 56 20 20 20 20 20 20 3a | 5b 4f 50 54 70 61 73 73 |V :|[OPTpass|
|00002d00| 3a 4c 44 4d 46 44 20 20 | 20 52 31 33 21 2c 7b 52 |:LDMFD | R13!,{R|
|00002d10| 31 34 7d 3a 84 52 53 20 | 50 43 2c 52 31 34 2c 23 |14}:.RS |PC,R14,#|
|00002d20| 56 66 6c 61 67 25 3a 5d | 3a 3d 22 22 0d 0c c6 46 |Vflag%:]|:=""...F|
|00002d30| dd 20 a4 52 54 43 20 20 | 20 20 20 20 3a 5b 4f 50 |. .RTC | :[OP|
|00002d40| 54 70 61 73 73 3a 4c 44 | 4d 46 44 20 20 20 52 31 |Tpass:LD|MFD R1|
|00002d50| 33 21 2c 7b 52 31 34 7d | 3a 42 49 43 53 20 50 43 |3!,{R14}|:BICS PC|
|00002d60| 2c 52 31 34 2c 23 56 66 | 6c 61 67 25 3a 5d 3a 3d |,R14,#Vf|lag%:]:=|
|00002d70| 22 22 0d 0c d0 32 dd 20 | a4 52 54 53 20 20 20 20 |""...2. |.RTS |
|00002d80| 20 20 3a 5b 4f 50 54 70 | 61 73 73 3a 4c 44 4d 46 | :[OPTp|ass:LDMF|
|00002d90| 44 20 20 20 52 31 33 21 | 2c 7b 50 43 7d 20 3a 5d |D R13!|,{PC} :]|
|00002da0| 3a 3d 22 22 0d 0c da 31 | dd 20 a4 52 54 53 4e 45 |:=""...1|. .RTSNE|
|00002db0| 20 20 20 20 3a 5b 4f 50 | 54 70 61 73 73 3a 4c 44 | :[OP|Tpass:LD|
|00002dc0| 4d 4e 45 46 44 20 52 31 | 33 21 2c 7b 50 43 7d 3a |MNEFD R1|3!,{PC}:|
|00002dd0| 5d 3a 3d 22 22 0d 0c e4 | 31 dd 20 a4 52 54 53 45 |]:=""...|1. .RTSE|
|00002de0| 51 20 20 20 20 3a 5b 4f | 50 54 70 61 73 73 3a 4c |Q :[O|PTpass:L|
|00002df0| 44 4d 45 51 46 44 20 52 | 31 33 21 2c 7b 50 43 7d |DMEQFD R|13!,{PC}|
|00002e00| 3a 5d 3a 3d 22 22 0d 0c | ee 31 dd 20 a4 52 54 53 |:]:=""..|.1. .RTS|
|00002e10| 43 53 20 20 20 20 3a 5b | 4f 50 54 70 61 73 73 3a |CS :[|OPTpass:|
|00002e20| 4c 44 4d 43 53 46 44 20 | 52 31 33 21 2c 7b 50 43 |LDMCSFD |R13!,{PC|
|00002e30| 7d 3a 5d 3a 3d 22 22 0d | 0c f8 31 dd 20 a4 52 54 |}:]:="".|..1. .RT|
|00002e40| 53 43 43 20 20 20 20 3a | 5b 4f 50 54 70 61 73 73 |SCC :|[OPTpass|
|00002e50| 3a 4c 44 4d 43 43 46 44 | 20 52 31 33 21 2c 7b 50 |:LDMCCFD| R13!,{P|
|00002e60| 43 7d 3a 5d 3a 3d 22 22 | 0d 0d 02 31 dd 20 a4 52 |C}:]:=""|...1. .R|
|00002e70| 54 53 56 53 20 20 20 20 | 3a 5b 4f 50 54 70 61 73 |TSVS |:[OPTpas|
|00002e80| 73 3a 4c 44 4d 56 53 46 | 44 20 52 31 33 21 2c 7b |s:LDMVSF|D R13!,{|
|00002e90| 50 43 7d 3a 5d 3a 3d 22 | 22 0d 0d 0c 31 dd 20 a4 |PC}:]:="|"...1. .|
|00002ea0| 52 54 53 56 43 20 20 20 | 20 3a 5b 4f 50 54 70 61 |RTSVC | :[OPTpa|
|00002eb0| 73 73 3a 4c 44 4d 56 43 | 46 44 20 52 31 33 21 2c |ss:LDMVC|FD R13!,|
|00002ec0| 7b 50 43 7d 3a 5d 3a 3d | 22 22 0d 0d 16 31 dd 20 |{PC}:]:=|""...1. |
|00002ed0| a4 52 54 53 4c 53 20 20 | 20 20 3a 5b 4f 50 54 70 |.RTSLS | :[OPTp|
|00002ee0| 61 73 73 3a 4c 44 4d 4c | 53 46 44 20 52 31 33 21 |ass:LDML|SFD R13!|
|00002ef0| 2c 7b 50 43 7d 3a 5d 3a | 3d 22 22 0d 0d 20 31 dd |,{PC}:]:|="".. 1.|
|00002f00| 20 a4 52 54 53 48 49 20 | 20 20 20 3a 5b 4f 50 54 | .RTSHI | :[OPT|
|00002f10| 70 61 73 73 3a 4c 44 4d | 48 49 46 44 20 52 31 33 |pass:LDM|HIFD R13|
|00002f20| 21 2c 7b 50 43 7d 3a 5d | 3a 3d 22 22 0d 0d 2a 31 |!,{PC}:]|:=""..*1|
|00002f30| dd 20 a4 52 54 53 4d 49 | 20 20 20 20 3a 5b 4f 50 |. .RTSMI| :[OP|
|00002f40| 54 70 61 73 73 3a 4c 44 | 4d 4d 49 46 44 20 52 31 |Tpass:LD|MMIFD R1|
|00002f50| 33 21 2c 7b 50 43 7d 3a | 5d 3a 3d 22 22 0d 0d 34 |3!,{PC}:|]:=""..4|
|00002f60| 31 dd 20 a4 52 54 53 4c | 45 20 20 20 20 3a 5b 4f |1. .RTSL|E :[O|
|00002f70| 50 54 70 61 73 73 3a 4c | 44 4d 4c 45 46 44 20 52 |PTpass:L|DMLEFD R|
|00002f80| 31 33 21 2c 7b 50 43 7d | 3a 5d 3a 3d 22 22 0d 0d |13!,{PC}|:]:=""..|
|00002f90| 3e 31 dd 20 a4 52 54 53 | 47 45 20 20 20 20 3a 5b |>1. .RTS|GE :[|
|00002fa0| 4f 50 54 70 61 73 73 3a | 4c 44 4d 47 45 46 44 20 |OPTpass:|LDMGEFD |
|00002fb0| 52 31 33 21 2c 7b 50 43 | 7d 3a 5d 3a 3d 22 22 0d |R13!,{PC|}:]:="".|
|00002fc0| 0d 48 31 dd 20 a4 52 54 | 53 4c 54 20 20 20 20 3a |.H1. .RT|SLT :|
|00002fd0| 5b 4f 50 54 70 61 73 73 | 3a 4c 44 4d 4c 54 46 44 |[OPTpass|:LDMLTFD|
|00002fe0| 20 52 31 33 21 2c 7b 50 | 43 7d 3a 5d 3a 3d 22 22 | R13!,{P|C}:]:=""|
|00002ff0| 0d 0d 52 32 dd 20 a4 52 | 54 53 53 20 20 20 20 20 |..R2. .R|TSS |
|00003000| 3a 5b 4f 50 54 70 61 73 | 73 3a 4c 44 4d 46 44 20 |:[OPTpas|s:LDMFD |
|00003010| 20 20 52 31 33 21 2c 7b | 50 43 7d 5e 3a 5d 3a 3d | R13!,{|PC}^:]:=|
|00003020| 22 22 0d 0d 5c 32 dd 20 | a4 52 54 53 53 4e 45 20 |""..\2. |.RTSSNE |
|00003030| 20 20 3a 5b 4f 50 54 70 | 61 73 73 3a 4c 44 4d 4e | :[OPTp|ass:LDMN|
|00003040| 45 46 44 20 52 31 33 21 | 2c 7b 50 43 7d 5e 3a 5d |EFD R13!|,{PC}^:]|
|00003050| 3a 3d 22 22 0d 0d 66 32 | dd 20 a4 52 54 53 53 45 |:=""..f2|. .RTSSE|
|00003060| 51 20 20 20 3a 5b 4f 50 | 54 70 61 73 73 3a 4c 44 |Q :[OP|Tpass:LD|
|00003070| 4d 45 51 46 44 20 52 31 | 33 21 2c 7b 50 43 7d 5e |MEQFD R1|3!,{PC}^|
|00003080| 3a 5d 3a 3d 22 22 0d 0d | 70 32 dd 20 a4 52 54 53 |:]:=""..|p2. .RTS|
|00003090| 53 43 43 20 20 20 3a 5b | 4f 50 54 70 61 73 73 3a |SCC :[|OPTpass:|
|000030a0| 4c 44 4d 43 43 46 44 20 | 52 31 33 21 2c 7b 50 43 |LDMCCFD |R13!,{PC|
|000030b0| 7d 5e 3a 5d 3a 3d 22 22 | 0d 0d 7a 32 dd 20 a4 52 |}^:]:=""|..z2. .R|
|000030c0| 54 53 53 43 53 20 20 20 | 3a 5b 4f 50 54 70 61 73 |TSSCS |:[OPTpas|
|000030d0| 73 3a 4c 44 4d 43 53 46 | 44 20 52 31 33 21 2c 7b |s:LDMCSF|D R13!,{|
|000030e0| 50 43 7d 5e 3a 5d 3a 3d | 22 22 0d 0d 84 43 dd 20 |PC}^:]:=|""...C. |
|000030f0| a4 6d 65 6d 28 78 25 29 | 20 20 3a 77 25 3d 4f 25 |.mem(x%)| :w%=O%|
|00003100| 2d 63 6f 64 65 25 3a 50 | 25 3d 50 25 2b 78 25 3a |-code%:P|%=P%+x%:|
|00003110| 4f 25 3d 4f 25 2b 78 25 | 3a 5b 4f 50 54 70 61 73 |O%=O%+x%|:[OPTpas|
|00003120| 73 3a 41 4c 49 47 4e 3a | 5d 3a 3d 77 25 0d 0d 8e |s:ALIGN:|]:=w%...|
|00003130| 31 dd 20 a4 6e 65 77 6c | 20 20 20 20 20 3a 5b 4f |1. .newl| :[O|
|00003140| 50 54 70 61 73 73 3a 53 | 57 49 20 22 58 4f 53 5f |PTpass:S|WI "XOS_|
|00003150| 4e 65 77 4c 69 6e 65 22 | 3a 5d 3a 3d 22 22 0d 0d |NewLine"|:]:=""..|
|00003160| 98 04 0d 0d a2 3b dd 20 | a4 64 61 74 65 20 20 20 |.....;. |.date |
|00003170| 20 20 20 de 20 64 61 74 | 65 25 20 36 34 3a 3f 64 | . dat|e% 64:?d|
|00003180| 61 74 65 25 3d 33 3a c8 | 99 20 22 4f 53 5f 57 6f |ate%=3:.|. "OS_Wo|
|00003190| 72 64 22 2c 26 30 45 2c | 64 61 74 65 25 0d 0d ac |rd",&0E,|date%...|
|000031a0| 48 c8 99 20 22 4f 53 5f | 43 6f 6e 76 65 72 74 44 |H.. "OS_|ConvertD|
|000031b0| 61 74 65 41 6e 64 54 69 | 6d 65 22 2c 64 61 74 65 |ateAndTi|me",date|
|000031c0| 25 2c 64 61 74 65 25 2b | 31 36 2c 33 32 2c 22 25 |%,date%+|16,32,"%|
|000031d0| 44 59 20 25 4d 33 20 31 | 39 25 59 52 22 20 b8 20 |DY %M3 1|9%YR" . |
|000031e0| 41 25 2c 42 25 0d 0d b6 | 0f 3f 42 25 3d 31 33 3a |A%,B%...|.?B%=13:|
|000031f0| 3d 24 41 25 0d 0d c0 04 | 0d 0d ca 28 f4 20 54 68 |=$A%....|...(. Th|
|00003200| 69 73 20 6d 6f 64 75 6c | 65 73 20 77 6f 72 6b 73 |is modul|es works|
|00003210| 70 61 63 65 20 69 73 20 | 61 74 20 52 31 31 21 21 |pace is |at R11!!|
|00003220| 0d 0d d4 04 0d 0d de 35 | dd 20 a4 4c 44 52 28 73 |.......5|. .LDR(s|
|00003230| 25 2c 78 25 29 20 20 3a | 5b 4f 50 54 70 61 73 73 |%,x%) :|[OPTpass|
|00003240| 3a 4c 44 52 20 20 20 73 | 25 2c 5b 52 31 31 2c 23 |:LDR s|%,[R11,#|
|00003250| 78 25 5d 3a 5d 3a 3d 22 | 22 0d 0d e8 35 dd 20 a4 |x%]:]:="|"...5. .|
|00003260| 4c 44 52 45 51 28 73 25 | 2c 78 25 29 3a 5b 4f 50 |LDREQ(s%|,x%):[OP|
|00003270| 54 70 61 73 73 3a 4c 44 | 52 45 51 20 73 25 2c 5b |Tpass:LD|REQ s%,[|
|00003280| 52 31 31 2c 23 78 25 5d | 3a 5d 3a 3d 22 22 0d 0d |R11,#x%]|:]:=""..|
|00003290| f2 35 dd 20 a4 4c 44 52 | 4e 45 28 73 25 2c 78 25 |.5. .LDR|NE(s%,x%|
|000032a0| 29 3a 5b 4f 50 54 70 61 | 73 73 3a 4c 44 52 4e 45 |):[OPTpa|ss:LDRNE|
|000032b0| 20 73 25 2c 5b 52 31 31 | 2c 23 78 25 5d 3a 5d 3a | s%,[R11|,#x%]:]:|
|000032c0| 3d 22 22 0d 0d fc 35 dd | 20 a4 4c 44 52 43 53 28 |=""...5.| .LDRCS(|
|000032d0| 73 25 2c 78 25 29 3a 5b | 4f 50 54 70 61 73 73 3a |s%,x%):[|OPTpass:|
|000032e0| 4c 44 52 43 53 20 73 25 | 2c 5b 52 31 31 2c 23 78 |LDRCS s%|,[R11,#x|
|000032f0| 25 5d 3a 5d 3a 3d 22 22 | 0d 0e 06 35 dd 20 a4 4c |%]:]:=""|...5. .L|
|00003300| 44 52 43 43 28 73 25 2c | 78 25 29 3a 5b 4f 50 54 |DRCC(s%,|x%):[OPT|
|00003310| 70 61 73 73 3a 4c 44 52 | 43 43 20 73 25 2c 5b 52 |pass:LDR|CC s%,[R|
|00003320| 31 31 2c 23 78 25 5d 3a | 5d 3a 3d 22 22 0d 0e 10 |11,#x%]:|]:=""...|
|00003330| 35 dd 20 a4 53 54 52 28 | 73 25 2c 78 25 29 20 20 |5. .STR(|s%,x%) |
|00003340| 3a 5b 4f 50 54 70 61 73 | 73 3a 53 54 52 20 20 20 |:[OPTpas|s:STR |
|00003350| 73 25 2c 5b 52 31 31 2c | 23 78 25 5d 3a 5d 3a 3d |s%,[R11,|#x%]:]:=|
|00003360| 22 22 0d 0e 1a 35 dd 20 | a4 53 54 52 45 51 28 73 |""...5. |.STREQ(s|
|00003370| 25 2c 78 25 29 3a 5b 4f | 50 54 70 61 73 73 3a 53 |%,x%):[O|PTpass:S|
|00003380| 54 52 45 51 20 73 25 2c | 5b 52 31 31 2c 23 78 25 |TREQ s%,|[R11,#x%|
|00003390| 5d 3a 5d 3a 3d 22 22 0d | 0e 24 35 dd 20 a4 53 54 |]:]:="".|.$5. .ST|
|000033a0| 52 4e 45 28 73 25 2c 78 | 25 29 3a 5b 4f 50 54 70 |RNE(s%,x|%):[OPTp|
|000033b0| 61 73 73 3a 53 54 52 4e | 45 20 73 25 2c 5b 52 31 |ass:STRN|E s%,[R1|
|000033c0| 31 2c 23 78 25 5d 3a 5d | 3a 3d 22 22 0d 0e 2e 35 |1,#x%]:]|:=""...5|
|000033d0| dd 20 a4 53 54 52 56 53 | 28 73 25 2c 78 25 29 3a |. .STRVS|(s%,x%):|
|000033e0| 5b 4f 50 54 70 61 73 73 | 3a 53 54 52 56 53 20 73 |[OPTpass|:STRVS s|
|000033f0| 25 2c 5b 52 31 31 2c 23 | 78 25 5d 3a 5d 3a 3d 22 |%,[R11,#|x%]:]:="|
|00003400| 22 0d 0e 38 04 0d 0e 42 | 1d f4 20 4d 65 6e 75 20 |"..8...B|.. Menu |
|00003410| 63 72 65 61 74 69 6f 6e | 20 66 75 6e 63 74 69 6f |creation| functio|
|00003420| 6e 73 0d 0e 4c 04 0d 0e | 56 19 dd 20 a4 6e 65 77 |ns..L...|V.. .new|
|00003430| 5f 6d 65 6e 75 28 54 24 | 2c 77 25 2c 63 25 29 0d |_menu(T$|,w%,c%).|
|00003440| 0e 60 09 61 25 3d 50 25 | 0d 0e 6a 0f 6d 65 6e 75 |.`.a%=P%|..j.menu|
|00003450| 5f 6e 75 6d 25 3d 30 0d | 0e 74 0c 5b 4f 50 54 70 |_num%=0.|.t.[OPTp|
|00003460| 61 73 73 0d 0e 7e 27 45 | 51 55 53 20 54 24 2b c4 |ass..~'E|QUS T$+.|
|00003470| 31 32 2d a9 54 24 2c bd | 30 29 20 20 20 20 20 20 |12-.T$,.|0) |
|00003480| 20 20 20 5c 20 74 69 74 | 6c 65 0d 0e 88 39 45 51 | \ tit|le...9EQ|
|00003490| 55 44 20 77 25 3c 3c 34 | 20 20 20 20 20 20 20 20 |UD w%<<4| |
|000034a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000034b0| 20 20 20 20 20 20 5c 20 | 77 69 64 74 68 20 69 6e | \ |width in|
|000034c0| 20 6f 73 0d 0e 92 4a 45 | 51 55 44 20 63 25 20 20 | os...JE|QUD c% |
|000034d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000034e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 5c | | \|
|000034f0| 20 6f 66 66 73 65 74 20 | 6f 66 20 73 75 62 20 74 | offset |of sub t|
|00003500| 6f 20 63 72 65 61 74 65 | 20 74 68 69 73 0d 0e 9c |o create| this...|
|00003510| 05 5d 0d 0e a6 07 3d 61 | 25 0d 0e b0 04 0d 0e ba |.]....=a|%.......|
|00003520| 1a dd 20 a4 6e 6d 65 28 | 54 24 2c 66 25 2c 73 25 |.. .nme(|T$,f%,s%|
|00003530| 2c 6b 25 2c 69 25 29 0d | 0e c4 30 e7 20 73 25 3d |,k%,i%).|..0. s%=|
|00003540| 2d 31 20 80 20 70 61 73 | 73 3d 31 34 20 8c 20 66 |-1 . pas|s=14 . f|
|00003550| 25 3d 28 66 25 20 84 20 | 38 29 3a 73 25 3d 6d 77 |%=(f% . |8):s%=mw|
|00003560| 5f 77 69 6e 64 6f 77 0d | 0e ce 26 e7 20 69 25 3d |_window.|..&. i%=|
|00003570| 31 20 80 20 70 61 73 73 | 3d 31 34 20 8c 20 69 25 |1 . pass|=14 . i%|
|00003580| 3d 73 75 62 5f 6b 63 6f | 6d 6d 61 6e 64 0d 0e d8 |=sub_kco|mmand...|
|00003590| 22 e7 20 69 25 3d 32 20 | 80 20 70 61 73 73 3d 31 |". i%=2 |. pass=1|
|000035a0| 34 20 8c 20 69 25 3d 73 | 75 62 5f 63 61 6c 6c 0d |4 . i%=s|ub_call.|
|000035b0| 0e e2 0c 5b 4f 50 54 70 | 61 73 73 0d 0e ec 29 45 |...[OPTp|ass...)E|
|000035c0| 51 55 44 20 66 25 20 20 | 20 20 20 20 20 20 20 20 |QUD f% | |
|000035d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 5c 20 66 | | \ f|
|000035e0| 6c 61 67 73 0d 0e f6 33 | 45 51 55 44 20 73 25 20 |lags...3|EQUD s% |
|000035f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003600| 20 20 20 20 20 20 5c 20 | 73 75 62 6d 65 6e 75 20 | \ |submenu |
|00003610| 70 6f 69 6e 74 65 72 0d | 0f 00 27 45 51 55 44 20 |pointer.|..'EQUD |
|00003620| 6b 25 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |k% | |
|00003630| 20 20 20 20 20 20 20 20 | 20 5c 20 6b 65 79 0d 0f | | \ key..|
|00003640| 0a 2e 45 51 55 44 20 69 | 25 20 20 20 20 20 20 20 |..EQUD i|% |
|00003650| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003660| 5c 20 69 6e 74 65 72 70 | 72 61 74 65 0d 0f 14 2c |\ interp|rate...,|
|00003670| a4 53 28 54 24 29 20 20 | 20 20 20 20 20 20 20 20 |.S(T$) | |
|00003680| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 5c 20 6d | | \ m|
|00003690| 65 6e 75 20 74 65 78 74 | 0d 0f 1e 05 5d 0d 0f 28 |enu text|....]..(|
|000036a0| 10 6d 65 6e 75 5f 6e 75 | 6d 25 2b 3d 31 0d 0f 32 |.menu_nu|m%+=1..2|
|000036b0| 10 3d 6d 65 6e 75 5f 6e | 75 6d 25 2d 31 0d 0f 3c |.=menu_n|um%-1..<|
|000036c0| 04 0d 0f 46 0f dd 20 a4 | 65 6e 64 5f 6d 65 6e 75 |...F.. .|end_menu|
|000036d0| 0d 0f 50 23 e7 20 6d 65 | 6e 75 5f 6e 75 6d 25 3d |..P#. me|nu_num%=|
|000036e0| 30 20 8c 20 f1 22 4d 65 | 6e 75 20 4e 55 4c 4c 21 |0 . ."Me|nu NULL!|
|000036f0| 22 3a e0 0d 0f 5a 0c 5b | 4f 50 54 70 61 73 73 0d |":...Z.[|OPTpass.|
|00003700| 0f 64 2e 45 51 55 44 20 | 2d 31 20 20 20 20 20 20 |.d.EQUD |-1 |
|00003710| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003720| 20 5c 20 74 65 72 6d 69 | 6e 61 74 6f 72 0d 0f 6e | \ termi|nator..n|
|00003730| 05 5d 0d 0f 78 0e 3d 6d | 65 6e 75 5f 6e 75 6d 25 |.]..x.=m|enu_num%|
|00003740| 0d 0f 82 04 0d 0f 8c 1a | dd 20 a4 77 5f 6c 65 61 |........|. .w_lea|
|00003750| 66 28 54 24 2c 77 25 2c | 63 25 2c 69 25 29 0d 0f |f(T$,w%,|c%,i%)..|
|00003760| 96 1a 62 25 3d a4 6e 65 | 77 5f 6d 65 6e 75 28 54 |..b%=.ne|w_menu(T|
|00003770| 24 2c 31 30 2c 63 25 29 | 0d 0f a0 20 61 25 3d a4 |$,10,c%)|... a%=.|
|00003780| 6e 6d 65 28 22 22 2c 34 | 2b 28 77 25 3c 3c 38 29 |nme("",4|+(w%<<8)|
|00003790| 2c 30 2c 30 2c 69 25 29 | 0d 0f aa 10 61 25 3d a4 |,0,0,i%)|....a%=.|
|000037a0| 65 6e 64 5f 6d 65 6e 75 | 0d 0f b4 07 3d 62 25 0d |end_menu|....=b%.|
|000037b0| 0f be 04 0d 0f c8 11 dd | 20 a4 41 44 52 28 73 25 |........| .ADR(s%|
|000037c0| 2c 78 25 29 0d 0f d2 36 | f4 20 54 68 65 20 69 6e |,x%)...6|. The in|
|000037d0| 73 74 72 75 63 74 69 6f | 6e 20 73 65 71 75 65 6e |structio|n sequen|
|000037e0| 63 65 20 6d 75 73 74 20 | 62 65 20 6f 66 20 46 49 |ce must |be of FI|
|000037f0| 58 45 44 20 6c 65 6e 67 | 74 68 0d 0f dc 0e 61 25 |XED leng|th....a%|
|00003800| 3d 78 25 2d 50 25 2d 38 | 0d 0f e6 0d e7 20 61 25 |=x%-P%-8|..... a%|
|00003810| 3e 3d 30 20 8c 0d 0f f0 | 47 20 5b 4f 50 54 70 61 |>=0 ....|G [OPTpa|
|00003820| 73 73 3a 41 44 44 20 73 | 25 2c 50 43 2c 23 28 61 |ss:ADD s|%,PC,#(a|
|00003830| 25 20 80 20 26 30 30 30 | 30 30 33 46 46 29 3a 41 |% . &000|003FF):A|
|00003840| 44 44 20 73 25 2c 73 25 | 2c 23 28 61 25 20 80 20 |DD s%,s%|,#(a% . |
|00003850| 26 46 46 46 46 46 43 30 | 30 29 3a 5d 0d 0f fa 05 |&FFFFFC0|0):]....|
|00003860| cc 0d 10 04 0b 20 61 25 | 3d 2d 61 25 0d 10 0e 47 |..... a%|=-a%...G|
|00003870| 20 5b 4f 50 54 70 61 73 | 73 3a 53 55 42 20 73 25 | [OPTpas|s:SUB s%|
|00003880| 2c 50 43 2c 23 28 61 25 | 20 80 20 26 30 30 30 30 |,PC,#(a%| . &0000|
|00003890| 30 33 46 46 29 3a 53 55 | 42 20 73 25 2c 73 25 2c |03FF):SU|B s%,s%,|
|000038a0| 23 28 61 25 20 80 20 26 | 46 46 46 46 46 43 30 30 |#(a% . &|FFFFFC00|
|000038b0| 29 3a 5d 0d 10 18 05 cd | 0d 10 22 07 3d 22 22 0d |):].....|..".="".|
|000038c0| 10 2c 04 0d 10 36 11 dd | 20 a4 4d 4f 56 28 73 25 |.,...6..| .MOV(s%|
|000038d0| 2c 78 25 29 0d 10 40 45 | f4 20 70 65 72 66 6f 72 |,x%)..@E|. perfor|
|000038e0| 6d 20 4d 4f 56 20 73 25 | 2c 23 78 25 20 6f 6e 20 |m MOV s%|,#x% on |
|000038f0| 73 65 63 6f 6e 64 20 70 | 61 73 73 20 6f 6e 6c 79 |second p|ass only|
|00003900| 20 28 76 61 72 69 61 62 | 6c 65 20 6d 61 79 20 6e | (variab|le may n|
|00003910| 6f 74 20 65 78 69 73 74 | 29 0d 10 4a 15 e7 20 28 |ot exist|)..J.. (|
|00003920| 70 61 73 73 20 80 20 32 | 29 3c 3e 30 20 8c 0d 10 |pass . 2|)<>0 ...|
|00003930| 54 1a 20 5b 4f 50 54 70 | 61 73 73 3a 4d 4f 56 20 |T. [OPTp|ass:MOV |
|00003940| 73 25 2c 23 78 25 3a 5d | 0d 10 5e 05 cc 0d 10 68 |s%,#x%:]|..^....h|
|00003950| 19 20 5b 4f 50 54 70 61 | 73 73 3a 4d 4f 56 20 73 |. [OPTpa|ss:MOV s|
|00003960| 25 2c 23 30 3a 5d 0d 10 | 72 05 cd 0d 10 7c 07 3d |%,#0:]..|r....|.=|
|00003970| 22 22 0d 10 86 04 0d 10 | 90 11 dd 20 a4 54 45 51 |""......|... .TEQ|
|00003980| 28 73 25 2c 78 25 29 0d | 10 9a 45 f4 20 70 65 72 |(s%,x%).|..E. per|
|00003990| 66 6f 72 6d 20 54 45 51 | 20 73 25 2c 23 78 25 20 |form TEQ| s%,#x% |
|000039a0| 6f 6e 20 73 65 63 6f 6e | 64 20 70 61 73 73 20 6f |on secon|d pass o|
|000039b0| 6e 6c 79 20 28 76 61 72 | 69 61 62 6c 65 20 6d 61 |nly (var|iable ma|
|000039c0| 79 20 6e 6f 74 20 65 78 | 69 73 74 29 0d 10 a4 15 |y not ex|ist)....|
|000039d0| e7 20 28 70 61 73 73 20 | 80 20 32 29 3c 3e 30 20 |. (pass |. 2)<>0 |
|000039e0| 8c 0d 10 ae 1a 20 5b 4f | 50 54 70 61 73 73 3a 54 |..... [O|PTpass:T|
|000039f0| 45 51 20 73 25 2c 23 78 | 25 3a 5d 0d 10 b8 05 cc |EQ s%,#x|%:].....|
|00003a00| 0d 10 c2 19 20 5b 4f 50 | 54 70 61 73 73 3a 54 45 |.... [OP|Tpass:TE|
|00003a10| 51 20 73 25 2c 23 30 3a | 5d 0d 10 cc 05 cd 0d 10 |Q s%,#0:|].......|
|00003a20| d6 07 3d 22 22 0d 10 e0 | 04 0d 10 ea 14 dd 20 a4 |..=""...|...... .|
|00003a30| 74 69 63 6b 65 71 28 73 | 25 2c 78 25 29 0d 10 f4 |tickeq(s|%,x%)...|
|00003a40| 0c 5b 4f 50 54 70 61 73 | 73 0d 10 fe 1b 4c 44 52 |.[OPTpas|s....LDR|
|00003a50| 20 52 30 2c 5b 73 25 2c | 23 28 32 38 2b 32 34 2a | R0,[s%,|#(28+24*|
|00003a60| 78 25 29 5d 0d 11 08 11 | 84 52 45 51 20 52 30 2c |x%)]....|.REQ R0,|
|00003a70| 52 30 2c 23 31 0d 11 12 | 12 42 49 43 4e 45 20 52 |R0,#1...|.BICNE R|
|00003a80| 30 2c 52 30 2c 23 31 0d | 11 1c 1b 53 54 52 20 52 |0,R0,#1.|...STR R|
|00003a90| 30 2c 5b 73 25 2c 23 28 | 32 38 2b 32 34 2a 78 25 |0,[s%,#(|28+24*x%|
|00003aa0| 29 5d 0d 11 26 09 5d 3a | 3d 22 22 0d 11 30 04 0d |)]..&.]:|=""..0..|
|00003ab0| 11 3a 14 dd 20 a4 74 69 | 63 6b 6e 65 28 73 25 2c |.:.. .ti|ckne(s%,|
|00003ac0| 78 25 29 0d 11 44 0c 5b | 4f 50 54 70 61 73 73 0d |x%)..D.[|OPTpass.|
|00003ad0| 11 4e 1b 4c 44 52 20 52 | 30 2c 5b 73 25 2c 23 28 |.N.LDR R|0,[s%,#(|
|00003ae0| 32 38 2b 32 34 2a 78 25 | 29 5d 0d 11 58 11 84 52 |28+24*x%|)]..X..R|
|00003af0| 4e 45 20 52 30 2c 52 30 | 2c 23 31 0d 11 62 12 42 |NE R0,R0|,#1..b.B|
|00003b00| 49 43 45 51 20 52 30 2c | 52 30 2c 23 31 0d 11 6c |ICEQ R0,|R0,#1..l|
|00003b10| 1b 53 54 52 20 52 30 2c | 5b 73 25 2c 23 28 32 38 |.STR R0,|[s%,#(28|
|00003b20| 2b 32 34 2a 78 25 29 5d | 0d 11 76 09 5d 3a 3d 22 |+24*x%)]|..v.]:="|
|00003b30| 22 0d 11 80 04 0d 11 8a | 0c dd 20 f2 65 72 72 6f |".......|.. .erro|
|00003b40| 72 0d 11 94 14 f6 3a f1 | 22 20 61 74 20 6c 69 6e |r.....:.|" at lin|
|00003b50| 65 20 22 3b 9e 0d 11 9e | 05 e0 0d 11 a8 04 0d 11 |e ";....|........|
|00003b60| b2 11 dd 20 a4 65 72 72 | 28 61 25 2c 54 24 29 0d |... .err|(a%,T$).|
|00003b70| 11 bc 41 5b 4f 50 54 70 | 61 73 73 3a 41 44 44 20 |..A[OPTp|ass:ADD |
|00003b80| 52 30 2c 50 43 2c 23 30 | 3a 84 52 53 20 50 43 2c |R0,PC,#0|:.RS PC,|
|00003b90| 52 31 34 2c 23 56 66 6c | 61 67 25 3a 45 51 55 44 |R14,#Vfl|ag%:EQUD|
|00003ba0| 20 61 25 3a a4 53 28 54 | 24 29 3a 5d 3a 3d 22 22 | a%:.S(T|$):]:=""|
|00003bb0| 0d 11 c6 04 0d 11 d0 11 | dd 20 a4 63 6f 6d 28 54 |........|. .com(T|
|00003bc0| 24 2c 61 25 29 0d 11 da | 1d 5b 4f 50 54 70 61 73 |$,a%)...|.[OPTpas|
|00003bd0| 73 3a 45 51 55 53 20 54 | 24 3a 45 51 55 42 20 30 |s:EQUS T|$:EQUB 0|
|00003be0| 3a 5d 0d 11 e4 25 21 4f | 25 3d 30 20 20 20 20 20 |:]...%!O|%=0 |
|00003bf0| 3a f4 20 7a 65 72 6f 20 | 6e 65 78 74 20 66 6f 75 |:. zero |next fou|
|00003c00| 72 20 62 79 74 65 73 0d | 11 ee 20 5b 4f 50 54 70 |r bytes.|.. [OPTp|
|00003c10| 61 73 73 3a 41 4c 49 47 | 4e 3a 45 51 55 44 20 61 |ass:ALIG|N:EQUD a|
|00003c20| 25 3a 5d 3a 3d 22 22 0d | 11 f8 04 0d 12 02 45 f4 |%:]:="".|......E.|
|00003c30| 20 43 61 6c 6c 20 7a 61 | 70 20 61 74 20 65 6e 74 | Call za|p at ent|
|00003c40| 72 79 20 6f 66 66 73 65 | 74 20 61 25 20 45 6e 74 |ry offse|t a% Ent|
|00003c50| 72 79 20 52 30 2d 52 31 | 31 3d 61 72 67 73 20 52 |ry R0-R1|1=args R|
|00003c60| 31 32 3d 7a 61 70 20 77 | 6f 72 6b 73 70 61 63 65 |12=zap w|orkspace|
|00003c70| 0d 12 0c 0f dd 20 a4 63 | 61 6c 6c 28 61 25 29 0d |..... .c|all(a%).|
|00003c80| 12 16 0c 5b 4f 50 54 70 | 61 73 73 0d 12 20 3a 4c |...[OPTp|ass.. :L|
|00003c90| 44 52 20 52 31 34 2c 5b | 52 31 32 5d 20 20 20 20 |DR R14,[|R12] |
|00003ca0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 5c 20 67 | | \ g|
|00003cb0| 65 74 20 73 74 61 72 74 | 20 6f 66 20 7a 61 70 20 |et start| of zap |
|00003cc0| 74 61 62 6c 65 0d 12 2a | 36 41 44 44 20 52 31 34 |table..*|6ADD R14|
|00003cd0| 2c 52 31 34 2c 23 61 25 | 20 20 20 20 20 20 20 20 |,R14,#a%| |
|00003ce0| 20 20 20 20 20 20 20 5c | 20 67 65 74 20 61 64 64 | \| get add|
|00003cf0| 72 65 73 73 20 6f 66 20 | 73 75 62 0d 12 34 39 53 |ress of |sub..49S|
|00003d00| 54 4d 46 44 20 52 31 33 | 21 2c 7b 52 31 34 7d 20 |TMFD R13|!,{R14} |
|00003d10| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 5c 20 73 | | \ s|
|00003d20| 61 76 65 20 61 64 64 72 | 65 73 73 20 6f 6e 20 73 |ave addr|ess on s|
|00003d30| 74 61 63 6b 0d 12 3e 3f | 4d 4f 56 20 52 31 34 2c |tack..>?|MOV R14,|
|00003d40| 50 43 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |PC | |
|00003d50| 20 20 20 20 20 20 5c 20 | 72 65 74 75 72 6e 20 61 | \ |return a|
|00003d60| 64 64 72 65 73 73 20 28 | 77 69 74 68 20 66 6c 61 |ddress (|with fla|
|00003d70| 67 73 29 0d 12 48 30 4c | 44 4d 46 44 20 52 31 33 |gs)..H0L|DMFD R13|
|00003d80| 21 2c 7b 50 43 7d 20 20 | 20 20 20 20 20 20 20 20 |!,{PC} | |
|00003d90| 20 20 20 20 20 5c 20 63 | 61 6c 6c 20 74 68 65 20 | \ c|all the |
|00003da0| 73 75 62 0d 12 52 09 5d | 3a 3d 22 22 0d 12 5c 04 |sub..R.]|:=""..\.|
|00003db0| 0d ff | |.. | |
+--------+-------------------------+-------------------------+--------+--------+
