expressi equ $ PUSH B PUSH B LXI H,0 DAD SP PUSH H CALL heir1 POP B MOV A,H ORA L JZ cc802 LXI H,0 DAD SP PUSH H CALL rvalue POP B cc802 equ $ POP B POP B RET heir1 equ $ PUSH B PUSH B PUSH B LXI H,4 DAD SP PUSH H LXI H,10 DAD SP CALL ccgint PUSH H CALL heir1a POP B POP D CALL ccpint LXI H,cc801+0 PUSH H CALL match POP B MOV A,H ORA L JZ cc803 LXI H,4 DAD SP CALL ccgint MOV A,H ORA L JNZ cc804 CALL needlval LXI H,0 POP B POP B POP B RET cc804 equ $ LXI H,8 DAD SP CALL ccgint PUSH H LXI H,1 DAD H POP D DAD D CALL ccgint MOV A,H ORA L JZ cc805 CALL push cc805 equ $ LXI H,0 DAD SP PUSH H CALL heir1 POP B MOV A,H ORA L JZ cc806 LXI H,0 DAD SP PUSH H CALL rvalue POP B cc806 equ $ LXI H,8 DAD SP CALL ccgint PUSH H CALL store POP B LXI H,0 POP B POP B POP B RET cc803 equ $ LXI H,4 DAD SP CALL ccgint POP B POP B POP B RET cc807 equ $ POP B POP B POP B RET heir1a equ $ PUSH B LXI H,0 DAD SP PUSH H LXI H,6 DAD SP CALL ccgint PUSH H CALL heir1b POP B POP D CALL ccpint CALL blanks LXI H,cc801+2 PUSH H CALL match POP B MOV A,H ORA L JZ cc808 LXI H,cc801+4 PUSH H CALL error POP B CALL kill LXI H,0 POP B RET cc808 equ $ LXI H,0 DAD SP CALL ccgint POP B RET cc809 equ $ POP B RET heir1b equ $ PUSH B PUSH B PUSH B LXI H,4 DAD SP PUSH H LXI H,10 DAD SP CALL ccgint PUSH H CALL heir1c POP B POP D CALL ccpint CALL blanks CALL ch LXI D,124 XCHG . CALL ccne MOV A,H ORA L JZ cc810 LXI H,4 DAD SP CALL ccgint POP B POP B POP B RET cc810 equ $ CALL nch LXI D,124 XCHG . CALL ccne MOV A,H ORA L JZ cc811 LXI H,4 DAD SP CALL ccgint POP B POP B POP B RET cc811 equ $ LXI H,4 DAD SP CALL ccgint MOV A,H ORA L JZ cc812 LXI H,8 DAD SP CALL ccgint PUSH H CALL rvalue POP B cc812 equ $ cc813 equ $ LXI H,1 MOV A,H ORA L JZ cc814 LXI H,cc801+35 PUSH H CALL match POP B MOV A,H ORA L JZ cc815 CALL push LXI H,0 DAD SP PUSH H CALL heir1c POP B MOV A,H ORA L JZ cc816 LXI H,0 DAD SP PUSH H CALL rvalue POP B cc816 equ $ CALL pop CALL or JMP cc817 cc815 equ $ LXI H,0 POP B POP B POP B RET cc817 equ $ JMP cc813 cc814 equ $ POP B POP B POP B RET heir1c equ $ PUSH B PUSH B PUSH B LXI H,4 DAD SP PUSH H LXI H,10 DAD SP CALL ccgint PUSH H CALL heir2 POP B POP D CALL ccpint CALL blanks CALL ch LXI D,38 XCHG . CALL ccne MOV A,H ORA L JZ cc818 LXI H,4 DAD SP CALL ccgint POP B POP B POP B RET cc818 equ $ CALL nch LXI D,38 XCHG . CALL ccne MOV A,H ORA L JZ cc819 LXI H,4 DAD SP CALL ccgint POP B POP B POP B RET cc819 equ $ LXI H,4 DAD SP CALL ccgint MOV A,H ORA L JZ cc820 LXI H,8 DAD SP CALL ccgint PUSH H CALL rvalue POP B cc820 equ $ cc821 equ $ LXI H,1 MOV A,H ORA L JZ cc822 LXI H,cc801+38 PUSH H CALL match POP B MOV A,H ORA L JZ cc823 CALL push LXI H,0 DAD SP PUSH H CALL heir2 POP B MOV A,H ORA L JZ cc824 LXI H,0 DAD SP PUSH H CALL rvalue POP B cc824 equ $ CALL pop CALL land JMP cc825 cc823 equ $ LXI H,0 POP B POP B POP B RET cc825 equ $ JMP cc821 cc822 equ $ POP B POP B POP B RET heir2 equ $ PUSH B PUSH B PUSH B LXI H,4 DAD SP PUSH H LXI H,10 DAD SP CALL ccgint PUSH H CALL heir3 POP B POP D CALL ccpint CALL blanks CALL ch LXI D,124 XCHG . CALL ccne MOV A,H ORA L JZ cc826 LXI H,4 DAD SP CALL ccgint POP B POP B POP B RET cc826 equ $ CALL nch LXI D,124 XCHG . CALL cceq MOV A,H ORA L JZ cc827 LXI H,4 DAD SP CALL ccgint POP B POP B POP B RET cc827 equ $ LXI H,4 DAD SP CALL ccgint MOV A,H ORA L JZ cc828 LXI H,8 DAD SP CALL ccgint PUSH H CALL rvalue POP B cc828 equ $ cc829 equ $ LXI H,1 MOV A,H ORA L JZ cc830 LXI H,cc801+41 PUSH H CALL match POP B MOV A,H ORA L JZ cc831 CALL push LXI H,0 DAD SP PUSH H CALL heir3 POP B MOV A,H ORA L JZ cc832 LXI H,0 DAD SP PUSH H CALL rvalue POP B cc832 equ $ CALL pop CALL or JMP cc833 cc831 equ $ LXI H,0 POP B POP B POP B RET cc833 equ $ JMP cc829 cc830 equ $ POP B POP B POP B RET heir3 equ $ PUSH B PUSH B PUSH B LXI H,4 DAD SP PUSH H LXI H,10 DAD SP CALL ccgint PUSH H CALL heir4 POP B POP D CALL ccpint CALL blanks CALL ch LXI D,94 XCHG . CALL ccne MOV A,H ORA L JZ cc834 LXI H,4 DAD SP CALL ccgint POP B POP B POP B RET cc834 equ $ LXI H,4 DAD SP CALL ccgint MOV A,H ORA L JZ cc835 LXI H,8 DAD SP CALL ccgint PUSH H CALL rvalue POP B cc835 equ $ cc836 equ $ LXI H,1 MOV A,H ORA L JZ cc837 LXI H,cc801+43 PUSH H CALL match POP B MOV A,H ORA L JZ cc838 CALL push LXI H,0 DAD SP PUSH H CALL heir4 POP B MOV A,H ORA L JZ cc839 LXI H,0 DAD SP PUSH H CALL rvalue POP B cc839 equ $ CALL pop CALL xor JMP cc840 cc838 equ $ LXI H,0 POP B POP B POP B RET cc840 equ $ JMP cc836 cc837 equ $ POP B POP B POP B RET heir4 equ $ PUSH B PUSH B PUSH B LXI H,4 DAD SP PUSH H LXI H,10 DAD SP CALL ccgint PUSH H CALL heir5 POP B POP D CALL ccpint CALL blanks CALL ch LXI D,38 XCHG . CALL ccne MOV A,H ORA L JZ cc841 LXI H,4 DAD SP CALL ccgint POP B POP B POP B RET cc841 equ $ CALL nch LXI D,38 XCHG . CALL cceq MOV A,H ORA L JZ cc842 LXI H,4 DAD SP CALL ccgint POP B POP B POP B RET cc842 equ $ LXI H,4 DAD SP CALL ccgint MOV A,H ORA L JZ cc843 LXI H,8 DAD SP CALL ccgint PUSH H CALL rvalue POP B cc843 equ $ cc844 equ $ LXI H,1 MOV A,H ORA L JZ cc845 LXI H,cc801+45 PUSH H CALL match POP B MOV A,H ORA L JZ cc846 CALL push LXI H,0 DAD SP PUSH H CALL heir5 POP B MOV A,H ORA L JZ cc847 LXI H,0 DAD SP PUSH H CALL rvalue POP B cc847 equ $ CALL pop CALL and JMP cc848 cc846 equ $ LXI H,0 POP B POP B POP B RET cc848 equ $ JMP cc844 cc845 equ $ POP B POP B POP B RET heir5 equ $ PUSH B PUSH B PUSH B LXI H,4 DAD SP PUSH H LXI H,10 DAD SP CALL ccgint PUSH H CALL heir6 POP B POP D CALL ccpint CALL blanks LXI H,line PUSH H LHLD lptr POP D DAD D PUSH H LXI H,cc801+47 PUSH H CALL streq POP B POP B LXI D,0 XCHG . CALL cceq PUSH H LXI H,line PUSH H LHLD lptr POP D DAD D PUSH H LXI H,cc801+50 PUSH H CALL streq POP B POP B LXI D,0 XCHG . CALL cceq POP D CALL ccand MOV A,H ORA L JZ cc849 LXI H,4 DAD SP CALL ccgint POP B POP B POP B RET cc849 equ $ LXI H,4 DAD SP CALL ccgint MOV A,H ORA L JZ cc850 LXI H,8 DAD SP CALL ccgint PUSH H CALL rvalue POP B cc850 equ $ cc851 equ $ LXI H,1 MOV A,H ORA L JZ cc852 LXI H,cc801+53 PUSH H CALL match POP B MOV A,H ORA L JZ cc853 CALL push LXI H,0 DAD SP PUSH H CALL heir6 POP B MOV A,H ORA L JZ cc854 LXI H,0 DAD SP PUSH H CALL rvalue POP B cc854 equ $ CALL pop CALL eq JMP cc855 cc853 equ $ LXI H,cc801+56 PUSH H CALL match POP B MOV A,H ORA L JZ cc856 CALL push LXI H,0 DAD SP PUSH H CALL heir6 POP B MOV A,H ORA L JZ cc857 LXI H,0 DAD SP PUSH H CALL rvalue POP B cc857 equ $ CALL pop CALL ne JMP cc858 cc856 equ $ LXI H,0 POP B POP B POP B RET cc858 equ $ cc855 equ $ JMP cc851 cc852 equ $ POP B POP B POP B RET heir6 equ $ PUSH B PUSH B PUSH B LXI H,4 DAD SP PUSH H LXI H,10 DAD SP CALL ccgint PUSH H CALL heir7 POP B POP D CALL ccpint CALL blanks LXI H,line PUSH H LHLD lptr POP D DAD D PUSH H LXI H,cc801+59 PUSH H CALL streq POP B POP B LXI D,0 XCHG . CALL cceq PUSH H LXI H,line PUSH H LHLD lptr POP D DAD D PUSH H LXI H,cc801+61 PUSH H CALL streq POP B POP B LXI D,0 XCHG . CALL cceq POP D CALL ccand PUSH H LXI H,line PUSH H LHLD lptr POP D DAD D PUSH H LXI H,cc801+63 PUSH H CALL streq POP B POP B LXI D,0 XCHG . CALL cceq POP D CALL ccand PUSH H LXI H,line PUSH H LHLD lptr POP D DAD D PUSH H LXI H,cc801+66 PUSH H CALL streq POP B POP B LXI D,0 XCHG . CALL cceq POP D CALL ccand MOV A,H ORA L JZ cc859 LXI H,4 DAD SP CALL ccgint POP B POP B POP B RET cc859 equ $ LXI H,line PUSH H LHLD lptr POP D DAD D PUSH H LXI H,cc801+69 PUSH H CALL streq POP B POP B MOV A,H ORA L JZ cc860 LXI H,4 DAD SP CALL ccgint POP B POP B POP B RET cc860 equ $ LXI H,line PUSH H LHLD lptr POP D DAD D PUSH H LXI H,cc801+72 PUSH H CALL streq POP B POP B MOV A,H ORA L JZ cc861 LXI H,4 DAD SP CALL ccgint POP B POP B POP B RET cc861 equ $ LXI H,4 DAD SP CALL ccgint MOV A,H ORA L JZ cc862 LXI H,8 DAD SP CALL ccgint PUSH H CALL rvalue POP B cc862 equ $ cc863 equ $ LXI H,1 MOV A,H ORA L JZ cc864 LXI H,cc801+75 PUSH H CALL match POP B MOV A,H ORA L JZ cc865 CALL push LXI H,0 DAD SP PUSH H CALL heir7 POP B MOV A,H ORA L JZ cc866 LXI H,0 DAD SP PUSH H CALL rvalue POP B cc866 equ $ CALL pop LXI H,8 DAD SP CALL ccgint PUSH H LXI H,0 DAD H POP D DAD D CALL ccgint SHLD cptr MOV A,H ORA L JZ cc867 LHLD cptr LXI D,9 XCHG . DAD D MOV L,M MVI H,0 LXI D,3 XCHG . CALL cceq MOV A,H ORA L JZ cc868 CALL ule JMP cc863 cc868 equ $ cc867 equ $ LXI H,0 DAD SP PUSH H LXI H,0 DAD H POP D DAD D CALL ccgint SHLD cptr MOV A,H ORA L JZ cc869 LHLD cptr LXI D,9 XCHG . DAD D MOV L,M MVI H,0 LXI D,3 XCHG . CALL cceq MOV A,H ORA L JZ cc870 CALL ule JMP cc863 cc870 equ $ cc869 equ $ CALL le JMP cc871 cc865 equ $ LXI H,cc801+78 PUSH H CALL match POP B MOV A,H ORA L JZ cc872 CALL push LXI H,0 DAD SP PUSH H CALL heir7 POP B MOV A,H ORA L JZ cc873 LXI H,0 DAD SP PUSH H CALL rvalue POP B cc873 equ $ CALL pop LXI H,8 DAD SP CALL ccgint PUSH H LXI H,0 DAD H POP D DAD D CALL ccgint SHLD cptr MOV A,H ORA L JZ cc874 LHLD cptr LXI D,9 XCHG . DAD D MOV L,M MVI H,0 LXI D,3 XCHG . CALL cceq MOV A,H ORA L JZ cc875 CALL uge JMP cc863 cc875 equ $ cc874 equ $ LXI H,0 DAD SP PUSH H LXI H,0 DAD H POP D DAD D CALL ccgint SHLD cptr MOV A,H ORA L JZ cc876 LHLD cptr LXI D,9 XCHG . DAD D MOV L,M MVI H,0 LXI D,3 XCHG . CALL cceq MOV A,H ORA L JZ cc877 CALL uge JMP cc863 cc877 equ $ cc876 equ $ CALL ge JMP cc878 cc872 equ $ LXI H,line PUSH H LHLD lptr POP D DAD D PUSH H LXI H,cc801+81 PUSH H CALL streq POP B POP B PUSH H LXI H,line PUSH H LHLD lptr POP D DAD D PUSH H LXI H,cc801+83 PUSH H CALL streq POP B POP B LXI D,0 XCHG . CALL cceq POP D CALL ccand MOV A,H ORA L JZ cc879 CALL inbyte CALL push LXI H,0 DAD SP PUSH H CALL heir7 POP B MOV A,H ORA L JZ cc880 LXI H,0 DAD SP PUSH H CALL rvalue POP B cc880 equ $ CALL pop LXI H,8 DAD SP CALL ccgint PUSH H LXI H,0 DAD H POP D DAD D CALL ccgint SHLD cptr MOV A,H ORA L JZ cc881 LHLD cptr LXI D,9 XCHG . DAD D MOV L,M MVI H,0 LXI D,3 XCHG . CALL cceq MOV A,H ORA L JZ cc882 CALL ult JMP cc863 cc882 equ $ cc881 equ $ LXI H,0 DAD SP PUSH H LXI H,0 DAD H POP D DAD D CALL ccgint SHLD cptr MOV A,H ORA L JZ cc883 LHLD cptr LXI D,9 XCHG . DAD D MOV L,M MVI H,0 LXI D,3 XCHG . CALL cceq MOV A,H ORA L JZ cc884 CALL ult JMP cc863 cc884 equ $ cc883 equ $ CALL lt JMP cc885 cc879 equ $ LXI H,line PUSH H LHLD lptr POP D DAD D PUSH H LXI H,cc801+86 PUSH H CALL streq POP B POP B PUSH H LXI H,line PUSH H LHLD lptr POP D DAD D PUSH H LXI H,cc801+88 PUSH H CALL streq POP B POP B LXI D,0 XCHG . CALL cceq POP D CALL ccand MOV A,H ORA L JZ cc886 CALL inbyte CALL push LXI H,0 DAD SP PUSH H CALL heir7 POP B MOV A,H ORA L JZ cc887 LXI H,0 DAD SP PUSH H CALL rvalue POP B cc887 equ $ CALL pop LXI H,8 DAD SP CALL ccgint PUSH H LXI H,0 DAD H POP D DAD D CALL ccgint SHLD cptr MOV A,H ORA L JZ cc888 LHLD cptr LXI D,9 XCHG . DAD D MOV L,M MVI H,0 LXI D,3 XCHG . CALL cceq MOV A,H ORA L JZ cc889 CALL ugt JMP cc863 cc889 equ $ cc888 equ $ LXI H,0 DAD SP PUSH H LXI H,0 DAD H POP D DAD D CALL ccgint SHLD cptr MOV A,H ORA L JZ cc890 LHLD cptr LXI D,9 XCHG . DAD D MOV L,M MVI H,0 LXI D,3 XCHG . CALL cceq MOV A,H ORA L JZ cc891 CALL ugt JMP cc863 cc891 equ $ cc890 equ $ CALL gt JMP cc892 cc886 equ $ LXI H,0 POP B POP B POP B RET cc892 equ $ cc885 equ $ cc878 equ $ cc871 equ $ JMP cc863 cc864 equ $ POP B POP B POP B RET cc801 equ $ DB 61,0,63,0,63,58,32,101,120,112 DB 114,101,115,115,105,111,110,115,32,110 DB 111,116,32,105,109,112,108,101,109,101 DB 110,116,101,100,0,124,124,0,38,38 DB 0,124,0,94,0,38,0,61,61,0 DB 33,61,0,61,61,0,33,61,0,60 DB 0,62,0,60,61,0,62,61,0,62 DB 62,0,60,60,0,60,61,0,62,61 DB 0,60,0,60,60,0,62,0,62,62 DB 0