701C 00 7013 : E: 00 7001 : C: 00 6FF8 : B: 00 6FEF : A: 00 6FE1 : cd 00 6EA3 : dir 00 6E75 : TYPE 00 6BEC : td 00 6B68 : tm 00 6B5F : redit 00 6B50 : reload 00 6B25 : edit 00 6ACE : sys 00 6A9F : using 00 6A44 5153 T 00 69AB # USLIN 00 697E # PGLIN 00 685F 068F CIRCLE 00 6794 # DOLINE 00 6780 895A DLINE 00 6746 068F DBOX 00 66B4 # EGABYTE 00 66A4 895A D4PIX 00 6604 895A DPIX 00 65BF : DD 00 65B4 # DDH 00 64C9 : DDL 00 638B : DA 00 611D : dhl 00 589C : SPCLCODE@ 10 5897 V 588A DATABLE 00 586E : DACMT 00 52E9 : FOURBYTES 00 52DC : THREEBYTES 00 52BB : TWOBYTES 00 520A : abrtdis 00 4E31 : bksp 00 4E27 : comma 10 4E22 V E484 DDCONT 00 4E19 : TAB 00 4D83 : TAG 00 4D59 # DEBUG 00 4D03 : UNPAT 00 4CEC : PAT 00 4CD1 : PNOP 00 4CC2 : NOP 00 4CB3 : FMEM 00 4C9A : SIZE 00 4BAE : RPD 00 4B80 : PD 00 4B41 : .' 00 4B26 : PDICT 00 4B1B # '? 00 4A91 : DDICT 00 4A46 : 16DM 00 4A31 : 8DM 00 4997 : DM 00 4974 : DHB 00 4946 : DHX 01 48F2 : TRACEOFF 01 48A6 : TRACEON 00 488F : TERMSG 00 4880 # TTHREAD 00 4853 : TRACEL 00 4688 # TSRET 00 465A # TCOLON 10 4655 V 4653 TAGL 01 45C3 : OMIT 00 3AD2 # INTRO 00 3A7D # LOGO 00 3A59 : unlink 00 3A07 : link 00 39CA : g0load 00 39B9 : gload 00 387F : relocate 01 3750 : RECURSE 00 372C : ISAVE 00 3723 : ILOAD 00 3718 : bye 00 3713 : quote 00 3702 : savesys 00 36F7 : fsave 00 3675 : dosave 00 35F3 : saveinit 10 35EE V 35E3 savesysn 10 35DE V E492 savelum 10 35D9 V E494 savesysl 10 35D4 V E496 saveihead 10 35CF V E498 savehead 00 35C0 : FLOAD 00 35AD : ,XOR 00 359A : ,OR 00 3587 : ,AND 01 357C : [[ 01 3571 : ]] 00 3489 : STATUS 00 344E : STOPMAP 00 33D7 : PIMAGE 00 333A : GIMAGE 00 31CA : MAP 00 311D : ORG 00 30F2 : UNCROSS 00 30A1 : CROSS-COMPILE 00 3084 : PATCH 00 3065 : SAVE 10 3051 V E4A6 OLDLUM 10 304C V E4A8 OLDHEAD 00 3030 : LDAXHB, 00 3025 : or-bcbc, 00 3010 : mov-hl[hl], 00 3005 : mov-[hl]de, 00 2FFA : mov-hlde, 00 2FEF : mov-[hl]bc, 00 2FDA : mov-hl[bc], 00 2FCF : mov-hlbc, 00 2FC4 : mov-de[hl], 00 2FAF : mov-de[bc], 00 2FA4 : mov-bc[hl], 00 2F8F : mov-bc[bc], 00 2F84 : mov-bcax, 00 2F79 : mov-axhl, 00 2F64 : mov-ax[bc], 00 2F59 : mov-axbc, 00 2F4E : mov-hlax, 00 2F43 : mov-bcsi, 00 2F38 : mov-sibc, 00 2F2D : jmp-ax, 00 2F23 : lodsw, 00 2F18 : sub-hlde, 00 2F0D : sub-hlbc, 00 2F02 : sub-dehl, 00 2EF7 : add-[bx]de, 00 2EEC : sub-[bx]de, 00 2EE1 : sub-axhl, 00 2ED6 : sub-axde, 00 2EC1 : XTHL, 00 2E8A : STAX, 00 2E53 : LDAX, 00 2E2C : LXI, 00 2DF6 : MVI, 00 2D8D : MOV, 00 2D89 E878 WHILEP 00 2D85 E879 WHILEM 00 2D81 E87A WHILEPO 00 2D7D E87B WHILEPE 00 2D79 E873 WHILENC 00 2D75 E872 WHILEC 00 2D71 E874 WHILENZ 00 2D6D E875 WHILEZ 00 2D69 E83A CMP, 00 2D65 E80A ORA, 00 2D61 E832 XRA, 00 2D5D E822 ANA, 00 2D59 E81A SBB, 00 2D55 E82A SUB, 00 2D51 E812 ADC, 00 2D4D E802 ADD, 00 2D49 E878 ENDP 00 2D45 E879 ENDM 00 2D41 E87A ENDPO 00 2D3D E87B ENDPE 00 2D39 E872 ENDNC 00 2D35 E873 ENDC 00 2D31 E874 ENDNZ 00 2D2D E875 ENDZ 00 2D29 E8E9 ENDU 00 2D25 E878 IFP 00 2D21 E879 IFM 00 2D1D E87A IFPO 00 2D19 E87B IFPE 00 2D15 E872 IFNC 00 2D11 E873 IFC 00 2D0D E874 IFNZ 00 2D09 E875 IFZ 00 2D05 E8A2 STA, 00 2D01 E8A0 LDA, 00 2CFC 068F popw, 00 2CF7 36FF pushw, 00 2CF2 0EFF dcxw, 00 2CED 06FF inxw, 00 2CE8 1E8B LHLD, 00 2CE3 1E89 SHLD, 00 2CDF E879 CM, 00 2CDB E878 CP, 00 2CD7 E87B CPE, 00 2CD3 E87A CPO, 00 2CCF E873 CC, 00 2CCB E872 CNC, 00 2CC7 E875 CZ, 00 2CC3 E874 CNZ, 00 2CBF E8E8 CALL, 00 2CBB E8E9 JMP, 00 2CB7 E8E6 OUT, 00 2CB3 E8E4 IN, 00 2CAF E83C CPI, 00 2CAB E80C ORI, 00 2CA7 E834 XRI, 00 2CA3 E824 ANI, 00 2C9F E81C SBI, 00 2C9B E82C SUI, 00 2C97 E814 ACI, 00 2C93 E804 ADI, 00 2C8E E3FF PCHL, 00 2C89 E38B SPHL, 00 2C84 D0F6 CMA, 00 2C7F D387 XCHG, 00 2C7A D8D0 RAR, 00 2C75 D0D0 RAL, 00 2C70 C8D0 RRC, 00 2C6B C0D0 RLC, 00 2C67 E89D POPF, 00 2C63 E89C PUSHF, 00 2C5F E8FB EI, 00 2C5B E8FA DI, 00 2C57 E8F5 CMC, 00 2C53 E8F9 STC, 00 2C4F E827 DAA, 00 2C4B E8F4 HLT, 00 2C47 E890 NOP, 00 2C43 E8C3 RET, 00 2C3F E8C7 RST, 00 2C3B E858 POP, 00 2C37 E850 PUSH, 00 2C33 E8C8 DCR, 00 2C2F E8C0 INR, 00 2C2B E8D8 DAD, 00 2C27 E848 DCX, 00 2C23 E840 INX, 10 2C1E V 5409 M 10 2C19 V 5407 H 10 2C14 V 5406 D 10 2C0F V 5405 B 10 2C0A V 5404 SP 10 2C05 V 5403 L 10 2C00 V 5402 E 10 2BFB V 5401 C 10 2BF6 V 5400 PSW 10 2BF1 V 5400 A 01 2BDB : CODE 00 286D : ICOM 01 2779 : FORGET 01 2749 : IFTRUE 01 272A : OTHERWISE 01 2725 : ENDIF 01 2700 : OF[ 01 26DD : ENDCASE 01 26AD : ENDOF 01 268A : OF 01 267B : CASE 01 2621 : SYNONYM 01 24C7 : DATA[ 01 24B8 : END[ 01 24A2 : IF[ 00 2346 : DACLS2 00 231C : DACLS 00 22E6 : :ENTER 01 22CE : :EXIT 01 22BA : K 01 22A6 : J 01 2292 : I 01 227B : EXIT 01 226B : +LOOP 01 225C : LOOP 01 221C : DO 01 2209 : EXIT-FRAME 01 21F0 : ENTER-FRAME 00 21E1 : OLD-CONTEXT 00 21CC : NEW-CONTEXT 01 2150 : BLOCK 10 2133 V E4AC CONTEXT 01 2102 : '' 01 20E5 : ' 01 20BB : [COMPILE] 00 205F : GTDFA 01 1FDA : ,CONST 01 1FA3 : CONST 01 1F92 : ;NOTHREAD 01 1F59 : ;PUSH 01 1F49 : RETURN 01 1EF7 : ; 00 1EE1 : CLRFIND 01 1EA3 : : 01 1E38 : ENDWHILE 01 1E16 : WHILE 01 1DF8 : REPEAT 01 1DBB : THEN 01 1D5E : ELSE 01 1D42 : IF 01 1D2D : END 01 1D14 : ASM 01 1CF7 : IMMEDIATE 01 1CDC : BEGIN 00 1CB9 : XDATA 00 1CB0 : REDEFINE 00 1BA6 : DEFINE 00 1B8F : GETLOC 00 1A74 : HIMODCHK 10 190F V 190D olast 10 1908 V 0000 INITLUM 10 1903 V 0000 INITHEAD 10 18F9 V E4B0 REDEF 10 18F4 V E4B1 LUM 10 18EF V E4B3 DICTION 00 18E4 : DDS 00 187C : ICLI 10 1877 V FE27 TOPDICT 01 184F : " 01 1755 : ( 00 172A # ()) 00 165D : CLI 00 165A # DEBUGCLI 00 1617 # WORD 00 15D2 : NUMBER 00 15C1 : VAL 00 1382 : GVAL 10 137D V 137B GVALESC 00 130F : XDEFA 00 1283 # HEADB! 00 1271 # HEAD! 00 11E7 : CHARS 00 1079 # GC 00 1066 : depth 00 1008 : LOAD 00 0FFF : PRINTLOC 00 0FF6 : PRINTLOAD 00 0FE1 : SYSWBYTE 00 0FCA : SYSRBYTE 00 0FAE : SYSWRITE 00 0F93 : SYSREAD 00 0F8A : SYSCLOSE 00 0F57 : SYSOPEN 00 0EE0 : DS 00 0DC1 : ERMSG 00 0DBE # DEBUGERMSG 10 0DB9 V 0001 ON 10 0DB4 V 0000 OFF 10 0DA5 V 0000 SYSLAST 10 0D8C V FE4D CONIP 10 0D87 V FE4F CONBUF 10 0D7D V FEDA CURCHAN 10 0D78 V FEDC BASE 10 0D73 V FEDE STRING 10 0D6E V FFDE ATOM 10 0D69 V FFFE HIMODE 10 0D64 V FFF0 OLDLAST 10 0D5F V FF02 LAST 10 0D5A V FF04 HEAD 10 0D55 V FF06 CROSS 10 0D4B V FF09 MAYPLOC 10 0D46 V FF0A MAYPRNT 10 0D41 V FF0B CLISP 10 0D3C V FF0D CLICSP 00 0CC4 # FIND 00 0CA6 : DISPLAY 00 0C80 : ,.H 00 0BF7 : ,. 00 0BDB : .HB 00 0BB4 : .H 00 0BA8 : . 00 0B6B : .CL 00 0B2E : .L 00 0B13 : %CLST2 00 0AE1 : CDOUT 00 0ACA : DOUT 00 0A98 : SPCS 00 0A8E : SPC 00 0A80 : CRLF 00 0A50 : .C 00 0A59 : ." 00 0A59 : PUTLIN 00 0A50 : PUTCHR 00 0A39 : GETCLI 00 0A1E : GETLIN 00 0A13 : GETCHR 00 09E6 : GETSTS 00 09DD : WRITE 00 09D4 : READ 00 08D7 835B CLOSE 00 085A # FILECNT 00 0966 # OPEN 00 07ED # GCOUT 10 07E8 V 07E6 GCOLR 00 07BB # BRKON 00 0769 # BRKOFF 00 0768 # BRET 00 075E # Q-U-IT 00 0752 # SETMEM 00 0743 # MON1 00 0732 # MON2 00 0723 # GETMODE 00 0714 # GOTOXY 00 070B # NNORM 00 0702 # NORM 00 06F9 # NCGAM 00 06F0 # CGAM 00 06E7 # NEGAM 00 06DE # EGAM 10 06D9 V 000A 10 10 06D4 V 0009 9 10 06CF V 0008 8 10 06CA V 0007 7 10 06C5 V 0006 6 10 06C0 V 0005 5 10 06BB V 0004 4 10 06B6 V 0003 3 10 06B1 V 0002 2 10 06AC V 0001 1 10 06A7 V 0000 0 10 06A2 V FF0F -1 04 05DB # XIF[ 04 05CC # XDOEXIT 00 05BA # XDOK 00 05A8 # XDOJ 00 0596 # XDOI 00 053A # XLOOP 00 053E # X+LOOP 00 04EF # XDO 00 04CD # XEXIT 00 04A6 # XENTR 00 0490 # LVLOAD 10 048B V 010A FP 00 0471 # STRCMP 00 0462 # $! 00 0445 # FILL 00 0433 # MOVE 04 0420 # MOVE# 00 040B # U> 00 03FA # 0> 00 03E5 # >= 00 03D4 # = 00 03C5 # > 00 03B6 # < 04 03AB # RELAT# 00 039D # 0= 00 038C # */ 00 036D # /MOD 00 034F # / 00 0343 # * 00 0332 # -1* 00 031E # +! 00 0309 # ABS 00 0302 # - 00 02FC # 2+ 00 02F7 # 1- 00 02F2 # 1+ 00 02EB # + 00 02DE # <-L 00 02D1 # ->L 00 02C9 # SHL8 00 02C1 # SHR8 00 02BA # XOR 00 02B3 # OR 00 02AC # AND 00 02A2 # BSWAP 00 029B # B! 00 0293 # ! 00 028B # SP@ 00 0282 # B@ 00 0278 # DUPB@ 00 0271 # @ 00 0269 # DUP@ 00 0241 # INSRT 00 020E # XTRCT 00 0203 # ROT 00 01F7 # POKE 00 01E9 # PICK 00 01E0 # SWAP 00 01D5 # ?DUP 00 01D0 # DUP 00 01C4 # KILL 00 01C0 # DROP 00 01B7 # OVER 04 0199 # XOF 04 0187 # BRZ 04 017F # BR 04 016D # ,LDI 04 0158 # LDIS 04 014C # LDIB 04 0143 # LDI 00 013D # X:EXIT 00 013C # EXEC 04 0136 # SRET 04 0130 # RRET 04 0112 # VLOAD 04 0129 # COLON 04 0124 # popdi 04 011F # pshdi 00 0119 # CSP@ 00 011C # CSP! 04 0105 # THREAD 04 0104 # X;PUSH