OSDN Git Service
01090 NEXT
01095 *
01100 FCC 'LIT'
-01110 FCB MCOMP.OR.3
+01110 FCB MCOMP|3
01120 FCB MFORE
01130 FDB STORE-CFAOFF
01140 FDB BIF+2
01190 NEXT
01200 *
01210 FCC 'DLIT'
-01220 FCB MCOMP.OR.4
+01220 FCB MCOMP|4
01230 FCB MFORE
01240 FDB LIT-CFAOFF
01250 FDB BIF+2
01320 NEXT
01330 *
01340 FCC 'EXECUTE'
-01350 FCB MCOMP.OR.7
+01350 FCB MCOMP|7
01360 FCB MFORE
01370 FDB DLIT-CFAOFF
01380 FDB BIF+2
01462 JMP ERROR
01464 *
01466 FCC '1BRANCH'
-01468 FCB MCOMP.OR.7
+01468 FCB MCOMP|7
01470 FCB MFORE
01472 FDB EXEC-CFAOFF
01474 FDB BIF+2
01486 NEXT
01488 *
01490 FCC 'BRANCH'
-01500 FCB MCOMP.OR.6
+01500 FCB MCOMP|6
01510 FCB MFORE
01520 FDB TBR-CFAOFF
01530 FDB BIF+2
01580 NEXT
01590 *
01600 FCC '0BRANCH'
-01610 FCB MCOMP.OR.7
+01610 FCB MCOMP|7
01620 FCB MFORE
01630 FDB BRANCH-CFAOFF
01640 FDB BIF+2
01700 NEXT
01710 *
01720 FCC '(LOOP)'
-01730 FCB MCOMP.OR.6
+01730 FCB MCOMP|6
01740 FCB MFORE
01750 FDB ZBR-CFAOFF
01760 FDB BIF+2
01860 NEXT
01870 *
01880 FCC '(+LOOP)'
-01890 FCB MCOMP.OR.7
+01890 FCB MCOMP|7
01900 FCB MFORE
01910 FDB XLOOP-CFAOFF
01920 FDB BIF+2
03230 NEXT
03240 *
03250 FCC 'LITERAL'
-03260 FCB MIMM.OR.7
+03260 FCB MIMM|7
03270 FCB MFORE
03280 FDB ENCLOS-CFAOFF
03290 FDB BIF+2
03426 EXG D,PC return
03430 *
03435 FCC 'DLITERAL'
-03440 FCB MIMM.OR.8
+03440 FCB MIMM|8
03450 FCB MFORE
03460 FDB LITER-CFAOFF
03470 FDB BIF+2