1 001 BLOCK01 0 2 002 A 0007H 3 003 B 0000H 4 004 C 0001H 5 005 D 0002H 6 006 DCOM 00F8H 7 007 DDATA 00FBH 8 008 DONE FE19H 9 009 E 0003H 10 010 H 0004H 11 011 L 0005H 12 012 M 0006H 13 013 NEXT FE0CH 14 014 PSW 0006H 15 015 SECT 00FAH 16 016 SP 0006H 17 017 STAT 00F8H 18 018 WAIT 00FCH 19$ 20 :10FE0000DBFCAF6F673CD3FA3E8CD3F8DBFCB7F278 21 :10FE100019FEDBFB7723C30CFEDBF8B7CA7D007647 22 :00000001FF 23 $ 24