;small-c compiler rev 2.0(mod 1) comment equ $ LXI H,59 PUSH H CALL outbyte POP B RET header equ $ CALL comment LXI H,cc1601+0 PUSH H CALL outstr POP B CALL nl RET trailer equ $ PUSH B LHLD glbflag PUSH H LXI H,0 POP D CALL cceq MOV A,H ORA L JZ cc1602 POP B RET cc1602 equ $ LXI H,0 DAD SP PUSH H CALL getlabel POP D CALL ccpint LXI H,cc1601+32 PUSH H CALL ot POP B LXI H,0 DAD SP CALL ccgint PUSH H CALL printlab POP B CALL nl LXI H,0 DAD SP CALL ccgint PUSH H CALL printlab POP B CALL col CALL nl LXI H,cc1601+37 PUSH H CALL ol POP B LXI H,cc1601+46 PUSH H CALL ol POP B LXI H,cc1601+59 PUSH H CALL ol POP B LXI H,cc1601+73 PUSH H CALL ol POP B LXI H,cc1601+85 PUSH H CALL ol POP B LXI H,cc1601+92 PUSH H CALL ol POP B LXI H,cc1601+106 PUSH H CALL ol POP B LXI H,cc1601+113 PUSH H CALL ol POP B LXI H,cc1601+123 PUSH H CALL ol POP B LXI H,cc1601+132 PUSH H CALL ol POP B LXI H,cc1601+141 PUSH H CALL ol POP B LXI H,cc1601+146 PUSH H CALL ol POP B LXI H,cc1601+159 PUSH H CALL ol POP B LXI H,cc1601+173 PUSH H CALL ol POP B POP B RET getmem equ $ LXI H,2 DAD SP CALL ccgint PUSH H LXI H,9 POP D DAD D MOV L,M MVI H,0 PUSH H LXI H,3 POP D CALL ccne PUSH H LXI H,4 DAD SP CALL ccgint PUSH H LXI H,10 POP D DAD D MOV L,M MVI H,0 PUSH H LXI H,1 POP D CALL cceq POP D CALL ccand MOV A,H ORA L JZ cc1603 LXI H,cc1601+177 PUSH H CALL ot POP B LXI H,2 DAD SP CALL ccgint PUSH H LXI H,0 POP D DAD D PUSH H CALL outstr POP B CALL nl LXI H,cc1601+182 PUSH H CALL call POP B JMP cc1604 cc1603 equ $ LXI H,cc1601+188 PUSH H CALL ot POP B LXI H,2 DAD SP CALL ccgint PUSH H LXI H,0 POP D DAD D PUSH H CALL outstr POP B CALL nl cc1604 equ $ RET getloc equ $ PUSH B CALL immed LXI H,0 DAD SP PUSH H LXI H,6 DAD SP CALL ccgint PUSH H LXI H,12 POP D DAD D POP D CALL ccpint LXI H,0 DAD SP CALL ccgint CALL ccgint PUSH H LHLD xsp POP D CALL ccsub PUSH H CALL outdec POP B CALL nl LXI H,cc1601+194 PUSH H CALL ol POP B POP B RET putmem equ $ LXI H,2 DAD SP CALL ccgint PUSH H LXI H,9 POP D DAD D MOV L,M MVI H,0 PUSH H LXI H,3 POP D CALL ccne PUSH H LXI H,4 DAD SP CALL ccgint PUSH H LXI H,10 POP D DAD D MOV L,M MVI H,0 PUSH H LXI H,1 POP D CALL cceq POP D CALL ccand MOV A,H ORA L JZ cc1605 LXI H,cc1601+201 PUSH H CALL ol POP B LXI H,cc1601+209 PUSH H CALL ot POP B JMP cc1606 cc1605 equ $ LXI H,cc1601+214 PUSH H CALL ot POP B cc1606 equ $ LXI H,2 DAD SP CALL ccgint PUSH H LXI H,0 POP D DAD D PUSH H CALL outstr POP B CALL nl RET putstk equ $ CALL pop LXI H,2 DAD SP MOV L,M MVI H,0 PUSH H LXI H,1 POP D CALL cceq MOV A,H ORA L JZ cc1607 LXI H,cc1601+220 PUSH H CALL ol POP B LXI H,cc1601+228 PUSH H CALL ol POP B JMP cc1608 cc1607 equ $ LXI H,cc1601+235 PUSH H CALL call POP B cc1608 equ $ RET indirect equ $ LXI H,2 DAD SP MOV L,M MVI H,0 PUSH H LXI H,1 POP D CALL cceq MOV A,H ORA L JZ cc1609 LXI H,cc1601+242 PUSH H CALL ol POP B LXI H,cc1601+250 PUSH H CALL ol POP B JMP cc1610 cc1609 equ $ LXI H,cc1601+258 PUSH H CALL call POP B cc1610 equ $ RET swap equ $ LXI H,cc1601+265 PUSH H CALL ol POP B RET immed equ $ LXI H,cc1601+270 PUSH H CALL ot POP B RET push equ $ LXI H,cc1601+277 PUSH H CALL ol POP B LHLD xsp PUSH H LXI H,2 POP D CALL ccsub SHLD xsp RET pop equ $ LXI H,cc1601+284 PUSH H CALL ol POP B LHLD xsp PUSH H LXI H,2 POP D DAD D SHLD xsp RET swapstk equ $ LXI H,cc1601+290 PUSH H CALL ol POP B RET call equ $ LXI H,cc1601+295 PUSH H CALL ot POP B LXI H,2 DAD SP CALL ccgint PUSH H CALL outstr POP B CALL nl RET ret equ $ LXI H,cc1601+301 PUSH H CALL ol POP B RET callstk equ $ CALL immed LXI H,cc1601+305 PUSH H CALL outstr POP B CALL nl CALL swapstk LXI H,cc1601+309 PUSH H CALL ol POP B LHLD xsp PUSH H LXI H,2 POP D DAD D SHLD xsp RET jump equ $ LXI H,cc1601+314 PUSH H CALL ot POP B LXI H,2 DAD SP CALL ccgint PUSH H CALL printlab POP B CALL nl RET testjump equ $ LXI H,cc1601+319 PUSH H CALL ol POP B LXI H,cc1601+327 PUSH H CALL ol POP B LXI H,cc1601+333 PUSH H CALL ot POP B LXI H,2 DAD SP CALL ccgint PUSH H CALL printlab POP B CALL nl RET defbyte equ $ LXI H,cc1601+337 PUSH H CALL ot POP B RET defstora equ $ LXI H,cc1601+341 PUSH H CALL ot POP B RET defword equ $ LXI H,cc1601+345 PUSH H CALL ot POP B RET modstk equ $ PUSH B LXI H,0 DAD SP PUSH H LXI H,6 DAD SP CALL ccgint PUSH H LHLD xsp POP D CALL ccsub POP D CALL ccpint LXI H,0 DAD SP CALL ccgint PUSH H LXI H,0 POP D CALL cceq MOV A,H ORA L JZ cc1611 LXI H,4 DAD SP CALL ccgint POP B RET cc1611 equ $ LXI H,0 DAD SP CALL ccgint PUSH H LXI H,0 POP D CALL ccge MOV A,H ORA L JZ cc1612 LXI H,0 DAD SP CALL ccgint PUSH H LXI H,7 POP D CALL cclt MOV A,H ORA L JZ cc1613 LXI H,0 DAD SP CALL ccgint PUSH H LXI H,1 POP D CALL ccand MOV A,H ORA L JZ cc1614 LXI H,cc1601+349 PUSH H CALL ol POP B LXI H,0 DAD SP PUSH H CALL ccgint DCX H POP D CALL ccpint INX H cc1614 equ $ cc1615 equ $ LXI H,0 DAD SP CALL ccgint MOV A,H ORA L JZ cc1617 LXI H,cc1601+356 PUSH H CALL ol POP B LXI H,0 DAD SP PUSH H LXI H,2 DAD SP CALL ccgint PUSH H LXI H,2 POP D CALL ccsub POP D CALL ccpint JMP cc1615 cc1617 equ $ cc1616 equ $ LXI H,4 DAD SP CALL ccgint POP B RET cc1613 equ $ cc1612 equ $ LXI H,0 DAD SP CALL ccgint PUSH H LXI H,0 POP D CALL cclt MOV A,H ORA L JZ cc1618 LXI H,0 DAD SP CALL ccgint PUSH H LXI H,7 CALL ccneg POP D CALL ccgt MOV A,H ORA L JZ cc1619 LXI H,0 DAD SP CALL ccgint PUSH H LXI H,1 POP D CALL ccand MOV A,H ORA L JZ cc1620 LXI H,cc1601+362 PUSH H CALL ol POP B LXI H,0 DAD SP PUSH H CALL ccgint INX H POP D CALL ccpint DCX H cc1620 equ $ cc1621 equ $ LXI H,0 DAD SP CALL ccgint MOV A,H ORA L JZ cc1623 LXI H,cc1601+369 PUSH H CALL ol POP B LXI H,0 DAD SP PUSH H LXI H,2 DAD SP CALL ccgint PUSH H LXI H,2 POP D DAD D POP D CALL ccpint JMP cc1621 cc1623 equ $ cc1622 equ $ LXI H,4 DAD SP CALL ccgint POP B RET cc1619 equ $ cc1618 equ $ CALL swap CALL immed LXI H,0 DAD SP CALL ccgint PUSH H CALL outdec POP B CALL nl LXI H,cc1601+376 PUSH H CALL ol POP B LXI H,cc1601+383 PUSH H CALL ol POP B CALL swap LXI H,4 DAD SP CALL ccgint POP B RET doublere equ $ LXI H,cc1601+388 PUSH H CALL ol POP B RET add equ $ LXI H,cc1601+394 PUSH H CALL ol POP B RET sub equ $ LXI H,cc1601+400 PUSH H CALL call POP B RET mult equ $ LXI H,cc1601+406 PUSH H CALL call POP B RET div equ $ LXI H,cc1601+413 PUSH H CALL call POP B RET mod equ $ CALL div CALL swap RET or equ $ LXI H,cc1601+419 PUSH H CALL call POP B RET xor equ $ LXI H,cc1601+424 PUSH H CALL call POP B RET and equ $ LXI H,cc1601+430 PUSH H CALL call POP B RET land equ $ LXI H,cc1601+436 PUSH H CALL call POP B RET asr equ $ LXI H,cc1601+443 PUSH H CALL call POP B RET asl equ $ LXI H,cc1601+449 PUSH H CALL call POP B RET neg equ $ LXI H,cc1601+455 PUSH H CALL call POP B RET com equ $ LXI H,cc1601+461 PUSH H CALL call POP B RET inc equ $ LXI H,cc1601+467 PUSH H CALL ol POP B RET dec equ $ LXI H,cc1601+473 PUSH H CALL ol POP B RET eq equ $ LXI H,cc1601+479 PUSH H CALL call POP B RET ne equ $ LXI H,cc1601+484 PUSH H CALL call POP B RET lt equ $ LXI H,cc1601+489 PUSH H CALL call POP B RET le equ $ LXI H,cc1601+494 PUSH H CALL call POP B RET gt equ $ LXI H,cc1601+499 PUSH H CALL call POP B RET ge equ $ LXI H,cc1601+504 PUSH H CALL call POP B RET ult equ $ LXI H,cc1601+509 PUSH H CALL call POP B RET ule equ $ LXI H,cc1601+515 PUSH H CALL call POP B RET ugt equ $ LXI H,cc1601+521 PUSH H CALL call POP B RET uge equ $ LXI H,cc1601+527 PUSH H CALL call POP B RET cc1601 equ $ DB 115,109,97,108,108,45,99,32,99,111 DB 109,112,105,108,101,114,32,114,101,118 DB 32,50,46,48,40,109,111,100,32,49 DB 41,0,88,69,81,32,0,108,120,105 DB 32,115,112,44,48,0,99,97,108,108 DB 32,114,100,112,97,114,97,109,0,99 DB 97,108,108,32,65,114,103,83,101,116 DB 117,112,0,108,104,108,100,32,99,99 DB 65,114,103,99,0,112,117,115,104,32 DB 104,0,108,120,105,32,32,104,44,99 DB 99,65,114,103,118,0,112,117,115,104 DB 32,104,0,99,97,108,108,32,109,97 DB 105,110,0,99,97,108,108,32,83,89 DB 83,0,68,66,32,82,69,84,79,80 DB 0,110,108,115,116,0,99,111,112,121 DB 32,115,101,116,117,112,46,97,0,99 DB 111,112,121,32,67,56,48,76,73,66 DB 46,65,0,108,115,116,0,76,68,65 DB 32,0,99,99,115,120,116,0,76,72 DB 76,68,32,0,68,65,68,32,83,80 DB 0,77,79,86,32,65,44,76,0,83 DB 84,65,32,0,83,72,76,68,32,0 DB 77,79,86,32,65,44,76,0,83,84 DB 65,88,32,68,0,99,99,112,105,110 DB 116,0,77,79,86,32,76,44,77,0 DB 77,86,73,32,72,44,48,0,99,99 DB 103,105,110,116,0,88,67,72,71,0 DB 76,88,73,32,72,44,0,80,85,83 DB 72,32,72,0,80,79,80,32,68,0 DB 88,84,72,76,0,67,65,76,76,32 DB 0,82,69,84,0,36,43,50,0,80 DB 67,72,76,0,74,77,80,32,0,77 DB 79,86,32,65,44,72,0,79,82,65 DB 32,76,0,74,90,32,0,68,66,32 DB 0,68,83,32,0,68,87,32,0,73 DB 78,88,32,83,80,0,80,79,80,32 DB 66,0,68,67,88,32,83,80,0,80 DB 85,83,72,32,66,0,68,65,68,32 DB 83,80,0,83,80,72,76,0,68,65 DB 68,32,72,0,68,65,68,32,68,0 DB 99,99,115,117,98,0,99,99,109,117 DB 108,116,0,99,99,100,105,118,0,99 DB 99,111,114,0,99,99,120,111,114,0 DB 99,99,97,110,100,0,99,99,108,97 DB 110,100,0,99,99,97,115,114,0,99 DB 99,97,115,108,0,99,99,110,101,103 DB 0,99,99,99,111,109,0,73,78,88 DB 32,72,0,68,67,88,32,72,0,99 DB 99,101,113,0,99,99,110,101,0,99 DB 99,108,116,0,99,99,108,101,0,99 DB 99,103,116,0,99,99,103,101,0,99 DB 99,117,108,116,0,99,99,117,108,101 DB 0,99,99,117,103,116,0,99,99,117 DB 103,101,0 ;0 errors in compilation.