B ORA A JNZ RD.2 LXI H,-128 DAD B MOV B,H MOV C,L POP H LXI D,128 DAD D POP D JMP RD.1 RD.2: POP H POP D LDA RD.T CPI 21 JNZ RD.4A POP H LXI D,RD.M MVI C,9 CALL 5 LXI H,-1 JMP RD.3 RD.M: DB 'Write error - Disk full',0AH,0DH,'$' RD.4A: MVI M,26 RD.4: POP D MOV H,B MOV L,C CALL s.1 RD.3: PUSH H MVI C,26 LXI D,128 CALL 5 POP H JMP $RW.2 $RW.: LXI H,8 DAD SP MOV A,M DCR A DCX H PUSH H CALL .CPC POP H PUSH D MOV D,M DCX H MOV E,M DCX H MOV B,M DCX H MOV C,M POP H XCHG RET g.: MOV A,M c.sxt: MOV L,A RLC SBB A MOV H,A RET h.: MOV A,M INX H MOV H,M MOV L,A RET q.: XCHG POP H XTHL MOV M,E INX H MOV M,D XCHG RET o.: POP B POP D PUSH B MOV A,L ORA E MOV L,A MOV A,H ORA D MOV H,A RET x.: POP B POP D PUSH B MOV A,L XRA E MOV L,A MOV A,H XRA D MOV H,A RET a.: POP B POP D PUSH B MOV A,L ANA E MOV L,A MOV A,H ANA D MOV H,A RET e.0: MOV A,H ORA L RZ e.t: LXI H,0 e.2: INR L RET e.: POP B POP D PUSH B e.1: MOV A,H CMP D MOV A,L LXI H,0 JNZ e.f CMP E JNZ e.f INR L RET e.f: XRA A RET c.not: MOV A,H ORA L JZ e.2 LXI H,0 XRA A RET n.: POP B POP D PUSH B n.1: MOV A,H CMP D MOV A,L LXI H,1 RNZ CMP E RNZ DCR L RET c.gt: XCHG JMP c.lt c.ge: XCHG c.le: MOV A,H CMP D JNZ c.lt MOV A,L CMP E JZ e.t c.lt: MOV A,D CMP H JZ c.1 PUSH PSW XRA H LXI H,1 JP c.2 POP PSW RNC DCR L RET c.2: POP PSW RC DCR L RET c.1: MOV A,E CMP L c.5: LXI H,1 RC DCR L RET c.uge: XCHG c.ule: MOV A,D CMP H JNZ c.5 MOV A,E CMP L JNZ c.5 JMP e.t c.ugt: XCHG c.ult: MOV A,D CMP H JNZ c.5 MOV A,E CMP L JNZ c.5 c.f: LXI H,0 RET c.asr: XCHG DCR E RM MOV A,H RAL MOV A,H RAR MOV H,A MOV A,L RAR MOV L,A JMP c.asr+1 c.usr: XCHG DCR E RM XRA A MOV A,H RAR MOV H,A MOV A,L RAR MOV L,A JMP c.usr+1 c.asl: XCHG DCR E RM DAD H JMP c.asl+1 s.: POP B POP D PUSH B s.1: MOV A,E SUB L MOV L,A MOV A,D SBB H MOV H,A RET c.neg: DCX H c.com: MOV A,H CMA MOV H,A MOV A,L CMA MOV L,A RET c.mult: MOV B,H MOV C,L LXI H,0 MOV A,D ORA A MVI A,16 JNZ .MLP MOV D,E MOV E,H RRC .MLP: DAD H XCHG DAD H XCHG JNC .MSK DAD B .MSK: DCR A JNZ .MLP RET c.udv: XRA A PUSH PSW JMP c.d1 c.div: MOV A,D XRA H PUSH PSW XRA H XCHG CM c.neg XCHG MOV A,H ORA A c.d1: CP c.neg MOV C,L MOV B,H LXI H,0 MOV A,B INR A JNZ .DV3 MOV A,D ADD C MVI A,16 JC .DV1 .DV3: MOV L,D MOV D,E MOV E,H MVI A,8 .DV1: DAD H XCHG DAD H XCHG JNC .DV4 INX H .DV4: PUSH H DAD B POP H JNC .DV5 DAD B INX D .DV5: DCR A JNZ .DV1 XCHG POP PSW RP XCHG CALL c.neg XCHG JMP c.neg .switch: XCHG POP H S.9: MOV C,M INX H MOV B,M INX H MOV A,B ORA C JZ S.8 MOV A,M INX H CMP E MOV A,M INX H JNZ S.9 CMP D JNZ S.9 PUSH B POP H S.8: PCHL .XFCB: LXI B,11 DAD B SHLD .XTMP MVI A,' ' NAM.1: MOV M,A DCX H DCR C JNZ NAM.1 XRA A MOV M,A LXI B,12 DAD B MOV M,A INX H INX H MOV M,A LXI B,18 DAD B MOV M,A LXI B,-32 DAD B XCHG INX H MOV A,M DCX H CPI ':' JNZ NAM.2 MOV A,M INX H INX H CALL NAM.U SUI 'A'-1 STAX D NAM.2: INX D MOV A,M INX H ORA A RZ CPI '.' JZ NAM.3 CALL NAM.U STAX D JMP NAM.2 NAM.3: XCHG LHLD .XTMP DCX H DCX H NAM.4: LDAX D ORA A RZ CALL NAM.U MOV M,A INX D INX H JMP NAM.4 .XTMP: DS 2 NAM.U: ANI 177Q CPI 'a' RM SUI 'a'-'A' RET .CPC: MOV C,A MVI B,0 LXI H,IOfcb DAD B DAD B MOV A,M MOV E,A INX H MOV D,M ORA D RNZ PUSH H LXI H,36 PUSH H CALL alloc XCHG POP H POP H MOV M,D DCX H MOV M,E MOV H,D MOV L,E INX H MOV A,H ORA L RET i.*|g> >کÝ!p+q*DM͡:͆ ͆:_2:`!!:*& N͆!4!6ÃO$+q+p+qy͏ , $  ͌ 9!z6 # L!zw͌j# X:z 0 ͘=N#Fy}80*z{¯#z+++ ¥ z#½# · 9!`͠ y9!rͷ y=!z{w# % w!P͠ y͓}*w#"͌ @.@<!Eͷ~P !ͷ’P͌Q!ͷªP}QxQ!ͷ͓G@Q! ͷ y͓Gþ!ͷ ͓Q!ͷ͓Q͌Q!.ͷ6y#G͙Qà!2ͷQ͓͌Q!>ͷq eg͙Q:zJEËC–EQyQxQRQ** {zҷ*~#" <AOGƐ'@'OxƐ'@'ON# z8O!B N#N ¾SP.* |} !9":q!"28!"9:] !ç 1 7!? ͏9|µ * !"}2""* |D!A 7!" &"!"!"*"u*!y"b*&}o!"!9,y+syʞ!!9,y!͚yʶ!!9,y"* ,y"**z"!" **##"++,y*z"lze*"* **!" """"!|r:͊/Wy`r͡/*))}o"E͊/sy͡/&*"!"$*$*My|ʹî*$))"$Ñ*"##""ã!Y ͂-!͙" !|:͊/͡/u!"$K͡/:!"$͊/Wy** |͊/c.Wy'!" Q{͡/:* |B͊/syWyKQ!" *$*"y*9y"*"##""* |xÁ!" **"y*9y".|g|ʨ![ 7* """ ""lz[({ë*))!9,y9y".|g|![ 7!9** * ******!~96!~9͙sy]!~9E"syWyi*"!k ͏9syʏ**_yʌ!m 7ò**}yʥy-*"* " * " * **?++ͷy! 7** "1y*"!~9"*#"+*#"+&y}|* !"1y "syl! 7!""""""" " "!t9*!!!"|*,y* ,y}y±* ,y*}yWy* &y*}yWyy-!***!!*!9"!9,y|'** ,y͋y$* *1y9* ,y*1y"*syJ!- 7* **?yu* ##" ++*1yÃ! 7!@!? ͏9|l&! ͏9sy)** "1y*"!͋y! 7*@!"*"!9,y*}y *,y"*#"*!"f!9*2*0*.*,***(*&*|b !k ͏9"(|{!". ͊/!"9,y++syʖ*EsyWyʡ*.Wy*l"&"("*","."0"2!9!"96#6!"9,y".++sy!". lz,};!(9,y&}o !ï!$9,y"0"&|S!$9,y##1y++,y"&|S!"0!(9,y!y1yke*&syʀ*.syʀ!(9,y!(9,y!(9,y*.6".*0|ʺ*0,y#1y+*&|*&+"&syhì!&9,y!͚y!&9,y+sy!!"&!&9,y"*** ",**,y"*!"&***,}yʆ*,##",++,y"2*2 ,y*2 &y*2*.6".*&#"&3*&!͋yʬ*2,ysyʬ! 7*(syʻ*.ï!"&*.sy!*&Kg*| *#"+&y*&Kg*&+Wy*+"|!"9,yï!9͉\"|`!" *&++syK!"ð*!9,y"! ͏9"4!" !9!;>*4|ʰ!9&ysyʰ!9,y&}o+Wyʰ! 7!9&y!9dg*&+sy! 7!9,y*&Kg! 7lzúlz!*(|7!? ͏9! ͂-!"9,y!͏yT!? ͏9syWy`!ï:͊/Wyzï!"s! ͏9syʗW<"s! ͂-*|ʰ*ssyʰ!- 7*#"+)*s1y!9,y"* "* *}y7**!8|* &y!9,yCy&}osyWy'**,y"!!9,y"=*";* *;}yʍ*=*;!8|}*;*;,y";U!!9,yA"|* &yWy! 7!9,y!!-!!!!9"*,y!9,yd!96#6#!96#6!9,y!"* "*"|!9,yA"* "*"|lz##F*|ʋy-**"*"áÛ**ͷyʻ!!7*!9,y+1y#sy*##"++!9,y##1y++,y1yÞ*#"+!9,y#1y+&y}ͭ.|* !9,y1y* ! 9,y}*! 9,y1y* !9,y}**1y**_yʉ*" Ï*" *:͊/c.syʮ!!9,y"+"͊/ͭ.|*͡/}**}y*#"*6!!9,y1y!͚y!*"!9,y+1y#|?*,y"**"C*C*yʈ!9,y*C!8|x*C*C,y"CK!#asmsyntax errornested too deepCan't find fileregisteexternstaticautointshortlongcharunsignestructuniontoo large for register=improper argumentdimension missing,construct not permitted)too complicated{undefined struct namestruct table overflowbad type}too many structscan't initialize union&not an addresstype mismatchtoo complex]not a labelsymbol table overflow!9*!!"#!*#!+"#!!͏yf!N!6!*#!*#!&y}K!!!"!|ʼ!*! ,y*}y¤!*! &y!9,y}yWyʭ!y-*!6#6!!*!9,y!!!!!9*" !"K"M!9,y++syʉ"!O:͏9syʁ"!9͙sy+"m- -!9!!*M!! 9!!9*M##"M:͊/Wys"!Q:͂-R-|~"Á""! !S:͏9|ʞ"!U:7!g:͏9|$! *K"!!!"Kb*k|"ͼk!̈́bb*C|"b*!!!͸n"K!"#!* "!!**!!}y $#*!"!!"*"!*!,y"!*!!}yL#I#*!"!&#@#*! &y"%!#*!3h!96!9j*%!Wyʃ#$*#!##"#!!9!!!!*#!!!^!9!9͘c*!Wh$*!,y!͏y#*!*#!##"#!1y$lz\#\###&"!1$b*k| $ͼk!̈́bbe$"!*!+++WyE$!**!"K*" !""!!9͊/sy*SMy|x$!i:!9|ʞ$!**&!"a%!g:͏9|ʱ$&%!p:!9|$W&%!s:!9|$!(%!y:!9|%!(%!}:!9| %!(%!:!9|@%!!+&%!:!9|X%ͽ&%!:!9|p%͂'%!:!9|ʈ%'%!:!9|ʨ%!!+&%!S:͏9|ʸ%%!:͏9|%s+%!:!9|%)%͚)|%%!<&!"a*a!S:͂-*Q#"Q!" &!:͏9syH&*S|?&!:͡-H&E&e$" &&*Q+"Q* &*U&*S&-"S&*S&ͥZe$!:!9syʔ&*S&-"S&"U&-"U& l*S&-e$*U&-Ë&*&*&*&*&*e"&!"e*"&!96#6!9##-1y!9.!:͂-!