|
DataMuseum.dkPresents historical artifacts from the history of: MIKADOS |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about MIKADOS Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 5181 (0x143d)
Types: SPC/1-COMAL-BIN
Notes: Mikados_B
Names: »ÅRSOPL.B«
└─⟦385f097a1⟧ Bits:30008988 SPC/1 COMAL programmer til bogføring
└─⟦this⟧ »ÅRSOPL.B«
└─⟦ff7f7aeee⟧ Bits:30009007 NBT 15/3-84
└─⟦this⟧ »ÅRSOPL.B«
0110 DIM STARTPER$(8),SLUTPER$(8),LP$(E),ORK$(E) 0120 DIM RES$(15),OP1$(12),OP2$(12),TAH$(12),TRE$(12) 0130 DIM TOTAL$(4,12),L$(12),LIN$(12) 0140 DIM RESUL$(12),RESUL1$(12),TV$(45,11) 0150 DIM FIL$(16),FIL2$(16),POST1$(71),POST2$(27),POST3$(55),POST4$(34) 0160 DIM MF1$(16) 0162 DIM POST5$(55) 0170 TAH$=" 0+" 0180 TRE$=" 3,00+" 0370 PROC CALC(AR3,B1,B2,ES) 0380 RES$=ES$;OP1$=B1$;OP2$=B2$;SI=B;FLAG=B;ART=AR3-6*(AR3>5) 0390 CALL "P641210:REGN" 0400 IF AR3<6 THEN 0410 IF FLAG THEN STOP 0420 ENDIF 0430 ES$=RES$ 0440 ENDPROC 0550 PROC INDTÆL 0560 J=W*(LMNR-E) 0570 FOR K=E TO W 0580 GET FIL2$,J+K:POST5$ 0590 FOR I=E TO 5 0600 TV$((K-E)*5+I)=POST5$((I-E)*11+E:11) 0610 NEXT I 0620 NEXT K 0630 EXEC FEJL(LMNR,K,FIL2$) 0640 ENDPROC 0800 PROC INLØNMOD(N) 0810 GET FIL$,G*N-E:POST1$ 0820 GET FIL$,G*N:POST2$,C1,C2,LT,LF,LR,LA,RPI,K1,K2,FG,FD 0830 EXEC FEJL(E,N,FIL$) 0840 ENDPROC 1000 PROC UDTÆL 1010 J=W*(LMNR-E) 1020 FOR K=E TO W 1030 FOR I=E TO 5 1040 POST5$((I-E)*11+E:11)=TV$((K-E)*5+I) 1050 NEXT I 1060 PUT FIL2$,J+K:POST5$ 1070 NEXT K 1080 EXEC FEJL(-LMNR,-K,FIL2$) 1090 ENDPROC 1100 PROC UDLØNMOD(N) 1110 PUT FIL$,G*N-E:POST1$ 1120 PUT FIL$,G*N:POST2$,C1,C2,LT,LF,LR,LA,RPI,K1,K2,FG,FD 1130 EXEC FEJL(G,N,FIL$) 1140 ENDPROC 1150 PROC CONV(NR2,OK22,CIF) 1160 OK2=OK22 1170 NR2$="" 1180 REPEAT 1190 NR2$=CHR((OK2 MOD 10)+48)+NR2$ 1200 CIF=CIF-E 1210 OK2=OK2 DIV 10 1220 IF CIF<B AND OK2=B THEN CIF=B 1230 UNTIL CIF=B 1240 ENDPROC 1890 PROC INDVIRK 1900 OPEN FIL$,R 1910 EXEC FEJL(B,B,FIL$) 1920 GET FIL$,E:POST3$ 1930 GET FIL$,G:POST4$,SLJNR,MLMNR,ATPLM 1940 ENDPROC 1950 PROC FEJL(P1,P2,P3) 1960 IF STATUS(P3$)<>B THEN 1970 OUTPUT T 1980 PRINT "FIL-FEJL ";P3$;STATUS(P3$),P1;P2 1990 STOP 2000 ENDIF 2010 ENDPROC 3440 PROC NÆSTE 3450 REPEAT 3460 LMNR=LMNR+E 3470 LA=E 3480 IF LMNR<=MLMNR THEN 3490 EXEC INLØNMOD(LMNR) 3500 IF LP$<>POST2$(21) THEN LA=B 3510 IF ORK$="A" AND POST2$(24,25)>"89" THEN LA=B 3520 IF ORK$="F" AND POST2$(24,25)<"90" THEN LA=B 3530 ENDIF 3540 UNTIL LA>B 3550 ENDPROC 8182 TOTAL$(E)=TAH$;TOTAL$(G)=TAH$ 8183 TOTAL$(V)=TAH$;TOTAL$(4)=TAH$ 8190 FIL$="P641220:VIRKKART" 8200 EXEC INDVIRK 8210 CLOSE FIL$ 8220 FIL$="P641220:LØNMODRG" 8230 OPEN FIL$,W 8260 FIL2$="P641220:TÆLLEREG" 8270 OPEN FIL2$,W 8291 MF1$="P641210:LØNJOUR" 8292 OPEN MF1$,R 8300 INPUT "Isæt årsoplysningssedler, RETURN ",LP$ 8350 MAXLIN=72 8360 LMNR=B 8370 ABL=B 8372 GET MF1$:STARTPER$,SLUTPER$,LP$,ORK$,MFD 8410 STD=100000*(ORD(STARTPER$(E))-48)+10000*(ORD(STARTPER$(G))-48) 8420 STD=STD+1000*(ORD(STARTPER$(4))-48)+100*(ORD(STARTPER$(5))-48) 8430 STD=STD+10*(ORD(STARTPER$(7))-48)+ORD(STARTPER$(8))-48 8440 SLD=100000*(ORD(SLUTPER$(E))-48)+10000*(ORD(SLUTPER$(G))-48) 8450 SLD=SLD+1000*(ORD(SLUTPER$(4))-48)+100*(ORD(SLUTPER$(5))-48) 8460 SLD=SLD+10*(ORD(SLUTPER$(7))-48)+ORD(SLUTPER$(8))-48 8465 CURSOR E,14 8470 OUTPUT P 8490 REPEAT 8500 EXEC NÆSTE 8510 IF LMNR<=MLMNR THEN 8520 EXEC INDTÆL 8521 EXEC CALC(B,TV$(34),TV$(37),RESUL$) 8522 EXEC CALC(G,TRE$,TV$(43),RESUL1$) 8523 TV$(34)=RESUL$(G:11) 8524 TV$(43)=RESUL1$(G:11) 8529 ABL=ABL+E 8530 EXEC CALC(B,TV$(43),TOTAL$(E),TOTAL$(E)) 8540 EXEC CALC(B,TV$(34),TOTAL$(G),TOTAL$(G)) 8542 EXEC CALC(B,TV$(40),TOTAL$(V),TOTAL$(V)) 8544 EXEC CALC(B,TV$(37),TOTAL$(4),TOTAL$(4)) 8545 TV$(34,W,11)="00 " 8546 TV$(43,W,11)="00 " 8547 TV$(40,W,11)="00 " 8548 TV$(37,W,11)="00 " 8550 IF STD>LA THEN 8560 STDA=STD 8570 ELSE 8580 STDA=LA 8590 ENDIF 8600 IF SLD<FD OR FD=B THEN 8602 SLDA=SLD 8604 ELSE 8606 SLDA=FD 8608 ENDIF 8609 IF FD>B THEN LA=B;FD=B 8610 FOR I=E TO 7 8612 IF TV$(34,I)=" " THEN TV$(34,I)="*" 8614 IF TV$(43,I)=" " THEN TV$(43,I)="*" 8616 IF TV$(40,I)=" " THEN TV$(40,I)="*" 8618 IF TV$(37,I)=" " THEN TV$(37,I)="*" 8620 NEXT I 8622 PRINT 8624 PRINT 8626 PRINT 8628 EXEC CONV(L$,C1,6) 8630 EXEC CONV(LIN$,C2,4) 8632 L$=L$+LIN$ 8634 PRINT TAB(W);L$;TAB(58);POST3$(E,7) 8636 PRINT 8638 PRINT 8640 PRINT TAB(46);POST3$(8,32) 8642 PRINT TAB(46);POST3$(33,55) 8644 PRINT TAB(46);POST4$(E,4);" ";POST4$(5,18) 8646 PRINT 8648 PRINT TAB(W);POST1$(E,25); 8650 PRINT USING " ####":LMNR 8652 PRINT 8654 PRINT TAB(W);POST1$(26,48) 8656 PRINT TAB(W);POST1$(49,71) 8658 PRINT TAB(W);POST2$(E,4);" ";POST2$(5,18) 8660 PRINT 8662 PRINT 8664 PRINT TAB(24);STDA;"-";SLDA;" " 8666 PRINT 8668 PRINT 8670 PRINT TAB(68);"*";TV$(43,E,7) 8672 PRINT 8674 PRINT 8676 PRINT TAB(68);"*";TV$(34,E,7) 8678 PRINT 8680 PRINT 8682 PRINT 8684 PRINT 8686 PRINT TAB(68);"*";TV$(40,E,7) 8688 PRINT 8690 PRINT 8692 PRINT TAB(68);"*";TV$(37,E,7) 8694 FOR I=E TO 45 8696 TV$(I)=TAH$(G:11) 8698 NEXT I 8700 LT=B 8702 LF=B 8704 LR=B 8706 FOR I=33 TO 48 8708 PRINT 8710 NEXT I 8712 EXEC UDLØNMOD(LMNR) 8714 EXEC UDTÆL 8880 ENDIF 8890 UNTIL LMNR=>MLMNR 8900 FOR I=E TO 4 8910 FOR J=E TO 8 8920 IF TOTAL$(I,J)=" " THEN TOTAL$(I,J)="*" 8930 NEXT J 8940 NEXT I 8950 PRINT 8960 PRINT 8970 PRINT 8980 PRINT TAB(58);POST3$(E,7) 8990 PRINT 9000 PRINT 9010 PRINT TAB(46);POST3$(8,32) 9020 PRINT TAB(46);POST3$(33,55) 9030 PRINT TAB(46);POST4$(E,4);" ";POST4$(5,18) 9040 PRINT 9050 PRINT 9060 PRINT 9070 PRINT TAB(W);"**T O T A L B I L A G**" 9080 PRINT TAB(W);"ANTAL BILAG";ABL;" " 9090 PRINT 9100 PRINT 9110 PRINT 9120 PRINT 9130 PRINT 9140 PRINT 9150 PRINT TAB(68);TOTAL$(E,E,8) 9160 PRINT 9170 PRINT 9180 PRINT TAB(68);TOTAL$(G,E,8) 9190 PRINT 9200 PRINT 9210 PRINT 9220 PRINT 9230 PRINT TAB(68);TOTAL$(V,E,8) 9240 PRINT 9250 PRINT 9260 PRINT TAB(68);TOTAL$(4,E,8) 9265 FOR I=33 TO 48 9270 PRINT 9275 NEXT I 9730 CLOSE 9735 OUTPUT T 9740 CHAIN "P641210:STARTB"
0x0000…0037 (0,) 8d8e 0110 DIM STARTPER$(8),SLUTPER$(8),LP$(E),ORK$(E)
0x0000…0037 LineComalBin {
0x0000…0037 ptr = 0x8d8e // 0x0 @0x0
0x0000…0037 lno = 0x006e // 0x2 @0x2
0x0000…0037 at0004 = ╱87╱ DIM ╱ // 0x4 @0x4
0x0000…0037 at0005 = ╱53╱S╱ // 0x5 @0x5
0x0000…0037 at0006 = ╱54╱T╱ // 0x6 @0x6
0x0000…0037 at0007 = ╱41╱A╱ // 0x7 @0x7
0x0000…0037 at0008 = ╱52╱R╱ // 0x8 @0x8
0x0000…0037 at0009 = ╱54╱T╱ // 0x9 @0x9
0x0000…0037 at000a = ╱50╱P╱ // 0xa @0xa
0x0000…0037 at000b = ╱45╱E╱ // 0xb @0xb
0x0000…0037 at000c = ╱52╱R╱ // 0xc @0xc
0x0000…0037 at000d = ╱ef╱$╱ // 0xd @0xd
0x0000…0037 at000e = ╱ed╱(╱ // 0xe @0xe
0x0000…0037 at000f = ╱38╱8╱ // 0xf @0xf
0x0000…0037 at0010 = ╱fe00008004╱ // 0x10 @0x10
0x0000…0037 at0015 = ╱ee╱)╱ // 0x15 @0x15
0x0000…0037 at0016 = ╱ec╱,╱ // 0x16 @0x16
0x0000…0037 at0017 = ╱53╱S╱ // 0x17 @0x17
0x0000…0037 at0018 = ╱4c╱L╱ // 0x18 @0x18
0x0000…0037 at0019 = ╱55╱U╱ // 0x19 @0x19
0x0000…0037 at001a = ╱54╱T╱ // 0x1a @0x1a
0x0000…0037 at001b = ╱50╱P╱ // 0x1b @0x1b
0x0000…0037 at001c = ╱45╱E╱ // 0x1c @0x1c
0x0000…0037 at001d = ╱52╱R╱ // 0x1d @0x1d
0x0000…0037 at001e = ╱ef╱$╱ // 0x1e @0x1e
0x0000…0037 at001f = ╱ed╱(╱ // 0x1f @0x1f
0x0000…0037 at0020 = ╱38╱8╱ // 0x20 @0x20
0x0000…0037 at0021 = ╱fe00008004╱ // 0x21 @0x21
0x0000…0037 at0026 = ╱ee╱)╱ // 0x26 @0x26
0x0000…0037 at0027 = ╱ec╱,╱ // 0x27 @0x27
0x0000…0037 at0028 = ╱4c╱L╱ // 0x28 @0x28
0x0000…0037 at0029 = ╱50╱P╱ // 0x29 @0x29
0x0000…0037 at002a = ╱ef╱$╱ // 0x2a @0x2a
0x0000…0037 at002b = ╱ed╱(╱ // 0x2b @0x2b
0x0000…0037 at002c = ╱45╱E╱ // 0x2c @0x2c
0x0000…0037 at002d = ╱ee╱)╱ // 0x2d @0x2d
0x0000…0037 at002e = ╱ec╱,╱ // 0x2e @0x2e
0x0000…0037 at002f = ╱4f╱O╱ // 0x2f @0x2f
0x0000…0037 at0030 = ╱52╱R╱ // 0x30 @0x30
0x0000…0037 at0031 = ╱4b╱K╱ // 0x31 @0x31
0x0000…0037 at0032 = ╱ef╱$╱ // 0x32 @0x32
0x0000…0037 at0033 = ╱ed╱(╱ // 0x33 @0x33
0x0000…0037 at0034 = ╱45╱E╱ // 0x34 @0x34
0x0000…0037 at0035 = ╱ee╱)╱ // 0x35 @0x35
0x0000…0037 at0036 = EOL // 0x36 @0x36
0x0000…0037 }
0x0037…0082 8dd9 0120 DIM RES$(15),OP1$(12),OP2$(12),TAH$(12),TRE$(12)
0x0037…0082 LineComalBin {
0x0037…0082 ptr = 0x8dd9 // 0x37 @0x0
0x0037…0082 lno = 0x0078 // 0x39 @0x2
0x0037…0082 at0004 = ╱87╱ DIM ╱ // 0x3b @0x4
0x0037…0082 at0005 = ╱52╱R╱ // 0x3c @0x5
0x0037…0082 at0006 = ╱45╱E╱ // 0x3d @0x6
0x0037…0082 at0007 = ╱53╱S╱ // 0x3e @0x7
0x0037…0082 at0008 = ╱ef╱$╱ // 0x3f @0x8
0x0037…0082 at0009 = ╱ed╱(╱ // 0x40 @0x9
0x0037…0082 at000a = ╱31╱1╱ // 0x41 @0xa
0x0037…0082 at000b = ╱35╱5╱ // 0x42 @0xb
0x0037…0082 at000c = ╱fe0000f004╱ // 0x43 @0xc
0x0037…0082 at0011 = ╱ee╱)╱ // 0x48 @0x11
0x0037…0082 at0012 = ╱ec╱,╱ // 0x49 @0x12
0x0037…0082 at0013 = ╱4f╱O╱ // 0x4a @0x13
0x0037…0082 at0014 = ╱50╱P╱ // 0x4b @0x14
0x0037…0082 at0015 = ╱31╱1╱ // 0x4c @0x15
0x0037…0082 at0016 = ╱ef╱$╱ // 0x4d @0x16
0x0037…0082 at0017 = ╱ed╱(╱ // 0x4e @0x17
0x0037…0082 at0018 = ╱31╱1╱ // 0x4f @0x18
0x0037…0082 at0019 = ╱32╱2╱ // 0x50 @0x19
0x0037…0082 at001a = ╱fe0000c004╱ // 0x51 @0x1a
0x0037…0082 at001f = ╱ee╱)╱ // 0x56 @0x1f
0x0037…0082 at0020 = ╱ec╱,╱ // 0x57 @0x20
0x0037…0082 at0021 = ╱4f╱O╱ // 0x58 @0x21
0x0037…0082 at0022 = ╱50╱P╱ // 0x59 @0x22
0x0037…0082 at0023 = ╱32╱2╱ // 0x5a @0x23
0x0037…0082 at0024 = ╱ef╱$╱ // 0x5b @0x24
0x0037…0082 at0025 = ╱ed╱(╱ // 0x5c @0x25
0x0037…0082 at0026 = ╱31╱1╱ // 0x5d @0x26
0x0037…0082 at0027 = ╱32╱2╱ // 0x5e @0x27
0x0037…0082 at0028 = ╱fe0000c004╱ // 0x5f @0x28
0x0037…0082 at002d = ╱ee╱)╱ // 0x64 @0x2d
0x0037…0082 at002e = ╱ec╱,╱ // 0x65 @0x2e
0x0037…0082 at002f = ╱54╱T╱ // 0x66 @0x2f
0x0037…0082 at0030 = ╱41╱A╱ // 0x67 @0x30
0x0037…0082 at0031 = ╱48╱H╱ // 0x68 @0x31
0x0037…0082 at0032 = ╱ef╱$╱ // 0x69 @0x32
0x0037…0082 at0033 = ╱ed╱(╱ // 0x6a @0x33
0x0037…0082 at0034 = ╱31╱1╱ // 0x6b @0x34
0x0037…0082 at0035 = ╱32╱2╱ // 0x6c @0x35
0x0037…0082 at0036 = ╱fe0000c004╱ // 0x6d @0x36
0x0037…0082 at003b = ╱ee╱)╱ // 0x72 @0x3b
0x0037…0082 at003c = ╱ec╱,╱ // 0x73 @0x3c
0x0037…0082 at003d = ╱54╱T╱ // 0x74 @0x3d
0x0037…0082 at003e = ╱52╱R╱ // 0x75 @0x3e
0x0037…0082 at003f = ╱45╱E╱ // 0x76 @0x3f
0x0037…0082 at0040 = ╱ef╱$╱ // 0x77 @0x40
0x0037…0082 at0041 = ╱ed╱(╱ // 0x78 @0x41
0x0037…0082 at0042 = ╱31╱1╱ // 0x79 @0x42
0x0037…0082 at0043 = ╱32╱2╱ // 0x7a @0x43
0x0037…0082 at0044 = ╱fe0000c004╱ // 0x7b @0x44
0x0037…0082 at0049 = ╱ee╱)╱ // 0x80 @0x49
0x0037…0082 at004a = EOL // 0x81 @0x4a
0x0037…0082 }
0x0082…00b8 8e0f 0130 DIM TOTAL$(4,12),L$(12),LIN$(12)
0x0082…00b8 LineComalBin {
0x0082…00b8 ptr = 0x8e0f // 0x82 @0x0
0x0082…00b8 lno = 0x0082 // 0x84 @0x2
0x0082…00b8 at0004 = ╱87╱ DIM ╱ // 0x86 @0x4
0x0082…00b8 at0005 = ╱54╱T╱ // 0x87 @0x5
0x0082…00b8 at0006 = ╱4f╱O╱ // 0x88 @0x6
0x0082…00b8 at0007 = ╱54╱T╱ // 0x89 @0x7
0x0082…00b8 at0008 = ╱41╱A╱ // 0x8a @0x8
0x0082…00b8 at0009 = ╱4c╱L╱ // 0x8b @0x9
0x0082…00b8 at000a = ╱ef╱$╱ // 0x8c @0xa
0x0082…00b8 at000b = ╱ed╱(╱ // 0x8d @0xb
0x0082…00b8 at000c = ╱34╱4╱ // 0x8e @0xc
0x0082…00b8 at000d = ╱fe00008003╱ // 0x8f @0xd
0x0082…00b8 at0012 = ╱ec╱,╱ // 0x94 @0x12
0x0082…00b8 at0013 = ╱31╱1╱ // 0x95 @0x13
0x0082…00b8 at0014 = ╱32╱2╱ // 0x96 @0x14
0x0082…00b8 at0015 = ╱fe0000c004╱ // 0x97 @0x15
0x0082…00b8 at001a = ╱ee╱)╱ // 0x9c @0x1a
0x0082…00b8 at001b = ╱ec╱,╱ // 0x9d @0x1b
0x0082…00b8 at001c = ╱4c╱L╱ // 0x9e @0x1c
0x0082…00b8 at001d = ╱ef╱$╱ // 0x9f @0x1d
0x0082…00b8 at001e = ╱ed╱(╱ // 0xa0 @0x1e
0x0082…00b8 at001f = ╱31╱1╱ // 0xa1 @0x1f
0x0082…00b8 at0020 = ╱32╱2╱ // 0xa2 @0x20
0x0082…00b8 at0021 = ╱fe0000c004╱ // 0xa3 @0x21
0x0082…00b8 at0026 = ╱ee╱)╱ // 0xa8 @0x26
0x0082…00b8 at0027 = ╱ec╱,╱ // 0xa9 @0x27
0x0082…00b8 at0028 = ╱4c╱L╱ // 0xaa @0x28
0x0082…00b8 at0029 = ╱49╱I╱ // 0xab @0x29
0x0082…00b8 at002a = ╱4e╱N╱ // 0xac @0x2a
0x0082…00b8 at002b = ╱ef╱$╱ // 0xad @0x2b
0x0082…00b8 at002c = ╱ed╱(╱ // 0xae @0x2c
0x0082…00b8 at002d = ╱31╱1╱ // 0xaf @0x2d
0x0082…00b8 at002e = ╱32╱2╱ // 0xb0 @0x2e
0x0082…00b8 at002f = ╱fe0000c004╱ // 0xb1 @0x2f
0x0082…00b8 at0034 = ╱ee╱)╱ // 0xb6 @0x34
0x0082…00b8 at0035 = EOL // 0xb7 @0x35
0x0082…00b8 }
0x00b8…00f3 8e4a 0140 DIM RESUL$(12),RESUL1$(12),TV$(45,11)
0x00b8…00f3 LineComalBin {
0x00b8…00f3 ptr = 0x8e4a // 0xb8 @0x0
0x00b8…00f3 lno = 0x008c // 0xba @0x2
0x00b8…00f3 at0004 = ╱87╱ DIM ╱ // 0xbc @0x4
0x00b8…00f3 at0005 = ╱52╱R╱ // 0xbd @0x5
0x00b8…00f3 at0006 = ╱45╱E╱ // 0xbe @0x6
0x00b8…00f3 at0007 = ╱53╱S╱ // 0xbf @0x7
0x00b8…00f3 at0008 = ╱55╱U╱ // 0xc0 @0x8
0x00b8…00f3 at0009 = ╱4c╱L╱ // 0xc1 @0x9
0x00b8…00f3 at000a = ╱ef╱$╱ // 0xc2 @0xa
0x00b8…00f3 at000b = ╱ed╱(╱ // 0xc3 @0xb
0x00b8…00f3 at000c = ╱31╱1╱ // 0xc4 @0xc
0x00b8…00f3 at000d = ╱32╱2╱ // 0xc5 @0xd
0x00b8…00f3 at000e = ╱fe0000c004╱ // 0xc6 @0xe
0x00b8…00f3 at0013 = ╱ee╱)╱ // 0xcb @0x13
0x00b8…00f3 at0014 = ╱ec╱,╱ // 0xcc @0x14
0x00b8…00f3 at0015 = ╱52╱R╱ // 0xcd @0x15
0x00b8…00f3 at0016 = ╱45╱E╱ // 0xce @0x16
0x00b8…00f3 at0017 = ╱53╱S╱ // 0xcf @0x17
0x00b8…00f3 at0018 = ╱55╱U╱ // 0xd0 @0x18
0x00b8…00f3 at0019 = ╱4c╱L╱ // 0xd1 @0x19
0x00b8…00f3 at001a = ╱31╱1╱ // 0xd2 @0x1a
0x00b8…00f3 at001b = ╱ef╱$╱ // 0xd3 @0x1b
0x00b8…00f3 at001c = ╱ed╱(╱ // 0xd4 @0x1c
0x00b8…00f3 at001d = ╱31╱1╱ // 0xd5 @0x1d
0x00b8…00f3 at001e = ╱32╱2╱ // 0xd6 @0x1e
0x00b8…00f3 at001f = ╱fe0000c004╱ // 0xd7 @0x1f
0x00b8…00f3 at0024 = ╱ee╱)╱ // 0xdc @0x24
0x00b8…00f3 at0025 = ╱ec╱,╱ // 0xdd @0x25
0x00b8…00f3 at0026 = ╱54╱T╱ // 0xde @0x26
0x00b8…00f3 at0027 = ╱56╱V╱ // 0xdf @0x27
0x00b8…00f3 at0028 = ╱ef╱$╱ // 0xe0 @0x28
0x00b8…00f3 at0029 = ╱ed╱(╱ // 0xe1 @0x29
0x00b8…00f3 at002a = ╱34╱4╱ // 0xe2 @0x2a
0x00b8…00f3 at002b = ╱35╱5╱ // 0xe3 @0x2b
0x00b8…00f3 at002c = ╱fe0000b406╱ // 0xe4 @0x2c
0x00b8…00f3 at0031 = ╱ec╱,╱ // 0xe9 @0x31
0x00b8…00f3 at0032 = ╱31╱1╱ // 0xea @0x32
0x00b8…00f3 at0033 = ╱31╱1╱ // 0xeb @0x33
0x00b8…00f3 at0034 = ╱fe0000b004╱ // 0xec @0x34
0x00b8…00f3 at0039 = ╱ee╱)╱ // 0xf1 @0x39
0x00b8…00f3 at003a = EOL // 0xf2 @0x3a
0x00b8…00f3 }
0x00f3…0155 8eac 0150 DIM FIL$(16),FIL2$(16),POST1$(71),POST2$(27),POST3$(55),POST4$(34)
0x00f3…0155 LineComalBin {
0x00f3…0155 ptr = 0x8eac // 0xf3 @0x0
0x00f3…0155 lno = 0x0096 // 0xf5 @0x2
0x00f3…0155 at0004 = ╱87╱ DIM ╱ // 0xf7 @0x4
0x00f3…0155 at0005 = ╱46╱F╱ // 0xf8 @0x5
0x00f3…0155 at0006 = ╱49╱I╱ // 0xf9 @0x6
0x00f3…0155 at0007 = ╱4c╱L╱ // 0xfa @0x7
0x00f3…0155 at0008 = ╱ef╱$╱ // 0xfb @0x8
0x00f3…0155 at0009 = ╱ed╱(╱ // 0xfc @0x9
0x00f3…0155 at000a = ╱31╱1╱ // 0xfd @0xa
0x00f3…0155 at000b = ╱36╱6╱ // 0xfe @0xb
0x00f3…0155 at000c = ╱fe00008005╱ // 0xff @0xc
0x00f3…0155 at0011 = ╱ee╱)╱ // 0x104 @0x11
0x00f3…0155 at0012 = ╱ec╱,╱ // 0x105 @0x12
0x00f3…0155 at0013 = ╱46╱F╱ // 0x106 @0x13
0x00f3…0155 at0014 = ╱49╱I╱ // 0x107 @0x14
0x00f3…0155 at0015 = ╱4c╱L╱ // 0x108 @0x15
0x00f3…0155 at0016 = ╱32╱2╱ // 0x109 @0x16
0x00f3…0155 at0017 = ╱ef╱$╱ // 0x10a @0x17
0x00f3…0155 at0018 = ╱ed╱(╱ // 0x10b @0x18
0x00f3…0155 at0019 = ╱31╱1╱ // 0x10c @0x19
0x00f3…0155 at001a = ╱36╱6╱ // 0x10d @0x1a
0x00f3…0155 at001b = ╱fe00008005╱ // 0x10e @0x1b
0x00f3…0155 at0020 = ╱ee╱)╱ // 0x113 @0x20
0x00f3…0155 at0021 = ╱ec╱,╱ // 0x114 @0x21
0x00f3…0155 at0022 = ╱50╱P╱ // 0x115 @0x22
0x00f3…0155 at0023 = ╱4f╱O╱ // 0x116 @0x23
0x00f3…0155 at0024 = ╱53╱S╱ // 0x117 @0x24
0x00f3…0155 at0025 = ╱54╱T╱ // 0x118 @0x25
0x00f3…0155 at0026 = ╱31╱1╱ // 0x119 @0x26
0x00f3…0155 at0027 = ╱ef╱$╱ // 0x11a @0x27
0x00f3…0155 at0028 = ╱ed╱(╱ // 0x11b @0x28
0x00f3…0155 at0029 = ╱37╱7╱ // 0x11c @0x29
0x00f3…0155 at002a = ╱31╱1╱ // 0x11d @0x2a
0x00f3…0155 at002b = ╱fe00008e07╱ // 0x11e @0x2b
0x00f3…0155 at0030 = ╱ee╱)╱ // 0x123 @0x30
0x00f3…0155 at0031 = ╱ec╱,╱ // 0x124 @0x31
0x00f3…0155 at0032 = ╱50╱P╱ // 0x125 @0x32
0x00f3…0155 at0033 = ╱4f╱O╱ // 0x126 @0x33
0x00f3…0155 at0034 = ╱53╱S╱ // 0x127 @0x34
0x00f3…0155 at0035 = ╱54╱T╱ // 0x128 @0x35
0x00f3…0155 at0036 = ╱32╱2╱ // 0x129 @0x36
0x00f3…0155 at0037 = ╱ef╱$╱ // 0x12a @0x37
0x00f3…0155 at0038 = ╱ed╱(╱ // 0x12b @0x38
0x00f3…0155 at0039 = ╱32╱2╱ // 0x12c @0x39
0x00f3…0155 at003a = ╱37╱7╱ // 0x12d @0x3a
0x00f3…0155 at003b = ╱fe0000d805╱ // 0x12e @0x3b
0x00f3…0155 at0040 = ╱ee╱)╱ // 0x133 @0x40
0x00f3…0155 at0041 = ╱ec╱,╱ // 0x134 @0x41
0x00f3…0155 at0042 = ╱50╱P╱ // 0x135 @0x42
0x00f3…0155 at0043 = ╱4f╱O╱ // 0x136 @0x43
0x00f3…0155 at0044 = ╱53╱S╱ // 0x137 @0x44
0x00f3…0155 at0045 = ╱54╱T╱ // 0x138 @0x45
0x00f3…0155 at0046 = ╱33╱3╱ // 0x139 @0x46
0x00f3…0155 at0047 = ╱ef╱$╱ // 0x13a @0x47
0x00f3…0155 at0048 = ╱ed╱(╱ // 0x13b @0x48
0x00f3…0155 at0049 = ╱35╱5╱ // 0x13c @0x49
0x00f3…0155 at004a = ╱35╱5╱ // 0x13d @0x4a
0x00f3…0155 at004b = ╱fe0000dc06╱ // 0x13e @0x4b
0x00f3…0155 at0050 = ╱ee╱)╱ // 0x143 @0x50
0x00f3…0155 at0051 = ╱ec╱,╱ // 0x144 @0x51
0x00f3…0155 at0052 = ╱50╱P╱ // 0x145 @0x52
0x00f3…0155 at0053 = ╱4f╱O╱ // 0x146 @0x53
0x00f3…0155 at0054 = ╱53╱S╱ // 0x147 @0x54
0x00f3…0155 at0055 = ╱54╱T╱ // 0x148 @0x55
0x00f3…0155 at0056 = ╱34╱4╱ // 0x149 @0x56
0x00f3…0155 at0057 = ╱ef╱$╱ // 0x14a @0x57
0x00f3…0155 at0058 = ╱ed╱(╱ // 0x14b @0x58
0x00f3…0155 at0059 = ╱33╱3╱ // 0x14c @0x59
0x00f3…0155 at005a = ╱34╱4╱ // 0x14d @0x5a
0x00f3…0155 at005b = ╱fe00008806╱ // 0x14e @0x5b
0x00f3…0155 at0060 = ╱ee╱)╱ // 0x153 @0x60
0x00f3…0155 at0061 = EOL // 0x154 @0x61
0x00f3…0155 }
0x0155…0168 8ebf 0160 DIM MF1$(16)
0x0155…0168 LineComalBin {
0x0155…0168 ptr = 0x8ebf // 0x155 @0x0
0x0155…0168 lno = 0x00a0 // 0x157 @0x2
0x0155…0168 at0004 = ╱87╱ DIM ╱ // 0x159 @0x4
0x0155…0168 at0005 = ╱4d╱M╱ // 0x15a @0x5
0x0155…0168 at0006 = ╱46╱F╱ // 0x15b @0x6
0x0155…0168 at0007 = ╱31╱1╱ // 0x15c @0x7
0x0155…0168 at0008 = ╱ef╱$╱ // 0x15d @0x8
0x0155…0168 at0009 = ╱ed╱(╱ // 0x15e @0x9
0x0155…0168 at000a = ╱31╱1╱ // 0x15f @0xa
0x0155…0168 at000b = ╱36╱6╱ // 0x160 @0xb
0x0155…0168 at000c = ╱fe00008005╱ // 0x161 @0xc
0x0155…0168 at0011 = ╱ee╱)╱ // 0x166 @0x11
0x0155…0168 at0012 = EOL // 0x167 @0x12
0x0155…0168 }
0x0168…017d 8ed4 0162 DIM POST5$(55)
0x0168…017d LineComalBin {
0x0168…017d ptr = 0x8ed4 // 0x168 @0x0
0x0168…017d lno = 0x00a2 // 0x16a @0x2
0x0168…017d at0004 = ╱87╱ DIM ╱ // 0x16c @0x4
0x0168…017d at0005 = ╱50╱P╱ // 0x16d @0x5
0x0168…017d at0006 = ╱4f╱O╱ // 0x16e @0x6
0x0168…017d at0007 = ╱53╱S╱ // 0x16f @0x7
0x0168…017d at0008 = ╱54╱T╱ // 0x170 @0x8
0x0168…017d at0009 = ╱35╱5╱ // 0x171 @0x9
0x0168…017d at000a = ╱ef╱$╱ // 0x172 @0xa
0x0168…017d at000b = ╱ed╱(╱ // 0x173 @0xb
0x0168…017d at000c = ╱35╱5╱ // 0x174 @0xc
0x0168…017d at000d = ╱35╱5╱ // 0x175 @0xd
0x0168…017d at000e = ╱fe0000dc06╱ // 0x176 @0xe
0x0168…017d at0013 = ╱ee╱)╱ // 0x17b @0x13
0x0168…017d at0014 = EOL // 0x17c @0x14
0x0168…017d }
0x017d…0195 8eec 0170 TAH$=" 0+"
0x017d…0195 LineComalBin {
0x017d…0195 ptr = 0x8eec // 0x17d @0x0
0x017d…0195 lno = 0x00aa // 0x17f @0x2
0x017d…0195 at0004 = ╱54╱T╱ // 0x181 @0x4
0x017d…0195 at0005 = ╱41╱A╱ // 0x182 @0x5
0x017d…0195 at0006 = ╱48╱H╱ // 0x183 @0x6
0x017d…0195 at0007 = ╱ef╱$╱ // 0x184 @0x7
0x017d…0195 at0008 = ╱dc╱=╱ // 0x185 @0x8
0x017d…0195 at0009 = ╱22╱"╱ // 0x186 @0x9
0x017d…0195 at000a = ╱20╱…╱ // 0x187 @0xa
0x017d…0195 at000b = ╱20╱…╱ // 0x188 @0xb
0x017d…0195 at000c = ╱20╱…╱ // 0x189 @0xc
0x017d…0195 at000d = ╱20╱…╱ // 0x18a @0xd
0x017d…0195 at000e = ╱20╱…╱ // 0x18b @0xe
0x017d…0195 at000f = ╱20╱…╱ // 0x18c @0xf
0x017d…0195 at0010 = ╱20╱…╱ // 0x18d @0x10
0x017d…0195 at0011 = ╱20╱…╱ // 0x18e @0x11
0x017d…0195 at0012 = ╱20╱…╱ // 0x18f @0x12
0x017d…0195 at0013 = ╱20╱…╱ // 0x190 @0x13
0x017d…0195 at0014 = ╱30╱0╱ // 0x191 @0x14
0x017d…0195 at0015 = ╱2b╱+╱ // 0x192 @0x15
0x017d…0195 at0016 = ╱22╱"╱ // 0x193 @0x16
0x017d…0195 at0017 = EOL // 0x194 @0x17
0x017d…0195 }
0x0195…01ad 8f04 0180 TRE$=" 3,00+"
0x0195…01ad LineComalBin {
0x0195…01ad ptr = 0x8f04 // 0x195 @0x0
0x0195…01ad lno = 0x00b4 // 0x197 @0x2
0x0195…01ad at0004 = ╱54╱T╱ // 0x199 @0x4
0x0195…01ad at0005 = ╱52╱R╱ // 0x19a @0x5
0x0195…01ad at0006 = ╱45╱E╱ // 0x19b @0x6
0x0195…01ad at0007 = ╱ef╱$╱ // 0x19c @0x7
0x0195…01ad at0008 = ╱dc╱=╱ // 0x19d @0x8
0x0195…01ad at0009 = ╱22╱"╱ // 0x19e @0x9
0x0195…01ad at000a = ╱20╱…╱ // 0x19f @0xa
0x0195…01ad at000b = ╱20╱…╱ // 0x1a0 @0xb
0x0195…01ad at000c = ╱20╱…╱ // 0x1a1 @0xc
0x0195…01ad at000d = ╱20╱…╱ // 0x1a2 @0xd
0x0195…01ad at000e = ╱20╱…╱ // 0x1a3 @0xe
0x0195…01ad at000f = ╱20╱…╱ // 0x1a4 @0xf
0x0195…01ad at0010 = ╱20╱…╱ // 0x1a5 @0x10
0x0195…01ad at0011 = ╱33╱3╱ // 0x1a6 @0x11
0x0195…01ad at0012 = ╱2c╱,╱ // 0x1a7 @0x12
0x0195…01ad at0013 = ╱30╱0╱ // 0x1a8 @0x13
0x0195…01ad at0014 = ╱30╱0╱ // 0x1a9 @0x14
0x0195…01ad at0015 = ╱2b╱+╱ // 0x1aa @0x15
0x0195…01ad at0016 = ╱22╱"╱ // 0x1ab @0x16
0x0195…01ad at0017 = EOL // 0x1ac @0x17
0x0195…01ad }
0x01ad…01c5 8f1c 0370 PROC CALC(AR3,B1,B2,ES)
0x01ad…01c5 LineComalBin {
0x01ad…01c5 ptr = 0x8f1c // 0x1ad @0x0
0x01ad…01c5 lno = 0x0172 // 0x1af @0x2
0x01ad…01c5 at0004 = ╱9e╱ PROC ╱ // 0x1b1 @0x4
0x01ad…01c5 at0005 = ╱43╱C╱ // 0x1b2 @0x5
0x01ad…01c5 at0006 = ╱41╱A╱ // 0x1b3 @0x6
0x01ad…01c5 at0007 = ╱4c╱L╱ // 0x1b4 @0x7
0x01ad…01c5 at0008 = ╱43╱C╱ // 0x1b5 @0x8
0x01ad…01c5 at0009 = ╱ed╱(╱ // 0x1b6 @0x9
0x01ad…01c5 at000a = ╱41╱A╱ // 0x1b7 @0xa
0x01ad…01c5 at000b = ╱52╱R╱ // 0x1b8 @0xb
0x01ad…01c5 at000c = ╱33╱3╱ // 0x1b9 @0xc
0x01ad…01c5 at000d = ╱ec╱,╱ // 0x1ba @0xd
0x01ad…01c5 at000e = ╱42╱B╱ // 0x1bb @0xe
0x01ad…01c5 at000f = ╱31╱1╱ // 0x1bc @0xf
0x01ad…01c5 at0010 = ╱ec╱,╱ // 0x1bd @0x10
0x01ad…01c5 at0011 = ╱42╱B╱ // 0x1be @0x11
0x01ad…01c5 at0012 = ╱32╱2╱ // 0x1bf @0x12
0x01ad…01c5 at0013 = ╱ec╱,╱ // 0x1c0 @0x13
0x01ad…01c5 at0014 = ╱45╱E╱ // 0x1c1 @0x14
0x01ad…01c5 at0015 = ╱53╱S╱ // 0x1c2 @0x15
0x01ad…01c5 at0016 = ╱ee╱)╱ // 0x1c3 @0x16
0x01ad…01c5 at0017 = EOL // 0x1c4 @0x17
0x01ad…01c5 }
0x01c5…020c 8f63 0380 RES$=ES$;OP1$=B1$;OP2$=B2$;SI=B;FLAG=B;ART=AR3-6*(AR3>5)
0x01c5…020c LineComalBin {
0x01c5…020c ptr = 0x8f63 // 0x1c5 @0x0
0x01c5…020c lno = 0x017c // 0x1c7 @0x2
0x01c5…020c at0004 = ╱52╱R╱ // 0x1c9 @0x4
0x01c5…020c at0005 = ╱45╱E╱ // 0x1ca @0x5
0x01c5…020c at0006 = ╱53╱S╱ // 0x1cb @0x6
0x01c5…020c at0007 = ╱ef╱$╱ // 0x1cc @0x7
0x01c5…020c at0008 = ╱dc╱=╱ // 0x1cd @0x8
0x01c5…020c at0009 = ╱45╱E╱ // 0x1ce @0x9
0x01c5…020c at000a = ╱53╱S╱ // 0x1cf @0xa
0x01c5…020c at000b = ╱ef╱$╱ // 0x1d0 @0xb
0x01c5…020c at000c = ╱eb╱;╱ // 0x1d1 @0xc
0x01c5…020c at000d = ╱4f╱O╱ // 0x1d2 @0xd
0x01c5…020c at000e = ╱50╱P╱ // 0x1d3 @0xe
0x01c5…020c at000f = ╱31╱1╱ // 0x1d4 @0xf
0x01c5…020c at0010 = ╱ef╱$╱ // 0x1d5 @0x10
0x01c5…020c at0011 = ╱dc╱=╱ // 0x1d6 @0x11
0x01c5…020c at0012 = ╱42╱B╱ // 0x1d7 @0x12
0x01c5…020c at0013 = ╱31╱1╱ // 0x1d8 @0x13
0x01c5…020c at0014 = ╱ef╱$╱ // 0x1d9 @0x14
0x01c5…020c at0015 = ╱eb╱;╱ // 0x1da @0x15
0x01c5…020c at0016 = ╱4f╱O╱ // 0x1db @0x16
0x01c5…020c at0017 = ╱50╱P╱ // 0x1dc @0x17
0x01c5…020c at0018 = ╱32╱2╱ // 0x1dd @0x18
0x01c5…020c at0019 = ╱ef╱$╱ // 0x1de @0x19
0x01c5…020c at001a = ╱dc╱=╱ // 0x1df @0x1a
0x01c5…020c at001b = ╱42╱B╱ // 0x1e0 @0x1b
0x01c5…020c at001c = ╱32╱2╱ // 0x1e1 @0x1c
0x01c5…020c at001d = ╱ef╱$╱ // 0x1e2 @0x1d
0x01c5…020c at001e = ╱eb╱;╱ // 0x1e3 @0x1e
0x01c5…020c at001f = ╱53╱S╱ // 0x1e4 @0x1f
0x01c5…020c at0020 = ╱49╱I╱ // 0x1e5 @0x20
0x01c5…020c at0021 = ╱dc╱=╱ // 0x1e6 @0x21
0x01c5…020c at0022 = ╱42╱B╱ // 0x1e7 @0x22
0x01c5…020c at0023 = ╱eb╱;╱ // 0x1e8 @0x23
0x01c5…020c at0024 = ╱46╱F╱ // 0x1e9 @0x24
0x01c5…020c at0025 = ╱4c╱L╱ // 0x1ea @0x25
0x01c5…020c at0026 = ╱41╱A╱ // 0x1eb @0x26
0x01c5…020c at0027 = ╱47╱G╱ // 0x1ec @0x27
0x01c5…020c at0028 = ╱dc╱=╱ // 0x1ed @0x28
0x01c5…020c at0029 = ╱42╱B╱ // 0x1ee @0x29
0x01c5…020c at002a = ╱eb╱;╱ // 0x1ef @0x2a
0x01c5…020c at002b = ╱41╱A╱ // 0x1f0 @0x2b
0x01c5…020c at002c = ╱52╱R╱ // 0x1f1 @0x2c
0x01c5…020c at002d = ╱54╱T╱ // 0x1f2 @0x2d
0x01c5…020c at002e = ╱dc╱=╱ // 0x1f3 @0x2e
0x01c5…020c at002f = ╱41╱A╱ // 0x1f4 @0x2f
0x01c5…020c at0030 = ╱52╱R╱ // 0x1f5 @0x30
0x01c5…020c at0031 = ╱33╱3╱ // 0x1f6 @0x31
0x01c5…020c at0032 = ╱e3╱-╱ // 0x1f7 @0x32
0x01c5…020c at0033 = ╱36╱6╱ // 0x1f8 @0x33
0x01c5…020c at0034 = ╱fe0000c003╱ // 0x1f9 @0x34
0x01c5…020c at0039 = ╱e4╱*╱ // 0x1fe @0x39
0x01c5…020c at003a = ╱ed╱(╱ // 0x1ff @0x3a
0x01c5…020c at003b = ╱41╱A╱ // 0x200 @0x3b
0x01c5…020c at003c = ╱52╱R╱ // 0x201 @0x3c
0x01c5…020c at003d = ╱33╱3╱ // 0x202 @0x3d
0x01c5…020c at003e = ╱de╱>╱ // 0x203 @0x3e
0x01c5…020c at003f = ╱35╱5╱ // 0x204 @0x3f
0x01c5…020c at0040 = ╱fe0000a003╱ // 0x205 @0x40
0x01c5…020c at0045 = ╱ee╱)╱ // 0x20a @0x45
0x01c5…020c at0046 = EOL // 0x20b @0x46
0x01c5…020c }
0x020c…0222 8f79 0390 CALL "P641210:REGN"
0x020c…0222 LineComalBin {
0x020c…0222 ptr = 0x8f79 // 0x20c @0x0
0x020c…0222 lno = 0x0186 // 0x20e @0x2
0x020c…0222 at0004 = ╱ad4331╱ CALL ╱ // 0x210 @0x4
0x020c…0222 at0007 = ╱22╱"╱ // 0x213 @0x7
0x020c…0222 at0008 = ╱50╱P╱ // 0x214 @0x8
0x020c…0222 at0009 = ╱36╱6╱ // 0x215 @0x9
0x020c…0222 at000a = ╱34╱4╱ // 0x216 @0xa
0x020c…0222 at000b = ╱31╱1╱ // 0x217 @0xb
0x020c…0222 at000c = ╱32╱2╱ // 0x218 @0xc
0x020c…0222 at000d = ╱31╱1╱ // 0x219 @0xd
0x020c…0222 at000e = ╱30╱0╱ // 0x21a @0xe
0x020c…0222 at000f = ╱3a╱:╱ // 0x21b @0xf
0x020c…0222 at0010 = ╱52╱R╱ // 0x21c @0x10
0x020c…0222 at0011 = ╱45╱E╱ // 0x21d @0x11
0x020c…0222 at0012 = ╱47╱G╱ // 0x21e @0x12
0x020c…0222 at0013 = ╱4e╱N╱ // 0x21f @0x13
0x020c…0222 at0014 = ╱22╱"╱ // 0x220 @0x14
0x020c…0222 at0015 = EOL // 0x221 @0x15
0x020c…0222 }
0x0222…0233 8f8a 0400 IF AR3<6 THEN
0x0222…0233 LineComalBin {
0x0222…0233 ptr = 0x8f8a // 0x222 @0x0
0x0222…0233 lno = 0x0190 // 0x224 @0x2
0x0222…0233 at0004 = ╱9c╱ IF ╱ // 0x226 @0x4
0x0222…0233 at0005 = ╱41╱A╱ // 0x227 @0x5
0x0222…0233 at0006 = ╱52╱R╱ // 0x228 @0x6
0x0222…0233 at0007 = ╱33╱3╱ // 0x229 @0x7
0x0222…0233 at0008 = ╱dd╱<╱ // 0x22a @0x8
0x0222…0233 at0009 = ╱36╱6╱ // 0x22b @0x9
0x0222…0233 at000a = ╱fe0000c003╱ // 0x22c @0xa
0x0222…0233 at000f = ╱b6╱ THEN ╱ // 0x231 @0xf
0x0222…0233 at0010 = EOL // 0x232 @0x10
0x0222…0233 }
0x0233…023f 8f96 0410 IF FLAG THEN STOP
0x0233…023f LineComalBin {
0x0233…023f ptr = 0x8f96 // 0x233 @0x0
0x0233…023f lno = 0x019a // 0x235 @0x2
0x0233…023f at0004 = ╱82╱ IF ╱ // 0x237 @0x4
0x0233…023f at0005 = ╱46╱F╱ // 0x238 @0x5
0x0233…023f at0006 = ╱4c╱L╱ // 0x239 @0x6
0x0233…023f at0007 = ╱41╱A╱ // 0x23a @0x7
0x0233…023f at0008 = ╱47╱G╱ // 0x23b @0x8
0x0233…023f at0009 = ╱b6╱ THEN ╱ // 0x23c @0x9
0x0233…023f at000a = ╱8d╱ STOP ╱ // 0x23d @0xa
0x0233…023f at000b = EOL // 0x23e @0xb
0x0233…023f }
0x023f…0245 8f9c 0420 ENDIF
0x023f…0245 LineComalBin {
0x023f…0245 ptr = 0x8f9c // 0x23f @0x0
0x023f…0245 lno = 0x01a4 // 0x241 @0x2
0x023f…0245 at0004 = ╱9b╱ ENDIF ╱ // 0x243 @0x4
0x023f…0245 at0005 = EOL // 0x244 @0x5
0x023f…0245 }
0x0245…0252 8fa9 0430 ES$=RES$
0x0245…0252 LineComalBin {
0x0245…0252 ptr = 0x8fa9 // 0x245 @0x0
0x0245…0252 lno = 0x01ae // 0x247 @0x2
0x0245…0252 at0004 = ╱45╱E╱ // 0x249 @0x4
0x0245…0252 at0005 = ╱53╱S╱ // 0x24a @0x5
0x0245…0252 at0006 = ╱ef╱$╱ // 0x24b @0x6
0x0245…0252 at0007 = ╱dc╱=╱ // 0x24c @0x7
0x0245…0252 at0008 = ╱52╱R╱ // 0x24d @0x8
0x0245…0252 at0009 = ╱45╱E╱ // 0x24e @0x9
0x0245…0252 at000a = ╱53╱S╱ // 0x24f @0xa
0x0245…0252 at000b = ╱ef╱$╱ // 0x250 @0xb
0x0245…0252 at000c = EOL // 0x251 @0xc
0x0245…0252 }
0x0252…0258 8faf 0440 ENDPROC
0x0252…0258 LineComalBin {
0x0252…0258 ptr = 0x8faf // 0x252 @0x0
0x0252…0258 lno = 0x01b8 // 0x254 @0x2
0x0252…0258 at0004 = ╱9f╱ ENDPROC ╱ // 0x256 @0x4
0x0252…0258 at0005 = EOL // 0x257 @0x5
0x0252…0258 }
0x0258…0264 8fbb 0550 PROC INDTÆL
0x0258…0264 LineComalBin {
0x0258…0264 ptr = 0x8fbb // 0x258 @0x0
0x0258…0264 lno = 0x0226 // 0x25a @0x2
0x0258…0264 at0004 = ╱9e╱ PROC ╱ // 0x25c @0x4
0x0258…0264 at0005 = ╱49╱I╱ // 0x25d @0x5
0x0258…0264 at0006 = ╱4e╱N╱ // 0x25e @0x6
0x0258…0264 at0007 = ╱44╱D╱ // 0x25f @0x7
0x0258…0264 at0008 = ╱54╱T╱ // 0x260 @0x8
0x0258…0264 at0009 = ╱5b╱Æ╱ // 0x261 @0x9
0x0258…0264 at000a = ╱4c╱L╱ // 0x262 @0xa
0x0258…0264 at000b = EOL // 0x263 @0xb
0x0258…0264 }
0x0264…0275 8fcc 0560 J=W*(LMNR-E)
0x0264…0275 LineComalBin {
0x0264…0275 ptr = 0x8fcc // 0x264 @0x0
0x0264…0275 lno = 0x0230 // 0x266 @0x2
0x0264…0275 at0004 = ╱4a╱J╱ // 0x268 @0x4
0x0264…0275 at0005 = ╱dc╱=╱ // 0x269 @0x5
0x0264…0275 at0006 = ╱57╱W╱ // 0x26a @0x6
0x0264…0275 at0007 = ╱e4╱*╱ // 0x26b @0x7
0x0264…0275 at0008 = ╱ed╱(╱ // 0x26c @0x8
0x0264…0275 at0009 = ╱4c╱L╱ // 0x26d @0x9
0x0264…0275 at000a = ╱4d╱M╱ // 0x26e @0xa
0x0264…0275 at000b = ╱4e╱N╱ // 0x26f @0xb
0x0264…0275 at000c = ╱52╱R╱ // 0x270 @0xc
0x0264…0275 at000d = ╱e3╱-╱ // 0x271 @0xd
0x0264…0275 at000e = ╱45╱E╱ // 0x272 @0xe
0x0264…0275 at000f = ╱ee╱)╱ // 0x273 @0xf
0x0264…0275 at0010 = EOL // 0x274 @0x10
0x0264…0275 }
0x0275…0280 8fd7 0570 FOR K=E TO W
0x0275…0280 LineComalBin {
0x0275…0280 ptr = 0x8fd7 // 0x275 @0x0
0x0275…0280 lno = 0x023a // 0x277 @0x2
0x0275…0280 at0004 = ╱83╱ FOR ╱ // 0x279 @0x4
0x0275…0280 at0005 = ╱4b╱K╱ // 0x27a @0x5
0x0275…0280 at0006 = ╱dc╱=╱ // 0x27b @0x6
0x0275…0280 at0007 = ╱45╱E╱ // 0x27c @0x7
0x0275…0280 at0008 = ╱b7╱ TO ╱ // 0x27d @0x8
0x0275…0280 at0009 = ╱57╱W╱ // 0x27e @0x9
0x0275…0280 at000a = EOL // 0x27f @0xa
0x0275…0280 }
0x0280…0296 8fed 0580 GET FIL2$,J+K:POST5$
0x0280…0296 LineComalBin {
0x0280…0296 ptr = 0x8fed // 0x280 @0x0
0x0280…0296 lno = 0x0244 // 0x282 @0x2
0x0280…0296 at0004 = ╱a9╱ GET ╱ // 0x284 @0x4
0x0280…0296 at0005 = ╱46╱F╱ // 0x285 @0x5
0x0280…0296 at0006 = ╱49╱I╱ // 0x286 @0x6
0x0280…0296 at0007 = ╱4c╱L╱ // 0x287 @0x7
0x0280…0296 at0008 = ╱32╱2╱ // 0x288 @0x8
0x0280…0296 at0009 = ╱ef╱$╱ // 0x289 @0x9
0x0280…0296 at000a = ╱ec╱,╱ // 0x28a @0xa
0x0280…0296 at000b = ╱4a╱J╱ // 0x28b @0xb
0x0280…0296 at000c = ╱e2╱+╱ // 0x28c @0xc
0x0280…0296 at000d = ╱4b╱K╱ // 0x28d @0xd
0x0280…0296 at000e = ╱f0╱:╱ // 0x28e @0xe
0x0280…0296 at000f = ╱50╱P╱ // 0x28f @0xf
0x0280…0296 at0010 = ╱4f╱O╱ // 0x290 @0x10
0x0280…0296 at0011 = ╱53╱S╱ // 0x291 @0x11
0x0280…0296 at0012 = ╱54╱T╱ // 0x292 @0x12
0x0280…0296 at0013 = ╱35╱5╱ // 0x293 @0x13
0x0280…0296 at0014 = ╱ef╱$╱ // 0x294 @0x14
0x0280…0296 at0015 = EOL // 0x295 @0x15
0x0280…0296 }
0x0296…02a6 8ffd 0590 FOR I=E TO 5
0x0296…02a6 LineComalBin {
0x0296…02a6 ptr = 0x8ffd // 0x296 @0x0
0x0296…02a6 lno = 0x024e // 0x298 @0x2
0x0296…02a6 at0004 = ╱83╱ FOR ╱ // 0x29a @0x4
0x0296…02a6 at0005 = ╱49╱I╱ // 0x29b @0x5
0x0296…02a6 at0006 = ╱dc╱=╱ // 0x29c @0x6
0x0296…02a6 at0007 = ╱45╱E╱ // 0x29d @0x7
0x0296…02a6 at0008 = ╱b7╱ TO ╱ // 0x29e @0x8
0x0296…02a6 at0009 = ╱35╱5╱ // 0x29f @0x9
0x0296…02a6 at000a = ╱fe0000a003╱ // 0x2a0 @0xa
0x0296…02a6 at000f = EOL // 0x2a5 @0xf
0x0296…02a6 }
0x02a6…02de 9035 0600 TV$((K-E)*5+I)=POST5$((I-E)*11+E:11)
0x02a6…02de LineComalBin {
0x02a6…02de ptr = 0x9035 // 0x2a6 @0x0
0x02a6…02de lno = 0x0258 // 0x2a8 @0x2
0x02a6…02de at0004 = ╱54╱T╱ // 0x2aa @0x4
0x02a6…02de at0005 = ╱56╱V╱ // 0x2ab @0x5
0x02a6…02de at0006 = ╱ef╱$╱ // 0x2ac @0x6
0x02a6…02de at0007 = ╱ed╱(╱ // 0x2ad @0x7
0x02a6…02de at0008 = ╱ed╱(╱ // 0x2ae @0x8
0x02a6…02de at0009 = ╱4b╱K╱ // 0x2af @0x9
0x02a6…02de at000a = ╱e3╱-╱ // 0x2b0 @0xa
0x02a6…02de at000b = ╱45╱E╱ // 0x2b1 @0xb
0x02a6…02de at000c = ╱ee╱)╱ // 0x2b2 @0xc
0x02a6…02de at000d = ╱e4╱*╱ // 0x2b3 @0xd
0x02a6…02de at000e = ╱35╱5╱ // 0x2b4 @0xe
0x02a6…02de at000f = ╱fe0000a003╱ // 0x2b5 @0xf
0x02a6…02de at0014 = ╱e2╱+╱ // 0x2ba @0x14
0x02a6…02de at0015 = ╱49╱I╱ // 0x2bb @0x15
0x02a6…02de at0016 = ╱ee╱)╱ // 0x2bc @0x16
0x02a6…02de at0017 = ╱dc╱=╱ // 0x2bd @0x17
0x02a6…02de at0018 = ╱50╱P╱ // 0x2be @0x18
0x02a6…02de at0019 = ╱4f╱O╱ // 0x2bf @0x19
0x02a6…02de at001a = ╱53╱S╱ // 0x2c0 @0x1a
0x02a6…02de at001b = ╱54╱T╱ // 0x2c1 @0x1b
0x02a6…02de at001c = ╱35╱5╱ // 0x2c2 @0x1c
0x02a6…02de at001d = ╱ef╱$╱ // 0x2c3 @0x1d
0x02a6…02de at001e = ╱ed╱(╱ // 0x2c4 @0x1e
0x02a6…02de at001f = ╱ed╱(╱ // 0x2c5 @0x1f
0x02a6…02de at0020 = ╱49╱I╱ // 0x2c6 @0x20
0x02a6…02de at0021 = ╱e3╱-╱ // 0x2c7 @0x21
0x02a6…02de at0022 = ╱45╱E╱ // 0x2c8 @0x22
0x02a6…02de at0023 = ╱ee╱)╱ // 0x2c9 @0x23
0x02a6…02de at0024 = ╱e4╱*╱ // 0x2ca @0x24
0x02a6…02de at0025 = ╱31╱1╱ // 0x2cb @0x25
0x02a6…02de at0026 = ╱31╱1╱ // 0x2cc @0x26
0x02a6…02de at0027 = ╱fe0000b004╱ // 0x2cd @0x27
0x02a6…02de at002c = ╱e2╱+╱ // 0x2d2 @0x2c
0x02a6…02de at002d = ╱45╱E╱ // 0x2d3 @0x2d
0x02a6…02de at002e = ╱f0╱:╱ // 0x2d4 @0x2e
0x02a6…02de at002f = ╱31╱1╱ // 0x2d5 @0x2f
0x02a6…02de at0030 = ╱31╱1╱ // 0x2d6 @0x30
0x02a6…02de at0031 = ╱fe0000b004╱ // 0x2d7 @0x31
0x02a6…02de at0036 = ╱ee╱)╱ // 0x2dc @0x36
0x02a6…02de at0037 = EOL // 0x2dd @0x37
0x02a6…02de }
0x02de…02e5 903c 0610 NEXT I
0x02de…02e5 LineComalBin {
0x02de…02e5 ptr = 0x903c // 0x2de @0x0
0x02de…02e5 lno = 0x0262 // 0x2e0 @0x2
0x02de…02e5 at0004 = ╱84╱ NEXT ╱ // 0x2e2 @0x4
0x02de…02e5 at0005 = ╱49╱I╱ // 0x2e3 @0x5
0x02de…02e5 at0006 = EOL // 0x2e4 @0x6
0x02de…02e5 }
0x02e5…02ec 9043 0620 NEXT K
0x02e5…02ec LineComalBin {
0x02e5…02ec ptr = 0x9043 // 0x2e5 @0x0
0x02e5…02ec lno = 0x026c // 0x2e7 @0x2
0x02e5…02ec at0004 = ╱84╱ NEXT ╱ // 0x2e9 @0x4
0x02e5…02ec at0005 = ╱4b╱K╱ // 0x2ea @0x5
0x02e5…02ec at0006 = EOL // 0x2eb @0x6
0x02e5…02ec }
0x02ec…0304 905b 0630 EXEC FEJL(LMNR,K,FIL2$)
0x02ec…0304 LineComalBin {
0x02ec…0304 ptr = 0x905b // 0x2ec @0x0
0x02ec…0304 lno = 0x0276 // 0x2ee @0x2
0x02ec…0304 at0004 = ╱9d╱ EXEC ╱ // 0x2f0 @0x4
0x02ec…0304 at0005 = ╱46╱F╱ // 0x2f1 @0x5
0x02ec…0304 at0006 = ╱45╱E╱ // 0x2f2 @0x6
0x02ec…0304 at0007 = ╱4a╱J╱ // 0x2f3 @0x7
0x02ec…0304 at0008 = ╱4c╱L╱ // 0x2f4 @0x8
0x02ec…0304 at0009 = ╱ed╱(╱ // 0x2f5 @0x9
0x02ec…0304 at000a = ╱4c╱L╱ // 0x2f6 @0xa
0x02ec…0304 at000b = ╱4d╱M╱ // 0x2f7 @0xb
0x02ec…0304 at000c = ╱4e╱N╱ // 0x2f8 @0xc
0x02ec…0304 at000d = ╱52╱R╱ // 0x2f9 @0xd
0x02ec…0304 at000e = ╱ec╱,╱ // 0x2fa @0xe
0x02ec…0304 at000f = ╱4b╱K╱ // 0x2fb @0xf
0x02ec…0304 at0010 = ╱ec╱,╱ // 0x2fc @0x10
0x02ec…0304 at0011 = ╱46╱F╱ // 0x2fd @0x11
0x02ec…0304 at0012 = ╱49╱I╱ // 0x2fe @0x12
0x02ec…0304 at0013 = ╱4c╱L╱ // 0x2ff @0x13
0x02ec…0304 at0014 = ╱32╱2╱ // 0x300 @0x14
0x02ec…0304 at0015 = ╱ef╱$╱ // 0x301 @0x15
0x02ec…0304 at0016 = ╱ee╱)╱ // 0x302 @0x16
0x02ec…0304 at0017 = EOL // 0x303 @0x17
0x02ec…0304 }
0x0304…030a 9061 0640 ENDPROC
0x0304…030a LineComalBin {
0x0304…030a ptr = 0x9061 // 0x304 @0x0
0x0304…030a lno = 0x0280 // 0x306 @0x2
0x0304…030a at0004 = ╱9f╱ ENDPROC ╱ // 0x308 @0x4
0x0304…030a at0005 = EOL // 0x309 @0x5
0x0304…030a }
0x030a…031b 9072 0800 PROC INLØNMOD(N)
0x030a…031b LineComalBin {
0x030a…031b ptr = 0x9072 // 0x30a @0x0
0x030a…031b lno = 0x0320 // 0x30c @0x2
0x030a…031b at0004 = ╱9e╱ PROC ╱ // 0x30e @0x4
0x030a…031b at0005 = ╱49╱I╱ // 0x30f @0x5
0x030a…031b at0006 = ╱4e╱N╱ // 0x310 @0x6
0x030a…031b at0007 = ╱4c╱L╱ // 0x311 @0x7
0x030a…031b at0008 = ╱5c╱Ø╱ // 0x312 @0x8
0x030a…031b at0009 = ╱4e╱N╱ // 0x313 @0x9
0x030a…031b at000a = ╱4d╱M╱ // 0x314 @0xa
0x030a…031b at000b = ╱4f╱O╱ // 0x315 @0xb
0x030a…031b at000c = ╱44╱D╱ // 0x316 @0xc
0x030a…031b at000d = ╱ed╱(╱ // 0x317 @0xd
0x030a…031b at000e = ╱4e╱N╱ // 0x318 @0xe
0x030a…031b at000f = ╱ee╱)╱ // 0x319 @0xf
0x030a…031b at0010 = EOL // 0x31a @0x10
0x030a…031b }
0x031b…0332 9089 0810 GET FIL$,G*N-E:POST1$
0x031b…0332 LineComalBin {
0x031b…0332 ptr = 0x9089 // 0x31b @0x0
0x031b…0332 lno = 0x032a // 0x31d @0x2
0x031b…0332 at0004 = ╱a9╱ GET ╱ // 0x31f @0x4
0x031b…0332 at0005 = ╱46╱F╱ // 0x320 @0x5
0x031b…0332 at0006 = ╱49╱I╱ // 0x321 @0x6
0x031b…0332 at0007 = ╱4c╱L╱ // 0x322 @0x7
0x031b…0332 at0008 = ╱ef╱$╱ // 0x323 @0x8
0x031b…0332 at0009 = ╱ec╱,╱ // 0x324 @0x9
0x031b…0332 at000a = ╱47╱G╱ // 0x325 @0xa
0x031b…0332 at000b = ╱e4╱*╱ // 0x326 @0xb
0x031b…0332 at000c = ╱4e╱N╱ // 0x327 @0xc
0x031b…0332 at000d = ╱e3╱-╱ // 0x328 @0xd
0x031b…0332 at000e = ╱45╱E╱ // 0x329 @0xe
0x031b…0332 at000f = ╱f0╱:╱ // 0x32a @0xf
0x031b…0332 at0010 = ╱50╱P╱ // 0x32b @0x10
0x031b…0332 at0011 = ╱4f╱O╱ // 0x32c @0x11
0x031b…0332 at0012 = ╱53╱S╱ // 0x32d @0x12
0x031b…0332 at0013 = ╱54╱T╱ // 0x32e @0x13
0x031b…0332 at0014 = ╱31╱1╱ // 0x32f @0x14
0x031b…0332 at0015 = ╱ef╱$╱ // 0x330 @0x15
0x031b…0332 at0016 = EOL // 0x331 @0x16
0x031b…0332 }
0x0332…0369 90c0 0820 GET FIL$,G*N:POST2$,C1,C2,LT,LF,LR,LA,RPI,K1,K2,FG,FD
0x0332…0369 LineComalBin {
0x0332…0369 ptr = 0x90c0 // 0x332 @0x0
0x0332…0369 lno = 0x0334 // 0x334 @0x2
0x0332…0369 at0004 = ╱a9╱ GET ╱ // 0x336 @0x4
0x0332…0369 at0005 = ╱46╱F╱ // 0x337 @0x5
0x0332…0369 at0006 = ╱49╱I╱ // 0x338 @0x6
0x0332…0369 at0007 = ╱4c╱L╱ // 0x339 @0x7
0x0332…0369 at0008 = ╱ef╱$╱ // 0x33a @0x8
0x0332…0369 at0009 = ╱ec╱,╱ // 0x33b @0x9
0x0332…0369 at000a = ╱47╱G╱ // 0x33c @0xa
0x0332…0369 at000b = ╱e4╱*╱ // 0x33d @0xb
0x0332…0369 at000c = ╱4e╱N╱ // 0x33e @0xc
0x0332…0369 at000d = ╱f0╱:╱ // 0x33f @0xd
0x0332…0369 at000e = ╱50╱P╱ // 0x340 @0xe
0x0332…0369 at000f = ╱4f╱O╱ // 0x341 @0xf
0x0332…0369 at0010 = ╱53╱S╱ // 0x342 @0x10
0x0332…0369 at0011 = ╱54╱T╱ // 0x343 @0x11
0x0332…0369 at0012 = ╱32╱2╱ // 0x344 @0x12
0x0332…0369 at0013 = ╱ef╱$╱ // 0x345 @0x13
0x0332…0369 at0014 = ╱ec╱,╱ // 0x346 @0x14
0x0332…0369 at0015 = ╱43╱C╱ // 0x347 @0x15
0x0332…0369 at0016 = ╱31╱1╱ // 0x348 @0x16
0x0332…0369 at0017 = ╱ec╱,╱ // 0x349 @0x17
0x0332…0369 at0018 = ╱43╱C╱ // 0x34a @0x18
0x0332…0369 at0019 = ╱32╱2╱ // 0x34b @0x19
0x0332…0369 at001a = ╱ec╱,╱ // 0x34c @0x1a
0x0332…0369 at001b = ╱4c╱L╱ // 0x34d @0x1b
0x0332…0369 at001c = ╱54╱T╱ // 0x34e @0x1c
0x0332…0369 at001d = ╱ec╱,╱ // 0x34f @0x1d
0x0332…0369 at001e = ╱4c╱L╱ // 0x350 @0x1e
0x0332…0369 at001f = ╱46╱F╱ // 0x351 @0x1f
0x0332…0369 at0020 = ╱ec╱,╱ // 0x352 @0x20
0x0332…0369 at0021 = ╱4c╱L╱ // 0x353 @0x21
0x0332…0369 at0022 = ╱52╱R╱ // 0x354 @0x22
0x0332…0369 at0023 = ╱ec╱,╱ // 0x355 @0x23
0x0332…0369 at0024 = ╱4c╱L╱ // 0x356 @0x24
0x0332…0369 at0025 = ╱41╱A╱ // 0x357 @0x25
0x0332…0369 at0026 = ╱ec╱,╱ // 0x358 @0x26
0x0332…0369 at0027 = ╱52╱R╱ // 0x359 @0x27
0x0332…0369 at0028 = ╱50╱P╱ // 0x35a @0x28
0x0332…0369 at0029 = ╱49╱I╱ // 0x35b @0x29
0x0332…0369 at002a = ╱ec╱,╱ // 0x35c @0x2a
0x0332…0369 at002b = ╱4b╱K╱ // 0x35d @0x2b
0x0332…0369 at002c = ╱31╱1╱ // 0x35e @0x2c
0x0332…0369 at002d = ╱ec╱,╱ // 0x35f @0x2d
0x0332…0369 at002e = ╱4b╱K╱ // 0x360 @0x2e
0x0332…0369 at002f = ╱32╱2╱ // 0x361 @0x2f
0x0332…0369 at0030 = ╱ec╱,╱ // 0x362 @0x30
0x0332…0369 at0031 = ╱46╱F╱ // 0x363 @0x31
0x0332…0369 at0032 = ╱47╱G╱ // 0x364 @0x32
0x0332…0369 at0033 = ╱ec╱,╱ // 0x365 @0x33
0x0332…0369 at0034 = ╱46╱F╱ // 0x366 @0x34
0x0332…0369 at0035 = ╱44╱D╱ // 0x367 @0x35
0x0332…0369 at0036 = EOL // 0x368 @0x36
0x0332…0369 }
0x0369…037d 90d4 0830 EXEC FEJL(E,N,FIL$)
0x0369…037d LineComalBin {
0x0369…037d ptr = 0x90d4 // 0x369 @0x0
0x0369…037d lno = 0x033e // 0x36b @0x2
0x0369…037d at0004 = ╱9d╱ EXEC ╱ // 0x36d @0x4
0x0369…037d at0005 = ╱46╱F╱ // 0x36e @0x5
0x0369…037d at0006 = ╱45╱E╱ // 0x36f @0x6
0x0369…037d at0007 = ╱4a╱J╱ // 0x370 @0x7
0x0369…037d at0008 = ╱4c╱L╱ // 0x371 @0x8
0x0369…037d at0009 = ╱ed╱(╱ // 0x372 @0x9
0x0369…037d at000a = ╱45╱E╱ // 0x373 @0xa
0x0369…037d at000b = ╱ec╱,╱ // 0x374 @0xb
0x0369…037d at000c = ╱4e╱N╱ // 0x375 @0xc
0x0369…037d at000d = ╱ec╱,╱ // 0x376 @0xd
0x0369…037d at000e = ╱46╱F╱ // 0x377 @0xe
0x0369…037d at000f = ╱49╱I╱ // 0x378 @0xf
0x0369…037d at0010 = ╱4c╱L╱ // 0x379 @0x10
0x0369…037d at0011 = ╱ef╱$╱ // 0x37a @0x11
0x0369…037d at0012 = ╱ee╱)╱ // 0x37b @0x12
0x0369…037d at0013 = EOL // 0x37c @0x13
0x0369…037d }
0x037d…0383 90da 0840 ENDPROC
0x037d…0383 LineComalBin {
0x037d…0383 ptr = 0x90da // 0x37d @0x0
0x037d…0383 lno = 0x0348 // 0x37f @0x2
0x037d…0383 at0004 = ╱9f╱ ENDPROC ╱ // 0x381 @0x4
0x037d…0383 at0005 = EOL // 0x382 @0x5
0x037d…0383 }
0x0383…038e 90e5 1000 PROC UDTÆL
0x0383…038e LineComalBin {
0x0383…038e ptr = 0x90e5 // 0x383 @0x0
0x0383…038e lno = 0x03e8 // 0x385 @0x2
0x0383…038e at0004 = ╱9e╱ PROC ╱ // 0x387 @0x4
0x0383…038e at0005 = ╱55╱U╱ // 0x388 @0x5
0x0383…038e at0006 = ╱44╱D╱ // 0x389 @0x6
0x0383…038e at0007 = ╱54╱T╱ // 0x38a @0x7
0x0383…038e at0008 = ╱5b╱Æ╱ // 0x38b @0x8
0x0383…038e at0009 = ╱4c╱L╱ // 0x38c @0x9
0x0383…038e at000a = EOL // 0x38d @0xa
0x0383…038e }
0x038e…039f 90f6 1010 J=W*(LMNR-E)
0x038e…039f LineComalBin {
0x038e…039f ptr = 0x90f6 // 0x38e @0x0
0x038e…039f lno = 0x03f2 // 0x390 @0x2
0x038e…039f at0004 = ╱4a╱J╱ // 0x392 @0x4
0x038e…039f at0005 = ╱dc╱=╱ // 0x393 @0x5
0x038e…039f at0006 = ╱57╱W╱ // 0x394 @0x6
0x038e…039f at0007 = ╱e4╱*╱ // 0x395 @0x7
0x038e…039f at0008 = ╱ed╱(╱ // 0x396 @0x8
0x038e…039f at0009 = ╱4c╱L╱ // 0x397 @0x9
0x038e…039f at000a = ╱4d╱M╱ // 0x398 @0xa
0x038e…039f at000b = ╱4e╱N╱ // 0x399 @0xb
0x038e…039f at000c = ╱52╱R╱ // 0x39a @0xc
0x038e…039f at000d = ╱e3╱-╱ // 0x39b @0xd
0x038e…039f at000e = ╱45╱E╱ // 0x39c @0xe
0x038e…039f at000f = ╱ee╱)╱ // 0x39d @0xf
0x038e…039f at0010 = EOL // 0x39e @0x10
0x038e…039f }
0x039f…03aa 9101 1020 FOR K=E TO W
0x039f…03aa LineComalBin {
0x039f…03aa ptr = 0x9101 // 0x39f @0x0
0x039f…03aa lno = 0x03fc // 0x3a1 @0x2
0x039f…03aa at0004 = ╱83╱ FOR ╱ // 0x3a3 @0x4
0x039f…03aa at0005 = ╱4b╱K╱ // 0x3a4 @0x5
0x039f…03aa at0006 = ╱dc╱=╱ // 0x3a5 @0x6
0x039f…03aa at0007 = ╱45╱E╱ // 0x3a6 @0x7
0x039f…03aa at0008 = ╱b7╱ TO ╱ // 0x3a7 @0x8
0x039f…03aa at0009 = ╱57╱W╱ // 0x3a8 @0x9
0x039f…03aa at000a = EOL // 0x3a9 @0xa
0x039f…03aa }
0x03aa…03ba 9111 1030 FOR I=E TO 5
0x03aa…03ba LineComalBin {
0x03aa…03ba ptr = 0x9111 // 0x3aa @0x0
0x03aa…03ba lno = 0x0406 // 0x3ac @0x2
0x03aa…03ba at0004 = ╱83╱ FOR ╱ // 0x3ae @0x4
0x03aa…03ba at0005 = ╱49╱I╱ // 0x3af @0x5
0x03aa…03ba at0006 = ╱dc╱=╱ // 0x3b0 @0x6
0x03aa…03ba at0007 = ╱45╱E╱ // 0x3b1 @0x7
0x03aa…03ba at0008 = ╱b7╱ TO ╱ // 0x3b2 @0x8
0x03aa…03ba at0009 = ╱35╱5╱ // 0x3b3 @0x9
0x03aa…03ba at000a = ╱fe0000a003╱ // 0x3b4 @0xa
0x03aa…03ba at000f = EOL // 0x3b9 @0xf
0x03aa…03ba }
0x03ba…03f2 9149 1040 POST5$((I-E)*11+E:11)=TV$((K-E)*5+I)
0x03ba…03f2 LineComalBin {
0x03ba…03f2 ptr = 0x9149 // 0x3ba @0x0
0x03ba…03f2 lno = 0x0410 // 0x3bc @0x2
0x03ba…03f2 at0004 = ╱50╱P╱ // 0x3be @0x4
0x03ba…03f2 at0005 = ╱4f╱O╱ // 0x3bf @0x5
0x03ba…03f2 at0006 = ╱53╱S╱ // 0x3c0 @0x6
0x03ba…03f2 at0007 = ╱54╱T╱ // 0x3c1 @0x7
0x03ba…03f2 at0008 = ╱35╱5╱ // 0x3c2 @0x8
0x03ba…03f2 at0009 = ╱ef╱$╱ // 0x3c3 @0x9
0x03ba…03f2 at000a = ╱ed╱(╱ // 0x3c4 @0xa
0x03ba…03f2 at000b = ╱ed╱(╱ // 0x3c5 @0xb
0x03ba…03f2 at000c = ╱49╱I╱ // 0x3c6 @0xc
0x03ba…03f2 at000d = ╱e3╱-╱ // 0x3c7 @0xd
0x03ba…03f2 at000e = ╱45╱E╱ // 0x3c8 @0xe
0x03ba…03f2 at000f = ╱ee╱)╱ // 0x3c9 @0xf
0x03ba…03f2 at0010 = ╱e4╱*╱ // 0x3ca @0x10
0x03ba…03f2 at0011 = ╱31╱1╱ // 0x3cb @0x11
0x03ba…03f2 at0012 = ╱31╱1╱ // 0x3cc @0x12
0x03ba…03f2 at0013 = ╱fe0000b004╱ // 0x3cd @0x13
0x03ba…03f2 at0018 = ╱e2╱+╱ // 0x3d2 @0x18
0x03ba…03f2 at0019 = ╱45╱E╱ // 0x3d3 @0x19
0x03ba…03f2 at001a = ╱f0╱:╱ // 0x3d4 @0x1a
0x03ba…03f2 at001b = ╱31╱1╱ // 0x3d5 @0x1b
0x03ba…03f2 at001c = ╱31╱1╱ // 0x3d6 @0x1c
0x03ba…03f2 at001d = ╱fe0000b004╱ // 0x3d7 @0x1d
0x03ba…03f2 at0022 = ╱ee╱)╱ // 0x3dc @0x22
0x03ba…03f2 at0023 = ╱dc╱=╱ // 0x3dd @0x23
0x03ba…03f2 at0024 = ╱54╱T╱ // 0x3de @0x24
0x03ba…03f2 at0025 = ╱56╱V╱ // 0x3df @0x25
0x03ba…03f2 at0026 = ╱ef╱$╱ // 0x3e0 @0x26
0x03ba…03f2 at0027 = ╱ed╱(╱ // 0x3e1 @0x27
0x03ba…03f2 at0028 = ╱ed╱(╱ // 0x3e2 @0x28
0x03ba…03f2 at0029 = ╱4b╱K╱ // 0x3e3 @0x29
0x03ba…03f2 at002a = ╱e3╱-╱ // 0x3e4 @0x2a
0x03ba…03f2 at002b = ╱45╱E╱ // 0x3e5 @0x2b
0x03ba…03f2 at002c = ╱ee╱)╱ // 0x3e6 @0x2c
0x03ba…03f2 at002d = ╱e4╱*╱ // 0x3e7 @0x2d
0x03ba…03f2 at002e = ╱35╱5╱ // 0x3e8 @0x2e
0x03ba…03f2 at002f = ╱fe0000a003╱ // 0x3e9 @0x2f
0x03ba…03f2 at0034 = ╱e2╱+╱ // 0x3ee @0x34
0x03ba…03f2 at0035 = ╱49╱I╱ // 0x3ef @0x35
0x03ba…03f2 at0036 = ╱ee╱)╱ // 0x3f0 @0x36
0x03ba…03f2 at0037 = EOL // 0x3f1 @0x37
0x03ba…03f2 }
0x03f2…03f9 9150 1050 NEXT I
0x03f2…03f9 LineComalBin {
0x03f2…03f9 ptr = 0x9150 // 0x3f2 @0x0
0x03f2…03f9 lno = 0x041a // 0x3f4 @0x2
0x03f2…03f9 at0004 = ╱84╱ NEXT ╱ // 0x3f6 @0x4
0x03f2…03f9 at0005 = ╱49╱I╱ // 0x3f7 @0x5
0x03f2…03f9 at0006 = EOL // 0x3f8 @0x6
0x03f2…03f9 }
0x03f9…040f 9166 1060 PUT FIL2$,J+K:POST5$
0x03f9…040f LineComalBin {
0x03f9…040f ptr = 0x9166 // 0x3f9 @0x0
0x03f9…040f lno = 0x0424 // 0x3fb @0x2
0x03f9…040f at0004 = ╱aa╱ PUT ╱ // 0x3fd @0x4
0x03f9…040f at0005 = ╱46╱F╱ // 0x3fe @0x5
0x03f9…040f at0006 = ╱49╱I╱ // 0x3ff @0x6
0x03f9…040f at0007 = ╱4c╱L╱ // 0x400 @0x7
0x03f9…040f at0008 = ╱32╱2╱ // 0x401 @0x8
0x03f9…040f at0009 = ╱ef╱$╱ // 0x402 @0x9
0x03f9…040f at000a = ╱ec╱,╱ // 0x403 @0xa
0x03f9…040f at000b = ╱4a╱J╱ // 0x404 @0xb
0x03f9…040f at000c = ╱e2╱+╱ // 0x405 @0xc
0x03f9…040f at000d = ╱4b╱K╱ // 0x406 @0xd
0x03f9…040f at000e = ╱f0╱:╱ // 0x407 @0xe
0x03f9…040f at000f = ╱50╱P╱ // 0x408 @0xf
0x03f9…040f at0010 = ╱4f╱O╱ // 0x409 @0x10
0x03f9…040f at0011 = ╱53╱S╱ // 0x40a @0x11
0x03f9…040f at0012 = ╱54╱T╱ // 0x40b @0x12
0x03f9…040f at0013 = ╱35╱5╱ // 0x40c @0x13
0x03f9…040f at0014 = ╱ef╱$╱ // 0x40d @0x14
0x03f9…040f at0015 = EOL // 0x40e @0x15
0x03f9…040f }
0x040f…0416 916d 1070 NEXT K
0x040f…0416 LineComalBin {
0x040f…0416 ptr = 0x916d // 0x40f @0x0
0x040f…0416 lno = 0x042e // 0x411 @0x2
0x040f…0416 at0004 = ╱84╱ NEXT ╱ // 0x413 @0x4
0x040f…0416 at0005 = ╱4b╱K╱ // 0x414 @0x5
0x040f…0416 at0006 = EOL // 0x415 @0x6
0x040f…0416 }
0x0416…0430 9187 1080 EXEC FEJL(-LMNR,-K,FIL2$)
0x0416…0430 LineComalBin {
0x0416…0430 ptr = 0x9187 // 0x416 @0x0
0x0416…0430 lno = 0x0438 // 0x418 @0x2
0x0416…0430 at0004 = ╱9d╱ EXEC ╱ // 0x41a @0x4
0x0416…0430 at0005 = ╱46╱F╱ // 0x41b @0x5
0x0416…0430 at0006 = ╱45╱E╱ // 0x41c @0x6
0x0416…0430 at0007 = ╱4a╱J╱ // 0x41d @0x7
0x0416…0430 at0008 = ╱4c╱L╱ // 0x41e @0x8
0x0416…0430 at0009 = ╱ed╱(╱ // 0x41f @0x9
0x0416…0430 at000a = ╱e9╱-╱ // 0x420 @0xa
0x0416…0430 at000b = ╱4c╱L╱ // 0x421 @0xb
0x0416…0430 at000c = ╱4d╱M╱ // 0x422 @0xc
0x0416…0430 at000d = ╱4e╱N╱ // 0x423 @0xd
0x0416…0430 at000e = ╱52╱R╱ // 0x424 @0xe
0x0416…0430 at000f = ╱ec╱,╱ // 0x425 @0xf
0x0416…0430 at0010 = ╱e9╱-╱ // 0x426 @0x10
0x0416…0430 at0011 = ╱4b╱K╱ // 0x427 @0x11
0x0416…0430 at0012 = ╱ec╱,╱ // 0x428 @0x12
0x0416…0430 at0013 = ╱46╱F╱ // 0x429 @0x13
0x0416…0430 at0014 = ╱49╱I╱ // 0x42a @0x14
0x0416…0430 at0015 = ╱4c╱L╱ // 0x42b @0x15
0x0416…0430 at0016 = ╱32╱2╱ // 0x42c @0x16
0x0416…0430 at0017 = ╱ef╱$╱ // 0x42d @0x17
0x0416…0430 at0018 = ╱ee╱)╱ // 0x42e @0x18
0x0416…0430 at0019 = EOL // 0x42f @0x19
0x0416…0430 }
0x0430…0436 918d 1090 ENDPROC
0x0430…0436 LineComalBin {
0x0430…0436 ptr = 0x918d // 0x430 @0x0
0x0430…0436 lno = 0x0442 // 0x432 @0x2
0x0430…0436 at0004 = ╱9f╱ ENDPROC ╱ // 0x434 @0x4
0x0430…0436 at0005 = EOL // 0x435 @0x5
0x0430…0436 }
0x0436…0447 (14,) 919e 1100 PROC UDLØNMOD(N)
0x0436…0447 LineComalBin {
0x0436…0447 ptr = 0x919e // 0x436 @0x0
0x0436…0447 lno = 0x044c // 0x438 @0x2
0x0436…0447 at0004 = ╱9e╱ PROC ╱ // 0x43a @0x4
0x0436…0447 at0005 = ╱55╱U╱ // 0x43b @0x5
0x0436…0447 at0006 = ╱44╱D╱ // 0x43c @0x6
0x0436…0447 at0007 = ╱4c╱L╱ // 0x43d @0x7
0x0436…0447 at0008 = ╱5c╱Ø╱ // 0x43e @0x8
0x0436…0447 at0009 = ╱4e╱N╱ // 0x43f @0x9
0x0436…0447 at000a = ╱4d╱M╱ // 0x440 @0xa
0x0436…0447 at000b = ╱4f╱O╱ // 0x441 @0xb
0x0436…0447 at000c = ╱44╱D╱ // 0x442 @0xc
0x0436…0447 at000d = ╱ed╱(╱ // 0x443 @0xd
0x0436…0447 at000e = ╱4e╱N╱ // 0x444 @0xe
0x0436…0447 at000f = ╱ee╱)╱ // 0x445 @0xf
0x0436…0447 at0010 = EOL // 0x446 @0x10
0x0436…0447 }
0x0447…045e 91b5 1110 PUT FIL$,G*N-E:POST1$
0x0447…045e LineComalBin {
0x0447…045e ptr = 0x91b5 // 0x447 @0x0
0x0447…045e lno = 0x0456 // 0x449 @0x2
0x0447…045e at0004 = ╱aa╱ PUT ╱ // 0x44b @0x4
0x0447…045e at0005 = ╱46╱F╱ // 0x44c @0x5
0x0447…045e at0006 = ╱49╱I╱ // 0x44d @0x6
0x0447…045e at0007 = ╱4c╱L╱ // 0x44e @0x7
0x0447…045e at0008 = ╱ef╱$╱ // 0x44f @0x8
0x0447…045e at0009 = ╱ec╱,╱ // 0x450 @0x9
0x0447…045e at000a = ╱47╱G╱ // 0x451 @0xa
0x0447…045e at000b = ╱e4╱*╱ // 0x452 @0xb
0x0447…045e at000c = ╱4e╱N╱ // 0x453 @0xc
0x0447…045e at000d = ╱e3╱-╱ // 0x454 @0xd
0x0447…045e at000e = ╱45╱E╱ // 0x455 @0xe
0x0447…045e at000f = ╱f0╱:╱ // 0x456 @0xf
0x0447…045e at0010 = ╱50╱P╱ // 0x457 @0x10
0x0447…045e at0011 = ╱4f╱O╱ // 0x458 @0x11
0x0447…045e at0012 = ╱53╱S╱ // 0x459 @0x12
0x0447…045e at0013 = ╱54╱T╱ // 0x45a @0x13
0x0447…045e at0014 = ╱31╱1╱ // 0x45b @0x14
0x0447…045e at0015 = ╱ef╱$╱ // 0x45c @0x15
0x0447…045e at0016 = EOL // 0x45d @0x16
0x0447…045e }
0x045e…0495 91ec 1120 PUT FIL$,G*N:POST2$,C1,C2,LT,LF,LR,LA,RPI,K1,K2,FG,FD
0x045e…0495 LineComalBin {
0x045e…0495 ptr = 0x91ec // 0x45e @0x0
0x045e…0495 lno = 0x0460 // 0x460 @0x2
0x045e…0495 at0004 = ╱aa╱ PUT ╱ // 0x462 @0x4
0x045e…0495 at0005 = ╱46╱F╱ // 0x463 @0x5
0x045e…0495 at0006 = ╱49╱I╱ // 0x464 @0x6
0x045e…0495 at0007 = ╱4c╱L╱ // 0x465 @0x7
0x045e…0495 at0008 = ╱ef╱$╱ // 0x466 @0x8
0x045e…0495 at0009 = ╱ec╱,╱ // 0x467 @0x9
0x045e…0495 at000a = ╱47╱G╱ // 0x468 @0xa
0x045e…0495 at000b = ╱e4╱*╱ // 0x469 @0xb
0x045e…0495 at000c = ╱4e╱N╱ // 0x46a @0xc
0x045e…0495 at000d = ╱f0╱:╱ // 0x46b @0xd
0x045e…0495 at000e = ╱50╱P╱ // 0x46c @0xe
0x045e…0495 at000f = ╱4f╱O╱ // 0x46d @0xf
0x045e…0495 at0010 = ╱53╱S╱ // 0x46e @0x10
0x045e…0495 at0011 = ╱54╱T╱ // 0x46f @0x11
0x045e…0495 at0012 = ╱32╱2╱ // 0x470 @0x12
0x045e…0495 at0013 = ╱ef╱$╱ // 0x471 @0x13
0x045e…0495 at0014 = ╱ec╱,╱ // 0x472 @0x14
0x045e…0495 at0015 = ╱43╱C╱ // 0x473 @0x15
0x045e…0495 at0016 = ╱31╱1╱ // 0x474 @0x16
0x045e…0495 at0017 = ╱ec╱,╱ // 0x475 @0x17
0x045e…0495 at0018 = ╱43╱C╱ // 0x476 @0x18
0x045e…0495 at0019 = ╱32╱2╱ // 0x477 @0x19
0x045e…0495 at001a = ╱ec╱,╱ // 0x478 @0x1a
0x045e…0495 at001b = ╱4c╱L╱ // 0x479 @0x1b
0x045e…0495 at001c = ╱54╱T╱ // 0x47a @0x1c
0x045e…0495 at001d = ╱ec╱,╱ // 0x47b @0x1d
0x045e…0495 at001e = ╱4c╱L╱ // 0x47c @0x1e
0x045e…0495 at001f = ╱46╱F╱ // 0x47d @0x1f
0x045e…0495 at0020 = ╱ec╱,╱ // 0x47e @0x20
0x045e…0495 at0021 = ╱4c╱L╱ // 0x47f @0x21
0x045e…0495 at0022 = ╱52╱R╱ // 0x480 @0x22
0x045e…0495 at0023 = ╱ec╱,╱ // 0x481 @0x23
0x045e…0495 at0024 = ╱4c╱L╱ // 0x482 @0x24
0x045e…0495 at0025 = ╱41╱A╱ // 0x483 @0x25
0x045e…0495 at0026 = ╱ec╱,╱ // 0x484 @0x26
0x045e…0495 at0027 = ╱52╱R╱ // 0x485 @0x27
0x045e…0495 at0028 = ╱50╱P╱ // 0x486 @0x28
0x045e…0495 at0029 = ╱49╱I╱ // 0x487 @0x29
0x045e…0495 at002a = ╱ec╱,╱ // 0x488 @0x2a
0x045e…0495 at002b = ╱4b╱K╱ // 0x489 @0x2b
0x045e…0495 at002c = ╱31╱1╱ // 0x48a @0x2c
0x045e…0495 at002d = ╱ec╱,╱ // 0x48b @0x2d
0x045e…0495 at002e = ╱4b╱K╱ // 0x48c @0x2e
0x045e…0495 at002f = ╱32╱2╱ // 0x48d @0x2f
0x045e…0495 at0030 = ╱ec╱,╱ // 0x48e @0x30
0x045e…0495 at0031 = ╱46╱F╱ // 0x48f @0x31
0x045e…0495 at0032 = ╱47╱G╱ // 0x490 @0x32
0x045e…0495 at0033 = ╱ec╱,╱ // 0x491 @0x33
0x045e…0495 at0034 = ╱46╱F╱ // 0x492 @0x34
0x045e…0495 at0035 = ╱44╱D╱ // 0x493 @0x35
0x045e…0495 at0036 = EOL // 0x494 @0x36
0x045e…0495 }
0x0495…04a9 9200 1130 EXEC FEJL(G,N,FIL$)
0x0495…04a9 LineComalBin {
0x0495…04a9 ptr = 0x9200 // 0x495 @0x0
0x0495…04a9 lno = 0x046a // 0x497 @0x2
0x0495…04a9 at0004 = ╱9d╱ EXEC ╱ // 0x499 @0x4
0x0495…04a9 at0005 = ╱46╱F╱ // 0x49a @0x5
0x0495…04a9 at0006 = ╱45╱E╱ // 0x49b @0x6
0x0495…04a9 at0007 = ╱4a╱J╱ // 0x49c @0x7
0x0495…04a9 at0008 = ╱4c╱L╱ // 0x49d @0x8
0x0495…04a9 at0009 = ╱ed╱(╱ // 0x49e @0x9
0x0495…04a9 at000a = ╱47╱G╱ // 0x49f @0xa
0x0495…04a9 at000b = ╱ec╱,╱ // 0x4a0 @0xb
0x0495…04a9 at000c = ╱4e╱N╱ // 0x4a1 @0xc
0x0495…04a9 at000d = ╱ec╱,╱ // 0x4a2 @0xd
0x0495…04a9 at000e = ╱46╱F╱ // 0x4a3 @0xe
0x0495…04a9 at000f = ╱49╱I╱ // 0x4a4 @0xf
0x0495…04a9 at0010 = ╱4c╱L╱ // 0x4a5 @0x10
0x0495…04a9 at0011 = ╱ef╱$╱ // 0x4a6 @0x11
0x0495…04a9 at0012 = ╱ee╱)╱ // 0x4a7 @0x12
0x0495…04a9 at0013 = EOL // 0x4a8 @0x13
0x0495…04a9 }
0x04a9…04af 9206 1140 ENDPROC
0x04a9…04af LineComalBin {
0x04a9…04af ptr = 0x9206 // 0x4a9 @0x0
0x04a9…04af lno = 0x0474 // 0x4ab @0x2
0x04a9…04af at0004 = ╱9f╱ ENDPROC ╱ // 0x4ad @0x4
0x04a9…04af at0005 = EOL // 0x4ae @0x5
0x04a9…04af }
0x04af…04c7 921e 1150 PROC CONV(NR2,OK22,CIF)
0x04af…04c7 LineComalBin {
0x04af…04c7 ptr = 0x921e // 0x4af @0x0
0x04af…04c7 lno = 0x047e // 0x4b1 @0x2
0x04af…04c7 at0004 = ╱9e╱ PROC ╱ // 0x4b3 @0x4
0x04af…04c7 at0005 = ╱43╱C╱ // 0x4b4 @0x5
0x04af…04c7 at0006 = ╱4f╱O╱ // 0x4b5 @0x6
0x04af…04c7 at0007 = ╱4e╱N╱ // 0x4b6 @0x7
0x04af…04c7 at0008 = ╱56╱V╱ // 0x4b7 @0x8
0x04af…04c7 at0009 = ╱ed╱(╱ // 0x4b8 @0x9
0x04af…04c7 at000a = ╱4e╱N╱ // 0x4b9 @0xa
0x04af…04c7 at000b = ╱52╱R╱ // 0x4ba @0xb
0x04af…04c7 at000c = ╱32╱2╱ // 0x4bb @0xc
0x04af…04c7 at000d = ╱ec╱,╱ // 0x4bc @0xd
0x04af…04c7 at000e = ╱4f╱O╱ // 0x4bd @0xe
0x04af…04c7 at000f = ╱4b╱K╱ // 0x4be @0xf
0x04af…04c7 at0010 = ╱32╱2╱ // 0x4bf @0x10
0x04af…04c7 at0011 = ╱32╱2╱ // 0x4c0 @0x11
0x04af…04c7 at0012 = ╱ec╱,╱ // 0x4c1 @0x12
0x04af…04c7 at0013 = ╱43╱C╱ // 0x4c2 @0x13
0x04af…04c7 at0014 = ╱49╱I╱ // 0x4c3 @0x14
0x04af…04c7 at0015 = ╱46╱F╱ // 0x4c4 @0x15
0x04af…04c7 at0016 = ╱ee╱)╱ // 0x4c5 @0x16
0x04af…04c7 at0017 = EOL // 0x4c6 @0x17
0x04af…04c7 }
0x04c7…04d4 922b 1160 OK2=OK22
0x04c7…04d4 LineComalBin {
0x04c7…04d4 ptr = 0x922b // 0x4c7 @0x0
0x04c7…04d4 lno = 0x0488 // 0x4c9 @0x2
0x04c7…04d4 at0004 = ╱4f╱O╱ // 0x4cb @0x4
0x04c7…04d4 at0005 = ╱4b╱K╱ // 0x4cc @0x5
0x04c7…04d4 at0006 = ╱32╱2╱ // 0x4cd @0x6
0x04c7…04d4 at0007 = ╱dc╱=╱ // 0x4ce @0x7
0x04c7…04d4 at0008 = ╱4f╱O╱ // 0x4cf @0x8
0x04c7…04d4 at0009 = ╱4b╱K╱ // 0x4d0 @0x9
0x04c7…04d4 at000a = ╱32╱2╱ // 0x4d1 @0xa
0x04c7…04d4 at000b = ╱32╱2╱ // 0x4d2 @0xb
0x04c7…04d4 at000c = EOL // 0x4d3 @0xc
0x04c7…04d4 }
0x04d4…04e0 9237 1170 NR2$=""
0x04d4…04e0 LineComalBin {
0x04d4…04e0 ptr = 0x9237 // 0x4d4 @0x0
0x04d4…04e0 lno = 0x0492 // 0x4d6 @0x2
0x04d4…04e0 at0004 = ╱4e╱N╱ // 0x4d8 @0x4
0x04d4…04e0 at0005 = ╱52╱R╱ // 0x4d9 @0x5
0x04d4…04e0 at0006 = ╱32╱2╱ // 0x4da @0x6
0x04d4…04e0 at0007 = ╱ef╱$╱ // 0x4db @0x7
0x04d4…04e0 at0008 = ╱dc╱=╱ // 0x4dc @0x8
0x04d4…04e0 at0009 = ╱22╱"╱ // 0x4dd @0x9
0x04d4…04e0 at000a = ╱22╱"╱ // 0x4de @0xa
0x04d4…04e0 at000b = EOL // 0x4df @0xb
0x04d4…04e0 }
0x04e0…04e6 923d 1180 REPEAT
0x04e0…04e6 LineComalBin {
0x04e0…04e6 ptr = 0x923d // 0x4e0 @0x0
0x04e0…04e6 lno = 0x049c // 0x4e2 @0x2
0x04e0…04e6 at0004 = ╱97╱ REPEAT ╱ // 0x4e4 @0x4
0x04e0…04e6 at0005 = EOL // 0x4e5 @0x5
0x04e0…04e6 }
0x04e6…050d 9264 1190 NR2$=CHR((OK2 MOD 10)+48)+NR2$
0x04e6…050d LineComalBin {
0x04e6…050d ptr = 0x9264 // 0x4e6 @0x0
0x04e6…050d lno = 0x04a6 // 0x4e8 @0x2
0x04e6…050d at0004 = ╱4e╱N╱ // 0x4ea @0x4
0x04e6…050d at0005 = ╱52╱R╱ // 0x4eb @0x5
0x04e6…050d at0006 = ╱32╱2╱ // 0x4ec @0x6
0x04e6…050d at0007 = ╱ef╱$╱ // 0x4ed @0x7
0x04e6…050d at0008 = ╱dc╱=╱ // 0x4ee @0x8
0x04e6…050d at0009 = ╱cf╱CHR╱ // 0x4ef @0x9
0x04e6…050d at000a = ╱ed╱(╱ // 0x4f0 @0xa
0x04e6…050d at000b = ╱ed╱(╱ // 0x4f1 @0xb
0x04e6…050d at000c = ╱4f╱O╱ // 0x4f2 @0xc
0x04e6…050d at000d = ╱4b╱K╱ // 0x4f3 @0xd
0x04e6…050d at000e = ╱32╱2╱ // 0x4f4 @0xe
0x04e6…050d at000f = ╱e8╱ MOD ╱ // 0x4f5 @0xf
0x04e6…050d at0010 = ╱31╱1╱ // 0x4f6 @0x10
0x04e6…050d at0011 = ╱30╱0╱ // 0x4f7 @0x11
0x04e6…050d at0012 = ╱fe0000a004╱ // 0x4f8 @0x12
0x04e6…050d at0017 = ╱ee╱)╱ // 0x4fd @0x17
0x04e6…050d at0018 = ╱e2╱+╱ // 0x4fe @0x18
0x04e6…050d at0019 = ╱34╱4╱ // 0x4ff @0x19
0x04e6…050d at001a = ╱38╱8╱ // 0x500 @0x1a
0x04e6…050d at001b = ╱fe0000c006╱ // 0x501 @0x1b
0x04e6…050d at0020 = ╱ee╱)╱ // 0x506 @0x20
0x04e6…050d at0021 = ╱f1╱+╱ // 0x507 @0x21
0x04e6…050d at0022 = ╱4e╱N╱ // 0x508 @0x22
0x04e6…050d at0023 = ╱52╱R╱ // 0x509 @0x23
0x04e6…050d at0024 = ╱32╱2╱ // 0x50a @0x24
0x04e6…050d at0025 = ╱ef╱$╱ // 0x50b @0x25
0x04e6…050d at0026 = EOL // 0x50c @0x26
0x04e6…050d }
0x050d…051b 9272 1200 CIF=CIF-E
0x050d…051b LineComalBin {
0x050d…051b ptr = 0x9272 // 0x50d @0x0
0x050d…051b lno = 0x04b0 // 0x50f @0x2
0x050d…051b at0004 = ╱43╱C╱ // 0x511 @0x4
0x050d…051b at0005 = ╱49╱I╱ // 0x512 @0x5
0x050d…051b at0006 = ╱46╱F╱ // 0x513 @0x6
0x050d…051b at0007 = ╱dc╱=╱ // 0x514 @0x7
0x050d…051b at0008 = ╱43╱C╱ // 0x515 @0x8
0x050d…051b at0009 = ╱49╱I╱ // 0x516 @0x9
0x050d…051b at000a = ╱46╱F╱ // 0x517 @0xa
0x050d…051b at000b = ╱e3╱-╱ // 0x518 @0xb
0x050d…051b at000c = ╱45╱E╱ // 0x519 @0xc
0x050d…051b at000d = EOL // 0x51a @0xd
0x050d…051b }
0x051b…052f 9286 1210 OK2=OK2 DIV 10
0x051b…052f LineComalBin {
0x051b…052f ptr = 0x9286 // 0x51b @0x0
0x051b…052f lno = 0x04ba // 0x51d @0x2
0x051b…052f at0004 = ╱4f╱O╱ // 0x51f @0x4
0x051b…052f at0005 = ╱4b╱K╱ // 0x520 @0x5
0x051b…052f at0006 = ╱32╱2╱ // 0x521 @0x6
0x051b…052f at0007 = ╱dc╱=╱ // 0x522 @0x7
0x051b…052f at0008 = ╱4f╱O╱ // 0x523 @0x8
0x051b…052f at0009 = ╱4b╱K╱ // 0x524 @0x9
0x051b…052f at000a = ╱32╱2╱ // 0x525 @0xa
0x051b…052f at000b = ╱e7╱ DIV ╱ // 0x526 @0xb
0x051b…052f at000c = ╱31╱1╱ // 0x527 @0xc
0x051b…052f at000d = ╱30╱0╱ // 0x528 @0xd
0x051b…052f at000e = ╱fe0000a004╱ // 0x529 @0xe
0x051b…052f at0013 = EOL // 0x52e @0x13
0x051b…052f }
0x052f…0546 929d 1220 IF CIF<B AND OK2=B THEN CIF=B
0x052f…0546 LineComalBin {
0x052f…0546 ptr = 0x929d // 0x52f @0x0
0x052f…0546 lno = 0x04c4 // 0x531 @0x2
0x052f…0546 at0004 = ╱82╱ IF ╱ // 0x533 @0x4
0x052f…0546 at0005 = ╱43╱C╱ // 0x534 @0x5
0x052f…0546 at0006 = ╱49╱I╱ // 0x535 @0x6
0x052f…0546 at0007 = ╱46╱F╱ // 0x536 @0x7
0x052f…0546 at0008 = ╱dd╱<╱ // 0x537 @0x8
0x052f…0546 at0009 = ╱42╱B╱ // 0x538 @0x9
0x052f…0546 at000a = ╱da╱ AND ╱ // 0x539 @0xa
0x052f…0546 at000b = ╱4f╱O╱ // 0x53a @0xb
0x052f…0546 at000c = ╱4b╱K╱ // 0x53b @0xc
0x052f…0546 at000d = ╱32╱2╱ // 0x53c @0xd
0x052f…0546 at000e = ╱dc╱=╱ // 0x53d @0xe
0x052f…0546 at000f = ╱42╱B╱ // 0x53e @0xf
0x052f…0546 at0010 = ╱b6╱ THEN ╱ // 0x53f @0x10
0x052f…0546 at0011 = ╱43╱C╱ // 0x540 @0x11
0x052f…0546 at0012 = ╱49╱I╱ // 0x541 @0x12
0x052f…0546 at0013 = ╱46╱F╱ // 0x542 @0x13
0x052f…0546 at0014 = ╱dc╱=╱ // 0x543 @0x14
0x052f…0546 at0015 = ╱42╱B╱ // 0x544 @0x15
0x052f…0546 at0016 = EOL // 0x545 @0x16
0x052f…0546 }
0x0546…0551 92a8 1230 UNTIL CIF=B
0x0546…0551 LineComalBin {
0x0546…0551 ptr = 0x92a8 // 0x546 @0x0
0x0546…0551 lno = 0x04ce // 0x548 @0x2
0x0546…0551 at0004 = ╱98╱ UNTIL ╱ // 0x54a @0x4
0x0546…0551 at0005 = ╱43╱C╱ // 0x54b @0x5
0x0546…0551 at0006 = ╱49╱I╱ // 0x54c @0x6
0x0546…0551 at0007 = ╱46╱F╱ // 0x54d @0x7
0x0546…0551 at0008 = ╱dc╱=╱ // 0x54e @0x8
0x0546…0551 at0009 = ╱42╱B╱ // 0x54f @0x9
0x0546…0551 at000a = EOL // 0x550 @0xa
0x0546…0551 }
0x0551…0557 92ae 1240 ENDPROC
0x0551…0557 LineComalBin {
0x0551…0557 ptr = 0x92ae // 0x551 @0x0
0x0551…0557 lno = 0x04d8 // 0x553 @0x2
0x0551…0557 at0004 = ╱9f╱ ENDPROC ╱ // 0x555 @0x4
0x0551…0557 at0005 = EOL // 0x556 @0x5
0x0551…0557 }
0x0557…0564 92bb 1890 PROC INDVIRK
0x0557…0564 LineComalBin {
0x0557…0564 ptr = 0x92bb // 0x557 @0x0
0x0557…0564 lno = 0x0762 // 0x559 @0x2
0x0557…0564 at0004 = ╱9e╱ PROC ╱ // 0x55b @0x4
0x0557…0564 at0005 = ╱49╱I╱ // 0x55c @0x5
0x0557…0564 at0006 = ╱4e╱N╱ // 0x55d @0x6
0x0557…0564 at0007 = ╱44╱D╱ // 0x55e @0x7
0x0557…0564 at0008 = ╱56╱V╱ // 0x55f @0x8
0x0557…0564 at0009 = ╱49╱I╱ // 0x560 @0x9
0x0557…0564 at000a = ╱52╱R╱ // 0x561 @0xa
0x0557…0564 at000b = ╱4b╱K╱ // 0x562 @0xb
0x0557…0564 at000c = EOL // 0x563 @0xc
0x0557…0564 }
0x0564…0570 92c7 1900 OPEN FIL$,R
0x0564…0570 LineComalBin {
0x0564…0570 ptr = 0x92c7 // 0x564 @0x0
0x0564…0570 lno = 0x076c // 0x566 @0x2
0x0564…0570 at0004 = ╱a7╱ OPEN ╱ // 0x568 @0x4
0x0564…0570 at0005 = ╱46╱F╱ // 0x569 @0x5
0x0564…0570 at0006 = ╱49╱I╱ // 0x56a @0x6
0x0564…0570 at0007 = ╱4c╱L╱ // 0x56b @0x7
0x0564…0570 at0008 = ╱ef╱$╱ // 0x56c @0x8
0x0564…0570 at0009 = ╱ec╱,╱ // 0x56d @0x9
0x0564…0570 at000a = ╱52╱R╱ // 0x56e @0xa
0x0564…0570 at000b = EOL // 0x56f @0xb
0x0564…0570 }
0x0570…0584 92db 1910 EXEC FEJL(B,B,FIL$)
0x0570…0584 LineComalBin {
0x0570…0584 ptr = 0x92db // 0x570 @0x0
0x0570…0584 lno = 0x0776 // 0x572 @0x2
0x0570…0584 at0004 = ╱9d╱ EXEC ╱ // 0x574 @0x4
0x0570…0584 at0005 = ╱46╱F╱ // 0x575 @0x5
0x0570…0584 at0006 = ╱45╱E╱ // 0x576 @0x6
0x0570…0584 at0007 = ╱4a╱J╱ // 0x577 @0x7
0x0570…0584 at0008 = ╱4c╱L╱ // 0x578 @0x8
0x0570…0584 at0009 = ╱ed╱(╱ // 0x579 @0x9
0x0570…0584 at000a = ╱42╱B╱ // 0x57a @0xa
0x0570…0584 at000b = ╱ec╱,╱ // 0x57b @0xb
0x0570…0584 at000c = ╱42╱B╱ // 0x57c @0xc
0x0570…0584 at000d = ╱ec╱,╱ // 0x57d @0xd
0x0570…0584 at000e = ╱46╱F╱ // 0x57e @0xe
0x0570…0584 at000f = ╱49╱I╱ // 0x57f @0xf
0x0570…0584 at0010 = ╱4c╱L╱ // 0x580 @0x10
0x0570…0584 at0011 = ╱ef╱$╱ // 0x581 @0x11
0x0570…0584 at0012 = ╱ee╱)╱ // 0x582 @0x12
0x0570…0584 at0013 = EOL // 0x583 @0x13
0x0570…0584 }
0x0584…0597 92ee 1920 GET FIL$,E:POST3$
0x0584…0597 LineComalBin {
0x0584…0597 ptr = 0x92ee // 0x584 @0x0
0x0584…0597 lno = 0x0780 // 0x586 @0x2
0x0584…0597 at0004 = ╱a9╱ GET ╱ // 0x588 @0x4
0x0584…0597 at0005 = ╱46╱F╱ // 0x589 @0x5
0x0584…0597 at0006 = ╱49╱I╱ // 0x58a @0x6
0x0584…0597 at0007 = ╱4c╱L╱ // 0x58b @0x7
0x0584…0597 at0008 = ╱ef╱$╱ // 0x58c @0x8
0x0584…0597 at0009 = ╱ec╱,╱ // 0x58d @0x9
0x0584…0597 at000a = ╱45╱E╱ // 0x58e @0xa
0x0584…0597 at000b = ╱f0╱:╱ // 0x58f @0xb
0x0584…0597 at000c = ╱50╱P╱ // 0x590 @0xc
0x0584…0597 at000d = ╱4f╱O╱ // 0x591 @0xd
0x0584…0597 at000e = ╱53╱S╱ // 0x592 @0xe
0x0584…0597 at000f = ╱54╱T╱ // 0x593 @0xf
0x0584…0597 at0010 = ╱33╱3╱ // 0x594 @0x10
0x0584…0597 at0011 = ╱ef╱$╱ // 0x595 @0x11
0x0584…0597 at0012 = EOL // 0x596 @0x12
0x0584…0597 }
0x0597…05bc 9313 1930 GET FIL$,G:POST4$,SLJNR,MLMNR,ATPLM
0x0597…05bc LineComalBin {
0x0597…05bc ptr = 0x9313 // 0x597 @0x0
0x0597…05bc lno = 0x078a // 0x599 @0x2
0x0597…05bc at0004 = ╱a9╱ GET ╱ // 0x59b @0x4
0x0597…05bc at0005 = ╱46╱F╱ // 0x59c @0x5
0x0597…05bc at0006 = ╱49╱I╱ // 0x59d @0x6
0x0597…05bc at0007 = ╱4c╱L╱ // 0x59e @0x7
0x0597…05bc at0008 = ╱ef╱$╱ // 0x59f @0x8
0x0597…05bc at0009 = ╱ec╱,╱ // 0x5a0 @0x9
0x0597…05bc at000a = ╱47╱G╱ // 0x5a1 @0xa
0x0597…05bc at000b = ╱f0╱:╱ // 0x5a2 @0xb
0x0597…05bc at000c = ╱50╱P╱ // 0x5a3 @0xc
0x0597…05bc at000d = ╱4f╱O╱ // 0x5a4 @0xd
0x0597…05bc at000e = ╱53╱S╱ // 0x5a5 @0xe
0x0597…05bc at000f = ╱54╱T╱ // 0x5a6 @0xf
0x0597…05bc at0010 = ╱34╱4╱ // 0x5a7 @0x10
0x0597…05bc at0011 = ╱ef╱$╱ // 0x5a8 @0x11
0x0597…05bc at0012 = ╱ec╱,╱ // 0x5a9 @0x12
0x0597…05bc at0013 = ╱53╱S╱ // 0x5aa @0x13
0x0597…05bc at0014 = ╱4c╱L╱ // 0x5ab @0x14
0x0597…05bc at0015 = ╱4a╱J╱ // 0x5ac @0x15
0x0597…05bc at0016 = ╱4e╱N╱ // 0x5ad @0x16
0x0597…05bc at0017 = ╱52╱R╱ // 0x5ae @0x17
0x0597…05bc at0018 = ╱ec╱,╱ // 0x5af @0x18
0x0597…05bc at0019 = ╱4d╱M╱ // 0x5b0 @0x19
0x0597…05bc at001a = ╱4c╱L╱ // 0x5b1 @0x1a
0x0597…05bc at001b = ╱4d╱M╱ // 0x5b2 @0x1b
0x0597…05bc at001c = ╱4e╱N╱ // 0x5b3 @0x1c
0x0597…05bc at001d = ╱52╱R╱ // 0x5b4 @0x1d
0x0597…05bc at001e = ╱ec╱,╱ // 0x5b5 @0x1e
0x0597…05bc at001f = ╱41╱A╱ // 0x5b6 @0x1f
0x0597…05bc at0020 = ╱54╱T╱ // 0x5b7 @0x20
0x0597…05bc at0021 = ╱50╱P╱ // 0x5b8 @0x21
0x0597…05bc at0022 = ╱4c╱L╱ // 0x5b9 @0x22
0x0597…05bc at0023 = ╱4d╱M╱ // 0x5ba @0x23
0x0597…05bc at0024 = EOL // 0x5bb @0x24
0x0597…05bc }
0x05bc…05c2 9319 1940 ENDPROC
0x05bc…05c2 LineComalBin {
0x05bc…05c2 ptr = 0x9319 // 0x5bc @0x0
0x05bc…05c2 lno = 0x0794 // 0x5be @0x2
0x05bc…05c2 at0004 = ╱9f╱ ENDPROC ╱ // 0x5c0 @0x4
0x05bc…05c2 at0005 = EOL // 0x5c1 @0x5
0x05bc…05c2 }
0x05c2…05d6 932d 1950 PROC FEJL(P1,P2,P3)
0x05c2…05d6 LineComalBin {
0x05c2…05d6 ptr = 0x932d // 0x5c2 @0x0
0x05c2…05d6 lno = 0x079e // 0x5c4 @0x2
0x05c2…05d6 at0004 = ╱9e╱ PROC ╱ // 0x5c6 @0x4
0x05c2…05d6 at0005 = ╱46╱F╱ // 0x5c7 @0x5
0x05c2…05d6 at0006 = ╱45╱E╱ // 0x5c8 @0x6
0x05c2…05d6 at0007 = ╱4a╱J╱ // 0x5c9 @0x7
0x05c2…05d6 at0008 = ╱4c╱L╱ // 0x5ca @0x8
0x05c2…05d6 at0009 = ╱ed╱(╱ // 0x5cb @0x9
0x05c2…05d6 at000a = ╱50╱P╱ // 0x5cc @0xa
0x05c2…05d6 at000b = ╱31╱1╱ // 0x5cd @0xb
0x05c2…05d6 at000c = ╱ec╱,╱ // 0x5ce @0xc
0x05c2…05d6 at000d = ╱50╱P╱ // 0x5cf @0xd
0x05c2…05d6 at000e = ╱32╱2╱ // 0x5d0 @0xe
0x05c2…05d6 at000f = ╱ec╱,╱ // 0x5d1 @0xf
0x05c2…05d6 at0010 = ╱50╱P╱ // 0x5d2 @0x10
0x05c2…05d6 at0011 = ╱33╱3╱ // 0x5d3 @0x11
0x05c2…05d6 at0012 = ╱ee╱)╱ // 0x5d4 @0x12
0x05c2…05d6 at0013 = EOL // 0x5d5 @0x13
0x05c2…05d6 }
0x05d6…05e5 933c 1960 IF STATUS(P3$)<>B THEN
0x05d6…05e5 LineComalBin {
0x05d6…05e5 ptr = 0x933c // 0x5d6 @0x0
0x05d6…05e5 lno = 0x07a8 // 0x5d8 @0x2
0x05d6…05e5 at0004 = ╱9c╱ IF ╱ // 0x5da @0x4
0x05d6…05e5 at0005 = ╱ce╱STATUS╱ // 0x5db @0x5
0x05d6…05e5 at0006 = ╱ed╱(╱ // 0x5dc @0x6
0x05d6…05e5 at0007 = ╱50╱P╱ // 0x5dd @0x7
0x05d6…05e5 at0008 = ╱33╱3╱ // 0x5de @0x8
0x05d6…05e5 at0009 = ╱ef╱$╱ // 0x5df @0x9
0x05d6…05e5 at000a = ╱ee╱)╱ // 0x5e0 @0xa
0x05d6…05e5 at000b = ╱e1╱<>╱ // 0x5e1 @0xb
0x05d6…05e5 at000c = ╱42╱B╱ // 0x5e2 @0xc
0x05d6…05e5 at000d = ╱b6╱ THEN ╱ // 0x5e3 @0xd
0x05d6…05e5 at000e = EOL // 0x5e4 @0xe
0x05d6…05e5 }
0x05e5…05ec 9343 1970 OUTPUT T
0x05e5…05ec LineComalBin {
0x05e5…05ec ptr = 0x9343 // 0x5e5 @0x0
0x05e5…05ec lno = 0x07b2 // 0x5e7 @0x2
0x05e5…05ec at0004 = ╱a5╱ OUTPUT ╱ // 0x5e9 @0x4
0x05e5…05ec at0005 = ╱54╱T╱ // 0x5ea @0x5
0x05e5…05ec at0006 = EOL // 0x5eb @0x6
0x05e5…05ec }
0x05ec…060e 9365 1980 PRINT "FIL-FEJL ";P3$;STATUS(P3$),P1;P2
0x05ec…060e LineComalBin {
0x05ec…060e ptr = 0x9365 // 0x5ec @0x0
0x05ec…060e lno = 0x07bc // 0x5ee @0x2
0x05ec…060e at0004 = ╱92╱ PRINT ╱ // 0x5f0 @0x4
0x05ec…060e at0005 = ╱22╱"╱ // 0x5f1 @0x5
0x05ec…060e at0006 = ╱46╱F╱ // 0x5f2 @0x6
0x05ec…060e at0007 = ╱49╱I╱ // 0x5f3 @0x7
0x05ec…060e at0008 = ╱4c╱L╱ // 0x5f4 @0x8
0x05ec…060e at0009 = ╱2d╱-╱ // 0x5f5 @0x9
0x05ec…060e at000a = ╱46╱F╱ // 0x5f6 @0xa
0x05ec…060e at000b = ╱45╱E╱ // 0x5f7 @0xb
0x05ec…060e at000c = ╱4a╱J╱ // 0x5f8 @0xc
0x05ec…060e at000d = ╱4c╱L╱ // 0x5f9 @0xd
0x05ec…060e at000e = ╱20╱…╱ // 0x5fa @0xe
0x05ec…060e at000f = ╱22╱"╱ // 0x5fb @0xf
0x05ec…060e at0010 = ╱eb╱;╱ // 0x5fc @0x10
0x05ec…060e at0011 = ╱50╱P╱ // 0x5fd @0x11
0x05ec…060e at0012 = ╱33╱3╱ // 0x5fe @0x12
0x05ec…060e at0013 = ╱ef╱$╱ // 0x5ff @0x13
0x05ec…060e at0014 = ╱eb╱;╱ // 0x600 @0x14
0x05ec…060e at0015 = ╱ce╱STATUS╱ // 0x601 @0x15
0x05ec…060e at0016 = ╱ed╱(╱ // 0x602 @0x16
0x05ec…060e at0017 = ╱50╱P╱ // 0x603 @0x17
0x05ec…060e at0018 = ╱33╱3╱ // 0x604 @0x18
0x05ec…060e at0019 = ╱ef╱$╱ // 0x605 @0x19
0x05ec…060e at001a = ╱ee╱)╱ // 0x606 @0x1a
0x05ec…060e at001b = ╱ec╱,╱ // 0x607 @0x1b
0x05ec…060e at001c = ╱50╱P╱ // 0x608 @0x1c
0x05ec…060e at001d = ╱31╱1╱ // 0x609 @0x1d
0x05ec…060e at001e = ╱eb╱;╱ // 0x60a @0x1e
0x05ec…060e at001f = ╱50╱P╱ // 0x60b @0x1f
0x05ec…060e at0020 = ╱32╱2╱ // 0x60c @0x20
0x05ec…060e at0021 = EOL // 0x60d @0x21
0x05ec…060e }
0x060e…0614 936b 1990 STOP
0x060e…0614 LineComalBin {
0x060e…0614 ptr = 0x936b // 0x60e @0x0
0x060e…0614 lno = 0x07c6 // 0x610 @0x2
0x060e…0614 at0004 = ╱8d╱ STOP ╱ // 0x612 @0x4
0x060e…0614 at0005 = EOL // 0x613 @0x5
0x060e…0614 }
0x0614…061a 9371 2000 ENDIF
0x0614…061a LineComalBin {
0x0614…061a ptr = 0x9371 // 0x614 @0x0
0x0614…061a lno = 0x07d0 // 0x616 @0x2
0x0614…061a at0004 = ╱9b╱ ENDIF ╱ // 0x618 @0x4
0x0614…061a at0005 = EOL // 0x619 @0x5
0x0614…061a }
0x061a…0620 9377 2010 ENDPROC
0x061a…0620 LineComalBin {
0x061a…0620 ptr = 0x9377 // 0x61a @0x0
0x061a…0620 lno = 0x07da // 0x61c @0x2
0x061a…0620 at0004 = ╱9f╱ ENDPROC ╱ // 0x61e @0x4
0x061a…0620 at0005 = EOL // 0x61f @0x5
0x061a…0620 }
0x0620…062b 9382 3440 PROC NÆSTE
0x0620…062b LineComalBin {
0x0620…062b ptr = 0x9382 // 0x620 @0x0
0x0620…062b lno = 0x0d70 // 0x622 @0x2
0x0620…062b at0004 = ╱9e╱ PROC ╱ // 0x624 @0x4
0x0620…062b at0005 = ╱4e╱N╱ // 0x625 @0x5
0x0620…062b at0006 = ╱5b╱Æ╱ // 0x626 @0x6
0x0620…062b at0007 = ╱53╱S╱ // 0x627 @0x7
0x0620…062b at0008 = ╱54╱T╱ // 0x628 @0x8
0x0620…062b at0009 = ╱45╱E╱ // 0x629 @0x9
0x0620…062b at000a = EOL // 0x62a @0xa
0x0620…062b }
0x062b…0631 9388 3450 REPEAT
0x062b…0631 LineComalBin {
0x062b…0631 ptr = 0x9388 // 0x62b @0x0
0x062b…0631 lno = 0x0d7a // 0x62d @0x2
0x062b…0631 at0004 = ╱97╱ REPEAT ╱ // 0x62f @0x4
0x062b…0631 at0005 = EOL // 0x630 @0x5
0x062b…0631 }
0x0631…0641 9398 3460 LMNR=LMNR+E
0x0631…0641 LineComalBin {
0x0631…0641 ptr = 0x9398 // 0x631 @0x0
0x0631…0641 lno = 0x0d84 // 0x633 @0x2
0x0631…0641 at0004 = ╱4c╱L╱ // 0x635 @0x4
0x0631…0641 at0005 = ╱4d╱M╱ // 0x636 @0x5
0x0631…0641 at0006 = ╱4e╱N╱ // 0x637 @0x6
0x0631…0641 at0007 = ╱52╱R╱ // 0x638 @0x7
0x0631…0641 at0008 = ╱dc╱=╱ // 0x639 @0x8
0x0631…0641 at0009 = ╱4c╱L╱ // 0x63a @0x9
0x0631…0641 at000a = ╱4d╱M╱ // 0x63b @0xa
0x0631…0641 at000b = ╱4e╱N╱ // 0x63c @0xb
0x0631…0641 at000c = ╱52╱R╱ // 0x63d @0xc
0x0631…0641 at000d = ╱e2╱+╱ // 0x63e @0xd
0x0631…0641 at000e = ╱45╱E╱ // 0x63f @0xe
0x0631…0641 at000f = EOL // 0x640 @0xf
0x0631…0641 }
0x0641…064a 93a1 3470 LA=E
0x0641…064a LineComalBin {
0x0641…064a ptr = 0x93a1 // 0x641 @0x0
0x0641…064a lno = 0x0d8e // 0x643 @0x2
0x0641…064a at0004 = ╱4c╱L╱ // 0x645 @0x4
0x0641…064a at0005 = ╱41╱A╱ // 0x646 @0x5
0x0641…064a at0006 = ╱dc╱=╱ // 0x647 @0x6
0x0641…064a at0007 = ╱45╱E╱ // 0x648 @0x7
0x0641…064a at0008 = EOL // 0x649 @0x8
0x0641…064a }
0x064a…065b 93b2 3480 IF LMNR<=MLMNR THEN
0x064a…065b LineComalBin {
0x064a…065b ptr = 0x93b2 // 0x64a @0x0
0x064a…065b lno = 0x0d98 // 0x64c @0x2
0x064a…065b at0004 = ╱9c╱ IF ╱ // 0x64e @0x4
0x064a…065b at0005 = ╱4c╱L╱ // 0x64f @0x5
0x064a…065b at0006 = ╱4d╱M╱ // 0x650 @0x6
0x064a…065b at0007 = ╱4e╱N╱ // 0x651 @0x7
0x064a…065b at0008 = ╱52╱R╱ // 0x652 @0x8
0x064a…065b at0009 = ╱df╱<=╱ // 0x653 @0x9
0x064a…065b at000a = ╱4d╱M╱ // 0x654 @0xa
0x064a…065b at000b = ╱4c╱L╱ // 0x655 @0xb
0x064a…065b at000c = ╱4d╱M╱ // 0x656 @0xc
0x064a…065b at000d = ╱4e╱N╱ // 0x657 @0xd
0x064a…065b at000e = ╱52╱R╱ // 0x658 @0xe
0x064a…065b at000f = ╱b6╱ THEN ╱ // 0x659 @0xf
0x064a…065b at0010 = EOL // 0x65a @0x10
0x064a…065b }
0x065b…066f 93c6 3490 EXEC INLØNMOD(LMNR)
0x065b…066f LineComalBin {
0x065b…066f ptr = 0x93c6 // 0x65b @0x0
0x065b…066f lno = 0x0da2 // 0x65d @0x2
0x065b…066f at0004 = ╱9d╱ EXEC ╱ // 0x65f @0x4
0x065b…066f at0005 = ╱49╱I╱ // 0x660 @0x5
0x065b…066f at0006 = ╱4e╱N╱ // 0x661 @0x6
0x065b…066f at0007 = ╱4c╱L╱ // 0x662 @0x7
0x065b…066f at0008 = ╱5c╱Ø╱ // 0x663 @0x8
0x065b…066f at0009 = ╱4e╱N╱ // 0x664 @0x9
0x065b…066f at000a = ╱4d╱M╱ // 0x665 @0xa
0x065b…066f at000b = ╱4f╱O╱ // 0x666 @0xb
0x065b…066f at000c = ╱44╱D╱ // 0x667 @0xc
0x065b…066f at000d = ╱ed╱(╱ // 0x668 @0xd
0x065b…066f at000e = ╱4c╱L╱ // 0x669 @0xe
0x065b…066f at000f = ╱4d╱M╱ // 0x66a @0xf
0x065b…066f at0010 = ╱4e╱N╱ // 0x66b @0x10
0x065b…066f at0011 = ╱52╱R╱ // 0x66c @0x11
0x065b…066f at0012 = ╱ee╱)╱ // 0x66d @0x12
0x065b…066f at0013 = EOL // 0x66e @0x13
0x065b…066f }
0x066f…068d 93e4 3500 IF LP$<>POST2$(21) THEN LA=B
0x066f…068d LineComalBin {
0x066f…068d ptr = 0x93e4 // 0x66f @0x0
0x066f…068d lno = 0x0dac // 0x671 @0x2
0x066f…068d at0004 = ╱82╱ IF ╱ // 0x673 @0x4
0x066f…068d at0005 = ╱4c╱L╱ // 0x674 @0x5
0x066f…068d at0006 = ╱50╱P╱ // 0x675 @0x6
0x066f…068d at0007 = ╱ef╱$╱ // 0x676 @0x7
0x066f…068d at0008 = ╱e1╱<>╱ // 0x677 @0x8
0x066f…068d at0009 = ╱50╱P╱ // 0x678 @0x9
0x066f…068d at000a = ╱4f╱O╱ // 0x679 @0xa
0x066f…068d at000b = ╱53╱S╱ // 0x67a @0xb
0x066f…068d at000c = ╱54╱T╱ // 0x67b @0xc
0x066f…068d at000d = ╱32╱2╱ // 0x67c @0xd
0x066f…068d at000e = ╱ef╱$╱ // 0x67d @0xe
0x066f…068d at000f = ╱ed╱(╱ // 0x67e @0xf
0x066f…068d at0010 = ╱32╱2╱ // 0x67f @0x10
0x066f…068d at0011 = ╱31╱1╱ // 0x680 @0x11
0x066f…068d at0012 = ╱fe0000a805╱ // 0x681 @0x12
0x066f…068d at0017 = ╱ee╱)╱ // 0x686 @0x17
0x066f…068d at0018 = ╱b6╱ THEN ╱ // 0x687 @0x18
0x066f…068d at0019 = ╱4c╱L╱ // 0x688 @0x19
0x066f…068d at001a = ╱41╱A╱ // 0x689 @0x1a
0x066f…068d at001b = ╱dc╱=╱ // 0x68a @0x1b
0x066f…068d at001c = ╱42╱B╱ // 0x68b @0x1c
0x066f…068d at001d = EOL // 0x68c @0x1d
0x066f…068d }
0x068d…06bd 9414 3510 IF ORK$="A" AND POST2$(24,25)>"89" THEN LA=B
0x068d…06bd LineComalBin {
0x068d…06bd ptr = 0x9414 // 0x68d @0x0
0x068d…06bd lno = 0x0db6 // 0x68f @0x2
0x068d…06bd at0004 = ╱82╱ IF ╱ // 0x691 @0x4
0x068d…06bd at0005 = ╱4f╱O╱ // 0x692 @0x5
0x068d…06bd at0006 = ╱52╱R╱ // 0x693 @0x6
0x068d…06bd at0007 = ╱4b╱K╱ // 0x694 @0x7
0x068d…06bd at0008 = ╱ef╱$╱ // 0x695 @0x8
0x068d…06bd at0009 = ╱dc╱=╱ // 0x696 @0x9
0x068d…06bd at000a = ╱22╱"╱ // 0x697 @0xa
0x068d…06bd at000b = ╱41╱A╱ // 0x698 @0xb
0x068d…06bd at000c = ╱22╱"╱ // 0x699 @0xc
0x068d…06bd at000d = ╱da╱ AND ╱ // 0x69a @0xd
0x068d…06bd at000e = ╱50╱P╱ // 0x69b @0xe
0x068d…06bd at000f = ╱4f╱O╱ // 0x69c @0xf
0x068d…06bd at0010 = ╱53╱S╱ // 0x69d @0x10
0x068d…06bd at0011 = ╱54╱T╱ // 0x69e @0x11
0x068d…06bd at0012 = ╱32╱2╱ // 0x69f @0x12
0x068d…06bd at0013 = ╱ef╱$╱ // 0x6a0 @0x13
0x068d…06bd at0014 = ╱ed╱(╱ // 0x6a1 @0x14
0x068d…06bd at0015 = ╱32╱2╱ // 0x6a2 @0x15
0x068d…06bd at0016 = ╱34╱4╱ // 0x6a3 @0x16
0x068d…06bd at0017 = ╱fe0000c005╱ // 0x6a4 @0x17
0x068d…06bd at001c = ╱ec╱,╱ // 0x6a9 @0x1c
0x068d…06bd at001d = ╱32╱2╱ // 0x6aa @0x1d
0x068d…06bd at001e = ╱35╱5╱ // 0x6ab @0x1e
0x068d…06bd at001f = ╱fe0000c805╱ // 0x6ac @0x1f
0x068d…06bd at0024 = ╱ee╱)╱ // 0x6b1 @0x24
0x068d…06bd at0025 = ╱de╱>╱ // 0x6b2 @0x25
0x068d…06bd at0026 = ╱22╱"╱ // 0x6b3 @0x26
0x068d…06bd at0027 = ╱38╱8╱ // 0x6b4 @0x27
0x068d…06bd at0028 = ╱39╱9╱ // 0x6b5 @0x28
0x068d…06bd at0029 = ╱22╱"╱ // 0x6b6 @0x29
0x068d…06bd at002a = ╱b6╱ THEN ╱ // 0x6b7 @0x2a
0x068d…06bd at002b = ╱4c╱L╱ // 0x6b8 @0x2b
0x068d…06bd at002c = ╱41╱A╱ // 0x6b9 @0x2c
0x068d…06bd at002d = ╱dc╱=╱ // 0x6ba @0x2d
0x068d…06bd at002e = ╱42╱B╱ // 0x6bb @0x2e
0x068d…06bd at002f = EOL // 0x6bc @0x2f
0x068d…06bd }
0x06bd…06ed 9444 3520 IF ORK$="F" AND POST2$(24,25)<"90" THEN LA=B
0x06bd…06ed LineComalBin {
0x06bd…06ed ptr = 0x9444 // 0x6bd @0x0
0x06bd…06ed lno = 0x0dc0 // 0x6bf @0x2
0x06bd…06ed at0004 = ╱82╱ IF ╱ // 0x6c1 @0x4
0x06bd…06ed at0005 = ╱4f╱O╱ // 0x6c2 @0x5
0x06bd…06ed at0006 = ╱52╱R╱ // 0x6c3 @0x6
0x06bd…06ed at0007 = ╱4b╱K╱ // 0x6c4 @0x7
0x06bd…06ed at0008 = ╱ef╱$╱ // 0x6c5 @0x8
0x06bd…06ed at0009 = ╱dc╱=╱ // 0x6c6 @0x9
0x06bd…06ed at000a = ╱22╱"╱ // 0x6c7 @0xa
0x06bd…06ed at000b = ╱46╱F╱ // 0x6c8 @0xb
0x06bd…06ed at000c = ╱22╱"╱ // 0x6c9 @0xc
0x06bd…06ed at000d = ╱da╱ AND ╱ // 0x6ca @0xd
0x06bd…06ed at000e = ╱50╱P╱ // 0x6cb @0xe
0x06bd…06ed at000f = ╱4f╱O╱ // 0x6cc @0xf
0x06bd…06ed at0010 = ╱53╱S╱ // 0x6cd @0x10
0x06bd…06ed at0011 = ╱54╱T╱ // 0x6ce @0x11
0x06bd…06ed at0012 = ╱32╱2╱ // 0x6cf @0x12
0x06bd…06ed at0013 = ╱ef╱$╱ // 0x6d0 @0x13
0x06bd…06ed at0014 = ╱ed╱(╱ // 0x6d1 @0x14
0x06bd…06ed at0015 = ╱32╱2╱ // 0x6d2 @0x15
0x06bd…06ed at0016 = ╱34╱4╱ // 0x6d3 @0x16
0x06bd…06ed at0017 = ╱fe0000c005╱ // 0x6d4 @0x17
0x06bd…06ed at001c = ╱ec╱,╱ // 0x6d9 @0x1c
0x06bd…06ed at001d = ╱32╱2╱ // 0x6da @0x1d
0x06bd…06ed at001e = ╱35╱5╱ // 0x6db @0x1e
0x06bd…06ed at001f = ╱fe0000c805╱ // 0x6dc @0x1f
0x06bd…06ed at0024 = ╱ee╱)╱ // 0x6e1 @0x24
0x06bd…06ed at0025 = ╱dd╱<╱ // 0x6e2 @0x25
0x06bd…06ed at0026 = ╱22╱"╱ // 0x6e3 @0x26
0x06bd…06ed at0027 = ╱39╱9╱ // 0x6e4 @0x27
0x06bd…06ed at0028 = ╱30╱0╱ // 0x6e5 @0x28
0x06bd…06ed at0029 = ╱22╱"╱ // 0x6e6 @0x29
0x06bd…06ed at002a = ╱b6╱ THEN ╱ // 0x6e7 @0x2a
0x06bd…06ed at002b = ╱4c╱L╱ // 0x6e8 @0x2b
0x06bd…06ed at002c = ╱41╱A╱ // 0x6e9 @0x2c
0x06bd…06ed at002d = ╱dc╱=╱ // 0x6ea @0x2d
0x06bd…06ed at002e = ╱42╱B╱ // 0x6eb @0x2e
0x06bd…06ed at002f = EOL // 0x6ec @0x2f
0x06bd…06ed }
0x06ed…06f3 944a 3530 ENDIF
0x06ed…06f3 LineComalBin {
0x06ed…06f3 ptr = 0x944a // 0x6ed @0x0
0x06ed…06f3 lno = 0x0dca // 0x6ef @0x2
0x06ed…06f3 at0004 = ╱9b╱ ENDIF ╱ // 0x6f1 @0x4
0x06ed…06f3 at0005 = EOL // 0x6f2 @0x5
0x06ed…06f3 }
0x06f3…06fd 9454 3540 UNTIL LA>B
0x06f3…06fd LineComalBin {
0x06f3…06fd ptr = 0x9454 // 0x6f3 @0x0
0x06f3…06fd lno = 0x0dd4 // 0x6f5 @0x2
0x06f3…06fd at0004 = ╱98╱ UNTIL ╱ // 0x6f7 @0x4
0x06f3…06fd at0005 = ╱4c╱L╱ // 0x6f8 @0x5
0x06f3…06fd at0006 = ╱41╱A╱ // 0x6f9 @0x6
0x06f3…06fd at0007 = ╱de╱>╱ // 0x6fa @0x7
0x06f3…06fd at0008 = ╱42╱B╱ // 0x6fb @0x8
0x06f3…06fd at0009 = EOL // 0x6fc @0x9
0x06f3…06fd }
0x06fd…0703 945a 3550 ENDPROC
0x06fd…0703 LineComalBin {
0x06fd…0703 ptr = 0x945a // 0x6fd @0x0
0x06fd…0703 lno = 0x0dde // 0x6ff @0x2
0x06fd…0703 at0004 = ╱9f╱ ENDPROC ╱ // 0x701 @0x4
0x06fd…0703 at0005 = EOL // 0x702 @0x5
0x06fd…0703 }
0x0703…0725 947c 8182 TOTAL$(E)=TAH$;TOTAL$(G)=TAH$
0x0703…0725 LineComalBin {
0x0703…0725 ptr = 0x947c // 0x703 @0x0
0x0703…0725 lno = 0x1ff6 // 0x705 @0x2
0x0703…0725 at0004 = ╱54╱T╱ // 0x707 @0x4
0x0703…0725 at0005 = ╱4f╱O╱ // 0x708 @0x5
0x0703…0725 at0006 = ╱54╱T╱ // 0x709 @0x6
0x0703…0725 at0007 = ╱41╱A╱ // 0x70a @0x7
0x0703…0725 at0008 = ╱4c╱L╱ // 0x70b @0x8
0x0703…0725 at0009 = ╱ef╱$╱ // 0x70c @0x9
0x0703…0725 at000a = ╱ed╱(╱ // 0x70d @0xa
0x0703…0725 at000b = ╱45╱E╱ // 0x70e @0xb
0x0703…0725 at000c = ╱ee╱)╱ // 0x70f @0xc
0x0703…0725 at000d = ╱dc╱=╱ // 0x710 @0xd
0x0703…0725 at000e = ╱54╱T╱ // 0x711 @0xe
0x0703…0725 at000f = ╱41╱A╱ // 0x712 @0xf
0x0703…0725 at0010 = ╱48╱H╱ // 0x713 @0x10
0x0703…0725 at0011 = ╱ef╱$╱ // 0x714 @0x11
0x0703…0725 at0012 = ╱eb╱;╱ // 0x715 @0x12
0x0703…0725 at0013 = ╱54╱T╱ // 0x716 @0x13
0x0703…0725 at0014 = ╱4f╱O╱ // 0x717 @0x14
0x0703…0725 at0015 = ╱54╱T╱ // 0x718 @0x15
0x0703…0725 at0016 = ╱41╱A╱ // 0x719 @0x16
0x0703…0725 at0017 = ╱4c╱L╱ // 0x71a @0x17
0x0703…0725 at0018 = ╱ef╱$╱ // 0x71b @0x18
0x0703…0725 at0019 = ╱ed╱(╱ // 0x71c @0x19
0x0703…0725 at001a = ╱47╱G╱ // 0x71d @0x1a
0x0703…0725 at001b = ╱ee╱)╱ // 0x71e @0x1b
0x0703…0725 at001c = ╱dc╱=╱ // 0x71f @0x1c
0x0703…0725 at001d = ╱54╱T╱ // 0x720 @0x1d
0x0703…0725 at001e = ╱41╱A╱ // 0x721 @0x1e
0x0703…0725 at001f = ╱48╱H╱ // 0x722 @0x1f
0x0703…0725 at0020 = ╱ef╱$╱ // 0x723 @0x20
0x0703…0725 at0021 = EOL // 0x724 @0x21
0x0703…0725 }
0x0725…074c 94a3 8183 TOTAL$(V)=TAH$;TOTAL$(4)=TAH$
0x0725…074c LineComalBin {
0x0725…074c ptr = 0x94a3 // 0x725 @0x0
0x0725…074c lno = 0x1ff7 // 0x727 @0x2
0x0725…074c at0004 = ╱54╱T╱ // 0x729 @0x4
0x0725…074c at0005 = ╱4f╱O╱ // 0x72a @0x5
0x0725…074c at0006 = ╱54╱T╱ // 0x72b @0x6
0x0725…074c at0007 = ╱41╱A╱ // 0x72c @0x7
0x0725…074c at0008 = ╱4c╱L╱ // 0x72d @0x8
0x0725…074c at0009 = ╱ef╱$╱ // 0x72e @0x9
0x0725…074c at000a = ╱ed╱(╱ // 0x72f @0xa
0x0725…074c at000b = ╱56╱V╱ // 0x730 @0xb
0x0725…074c at000c = ╱ee╱)╱ // 0x731 @0xc
0x0725…074c at000d = ╱dc╱=╱ // 0x732 @0xd
0x0725…074c at000e = ╱54╱T╱ // 0x733 @0xe
0x0725…074c at000f = ╱41╱A╱ // 0x734 @0xf
0x0725…074c at0010 = ╱48╱H╱ // 0x735 @0x10
0x0725…074c at0011 = ╱ef╱$╱ // 0x736 @0x11
0x0725…074c at0012 = ╱eb╱;╱ // 0x737 @0x12
0x0725…074c at0013 = ╱54╱T╱ // 0x738 @0x13
0x0725…074c at0014 = ╱4f╱O╱ // 0x739 @0x14
0x0725…074c at0015 = ╱54╱T╱ // 0x73a @0x15
0x0725…074c at0016 = ╱41╱A╱ // 0x73b @0x16
0x0725…074c at0017 = ╱4c╱L╱ // 0x73c @0x17
0x0725…074c at0018 = ╱ef╱$╱ // 0x73d @0x18
0x0725…074c at0019 = ╱ed╱(╱ // 0x73e @0x19
0x0725…074c at001a = ╱34╱4╱ // 0x73f @0x1a
0x0725…074c at001b = ╱fe00008003╱ // 0x740 @0x1b
0x0725…074c at0020 = ╱ee╱)╱ // 0x745 @0x20
0x0725…074c at0021 = ╱dc╱=╱ // 0x746 @0x21
0x0725…074c at0022 = ╱54╱T╱ // 0x747 @0x22
0x0725…074c at0023 = ╱41╱A╱ // 0x748 @0x23
0x0725…074c at0024 = ╱48╱H╱ // 0x749 @0x24
0x0725…074c at0025 = ╱ef╱$╱ // 0x74a @0x25
0x0725…074c at0026 = EOL // 0x74b @0x26
0x0725…074c }
0x074c…0768 94bf 8190 FIL$="P641220:VIRKKART"
0x074c…0768 LineComalBin {
0x074c…0768 ptr = 0x94bf // 0x74c @0x0
0x074c…0768 lno = 0x1ffe // 0x74e @0x2
0x074c…0768 at0004 = ╱46╱F╱ // 0x750 @0x4
0x074c…0768 at0005 = ╱49╱I╱ // 0x751 @0x5
0x074c…0768 at0006 = ╱4c╱L╱ // 0x752 @0x6
0x074c…0768 at0007 = ╱ef╱$╱ // 0x753 @0x7
0x074c…0768 at0008 = ╱dc╱=╱ // 0x754 @0x8
0x074c…0768 at0009 = ╱22╱"╱ // 0x755 @0x9
0x074c…0768 at000a = ╱50╱P╱ // 0x756 @0xa
0x074c…0768 at000b = ╱36╱6╱ // 0x757 @0xb
0x074c…0768 at000c = ╱34╱4╱ // 0x758 @0xc
0x074c…0768 at000d = ╱31╱1╱ // 0x759 @0xd
0x074c…0768 at000e = ╱32╱2╱ // 0x75a @0xe
0x074c…0768 at000f = ╱32╱2╱ // 0x75b @0xf
0x074c…0768 at0010 = ╱30╱0╱ // 0x75c @0x10
0x074c…0768 at0011 = ╱3a╱:╱ // 0x75d @0x11
0x074c…0768 at0012 = ╱56╱V╱ // 0x75e @0x12
0x074c…0768 at0013 = ╱49╱I╱ // 0x75f @0x13
0x074c…0768 at0014 = ╱52╱R╱ // 0x760 @0x14
0x074c…0768 at0015 = ╱4b╱K╱ // 0x761 @0x15
0x074c…0768 at0016 = ╱4b╱K╱ // 0x762 @0x16
0x074c…0768 at0017 = ╱41╱A╱ // 0x763 @0x17
0x074c…0768 at0018 = ╱52╱R╱ // 0x764 @0x18
0x074c…0768 at0019 = ╱54╱T╱ // 0x765 @0x19
0x074c…0768 at001a = ╱22╱"╱ // 0x766 @0x1a
0x074c…0768 at001b = EOL // 0x767 @0x1b
0x074c…0768 }
0x0768…0775 94cc 8200 EXEC INDVIRK
0x0768…0775 LineComalBin {
0x0768…0775 ptr = 0x94cc // 0x768 @0x0
0x0768…0775 lno = 0x2008 // 0x76a @0x2
0x0768…0775 at0004 = ╱9d╱ EXEC ╱ // 0x76c @0x4
0x0768…0775 at0005 = ╱49╱I╱ // 0x76d @0x5
0x0768…0775 at0006 = ╱4e╱N╱ // 0x76e @0x6
0x0768…0775 at0007 = ╱44╱D╱ // 0x76f @0x7
0x0768…0775 at0008 = ╱56╱V╱ // 0x770 @0x8
0x0768…0775 at0009 = ╱49╱I╱ // 0x771 @0x9
0x0768…0775 at000a = ╱52╱R╱ // 0x772 @0xa
0x0768…0775 at000b = ╱4b╱K╱ // 0x773 @0xb
0x0768…0775 at000c = EOL // 0x774 @0xc
0x0768…0775 }
0x0775…077f 94d6 8210 CLOSE FIL$
0x0775…077f LineComalBin {
0x0775…077f ptr = 0x94d6 // 0x775 @0x0
0x0775…077f lno = 0x2012 // 0x777 @0x2
0x0775…077f at0004 = ╱a8╱ CLOSE ╱ // 0x779 @0x4
0x0775…077f at0005 = ╱46╱F╱ // 0x77a @0x5
0x0775…077f at0006 = ╱49╱I╱ // 0x77b @0x6
0x0775…077f at0007 = ╱4c╱L╱ // 0x77c @0x7
0x0775…077f at0008 = ╱ef╱$╱ // 0x77d @0x8
0x0775…077f at0009 = EOL // 0x77e @0x9
0x0775…077f }
0x077f…079b 94f2 8220 FIL$="P641220:LØNMODRG"
0x077f…079b LineComalBin {
0x077f…079b ptr = 0x94f2 // 0x77f @0x0
0x077f…079b lno = 0x201c // 0x781 @0x2
0x077f…079b at0004 = ╱46╱F╱ // 0x783 @0x4
0x077f…079b at0005 = ╱49╱I╱ // 0x784 @0x5
0x077f…079b at0006 = ╱4c╱L╱ // 0x785 @0x6
0x077f…079b at0007 = ╱ef╱$╱ // 0x786 @0x7
0x077f…079b at0008 = ╱dc╱=╱ // 0x787 @0x8
0x077f…079b at0009 = ╱22╱"╱ // 0x788 @0x9
0x077f…079b at000a = ╱50╱P╱ // 0x789 @0xa
0x077f…079b at000b = ╱36╱6╱ // 0x78a @0xb
0x077f…079b at000c = ╱34╱4╱ // 0x78b @0xc
0x077f…079b at000d = ╱31╱1╱ // 0x78c @0xd
0x077f…079b at000e = ╱32╱2╱ // 0x78d @0xe
0x077f…079b at000f = ╱32╱2╱ // 0x78e @0xf
0x077f…079b at0010 = ╱30╱0╱ // 0x78f @0x10
0x077f…079b at0011 = ╱3a╱:╱ // 0x790 @0x11
0x077f…079b at0012 = ╱4c╱L╱ // 0x791 @0x12
0x077f…079b at0013 = ╱5c╱Ø╱ // 0x792 @0x13
0x077f…079b at0014 = ╱4e╱N╱ // 0x793 @0x14
0x077f…079b at0015 = ╱4d╱M╱ // 0x794 @0x15
0x077f…079b at0016 = ╱4f╱O╱ // 0x795 @0x16
0x077f…079b at0017 = ╱44╱D╱ // 0x796 @0x17
0x077f…079b at0018 = ╱52╱R╱ // 0x797 @0x18
0x077f…079b at0019 = ╱47╱G╱ // 0x798 @0x19
0x077f…079b at001a = ╱22╱"╱ // 0x799 @0x1a
0x077f…079b at001b = EOL // 0x79a @0x1b
0x077f…079b }
0x079b…07a7 94fe 8230 OPEN FIL$,W
0x079b…07a7 LineComalBin {
0x079b…07a7 ptr = 0x94fe // 0x79b @0x0
0x079b…07a7 lno = 0x2026 // 0x79d @0x2
0x079b…07a7 at0004 = ╱a7╱ OPEN ╱ // 0x79f @0x4
0x079b…07a7 at0005 = ╱46╱F╱ // 0x7a0 @0x5
0x079b…07a7 at0006 = ╱49╱I╱ // 0x7a1 @0x6
0x079b…07a7 at0007 = ╱4c╱L╱ // 0x7a2 @0x7
0x079b…07a7 at0008 = ╱ef╱$╱ // 0x7a3 @0x8
0x079b…07a7 at0009 = ╱ec╱,╱ // 0x7a4 @0x9
0x079b…07a7 at000a = ╱57╱W╱ // 0x7a5 @0xa
0x079b…07a7 at000b = EOL // 0x7a6 @0xb
0x079b…07a7 }
0x07a7…07c4 951b 8260 FIL2$="P641220:TÆLLEREG"
0x07a7…07c4 LineComalBin {
0x07a7…07c4 ptr = 0x951b // 0x7a7 @0x0
0x07a7…07c4 lno = 0x2044 // 0x7a9 @0x2
0x07a7…07c4 at0004 = ╱46╱F╱ // 0x7ab @0x4
0x07a7…07c4 at0005 = ╱49╱I╱ // 0x7ac @0x5
0x07a7…07c4 at0006 = ╱4c╱L╱ // 0x7ad @0x6
0x07a7…07c4 at0007 = ╱32╱2╱ // 0x7ae @0x7
0x07a7…07c4 at0008 = ╱ef╱$╱ // 0x7af @0x8
0x07a7…07c4 at0009 = ╱dc╱=╱ // 0x7b0 @0x9
0x07a7…07c4 at000a = ╱22╱"╱ // 0x7b1 @0xa
0x07a7…07c4 at000b = ╱50╱P╱ // 0x7b2 @0xb
0x07a7…07c4 at000c = ╱36╱6╱ // 0x7b3 @0xc
0x07a7…07c4 at000d = ╱34╱4╱ // 0x7b4 @0xd
0x07a7…07c4 at000e = ╱31╱1╱ // 0x7b5 @0xe
0x07a7…07c4 at000f = ╱32╱2╱ // 0x7b6 @0xf
0x07a7…07c4 at0010 = ╱32╱2╱ // 0x7b7 @0x10
0x07a7…07c4 at0011 = ╱30╱0╱ // 0x7b8 @0x11
0x07a7…07c4 at0012 = ╱3a╱:╱ // 0x7b9 @0x12
0x07a7…07c4 at0013 = ╱54╱T╱ // 0x7ba @0x13
0x07a7…07c4 at0014 = ╱5b╱Æ╱ // 0x7bb @0x14
0x07a7…07c4 at0015 = ╱4c╱L╱ // 0x7bc @0x15
0x07a7…07c4 at0016 = ╱4c╱L╱ // 0x7bd @0x16
0x07a7…07c4 at0017 = ╱45╱E╱ // 0x7be @0x17
0x07a7…07c4 at0018 = ╱52╱R╱ // 0x7bf @0x18
0x07a7…07c4 at0019 = ╱45╱E╱ // 0x7c0 @0x19
0x07a7…07c4 at001a = ╱47╱G╱ // 0x7c1 @0x1a
0x07a7…07c4 at001b = ╱22╱"╱ // 0x7c2 @0x1b
0x07a7…07c4 at001c = EOL // 0x7c3 @0x1c
0x07a7…07c4 }
0x07c4…07d1 9528 8270 OPEN FIL2$,W
0x07c4…07d1 LineComalBin {
0x07c4…07d1 ptr = 0x9528 // 0x7c4 @0x0
0x07c4…07d1 lno = 0x204e // 0x7c6 @0x2
0x07c4…07d1 at0004 = ╱a7╱ OPEN ╱ // 0x7c8 @0x4
0x07c4…07d1 at0005 = ╱46╱F╱ // 0x7c9 @0x5
0x07c4…07d1 at0006 = ╱49╱I╱ // 0x7ca @0x6
0x07c4…07d1 at0007 = ╱4c╱L╱ // 0x7cb @0x7
0x07c4…07d1 at0008 = ╱32╱2╱ // 0x7cc @0x8
0x07c4…07d1 at0009 = ╱ef╱$╱ // 0x7cd @0x9
0x07c4…07d1 at000a = ╱ec╱,╱ // 0x7ce @0xa
0x07c4…07d1 at000b = ╱57╱W╱ // 0x7cf @0xb
0x07c4…07d1 at000c = EOL // 0x7d0 @0xc
0x07c4…07d1 }
0x07d1…07ec 9543 8291 MF1$="P641210:LØNJOUR"
0x07d1…07ec LineComalBin {
0x07d1…07ec ptr = 0x9543 // 0x7d1 @0x0
0x07d1…07ec lno = 0x2063 // 0x7d3 @0x2
0x07d1…07ec at0004 = ╱4d╱M╱ // 0x7d5 @0x4
0x07d1…07ec at0005 = ╱46╱F╱ // 0x7d6 @0x5
0x07d1…07ec at0006 = ╱31╱1╱ // 0x7d7 @0x6
0x07d1…07ec at0007 = ╱ef╱$╱ // 0x7d8 @0x7
0x07d1…07ec at0008 = ╱dc╱=╱ // 0x7d9 @0x8
0x07d1…07ec at0009 = ╱22╱"╱ // 0x7da @0x9
0x07d1…07ec at000a = ╱50╱P╱ // 0x7db @0xa
0x07d1…07ec at000b = ╱36╱6╱ // 0x7dc @0xb
0x07d1…07ec at000c = ╱34╱4╱ // 0x7dd @0xc
0x07d1…07ec at000d = ╱31╱1╱ // 0x7de @0xd
0x07d1…07ec at000e = ╱32╱2╱ // 0x7df @0xe
0x07d1…07ec at000f = ╱31╱1╱ // 0x7e0 @0xf
0x07d1…07ec at0010 = ╱30╱0╱ // 0x7e1 @0x10
0x07d1…07ec at0011 = ╱3a╱:╱ // 0x7e2 @0x11
0x07d1…07ec at0012 = ╱4c╱L╱ // 0x7e3 @0x12
0x07d1…07ec at0013 = ╱5c╱Ø╱ // 0x7e4 @0x13
0x07d1…07ec at0014 = ╱4e╱N╱ // 0x7e5 @0x14
0x07d1…07ec at0015 = ╱4a╱J╱ // 0x7e6 @0x15
0x07d1…07ec at0016 = ╱4f╱O╱ // 0x7e7 @0x16
0x07d1…07ec at0017 = ╱55╱U╱ // 0x7e8 @0x17
0x07d1…07ec at0018 = ╱52╱R╱ // 0x7e9 @0x18
0x07d1…07ec at0019 = ╱22╱"╱ // 0x7ea @0x19
0x07d1…07ec at001a = EOL // 0x7eb @0x1a
0x07d1…07ec }
0x07ec…07f8 954f 8292 OPEN MF1$,R
0x07ec…07f8 LineComalBin {
0x07ec…07f8 ptr = 0x954f // 0x7ec @0x0
0x07ec…07f8 lno = 0x2064 // 0x7ee @0x2
0x07ec…07f8 at0004 = ╱a7╱ OPEN ╱ // 0x7f0 @0x4
0x07ec…07f8 at0005 = ╱4d╱M╱ // 0x7f1 @0x5
0x07ec…07f8 at0006 = ╱46╱F╱ // 0x7f2 @0x6
0x07ec…07f8 at0007 = ╱31╱1╱ // 0x7f3 @0x7
0x07ec…07f8 at0008 = ╱ef╱$╱ // 0x7f4 @0x8
0x07ec…07f8 at0009 = ╱ec╱,╱ // 0x7f5 @0x9
0x07ec…07f8 at000a = ╱52╱R╱ // 0x7f6 @0xa
0x07ec…07f8 at000b = EOL // 0x7f7 @0xb
0x07ec…07f8 }
0x07f8…0825 957c 8300 INPUT "Isæt årsoplysningssedler, RETURN ",LP$
0x07f8…0825 LineComalBin {
0x07f8…0825 ptr = 0x957c // 0x7f8 @0x0
0x07f8…0825 lno = 0x206c // 0x7fa @0x2
0x07f8…0825 at0004 = ╱91╱ INPUT ╱ // 0x7fc @0x4
0x07f8…0825 at0005 = ╱22╱"╱ // 0x7fd @0x5
0x07f8…0825 at0006 = ╱49╱I╱ // 0x7fe @0x6
0x07f8…0825 at0007 = ╱73╱s╱ // 0x7ff @0x7
0x07f8…0825 at0008 = ╱7b╱æ╱ // 0x800 @0x8
0x07f8…0825 at0009 = ╱74╱t╱ // 0x801 @0x9
0x07f8…0825 at000a = ╱20╱…╱ // 0x802 @0xa
0x07f8…0825 at000b = ╱7d╱å╱ // 0x803 @0xb
0x07f8…0825 at000c = ╱72╱r╱ // 0x804 @0xc
0x07f8…0825 at000d = ╱73╱s╱ // 0x805 @0xd
0x07f8…0825 at000e = ╱6f╱o╱ // 0x806 @0xe
0x07f8…0825 at000f = ╱70╱p╱ // 0x807 @0xf
0x07f8…0825 at0010 = ╱6c╱l╱ // 0x808 @0x10
0x07f8…0825 at0011 = ╱79╱y╱ // 0x809 @0x11
0x07f8…0825 at0012 = ╱73╱s╱ // 0x80a @0x12
0x07f8…0825 at0013 = ╱6e╱n╱ // 0x80b @0x13
0x07f8…0825 at0014 = ╱69╱i╱ // 0x80c @0x14
0x07f8…0825 at0015 = ╱6e╱n╱ // 0x80d @0x15
0x07f8…0825 at0016 = ╱67╱g╱ // 0x80e @0x16
0x07f8…0825 at0017 = ╱73╱s╱ // 0x80f @0x17
0x07f8…0825 at0018 = ╱73╱s╱ // 0x810 @0x18
0x07f8…0825 at0019 = ╱65╱e╱ // 0x811 @0x19
0x07f8…0825 at001a = ╱64╱d╱ // 0x812 @0x1a
0x07f8…0825 at001b = ╱6c╱l╱ // 0x813 @0x1b
0x07f8…0825 at001c = ╱65╱e╱ // 0x814 @0x1c
0x07f8…0825 at001d = ╱72╱r╱ // 0x815 @0x1d
0x07f8…0825 at001e = ╱2c╱,╱ // 0x816 @0x1e
0x07f8…0825 at001f = ╱20╱…╱ // 0x817 @0x1f
0x07f8…0825 at0020 = ╱52╱R╱ // 0x818 @0x20
0x07f8…0825 at0021 = ╱45╱E╱ // 0x819 @0x21
0x07f8…0825 at0022 = ╱54╱T╱ // 0x81a @0x22
0x07f8…0825 at0023 = ╱55╱U╱ // 0x81b @0x23
0x07f8…0825 at0024 = ╱52╱R╱ // 0x81c @0x24
0x07f8…0825 at0025 = ╱4e╱N╱ // 0x81d @0x25
0x07f8…0825 at0026 = ╱20╱…╱ // 0x81e @0x26
0x07f8…0825 at0027 = ╱22╱"╱ // 0x81f @0x27
0x07f8…0825 at0028 = ╱ec╱,╱ // 0x820 @0x28
0x07f8…0825 at0029 = ╱4c╱L╱ // 0x821 @0x29
0x07f8…0825 at002a = ╱50╱P╱ // 0x822 @0x2a
0x07f8…0825 at002b = ╱ef╱$╱ // 0x823 @0x2b
0x07f8…0825 at002c = EOL // 0x824 @0x2c
0x07f8…0825 }
0x0825…0838 958f 8350 MAXLIN=72
0x0825…0838 LineComalBin {
0x0825…0838 ptr = 0x958f // 0x825 @0x0
0x0825…0838 lno = 0x209e // 0x827 @0x2
0x0825…0838 at0004 = ╱4d╱M╱ // 0x829 @0x4
0x0825…0838 at0005 = ╱41╱A╱ // 0x82a @0x5
0x0825…0838 at0006 = ╱58╱X╱ // 0x82b @0x6
0x0825…0838 at0007 = ╱4c╱L╱ // 0x82c @0x7
0x0825…0838 at0008 = ╱49╱I╱ // 0x82d @0x8
0x0825…0838 at0009 = ╱4e╱N╱ // 0x82e @0x9
0x0825…0838 at000a = ╱dc╱=╱ // 0x82f @0xa
0x0825…0838 at000b = ╱37╱7╱ // 0x830 @0xb
0x0825…0838 at000c = ╱32╱2╱ // 0x831 @0xc
0x0825…0838 at000d = ╱fe00009007╱ // 0x832 @0xd
0x0825…0838 at0012 = EOL // 0x837 @0x12
0x0825…0838 }
0x0838…0843 959a 8360 LMNR=B
0x0838…0843 LineComalBin {
0x0838…0843 ptr = 0x959a // 0x838 @0x0
0x0838…0843 lno = 0x20a8 // 0x83a @0x2
0x0838…0843 at0004 = ╱4c╱L╱ // 0x83c @0x4
0x0838…0843 at0005 = ╱4d╱M╱ // 0x83d @0x5
0x0838…0843 at0006 = ╱4e╱N╱ // 0x83e @0x6
0x0838…0843 at0007 = ╱52╱R╱ // 0x83f @0x7
0x0838…0843 at0008 = ╱dc╱=╱ // 0x840 @0x8
0x0838…0843 at0009 = ╱42╱B╱ // 0x841 @0x9
0x0838…0843 at000a = EOL // 0x842 @0xa
0x0838…0843 }
0x0843…084d 95a4 8370 ABL=B
0x0843…084d LineComalBin {
0x0843…084d ptr = 0x95a4 // 0x843 @0x0
0x0843…084d lno = 0x20b2 // 0x845 @0x2
0x0843…084d at0004 = ╱41╱A╱ // 0x847 @0x4
0x0843…084d at0005 = ╱42╱B╱ // 0x848 @0x5
0x0843…084d at0006 = ╱4c╱L╱ // 0x849 @0x6
0x0843…084d at0007 = ╱dc╱=╱ // 0x84a @0x7
0x0843…084d at0008 = ╱42╱B╱ // 0x84b @0x8
0x0843…084d at0009 = EOL // 0x84c @0x9
0x0843…084d }
0x084d…0877 95ce 8372 GET MF1$:STARTPER$,SLUTPER$,LP$,ORK$,MFD
0x084d…0877 LineComalBin {
0x084d…0877 ptr = 0x95ce // 0x84d @0x0
0x084d…0877 lno = 0x20b4 // 0x84f @0x2
0x084d…0877 at0004 = ╱a9╱ GET ╱ // 0x851 @0x4
0x084d…0877 at0005 = ╱4d╱M╱ // 0x852 @0x5
0x084d…0877 at0006 = ╱46╱F╱ // 0x853 @0x6
0x084d…0877 at0007 = ╱31╱1╱ // 0x854 @0x7
0x084d…0877 at0008 = ╱ef╱$╱ // 0x855 @0x8
0x084d…0877 at0009 = ╱f0╱:╱ // 0x856 @0x9
0x084d…0877 at000a = ╱53╱S╱ // 0x857 @0xa
0x084d…0877 at000b = ╱54╱T╱ // 0x858 @0xb
0x084d…0877 at000c = ╱41╱A╱ // 0x859 @0xc
0x084d…0877 at000d = ╱52╱R╱ // 0x85a @0xd
0x084d…0877 at000e = ╱54╱T╱ // 0x85b @0xe
0x084d…0877 at000f = ╱50╱P╱ // 0x85c @0xf
0x084d…0877 at0010 = ╱45╱E╱ // 0x85d @0x10
0x084d…0877 at0011 = ╱52╱R╱ // 0x85e @0x11
0x084d…0877 at0012 = ╱ef╱$╱ // 0x85f @0x12
0x084d…0877 at0013 = ╱ec╱,╱ // 0x860 @0x13
0x084d…0877 at0014 = ╱53╱S╱ // 0x861 @0x14
0x084d…0877 at0015 = ╱4c╱L╱ // 0x862 @0x15
0x084d…0877 at0016 = ╱55╱U╱ // 0x863 @0x16
0x084d…0877 at0017 = ╱54╱T╱ // 0x864 @0x17
0x084d…0877 at0018 = ╱50╱P╱ // 0x865 @0x18
0x084d…0877 at0019 = ╱45╱E╱ // 0x866 @0x19
0x084d…0877 at001a = ╱52╱R╱ // 0x867 @0x1a
0x084d…0877 at001b = ╱ef╱$╱ // 0x868 @0x1b
0x084d…0877 at001c = ╱ec╱,╱ // 0x869 @0x1c
0x084d…0877 at001d = ╱4c╱L╱ // 0x86a @0x1d
0x084d…0877 at001e = ╱50╱P╱ // 0x86b @0x1e
0x084d…0877 at001f = ╱ef╱$╱ // 0x86c @0x1f
0x084d…0877 at0020 = ╱ec╱,╱ // 0x86d @0x20
0x084d…0877 at0021 = ╱4f╱O╱ // 0x86e @0x21
0x084d…0877 at0022 = ╱52╱R╱ // 0x86f @0x22
0x084d…0877 at0023 = ╱4b╱K╱ // 0x870 @0x23
0x084d…0877 at0024 = ╱ef╱$╱ // 0x871 @0x24
0x084d…0877 at0025 = ╱ec╱,╱ // 0x872 @0x25
0x084d…0877 at0026 = ╱4d╱M╱ // 0x873 @0x26
0x084d…0877 at0027 = ╱46╱F╱ // 0x874 @0x27
0x084d…0877 at0028 = ╱44╱D╱ // 0x875 @0x28
0x084d…0877 at0029 = EOL // 0x876 @0x29
0x084d…0877 }
0x0877…08ca 9621 8410 STD=100000*(ORD(STARTPER$(E))-48)+10000*(ORD(STARTPER$(G))-48)
0x0877…08ca LineComalBin {
0x0877…08ca ptr = 0x9621 // 0x877 @0x0
0x0877…08ca lno = 0x20da // 0x879 @0x2
0x0877…08ca at0004 = ╱53╱S╱ // 0x87b @0x4
0x0877…08ca at0005 = ╱54╱T╱ // 0x87c @0x5
0x0877…08ca at0006 = ╱44╱D╱ // 0x87d @0x6
0x0877…08ca at0007 = ╱dc╱=╱ // 0x87e @0x7
0x0877…08ca at0008 = ╱31╱1╱ // 0x87f @0x8
0x0877…08ca at0009 = ╱30╱0╱ // 0x880 @0x9
0x0877…08ca at000a = ╱30╱0╱ // 0x881 @0xa
0x0877…08ca at000b = ╱30╱0╱ // 0x882 @0xb
0x0877…08ca at000c = ╱30╱0╱ // 0x883 @0xc
0x0877…08ca at000d = ╱30╱0╱ // 0x884 @0xd
0x0877…08ca at000e = ╱fe0050c311╱ // 0x885 @0xe
0x0877…08ca at0013 = ╱e4╱*╱ // 0x88a @0x13
0x0877…08ca at0014 = ╱ed╱(╱ // 0x88b @0x14
0x0877…08ca at0015 = ╱cd╱ORD╱ // 0x88c @0x15
0x0877…08ca at0016 = ╱ed╱(╱ // 0x88d @0x16
0x0877…08ca at0017 = ╱53╱S╱ // 0x88e @0x17
0x0877…08ca at0018 = ╱54╱T╱ // 0x88f @0x18
0x0877…08ca at0019 = ╱41╱A╱ // 0x890 @0x19
0x0877…08ca at001a = ╱52╱R╱ // 0x891 @0x1a
0x0877…08ca at001b = ╱54╱T╱ // 0x892 @0x1b
0x0877…08ca at001c = ╱50╱P╱ // 0x893 @0x1c
0x0877…08ca at001d = ╱45╱E╱ // 0x894 @0x1d
0x0877…08ca at001e = ╱52╱R╱ // 0x895 @0x1e
0x0877…08ca at001f = ╱ef╱$╱ // 0x896 @0x1f
0x0877…08ca at0020 = ╱ed╱(╱ // 0x897 @0x20
0x0877…08ca at0021 = ╱45╱E╱ // 0x898 @0x21
0x0877…08ca at0022 = ╱ee╱)╱ // 0x899 @0x22
0x0877…08ca at0023 = ╱ee╱)╱ // 0x89a @0x23
0x0877…08ca at0024 = ╱e3╱-╱ // 0x89b @0x24
0x0877…08ca at0025 = ╱34╱4╱ // 0x89c @0x25
0x0877…08ca at0026 = ╱38╱8╱ // 0x89d @0x26
0x0877…08ca at0027 = ╱fe0000c006╱ // 0x89e @0x27
0x0877…08ca at002c = ╱ee╱)╱ // 0x8a3 @0x2c
0x0877…08ca at002d = ╱e2╱+╱ // 0x8a4 @0x2d
0x0877…08ca at002e = ╱31╱1╱ // 0x8a5 @0x2e
0x0877…08ca at002f = ╱30╱0╱ // 0x8a6 @0x2f
0x0877…08ca at0030 = ╱30╱0╱ // 0x8a7 @0x30
0x0877…08ca at0031 = ╱30╱0╱ // 0x8a8 @0x31
0x0877…08ca at0032 = ╱30╱0╱ // 0x8a9 @0x32
0x0877…08ca at0033 = ╱fe00409c0e╱ // 0x8aa @0x33
0x0877…08ca at0038 = ╱e4╱*╱ // 0x8af @0x38
0x0877…08ca at0039 = ╱ed╱(╱ // 0x8b0 @0x39
0x0877…08ca at003a = ╱cd╱ORD╱ // 0x8b1 @0x3a
0x0877…08ca at003b = ╱ed╱(╱ // 0x8b2 @0x3b
0x0877…08ca at003c = ╱53╱S╱ // 0x8b3 @0x3c
0x0877…08ca at003d = ╱54╱T╱ // 0x8b4 @0x3d
0x0877…08ca at003e = ╱41╱A╱ // 0x8b5 @0x3e
0x0877…08ca at003f = ╱52╱R╱ // 0x8b6 @0x3f
0x0877…08ca at0040 = ╱54╱T╱ // 0x8b7 @0x40
0x0877…08ca at0041 = ╱50╱P╱ // 0x8b8 @0x41
0x0877…08ca at0042 = ╱45╱E╱ // 0x8b9 @0x42
0x0877…08ca at0043 = ╱52╱R╱ // 0x8ba @0x43
0x0877…08ca at0044 = ╱ef╱$╱ // 0x8bb @0x44
0x0877…08ca at0045 = ╱ed╱(╱ // 0x8bc @0x45
0x0877…08ca at0046 = ╱47╱G╱ // 0x8bd @0x46
0x0877…08ca at0047 = ╱ee╱)╱ // 0x8be @0x47
0x0877…08ca at0048 = ╱ee╱)╱ // 0x8bf @0x48
0x0877…08ca at0049 = ╱e3╱-╱ // 0x8c0 @0x49
0x0877…08ca at004a = ╱34╱4╱ // 0x8c1 @0x4a
0x0877…08ca at004b = ╱38╱8╱ // 0x8c2 @0x4b
0x0877…08ca at004c = ╱fe0000c006╱ // 0x8c3 @0x4c
0x0877…08ca at0051 = ╱ee╱)╱ // 0x8c8 @0x51
0x0877…08ca at0052 = EOL // 0x8c9 @0x52
0x0877…08ca }
0x08ca…0927 967e 8420 STD=STD+1000*(ORD(STARTPER$(4))-48)+100*(ORD(STARTPER$(5))-48)
0x08ca…0927 LineComalBin {
0x08ca…0927 ptr = 0x967e // 0x8ca @0x0
0x08ca…0927 lno = 0x20e4 // 0x8cc @0x2
0x08ca…0927 at0004 = ╱53╱S╱ // 0x8ce @0x4
0x08ca…0927 at0005 = ╱54╱T╱ // 0x8cf @0x5
0x08ca…0927 at0006 = ╱44╱D╱ // 0x8d0 @0x6
0x08ca…0927 at0007 = ╱dc╱=╱ // 0x8d1 @0x7
0x08ca…0927 at0008 = ╱53╱S╱ // 0x8d2 @0x8
0x08ca…0927 at0009 = ╱54╱T╱ // 0x8d3 @0x9
0x08ca…0927 at000a = ╱44╱D╱ // 0x8d4 @0xa
0x08ca…0927 at000b = ╱e2╱+╱ // 0x8d5 @0xb
0x08ca…0927 at000c = ╱31╱1╱ // 0x8d6 @0xc
0x08ca…0927 at000d = ╱30╱0╱ // 0x8d7 @0xd
0x08ca…0927 at000e = ╱30╱0╱ // 0x8d8 @0xe
0x08ca…0927 at000f = ╱30╱0╱ // 0x8d9 @0xf
0x08ca…0927 at0010 = ╱fe0000fa0a╱ // 0x8da @0x10
0x08ca…0927 at0015 = ╱e4╱*╱ // 0x8df @0x15
0x08ca…0927 at0016 = ╱ed╱(╱ // 0x8e0 @0x16
0x08ca…0927 at0017 = ╱cd╱ORD╱ // 0x8e1 @0x17
0x08ca…0927 at0018 = ╱ed╱(╱ // 0x8e2 @0x18
0x08ca…0927 at0019 = ╱53╱S╱ // 0x8e3 @0x19
0x08ca…0927 at001a = ╱54╱T╱ // 0x8e4 @0x1a
0x08ca…0927 at001b = ╱41╱A╱ // 0x8e5 @0x1b
0x08ca…0927 at001c = ╱52╱R╱ // 0x8e6 @0x1c
0x08ca…0927 at001d = ╱54╱T╱ // 0x8e7 @0x1d
0x08ca…0927 at001e = ╱50╱P╱ // 0x8e8 @0x1e
0x08ca…0927 at001f = ╱45╱E╱ // 0x8e9 @0x1f
0x08ca…0927 at0020 = ╱52╱R╱ // 0x8ea @0x20
0x08ca…0927 at0021 = ╱ef╱$╱ // 0x8eb @0x21
0x08ca…0927 at0022 = ╱ed╱(╱ // 0x8ec @0x22
0x08ca…0927 at0023 = ╱34╱4╱ // 0x8ed @0x23
0x08ca…0927 at0024 = ╱fe00008003╱ // 0x8ee @0x24
0x08ca…0927 at0029 = ╱ee╱)╱ // 0x8f3 @0x29
0x08ca…0927 at002a = ╱ee╱)╱ // 0x8f4 @0x2a
0x08ca…0927 at002b = ╱e3╱-╱ // 0x8f5 @0x2b
0x08ca…0927 at002c = ╱34╱4╱ // 0x8f6 @0x2c
0x08ca…0927 at002d = ╱38╱8╱ // 0x8f7 @0x2d
0x08ca…0927 at002e = ╱fe0000c006╱ // 0x8f8 @0x2e
0x08ca…0927 at0033 = ╱ee╱)╱ // 0x8fd @0x33
0x08ca…0927 at0034 = ╱e2╱+╱ // 0x8fe @0x34
0x08ca…0927 at0035 = ╱31╱1╱ // 0x8ff @0x35
0x08ca…0927 at0036 = ╱30╱0╱ // 0x900 @0x36
0x08ca…0927 at0037 = ╱30╱0╱ // 0x901 @0x37
0x08ca…0927 at0038 = ╱fe0000c807╱ // 0x902 @0x38
0x08ca…0927 at003d = ╱e4╱*╱ // 0x907 @0x3d
0x08ca…0927 at003e = ╱ed╱(╱ // 0x908 @0x3e
0x08ca…0927 at003f = ╱cd╱ORD╱ // 0x909 @0x3f
0x08ca…0927 at0040 = ╱ed╱(╱ // 0x90a @0x40
0x08ca…0927 at0041 = ╱53╱S╱ // 0x90b @0x41
0x08ca…0927 at0042 = ╱54╱T╱ // 0x90c @0x42
0x08ca…0927 at0043 = ╱41╱A╱ // 0x90d @0x43
0x08ca…0927 at0044 = ╱52╱R╱ // 0x90e @0x44
0x08ca…0927 at0045 = ╱54╱T╱ // 0x90f @0x45
0x08ca…0927 at0046 = ╱50╱P╱ // 0x910 @0x46
0x08ca…0927 at0047 = ╱45╱E╱ // 0x911 @0x47
0x08ca…0927 at0048 = ╱52╱R╱ // 0x912 @0x48
0x08ca…0927 at0049 = ╱ef╱$╱ // 0x913 @0x49
0x08ca…0927 at004a = ╱ed╱(╱ // 0x914 @0x4a
0x08ca…0927 at004b = ╱35╱5╱ // 0x915 @0x4b
0x08ca…0927 at004c = ╱fe0000a003╱ // 0x916 @0x4c
0x08ca…0927 at0051 = ╱ee╱)╱ // 0x91b @0x51
0x08ca…0927 at0052 = ╱ee╱)╱ // 0x91c @0x52
0x08ca…0927 at0053 = ╱e3╱-╱ // 0x91d @0x53
0x08ca…0927 at0054 = ╱34╱4╱ // 0x91e @0x54
0x08ca…0927 at0055 = ╱38╱8╱ // 0x91f @0x55
0x08ca…0927 at0056 = ╱fe0000c006╱ // 0x920 @0x56
0x08ca…0927 at005b = ╱ee╱)╱ // 0x925 @0x5b
0x08ca…0927 at005c = EOL // 0x926 @0x5c
0x08ca…0927 }
0x0927…0977 96ce 8430 STD=STD+10*(ORD(STARTPER$(7))-48)+ORD(STARTPER$(8))-48
0x0927…0977 LineComalBin {
0x0927…0977 ptr = 0x96ce // 0x927 @0x0
0x0927…0977 lno = 0x20ee // 0x929 @0x2
0x0927…0977 at0004 = ╱53╱S╱ // 0x92b @0x4
0x0927…0977 at0005 = ╱54╱T╱ // 0x92c @0x5
0x0927…0977 at0006 = ╱44╱D╱ // 0x92d @0x6
0x0927…0977 at0007 = ╱dc╱=╱ // 0x92e @0x7
0x0927…0977 at0008 = ╱53╱S╱ // 0x92f @0x8
0x0927…0977 at0009 = ╱54╱T╱ // 0x930 @0x9
0x0927…0977 at000a = ╱44╱D╱ // 0x931 @0xa
0x0927…0977 at000b = ╱e2╱+╱ // 0x932 @0xb
0x0927…0977 at000c = ╱31╱1╱ // 0x933 @0xc
0x0927…0977 at000d = ╱30╱0╱ // 0x934 @0xd
0x0927…0977 at000e = ╱fe0000a004╱ // 0x935 @0xe
0x0927…0977 at0013 = ╱e4╱*╱ // 0x93a @0x13
0x0927…0977 at0014 = ╱ed╱(╱ // 0x93b @0x14
0x0927…0977 at0015 = ╱cd╱ORD╱ // 0x93c @0x15
0x0927…0977 at0016 = ╱ed╱(╱ // 0x93d @0x16
0x0927…0977 at0017 = ╱53╱S╱ // 0x93e @0x17
0x0927…0977 at0018 = ╱54╱T╱ // 0x93f @0x18
0x0927…0977 at0019 = ╱41╱A╱ // 0x940 @0x19
0x0927…0977 at001a = ╱52╱R╱ // 0x941 @0x1a
0x0927…0977 at001b = ╱54╱T╱ // 0x942 @0x1b
0x0927…0977 at001c = ╱50╱P╱ // 0x943 @0x1c
0x0927…0977 at001d = ╱45╱E╱ // 0x944 @0x1d
0x0927…0977 at001e = ╱52╱R╱ // 0x945 @0x1e
0x0927…0977 at001f = ╱ef╱$╱ // 0x946 @0x1f
0x0927…0977 at0020 = ╱ed╱(╱ // 0x947 @0x20
0x0927…0977 at0021 = ╱37╱7╱ // 0x948 @0x21
0x0927…0977 at0022 = ╱fe0000e003╱ // 0x949 @0x22
0x0927…0977 at0027 = ╱ee╱)╱ // 0x94e @0x27
0x0927…0977 at0028 = ╱ee╱)╱ // 0x94f @0x28
0x0927…0977 at0029 = ╱e3╱-╱ // 0x950 @0x29
0x0927…0977 at002a = ╱34╱4╱ // 0x951 @0x2a
0x0927…0977 at002b = ╱38╱8╱ // 0x952 @0x2b
0x0927…0977 at002c = ╱fe0000c006╱ // 0x953 @0x2c
0x0927…0977 at0031 = ╱ee╱)╱ // 0x958 @0x31
0x0927…0977 at0032 = ╱e2╱+╱ // 0x959 @0x32
0x0927…0977 at0033 = ╱cd╱ORD╱ // 0x95a @0x33
0x0927…0977 at0034 = ╱ed╱(╱ // 0x95b @0x34
0x0927…0977 at0035 = ╱53╱S╱ // 0x95c @0x35
0x0927…0977 at0036 = ╱54╱T╱ // 0x95d @0x36
0x0927…0977 at0037 = ╱41╱A╱ // 0x95e @0x37
0x0927…0977 at0038 = ╱52╱R╱ // 0x95f @0x38
0x0927…0977 at0039 = ╱54╱T╱ // 0x960 @0x39
0x0927…0977 at003a = ╱50╱P╱ // 0x961 @0x3a
0x0927…0977 at003b = ╱45╱E╱ // 0x962 @0x3b
0x0927…0977 at003c = ╱52╱R╱ // 0x963 @0x3c
0x0927…0977 at003d = ╱ef╱$╱ // 0x964 @0x3d
0x0927…0977 at003e = ╱ed╱(╱ // 0x965 @0x3e
0x0927…0977 at003f = ╱38╱8╱ // 0x966 @0x3f
0x0927…0977 at0040 = ╱fe00008004╱ // 0x967 @0x40
0x0927…0977 at0045 = ╱ee╱)╱ // 0x96c @0x45
0x0927…0977 at0046 = ╱ee╱)╱ // 0x96d @0x46
0x0927…0977 at0047 = ╱e3╱-╱ // 0x96e @0x47
0x0927…0977 at0048 = ╱34╱4╱ // 0x96f @0x48
0x0927…0977 at0049 = ╱38╱8╱ // 0x970 @0x49
0x0927…0977 at004a = ╱fe0000c006╱ // 0x971 @0x4a
0x0927…0977 at004f = EOL // 0x976 @0x4f
0x0927…0977 }
0x0977…09c8 971f 8440 SLD=100000*(ORD(SLUTPER$(E))-48)+10000*(ORD(SLUTPER$(G))-48)
0x0977…09c8 LineComalBin {
0x0977…09c8 ptr = 0x971f // 0x977 @0x0
0x0977…09c8 lno = 0x20f8 // 0x979 @0x2
0x0977…09c8 at0004 = ╱53╱S╱ // 0x97b @0x4
0x0977…09c8 at0005 = ╱4c╱L╱ // 0x97c @0x5
0x0977…09c8 at0006 = ╱44╱D╱ // 0x97d @0x6
0x0977…09c8 at0007 = ╱dc╱=╱ // 0x97e @0x7
0x0977…09c8 at0008 = ╱31╱1╱ // 0x97f @0x8
0x0977…09c8 at0009 = ╱30╱0╱ // 0x980 @0x9
0x0977…09c8 at000a = ╱30╱0╱ // 0x981 @0xa
0x0977…09c8 at000b = ╱30╱0╱ // 0x982 @0xb
0x0977…09c8 at000c = ╱30╱0╱ // 0x983 @0xc
0x0977…09c8 at000d = ╱30╱0╱ // 0x984 @0xd
0x0977…09c8 at000e = ╱fe0050c311╱ // 0x985 @0xe
0x0977…09c8 at0013 = ╱e4╱*╱ // 0x98a @0x13
0x0977…09c8 at0014 = ╱ed╱(╱ // 0x98b @0x14
0x0977…09c8 at0015 = ╱cd╱ORD╱ // 0x98c @0x15
0x0977…09c8 at0016 = ╱ed╱(╱ // 0x98d @0x16
0x0977…09c8 at0017 = ╱53╱S╱ // 0x98e @0x17
0x0977…09c8 at0018 = ╱4c╱L╱ // 0x98f @0x18
0x0977…09c8 at0019 = ╱55╱U╱ // 0x990 @0x19
0x0977…09c8 at001a = ╱54╱T╱ // 0x991 @0x1a
0x0977…09c8 at001b = ╱50╱P╱ // 0x992 @0x1b
0x0977…09c8 at001c = ╱45╱E╱ // 0x993 @0x1c
0x0977…09c8 at001d = ╱52╱R╱ // 0x994 @0x1d
0x0977…09c8 at001e = ╱ef╱$╱ // 0x995 @0x1e
0x0977…09c8 at001f = ╱ed╱(╱ // 0x996 @0x1f
0x0977…09c8 at0020 = ╱45╱E╱ // 0x997 @0x20
0x0977…09c8 at0021 = ╱ee╱)╱ // 0x998 @0x21
0x0977…09c8 at0022 = ╱ee╱)╱ // 0x999 @0x22
0x0977…09c8 at0023 = ╱e3╱-╱ // 0x99a @0x23
0x0977…09c8 at0024 = ╱34╱4╱ // 0x99b @0x24
0x0977…09c8 at0025 = ╱38╱8╱ // 0x99c @0x25
0x0977…09c8 at0026 = ╱fe0000c006╱ // 0x99d @0x26
0x0977…09c8 at002b = ╱ee╱)╱ // 0x9a2 @0x2b
0x0977…09c8 at002c = ╱e2╱+╱ // 0x9a3 @0x2c
0x0977…09c8 at002d = ╱31╱1╱ // 0x9a4 @0x2d
0x0977…09c8 at002e = ╱30╱0╱ // 0x9a5 @0x2e
0x0977…09c8 at002f = ╱30╱0╱ // 0x9a6 @0x2f
0x0977…09c8 at0030 = ╱30╱0╱ // 0x9a7 @0x30
0x0977…09c8 at0031 = ╱30╱0╱ // 0x9a8 @0x31
0x0977…09c8 at0032 = ╱fe00409c0e╱ // 0x9a9 @0x32
0x0977…09c8 at0037 = ╱e4╱*╱ // 0x9ae @0x37
0x0977…09c8 at0038 = ╱ed╱(╱ // 0x9af @0x38
0x0977…09c8 at0039 = ╱cd╱ORD╱ // 0x9b0 @0x39
0x0977…09c8 at003a = ╱ed╱(╱ // 0x9b1 @0x3a
0x0977…09c8 at003b = ╱53╱S╱ // 0x9b2 @0x3b
0x0977…09c8 at003c = ╱4c╱L╱ // 0x9b3 @0x3c
0x0977…09c8 at003d = ╱55╱U╱ // 0x9b4 @0x3d
0x0977…09c8 at003e = ╱54╱T╱ // 0x9b5 @0x3e
0x0977…09c8 at003f = ╱50╱P╱ // 0x9b6 @0x3f
0x0977…09c8 at0040 = ╱45╱E╱ // 0x9b7 @0x40
0x0977…09c8 at0041 = ╱52╱R╱ // 0x9b8 @0x41
0x0977…09c8 at0042 = ╱ef╱$╱ // 0x9b9 @0x42
0x0977…09c8 at0043 = ╱ed╱(╱ // 0x9ba @0x43
0x0977…09c8 at0044 = ╱47╱G╱ // 0x9bb @0x44
0x0977…09c8 at0045 = ╱ee╱)╱ // 0x9bc @0x45
0x0977…09c8 at0046 = ╱ee╱)╱ // 0x9bd @0x46
0x0977…09c8 at0047 = ╱e3╱-╱ // 0x9be @0x47
0x0977…09c8 at0048 = ╱34╱4╱ // 0x9bf @0x48
0x0977…09c8 at0049 = ╱38╱8╱ // 0x9c0 @0x49
0x0977…09c8 at004a = ╱fe0000c006╱ // 0x9c1 @0x4a
0x0977…09c8 at004f = ╱ee╱)╱ // 0x9c6 @0x4f
0x0977…09c8 at0050 = EOL // 0x9c7 @0x50
0x0977…09c8 }
0x09c8…0a23 977a 8450 SLD=SLD+1000*(ORD(SLUTPER$(4))-48)+100*(ORD(SLUTPER$(5))-48)
0x09c8…0a23 LineComalBin {
0x09c8…0a23 ptr = 0x977a // 0x9c8 @0x0
0x09c8…0a23 lno = 0x2102 // 0x9ca @0x2
0x09c8…0a23 at0004 = ╱53╱S╱ // 0x9cc @0x4
0x09c8…0a23 at0005 = ╱4c╱L╱ // 0x9cd @0x5
0x09c8…0a23 at0006 = ╱44╱D╱ // 0x9ce @0x6
0x09c8…0a23 at0007 = ╱dc╱=╱ // 0x9cf @0x7
0x09c8…0a23 at0008 = ╱53╱S╱ // 0x9d0 @0x8
0x09c8…0a23 at0009 = ╱4c╱L╱ // 0x9d1 @0x9
0x09c8…0a23 at000a = ╱44╱D╱ // 0x9d2 @0xa
0x09c8…0a23 at000b = ╱e2╱+╱ // 0x9d3 @0xb
0x09c8…0a23 at000c = ╱31╱1╱ // 0x9d4 @0xc
0x09c8…0a23 at000d = ╱30╱0╱ // 0x9d5 @0xd
0x09c8…0a23 at000e = ╱30╱0╱ // 0x9d6 @0xe
0x09c8…0a23 at000f = ╱30╱0╱ // 0x9d7 @0xf
0x09c8…0a23 at0010 = ╱fe0000fa0a╱ // 0x9d8 @0x10
0x09c8…0a23 at0015 = ╱e4╱*╱ // 0x9dd @0x15
0x09c8…0a23 at0016 = ╱ed╱(╱ // 0x9de @0x16
0x09c8…0a23 at0017 = ╱cd╱ORD╱ // 0x9df @0x17
0x09c8…0a23 at0018 = ╱ed╱(╱ // 0x9e0 @0x18
0x09c8…0a23 at0019 = ╱53╱S╱ // 0x9e1 @0x19
0x09c8…0a23 at001a = ╱4c╱L╱ // 0x9e2 @0x1a
0x09c8…0a23 at001b = ╱55╱U╱ // 0x9e3 @0x1b
0x09c8…0a23 at001c = ╱54╱T╱ // 0x9e4 @0x1c
0x09c8…0a23 at001d = ╱50╱P╱ // 0x9e5 @0x1d
0x09c8…0a23 at001e = ╱45╱E╱ // 0x9e6 @0x1e
0x09c8…0a23 at001f = ╱52╱R╱ // 0x9e7 @0x1f
0x09c8…0a23 at0020 = ╱ef╱$╱ // 0x9e8 @0x20
0x09c8…0a23 at0021 = ╱ed╱(╱ // 0x9e9 @0x21
0x09c8…0a23 at0022 = ╱34╱4╱ // 0x9ea @0x22
0x09c8…0a23 at0023 = ╱fe00008003╱ // 0x9eb @0x23
0x09c8…0a23 at0028 = ╱ee╱)╱ // 0x9f0 @0x28
0x09c8…0a23 at0029 = ╱ee╱)╱ // 0x9f1 @0x29
0x09c8…0a23 at002a = ╱e3╱-╱ // 0x9f2 @0x2a
0x09c8…0a23 at002b = ╱34╱4╱ // 0x9f3 @0x2b
0x09c8…0a23 at002c = ╱38╱8╱ // 0x9f4 @0x2c
0x09c8…0a23 at002d = ╱fe0000c006╱ // 0x9f5 @0x2d
0x09c8…0a23 at0032 = ╱ee╱)╱ // 0x9fa @0x32
0x09c8…0a23 at0033 = ╱e2╱+╱ // 0x9fb @0x33
0x09c8…0a23 at0034 = ╱31╱1╱ // 0x9fc @0x34
0x09c8…0a23 at0035 = ╱30╱0╱ // 0x9fd @0x35
0x09c8…0a23 at0036 = ╱30╱0╱ // 0x9fe @0x36
0x09c8…0a23 at0037 = ╱fe0000c807╱ // 0x9ff @0x37
0x09c8…0a23 at003c = ╱e4╱*╱ // 0xa04 @0x3c
0x09c8…0a23 at003d = ╱ed╱(╱ // 0xa05 @0x3d
0x09c8…0a23 at003e = ╱cd╱ORD╱ // 0xa06 @0x3e
0x09c8…0a23 at003f = ╱ed╱(╱ // 0xa07 @0x3f
0x09c8…0a23 at0040 = ╱53╱S╱ // 0xa08 @0x40
0x09c8…0a23 at0041 = ╱4c╱L╱ // 0xa09 @0x41
0x09c8…0a23 at0042 = ╱55╱U╱ // 0xa0a @0x42
0x09c8…0a23 at0043 = ╱54╱T╱ // 0xa0b @0x43
0x09c8…0a23 at0044 = ╱50╱P╱ // 0xa0c @0x44
0x09c8…0a23 at0045 = ╱45╱E╱ // 0xa0d @0x45
0x09c8…0a23 at0046 = ╱52╱R╱ // 0xa0e @0x46
0x09c8…0a23 at0047 = ╱ef╱$╱ // 0xa0f @0x47
0x09c8…0a23 at0048 = ╱ed╱(╱ // 0xa10 @0x48
0x09c8…0a23 at0049 = ╱35╱5╱ // 0xa11 @0x49
0x09c8…0a23 at004a = ╱fe0000a003╱ // 0xa12 @0x4a
0x09c8…0a23 at004f = ╱ee╱)╱ // 0xa17 @0x4f
0x09c8…0a23 at0050 = ╱ee╱)╱ // 0xa18 @0x50
0x09c8…0a23 at0051 = ╱e3╱-╱ // 0xa19 @0x51
0x09c8…0a23 at0052 = ╱34╱4╱ // 0xa1a @0x52
0x09c8…0a23 at0053 = ╱38╱8╱ // 0xa1b @0x53
0x09c8…0a23 at0054 = ╱fe0000c006╱ // 0xa1c @0x54
0x09c8…0a23 at0059 = ╱ee╱)╱ // 0xa21 @0x59
0x09c8…0a23 at005a = EOL // 0xa22 @0x5a
0x09c8…0a23 }
0x0a23…0a71 97c8 8460 SLD=SLD+10*(ORD(SLUTPER$(7))-48)+ORD(SLUTPER$(8))-48
0x0a23…0a71 LineComalBin {
0x0a23…0a71 ptr = 0x97c8 // 0xa23 @0x0
0x0a23…0a71 lno = 0x210c // 0xa25 @0x2
0x0a23…0a71 at0004 = ╱53╱S╱ // 0xa27 @0x4
0x0a23…0a71 at0005 = ╱4c╱L╱ // 0xa28 @0x5
0x0a23…0a71 at0006 = ╱44╱D╱ // 0xa29 @0x6
0x0a23…0a71 at0007 = ╱dc╱=╱ // 0xa2a @0x7
0x0a23…0a71 at0008 = ╱53╱S╱ // 0xa2b @0x8
0x0a23…0a71 at0009 = ╱4c╱L╱ // 0xa2c @0x9
0x0a23…0a71 at000a = ╱44╱D╱ // 0xa2d @0xa
0x0a23…0a71 at000b = ╱e2╱+╱ // 0xa2e @0xb
0x0a23…0a71 at000c = ╱31╱1╱ // 0xa2f @0xc
0x0a23…0a71 at000d = ╱30╱0╱ // 0xa30 @0xd
0x0a23…0a71 at000e = ╱fe0000a004╱ // 0xa31 @0xe
0x0a23…0a71 at0013 = ╱e4╱*╱ // 0xa36 @0x13
0x0a23…0a71 at0014 = ╱ed╱(╱ // 0xa37 @0x14
0x0a23…0a71 at0015 = ╱cd╱ORD╱ // 0xa38 @0x15
0x0a23…0a71 at0016 = ╱ed╱(╱ // 0xa39 @0x16
0x0a23…0a71 at0017 = ╱53╱S╱ // 0xa3a @0x17
0x0a23…0a71 at0018 = ╱4c╱L╱ // 0xa3b @0x18
0x0a23…0a71 at0019 = ╱55╱U╱ // 0xa3c @0x19
0x0a23…0a71 at001a = ╱54╱T╱ // 0xa3d @0x1a
0x0a23…0a71 at001b = ╱50╱P╱ // 0xa3e @0x1b
0x0a23…0a71 at001c = ╱45╱E╱ // 0xa3f @0x1c
0x0a23…0a71 at001d = ╱52╱R╱ // 0xa40 @0x1d
0x0a23…0a71 at001e = ╱ef╱$╱ // 0xa41 @0x1e
0x0a23…0a71 at001f = ╱ed╱(╱ // 0xa42 @0x1f
0x0a23…0a71 at0020 = ╱37╱7╱ // 0xa43 @0x20
0x0a23…0a71 at0021 = ╱fe0000e003╱ // 0xa44 @0x21
0x0a23…0a71 at0026 = ╱ee╱)╱ // 0xa49 @0x26
0x0a23…0a71 at0027 = ╱ee╱)╱ // 0xa4a @0x27
0x0a23…0a71 at0028 = ╱e3╱-╱ // 0xa4b @0x28
0x0a23…0a71 at0029 = ╱34╱4╱ // 0xa4c @0x29
0x0a23…0a71 at002a = ╱38╱8╱ // 0xa4d @0x2a
0x0a23…0a71 at002b = ╱fe0000c006╱ // 0xa4e @0x2b
0x0a23…0a71 at0030 = ╱ee╱)╱ // 0xa53 @0x30
0x0a23…0a71 at0031 = ╱e2╱+╱ // 0xa54 @0x31
0x0a23…0a71 at0032 = ╱cd╱ORD╱ // 0xa55 @0x32
0x0a23…0a71 at0033 = ╱ed╱(╱ // 0xa56 @0x33
0x0a23…0a71 at0034 = ╱53╱S╱ // 0xa57 @0x34
0x0a23…0a71 at0035 = ╱4c╱L╱ // 0xa58 @0x35
0x0a23…0a71 at0036 = ╱55╱U╱ // 0xa59 @0x36
0x0a23…0a71 at0037 = ╱54╱T╱ // 0xa5a @0x37
0x0a23…0a71 at0038 = ╱50╱P╱ // 0xa5b @0x38
0x0a23…0a71 at0039 = ╱45╱E╱ // 0xa5c @0x39
0x0a23…0a71 at003a = ╱52╱R╱ // 0xa5d @0x3a
0x0a23…0a71 at003b = ╱ef╱$╱ // 0xa5e @0x3b
0x0a23…0a71 at003c = ╱ed╱(╱ // 0xa5f @0x3c
0x0a23…0a71 at003d = ╱38╱8╱ // 0xa60 @0x3d
0x0a23…0a71 at003e = ╱fe00008004╱ // 0xa61 @0x3e
0x0a23…0a71 at0043 = ╱ee╱)╱ // 0xa66 @0x43
0x0a23…0a71 at0044 = ╱ee╱)╱ // 0xa67 @0x44
0x0a23…0a71 at0045 = ╱e3╱-╱ // 0xa68 @0x45
0x0a23…0a71 at0046 = ╱34╱4╱ // 0xa69 @0x46
0x0a23…0a71 at0047 = ╱38╱8╱ // 0xa6a @0x47
0x0a23…0a71 at0048 = ╱fe0000c006╱ // 0xa6b @0x48
0x0a23…0a71 at004d = EOL // 0xa70 @0x4d
0x0a23…0a71 }
0x0a71…0a80 97d7 8465 CURSOR E,14
0x0a71…0a80 LineComalBin {
0x0a71…0a80 ptr = 0x97d7 // 0xa71 @0x0
0x0a71…0a80 lno = 0x2111 // 0xa73 @0x2
0x0a71…0a80 at0004 = ╱a1╱ CURSOR ╱ // 0xa75 @0x4
0x0a71…0a80 at0005 = ╱45╱E╱ // 0xa76 @0x5
0x0a71…0a80 at0006 = ╱ec╱,╱ // 0xa77 @0x6
0x0a71…0a80 at0007 = ╱31╱1╱ // 0xa78 @0x7
0x0a71…0a80 at0008 = ╱34╱4╱ // 0xa79 @0x8
0x0a71…0a80 at0009 = ╱fe0000e004╱ // 0xa7a @0x9
0x0a71…0a80 at000e = EOL // 0xa7f @0xe
0x0a71…0a80 }
0x0a80…0a87 97de 8470 OUTPUT P
0x0a80…0a87 LineComalBin {
0x0a80…0a87 ptr = 0x97de // 0xa80 @0x0
0x0a80…0a87 lno = 0x2116 // 0xa82 @0x2
0x0a80…0a87 at0004 = ╱a5╱ OUTPUT ╱ // 0xa84 @0x4
0x0a80…0a87 at0005 = ╱50╱P╱ // 0xa85 @0x5
0x0a80…0a87 at0006 = EOL // 0xa86 @0x6
0x0a80…0a87 }
0x0a87…0a8d (35,) 97e4 8490 REPEAT
0x0a87…0a8d LineComalBin {
0x0a87…0a8d ptr = 0x97e4 // 0xa87 @0x0
0x0a87…0a8d lno = 0x212a // 0xa89 @0x2
0x0a87…0a8d at0004 = ╱97╱ REPEAT ╱ // 0xa8b @0x4
0x0a87…0a8d at0005 = EOL // 0xa8c @0x5
0x0a87…0a8d }
0x0a8d…0a98 97ef 8500 EXEC NÆSTE
0x0a8d…0a98 LineComalBin {
0x0a8d…0a98 ptr = 0x97ef // 0xa8d @0x0
0x0a8d…0a98 lno = 0x2134 // 0xa8f @0x2
0x0a8d…0a98 at0004 = ╱9d╱ EXEC ╱ // 0xa91 @0x4
0x0a8d…0a98 at0005 = ╱4e╱N╱ // 0xa92 @0x5
0x0a8d…0a98 at0006 = ╱5b╱Æ╱ // 0xa93 @0x6
0x0a8d…0a98 at0007 = ╱53╱S╱ // 0xa94 @0x7
0x0a8d…0a98 at0008 = ╱54╱T╱ // 0xa95 @0x8
0x0a8d…0a98 at0009 = ╱45╱E╱ // 0xa96 @0x9
0x0a8d…0a98 at000a = EOL // 0xa97 @0xa
0x0a8d…0a98 }
0x0a98…0aa9 9800 8510 IF LMNR<=MLMNR THEN
0x0a98…0aa9 LineComalBin {
0x0a98…0aa9 ptr = 0x9800 // 0xa98 @0x0
0x0a98…0aa9 lno = 0x213e // 0xa9a @0x2
0x0a98…0aa9 at0004 = ╱9c╱ IF ╱ // 0xa9c @0x4
0x0a98…0aa9 at0005 = ╱4c╱L╱ // 0xa9d @0x5
0x0a98…0aa9 at0006 = ╱4d╱M╱ // 0xa9e @0x6
0x0a98…0aa9 at0007 = ╱4e╱N╱ // 0xa9f @0x7
0x0a98…0aa9 at0008 = ╱52╱R╱ // 0xaa0 @0x8
0x0a98…0aa9 at0009 = ╱df╱<=╱ // 0xaa1 @0x9
0x0a98…0aa9 at000a = ╱4d╱M╱ // 0xaa2 @0xa
0x0a98…0aa9 at000b = ╱4c╱L╱ // 0xaa3 @0xb
0x0a98…0aa9 at000c = ╱4d╱M╱ // 0xaa4 @0xc
0x0a98…0aa9 at000d = ╱4e╱N╱ // 0xaa5 @0xd
0x0a98…0aa9 at000e = ╱52╱R╱ // 0xaa6 @0xe
0x0a98…0aa9 at000f = ╱b6╱ THEN ╱ // 0xaa7 @0xf
0x0a98…0aa9 at0010 = EOL // 0xaa8 @0x10
0x0a98…0aa9 }
0x0aa9…0ab5 980c 8520 EXEC INDTÆL
0x0aa9…0ab5 LineComalBin {
0x0aa9…0ab5 ptr = 0x980c // 0xaa9 @0x0
0x0aa9…0ab5 lno = 0x2148 // 0xaab @0x2
0x0aa9…0ab5 at0004 = ╱9d╱ EXEC ╱ // 0xaad @0x4
0x0aa9…0ab5 at0005 = ╱49╱I╱ // 0xaae @0x5
0x0aa9…0ab5 at0006 = ╱4e╱N╱ // 0xaaf @0x6
0x0aa9…0ab5 at0007 = ╱44╱D╱ // 0xab0 @0x7
0x0aa9…0ab5 at0008 = ╱54╱T╱ // 0xab1 @0x8
0x0aa9…0ab5 at0009 = ╱5b╱Æ╱ // 0xab2 @0x9
0x0aa9…0ab5 at000a = ╱4c╱L╱ // 0xab3 @0xa
0x0aa9…0ab5 at000b = EOL // 0xab4 @0xb
0x0aa9…0ab5 }
0x0ab5…0ae3 983a 8521 EXEC CALC(B,TV$(34),TV$(37),RESUL$)
0x0ab5…0ae3 LineComalBin {
0x0ab5…0ae3 ptr = 0x983a // 0xab5 @0x0
0x0ab5…0ae3 lno = 0x2149 // 0xab7 @0x2
0x0ab5…0ae3 at0004 = ╱9d╱ EXEC ╱ // 0xab9 @0x4
0x0ab5…0ae3 at0005 = ╱43╱C╱ // 0xaba @0x5
0x0ab5…0ae3 at0006 = ╱41╱A╱ // 0xabb @0x6
0x0ab5…0ae3 at0007 = ╱4c╱L╱ // 0xabc @0x7
0x0ab5…0ae3 at0008 = ╱43╱C╱ // 0xabd @0x8
0x0ab5…0ae3 at0009 = ╱ed╱(╱ // 0xabe @0x9
0x0ab5…0ae3 at000a = ╱42╱B╱ // 0xabf @0xa
0x0ab5…0ae3 at000b = ╱ec╱,╱ // 0xac0 @0xb
0x0ab5…0ae3 at000c = ╱54╱T╱ // 0xac1 @0xc
0x0ab5…0ae3 at000d = ╱56╱V╱ // 0xac2 @0xd
0x0ab5…0ae3 at000e = ╱ef╱$╱ // 0xac3 @0xe
0x0ab5…0ae3 at000f = ╱ed╱(╱ // 0xac4 @0xf
0x0ab5…0ae3 at0010 = ╱33╱3╱ // 0xac5 @0x10
0x0ab5…0ae3 at0011 = ╱34╱4╱ // 0xac6 @0x11
0x0ab5…0ae3 at0012 = ╱fe00008806╱ // 0xac7 @0x12
0x0ab5…0ae3 at0017 = ╱ee╱)╱ // 0xacc @0x17
0x0ab5…0ae3 at0018 = ╱ec╱,╱ // 0xacd @0x18
0x0ab5…0ae3 at0019 = ╱54╱T╱ // 0xace @0x19
0x0ab5…0ae3 at001a = ╱56╱V╱ // 0xacf @0x1a
0x0ab5…0ae3 at001b = ╱ef╱$╱ // 0xad0 @0x1b
0x0ab5…0ae3 at001c = ╱ed╱(╱ // 0xad1 @0x1c
0x0ab5…0ae3 at001d = ╱33╱3╱ // 0xad2 @0x1d
0x0ab5…0ae3 at001e = ╱37╱7╱ // 0xad3 @0x1e
0x0ab5…0ae3 at001f = ╱fe00009406╱ // 0xad4 @0x1f
0x0ab5…0ae3 at0024 = ╱ee╱)╱ // 0xad9 @0x24
0x0ab5…0ae3 at0025 = ╱ec╱,╱ // 0xada @0x25
0x0ab5…0ae3 at0026 = ╱52╱R╱ // 0xadb @0x26
0x0ab5…0ae3 at0027 = ╱45╱E╱ // 0xadc @0x27
0x0ab5…0ae3 at0028 = ╱53╱S╱ // 0xadd @0x28
0x0ab5…0ae3 at0029 = ╱55╱U╱ // 0xade @0x29
0x0ab5…0ae3 at002a = ╱4c╱L╱ // 0xadf @0x2a
0x0ab5…0ae3 at002b = ╱ef╱$╱ // 0xae0 @0x2b
0x0ab5…0ae3 at002c = ╱ee╱)╱ // 0xae1 @0x2c
0x0ab5…0ae3 at002d = EOL // 0xae2 @0x2d
0x0ab5…0ae3 }
0x0ae3…0b0a 9861 8522 EXEC CALC(G,TRE$,TV$(43),RESUL1$)
0x0ae3…0b0a LineComalBin {
0x0ae3…0b0a ptr = 0x9861 // 0xae3 @0x0
0x0ae3…0b0a lno = 0x214a // 0xae5 @0x2
0x0ae3…0b0a at0004 = ╱9d╱ EXEC ╱ // 0xae7 @0x4
0x0ae3…0b0a at0005 = ╱43╱C╱ // 0xae8 @0x5
0x0ae3…0b0a at0006 = ╱41╱A╱ // 0xae9 @0x6
0x0ae3…0b0a at0007 = ╱4c╱L╱ // 0xaea @0x7
0x0ae3…0b0a at0008 = ╱43╱C╱ // 0xaeb @0x8
0x0ae3…0b0a at0009 = ╱ed╱(╱ // 0xaec @0x9
0x0ae3…0b0a at000a = ╱47╱G╱ // 0xaed @0xa
0x0ae3…0b0a at000b = ╱ec╱,╱ // 0xaee @0xb
0x0ae3…0b0a at000c = ╱54╱T╱ // 0xaef @0xc
0x0ae3…0b0a at000d = ╱52╱R╱ // 0xaf0 @0xd
0x0ae3…0b0a at000e = ╱45╱E╱ // 0xaf1 @0xe
0x0ae3…0b0a at000f = ╱ef╱$╱ // 0xaf2 @0xf
0x0ae3…0b0a at0010 = ╱ec╱,╱ // 0xaf3 @0x10
0x0ae3…0b0a at0011 = ╱54╱T╱ // 0xaf4 @0x11
0x0ae3…0b0a at0012 = ╱56╱V╱ // 0xaf5 @0x12
0x0ae3…0b0a at0013 = ╱ef╱$╱ // 0xaf6 @0x13
0x0ae3…0b0a at0014 = ╱ed╱(╱ // 0xaf7 @0x14
0x0ae3…0b0a at0015 = ╱34╱4╱ // 0xaf8 @0x15
0x0ae3…0b0a at0016 = ╱33╱3╱ // 0xaf9 @0x16
0x0ae3…0b0a at0017 = ╱fe0000ac06╱ // 0xafa @0x17
0x0ae3…0b0a at001c = ╱ee╱)╱ // 0xaff @0x1c
0x0ae3…0b0a at001d = ╱ec╱,╱ // 0xb00 @0x1d
0x0ae3…0b0a at001e = ╱52╱R╱ // 0xb01 @0x1e
0x0ae3…0b0a at001f = ╱45╱E╱ // 0xb02 @0x1f
0x0ae3…0b0a at0020 = ╱53╱S╱ // 0xb03 @0x20
0x0ae3…0b0a at0021 = ╱55╱U╱ // 0xb04 @0x21
0x0ae3…0b0a at0022 = ╱4c╱L╱ // 0xb05 @0x22
0x0ae3…0b0a at0023 = ╱31╱1╱ // 0xb06 @0x23
0x0ae3…0b0a at0024 = ╱ef╱$╱ // 0xb07 @0x24
0x0ae3…0b0a at0025 = ╱ee╱)╱ // 0xb08 @0x25
0x0ae3…0b0a at0026 = EOL // 0xb09 @0x26
0x0ae3…0b0a }
0x0b0a…0b2d 9884 8523 TV$(34)=RESUL$(G:11)
0x0b0a…0b2d LineComalBin {
0x0b0a…0b2d ptr = 0x9884 // 0xb0a @0x0
0x0b0a…0b2d lno = 0x214b // 0xb0c @0x2
0x0b0a…0b2d at0004 = ╱54╱T╱ // 0xb0e @0x4
0x0b0a…0b2d at0005 = ╱56╱V╱ // 0xb0f @0x5
0x0b0a…0b2d at0006 = ╱ef╱$╱ // 0xb10 @0x6
0x0b0a…0b2d at0007 = ╱ed╱(╱ // 0xb11 @0x7
0x0b0a…0b2d at0008 = ╱33╱3╱ // 0xb12 @0x8
0x0b0a…0b2d at0009 = ╱34╱4╱ // 0xb13 @0x9
0x0b0a…0b2d at000a = ╱fe00008806╱ // 0xb14 @0xa
0x0b0a…0b2d at000f = ╱ee╱)╱ // 0xb19 @0xf
0x0b0a…0b2d at0010 = ╱dc╱=╱ // 0xb1a @0x10
0x0b0a…0b2d at0011 = ╱52╱R╱ // 0xb1b @0x11
0x0b0a…0b2d at0012 = ╱45╱E╱ // 0xb1c @0x12
0x0b0a…0b2d at0013 = ╱53╱S╱ // 0xb1d @0x13
0x0b0a…0b2d at0014 = ╱55╱U╱ // 0xb1e @0x14
0x0b0a…0b2d at0015 = ╱4c╱L╱ // 0xb1f @0x15
0x0b0a…0b2d at0016 = ╱ef╱$╱ // 0xb20 @0x16
0x0b0a…0b2d at0017 = ╱ed╱(╱ // 0xb21 @0x17
0x0b0a…0b2d at0018 = ╱47╱G╱ // 0xb22 @0x18
0x0b0a…0b2d at0019 = ╱f0╱:╱ // 0xb23 @0x19
0x0b0a…0b2d at001a = ╱31╱1╱ // 0xb24 @0x1a
0x0b0a…0b2d at001b = ╱31╱1╱ // 0xb25 @0x1b
0x0b0a…0b2d at001c = ╱fe0000b004╱ // 0xb26 @0x1c
0x0b0a…0b2d at0021 = ╱ee╱)╱ // 0xb2b @0x21
0x0b0a…0b2d at0022 = EOL // 0xb2c @0x22
0x0b0a…0b2d }
0x0b2d…0b51 98a8 8524 TV$(43)=RESUL1$(G:11)
0x0b2d…0b51 LineComalBin {
0x0b2d…0b51 ptr = 0x98a8 // 0xb2d @0x0
0x0b2d…0b51 lno = 0x214c // 0xb2f @0x2
0x0b2d…0b51 at0004 = ╱54╱T╱ // 0xb31 @0x4
0x0b2d…0b51 at0005 = ╱56╱V╱ // 0xb32 @0x5
0x0b2d…0b51 at0006 = ╱ef╱$╱ // 0xb33 @0x6
0x0b2d…0b51 at0007 = ╱ed╱(╱ // 0xb34 @0x7
0x0b2d…0b51 at0008 = ╱34╱4╱ // 0xb35 @0x8
0x0b2d…0b51 at0009 = ╱33╱3╱ // 0xb36 @0x9
0x0b2d…0b51 at000a = ╱fe0000ac06╱ // 0xb37 @0xa
0x0b2d…0b51 at000f = ╱ee╱)╱ // 0xb3c @0xf
0x0b2d…0b51 at0010 = ╱dc╱=╱ // 0xb3d @0x10
0x0b2d…0b51 at0011 = ╱52╱R╱ // 0xb3e @0x11
0x0b2d…0b51 at0012 = ╱45╱E╱ // 0xb3f @0x12
0x0b2d…0b51 at0013 = ╱53╱S╱ // 0xb40 @0x13
0x0b2d…0b51 at0014 = ╱55╱U╱ // 0xb41 @0x14
0x0b2d…0b51 at0015 = ╱4c╱L╱ // 0xb42 @0x15
0x0b2d…0b51 at0016 = ╱31╱1╱ // 0xb43 @0x16
0x0b2d…0b51 at0017 = ╱ef╱$╱ // 0xb44 @0x17
0x0b2d…0b51 at0018 = ╱ed╱(╱ // 0xb45 @0x18
0x0b2d…0b51 at0019 = ╱47╱G╱ // 0xb46 @0x19
0x0b2d…0b51 at001a = ╱f0╱:╱ // 0xb47 @0x1a
0x0b2d…0b51 at001b = ╱31╱1╱ // 0xb48 @0x1b
0x0b2d…0b51 at001c = ╱31╱1╱ // 0xb49 @0x1c
0x0b2d…0b51 at001d = ╱fe0000b004╱ // 0xb4a @0x1d
0x0b2d…0b51 at0022 = ╱ee╱)╱ // 0xb4f @0x22
0x0b2d…0b51 at0023 = EOL // 0xb50 @0x23
0x0b2d…0b51 }
0x0b51…0b5f 98b6 8529 ABL=ABL+E
0x0b51…0b5f LineComalBin {
0x0b51…0b5f ptr = 0x98b6 // 0xb51 @0x0
0x0b51…0b5f lno = 0x2151 // 0xb53 @0x2
0x0b51…0b5f at0004 = ╱41╱A╱ // 0xb55 @0x4
0x0b51…0b5f at0005 = ╱42╱B╱ // 0xb56 @0x5
0x0b51…0b5f at0006 = ╱4c╱L╱ // 0xb57 @0x6
0x0b51…0b5f at0007 = ╱dc╱=╱ // 0xb58 @0x7
0x0b51…0b5f at0008 = ╱41╱A╱ // 0xb59 @0x8
0x0b51…0b5f at0009 = ╱42╱B╱ // 0xb5a @0x9
0x0b51…0b5f at000a = ╱4c╱L╱ // 0xb5b @0xa
0x0b51…0b5f at000b = ╱e2╱+╱ // 0xb5c @0xb
0x0b51…0b5f at000c = ╱45╱E╱ // 0xb5d @0xc
0x0b51…0b5f at000d = EOL // 0xb5e @0xd
0x0b51…0b5f }
0x0b5f…0b8d 98e4 8530 EXEC CALC(B,TV$(43),TOTAL$(E),TOTAL$(E))
0x0b5f…0b8d LineComalBin {
0x0b5f…0b8d ptr = 0x98e4 // 0xb5f @0x0
0x0b5f…0b8d lno = 0x2152 // 0xb61 @0x2
0x0b5f…0b8d at0004 = ╱9d╱ EXEC ╱ // 0xb63 @0x4
0x0b5f…0b8d at0005 = ╱43╱C╱ // 0xb64 @0x5
0x0b5f…0b8d at0006 = ╱41╱A╱ // 0xb65 @0x6
0x0b5f…0b8d at0007 = ╱4c╱L╱ // 0xb66 @0x7
0x0b5f…0b8d at0008 = ╱43╱C╱ // 0xb67 @0x8
0x0b5f…0b8d at0009 = ╱ed╱(╱ // 0xb68 @0x9
0x0b5f…0b8d at000a = ╱42╱B╱ // 0xb69 @0xa
0x0b5f…0b8d at000b = ╱ec╱,╱ // 0xb6a @0xb
0x0b5f…0b8d at000c = ╱54╱T╱ // 0xb6b @0xc
0x0b5f…0b8d at000d = ╱56╱V╱ // 0xb6c @0xd
0x0b5f…0b8d at000e = ╱ef╱$╱ // 0xb6d @0xe
0x0b5f…0b8d at000f = ╱ed╱(╱ // 0xb6e @0xf
0x0b5f…0b8d at0010 = ╱34╱4╱ // 0xb6f @0x10
0x0b5f…0b8d at0011 = ╱33╱3╱ // 0xb70 @0x11
0x0b5f…0b8d at0012 = ╱fe0000ac06╱ // 0xb71 @0x12
0x0b5f…0b8d at0017 = ╱ee╱)╱ // 0xb76 @0x17
0x0b5f…0b8d at0018 = ╱ec╱,╱ // 0xb77 @0x18
0x0b5f…0b8d at0019 = ╱54╱T╱ // 0xb78 @0x19
0x0b5f…0b8d at001a = ╱4f╱O╱ // 0xb79 @0x1a
0x0b5f…0b8d at001b = ╱54╱T╱ // 0xb7a @0x1b
0x0b5f…0b8d at001c = ╱41╱A╱ // 0xb7b @0x1c
0x0b5f…0b8d at001d = ╱4c╱L╱ // 0xb7c @0x1d
0x0b5f…0b8d at001e = ╱ef╱$╱ // 0xb7d @0x1e
0x0b5f…0b8d at001f = ╱ed╱(╱ // 0xb7e @0x1f
0x0b5f…0b8d at0020 = ╱45╱E╱ // 0xb7f @0x20
0x0b5f…0b8d at0021 = ╱ee╱)╱ // 0xb80 @0x21
0x0b5f…0b8d at0022 = ╱ec╱,╱ // 0xb81 @0x22
0x0b5f…0b8d at0023 = ╱54╱T╱ // 0xb82 @0x23
0x0b5f…0b8d at0024 = ╱4f╱O╱ // 0xb83 @0x24
0x0b5f…0b8d at0025 = ╱54╱T╱ // 0xb84 @0x25
0x0b5f…0b8d at0026 = ╱41╱A╱ // 0xb85 @0x26
0x0b5f…0b8d at0027 = ╱4c╱L╱ // 0xb86 @0x27
0x0b5f…0b8d at0028 = ╱ef╱$╱ // 0xb87 @0x28
0x0b5f…0b8d at0029 = ╱ed╱(╱ // 0xb88 @0x29
0x0b5f…0b8d at002a = ╱45╱E╱ // 0xb89 @0x2a
0x0b5f…0b8d at002b = ╱ee╱)╱ // 0xb8a @0x2b
0x0b5f…0b8d at002c = ╱ee╱)╱ // 0xb8b @0x2c
0x0b5f…0b8d at002d = EOL // 0xb8c @0x2d
0x0b5f…0b8d }
0x0b8d…0bbb 9912 8540 EXEC CALC(B,TV$(34),TOTAL$(G),TOTAL$(G))
0x0b8d…0bbb LineComalBin {
0x0b8d…0bbb ptr = 0x9912 // 0xb8d @0x0
0x0b8d…0bbb lno = 0x215c // 0xb8f @0x2
0x0b8d…0bbb at0004 = ╱9d╱ EXEC ╱ // 0xb91 @0x4
0x0b8d…0bbb at0005 = ╱43╱C╱ // 0xb92 @0x5
0x0b8d…0bbb at0006 = ╱41╱A╱ // 0xb93 @0x6
0x0b8d…0bbb at0007 = ╱4c╱L╱ // 0xb94 @0x7
0x0b8d…0bbb at0008 = ╱43╱C╱ // 0xb95 @0x8
0x0b8d…0bbb at0009 = ╱ed╱(╱ // 0xb96 @0x9
0x0b8d…0bbb at000a = ╱42╱B╱ // 0xb97 @0xa
0x0b8d…0bbb at000b = ╱ec╱,╱ // 0xb98 @0xb
0x0b8d…0bbb at000c = ╱54╱T╱ // 0xb99 @0xc
0x0b8d…0bbb at000d = ╱56╱V╱ // 0xb9a @0xd
0x0b8d…0bbb at000e = ╱ef╱$╱ // 0xb9b @0xe
0x0b8d…0bbb at000f = ╱ed╱(╱ // 0xb9c @0xf
0x0b8d…0bbb at0010 = ╱33╱3╱ // 0xb9d @0x10
0x0b8d…0bbb at0011 = ╱34╱4╱ // 0xb9e @0x11
0x0b8d…0bbb at0012 = ╱fe00008806╱ // 0xb9f @0x12
0x0b8d…0bbb at0017 = ╱ee╱)╱ // 0xba4 @0x17
0x0b8d…0bbb at0018 = ╱ec╱,╱ // 0xba5 @0x18
0x0b8d…0bbb at0019 = ╱54╱T╱ // 0xba6 @0x19
0x0b8d…0bbb at001a = ╱4f╱O╱ // 0xba7 @0x1a
0x0b8d…0bbb at001b = ╱54╱T╱ // 0xba8 @0x1b
0x0b8d…0bbb at001c = ╱41╱A╱ // 0xba9 @0x1c
0x0b8d…0bbb at001d = ╱4c╱L╱ // 0xbaa @0x1d
0x0b8d…0bbb at001e = ╱ef╱$╱ // 0xbab @0x1e
0x0b8d…0bbb at001f = ╱ed╱(╱ // 0xbac @0x1f
0x0b8d…0bbb at0020 = ╱47╱G╱ // 0xbad @0x20
0x0b8d…0bbb at0021 = ╱ee╱)╱ // 0xbae @0x21
0x0b8d…0bbb at0022 = ╱ec╱,╱ // 0xbaf @0x22
0x0b8d…0bbb at0023 = ╱54╱T╱ // 0xbb0 @0x23
0x0b8d…0bbb at0024 = ╱4f╱O╱ // 0xbb1 @0x24
0x0b8d…0bbb at0025 = ╱54╱T╱ // 0xbb2 @0x25
0x0b8d…0bbb at0026 = ╱41╱A╱ // 0xbb3 @0x26
0x0b8d…0bbb at0027 = ╱4c╱L╱ // 0xbb4 @0x27
0x0b8d…0bbb at0028 = ╱ef╱$╱ // 0xbb5 @0x28
0x0b8d…0bbb at0029 = ╱ed╱(╱ // 0xbb6 @0x29
0x0b8d…0bbb at002a = ╱47╱G╱ // 0xbb7 @0x2a
0x0b8d…0bbb at002b = ╱ee╱)╱ // 0xbb8 @0x2b
0x0b8d…0bbb at002c = ╱ee╱)╱ // 0xbb9 @0x2c
0x0b8d…0bbb at002d = EOL // 0xbba @0x2d
0x0b8d…0bbb }
0x0bbb…0be9 (39,) 9940 8542 EXEC CALC(B,TV$(40),TOTAL$(V),TOTAL$(V))
0x0bbb…0be9 LineComalBin {
0x0bbb…0be9 ptr = 0x9940 // 0xbbb @0x0
0x0bbb…0be9 lno = 0x215e // 0xbbd @0x2
0x0bbb…0be9 at0004 = ╱9d╱ EXEC ╱ // 0xbbf @0x4
0x0bbb…0be9 at0005 = ╱43╱C╱ // 0xbc0 @0x5
0x0bbb…0be9 at0006 = ╱41╱A╱ // 0xbc1 @0x6
0x0bbb…0be9 at0007 = ╱4c╱L╱ // 0xbc2 @0x7
0x0bbb…0be9 at0008 = ╱43╱C╱ // 0xbc3 @0x8
0x0bbb…0be9 at0009 = ╱ed╱(╱ // 0xbc4 @0x9
0x0bbb…0be9 at000a = ╱42╱B╱ // 0xbc5 @0xa
0x0bbb…0be9 at000b = ╱ec╱,╱ // 0xbc6 @0xb
0x0bbb…0be9 at000c = ╱54╱T╱ // 0xbc7 @0xc
0x0bbb…0be9 at000d = ╱56╱V╱ // 0xbc8 @0xd
0x0bbb…0be9 at000e = ╱ef╱$╱ // 0xbc9 @0xe
0x0bbb…0be9 at000f = ╱ed╱(╱ // 0xbca @0xf
0x0bbb…0be9 at0010 = ╱34╱4╱ // 0xbcb @0x10
0x0bbb…0be9 at0011 = ╱30╱0╱ // 0xbcc @0x11
0x0bbb…0be9 at0012 = ╱fe0000a006╱ // 0xbcd @0x12
0x0bbb…0be9 at0017 = ╱ee╱)╱ // 0xbd2 @0x17
0x0bbb…0be9 at0018 = ╱ec╱,╱ // 0xbd3 @0x18
0x0bbb…0be9 at0019 = ╱54╱T╱ // 0xbd4 @0x19
0x0bbb…0be9 at001a = ╱4f╱O╱ // 0xbd5 @0x1a
0x0bbb…0be9 at001b = ╱54╱T╱ // 0xbd6 @0x1b
0x0bbb…0be9 at001c = ╱41╱A╱ // 0xbd7 @0x1c
0x0bbb…0be9 at001d = ╱4c╱L╱ // 0xbd8 @0x1d
0x0bbb…0be9 at001e = ╱ef╱$╱ // 0xbd9 @0x1e
0x0bbb…0be9 at001f = ╱ed╱(╱ // 0xbda @0x1f
0x0bbb…0be9 at0020 = ╱56╱V╱ // 0xbdb @0x20
0x0bbb…0be9 at0021 = ╱ee╱)╱ // 0xbdc @0x21
0x0bbb…0be9 at0022 = ╱ec╱,╱ // 0xbdd @0x22
0x0bbb…0be9 at0023 = ╱54╱T╱ // 0xbde @0x23
0x0bbb…0be9 at0024 = ╱4f╱O╱ // 0xbdf @0x24
0x0bbb…0be9 at0025 = ╱54╱T╱ // 0xbe0 @0x25
0x0bbb…0be9 at0026 = ╱41╱A╱ // 0xbe1 @0x26
0x0bbb…0be9 at0027 = ╱4c╱L╱ // 0xbe2 @0x27
0x0bbb…0be9 at0028 = ╱ef╱$╱ // 0xbe3 @0x28
0x0bbb…0be9 at0029 = ╱ed╱(╱ // 0xbe4 @0x29
0x0bbb…0be9 at002a = ╱56╱V╱ // 0xbe5 @0x2a
0x0bbb…0be9 at002b = ╱ee╱)╱ // 0xbe6 @0x2b
0x0bbb…0be9 at002c = ╱ee╱)╱ // 0xbe7 @0x2c
0x0bbb…0be9 at002d = EOL // 0xbe8 @0x2d
0x0bbb…0be9 }
0x0be9…0c21 9978 8544 EXEC CALC(B,TV$(37),TOTAL$(4),TOTAL$(4))
0x0be9…0c21 LineComalBin {
0x0be9…0c21 ptr = 0x9978 // 0xbe9 @0x0
0x0be9…0c21 lno = 0x2160 // 0xbeb @0x2
0x0be9…0c21 at0004 = ╱9d╱ EXEC ╱ // 0xbed @0x4
0x0be9…0c21 at0005 = ╱43╱C╱ // 0xbee @0x5
0x0be9…0c21 at0006 = ╱41╱A╱ // 0xbef @0x6
0x0be9…0c21 at0007 = ╱4c╱L╱ // 0xbf0 @0x7
0x0be9…0c21 at0008 = ╱43╱C╱ // 0xbf1 @0x8
0x0be9…0c21 at0009 = ╱ed╱(╱ // 0xbf2 @0x9
0x0be9…0c21 at000a = ╱42╱B╱ // 0xbf3 @0xa
0x0be9…0c21 at000b = ╱ec╱,╱ // 0xbf4 @0xb
0x0be9…0c21 at000c = ╱54╱T╱ // 0xbf5 @0xc
0x0be9…0c21 at000d = ╱56╱V╱ // 0xbf6 @0xd
0x0be9…0c21 at000e = ╱ef╱$╱ // 0xbf7 @0xe
0x0be9…0c21 at000f = ╱ed╱(╱ // 0xbf8 @0xf
0x0be9…0c21 at0010 = ╱33╱3╱ // 0xbf9 @0x10
0x0be9…0c21 at0011 = ╱37╱7╱ // 0xbfa @0x11
0x0be9…0c21 at0012 = ╱fe00009406╱ // 0xbfb @0x12
0x0be9…0c21 at0017 = ╱ee╱)╱ // 0xc00 @0x17
0x0be9…0c21 at0018 = ╱ec╱,╱ // 0xc01 @0x18
0x0be9…0c21 at0019 = ╱54╱T╱ // 0xc02 @0x19
0x0be9…0c21 at001a = ╱4f╱O╱ // 0xc03 @0x1a
0x0be9…0c21 at001b = ╱54╱T╱ // 0xc04 @0x1b
0x0be9…0c21 at001c = ╱41╱A╱ // 0xc05 @0x1c
0x0be9…0c21 at001d = ╱4c╱L╱ // 0xc06 @0x1d
0x0be9…0c21 at001e = ╱ef╱$╱ // 0xc07 @0x1e
0x0be9…0c21 at001f = ╱ed╱(╱ // 0xc08 @0x1f
0x0be9…0c21 at0020 = ╱34╱4╱ // 0xc09 @0x20
0x0be9…0c21 at0021 = ╱fe00008003╱ // 0xc0a @0x21
0x0be9…0c21 at0026 = ╱ee╱)╱ // 0xc0f @0x26
0x0be9…0c21 at0027 = ╱ec╱,╱ // 0xc10 @0x27
0x0be9…0c21 at0028 = ╱54╱T╱ // 0xc11 @0x28
0x0be9…0c21 at0029 = ╱4f╱O╱ // 0xc12 @0x29
0x0be9…0c21 at002a = ╱54╱T╱ // 0xc13 @0x2a
0x0be9…0c21 at002b = ╱41╱A╱ // 0xc14 @0x2b
0x0be9…0c21 at002c = ╱4c╱L╱ // 0xc15 @0x2c
0x0be9…0c21 at002d = ╱ef╱$╱ // 0xc16 @0x2d
0x0be9…0c21 at002e = ╱ed╱(╱ // 0xc17 @0x2e
0x0be9…0c21 at002f = ╱34╱4╱ // 0xc18 @0x2f
0x0be9…0c21 at0030 = ╱fe00008003╱ // 0xc19 @0x30
0x0be9…0c21 at0035 = ╱ee╱)╱ // 0xc1e @0x35
0x0be9…0c21 at0036 = ╱ee╱)╱ // 0xc1f @0x36
0x0be9…0c21 at0037 = EOL // 0xc20 @0x37
0x0be9…0c21 }
0x0c21…0c42 9999 8545 TV$(34,W,11)="00 "
0x0c21…0c42 LineComalBin {
0x0c21…0c42 ptr = 0x9999 // 0xc21 @0x0
0x0c21…0c42 lno = 0x2161 // 0xc23 @0x2
0x0c21…0c42 at0004 = ╱54╱T╱ // 0xc25 @0x4
0x0c21…0c42 at0005 = ╱56╱V╱ // 0xc26 @0x5
0x0c21…0c42 at0006 = ╱ef╱$╱ // 0xc27 @0x6
0x0c21…0c42 at0007 = ╱ed╱(╱ // 0xc28 @0x7
0x0c21…0c42 at0008 = ╱33╱3╱ // 0xc29 @0x8
0x0c21…0c42 at0009 = ╱34╱4╱ // 0xc2a @0x9
0x0c21…0c42 at000a = ╱fe00008806╱ // 0xc2b @0xa
0x0c21…0c42 at000f = ╱ec╱,╱ // 0xc30 @0xf
0x0c21…0c42 at0010 = ╱57╱W╱ // 0xc31 @0x10
0x0c21…0c42 at0011 = ╱ec╱,╱ // 0xc32 @0x11
0x0c21…0c42 at0012 = ╱31╱1╱ // 0xc33 @0x12
0x0c21…0c42 at0013 = ╱31╱1╱ // 0xc34 @0x13
0x0c21…0c42 at0014 = ╱fe0000b004╱ // 0xc35 @0x14
0x0c21…0c42 at0019 = ╱ee╱)╱ // 0xc3a @0x19
0x0c21…0c42 at001a = ╱dc╱=╱ // 0xc3b @0x1a
0x0c21…0c42 at001b = ╱22╱"╱ // 0xc3c @0x1b
0x0c21…0c42 at001c = ╱30╱0╱ // 0xc3d @0x1c
0x0c21…0c42 at001d = ╱30╱0╱ // 0xc3e @0x1d
0x0c21…0c42 at001e = ╱20╱…╱ // 0xc3f @0x1e
0x0c21…0c42 at001f = ╱22╱"╱ // 0xc40 @0x1f
0x0c21…0c42 at0020 = EOL // 0xc41 @0x20
0x0c21…0c42 }
0x0c42…0c63 99ba 8546 TV$(43,W,11)="00 "
0x0c42…0c63 LineComalBin {
0x0c42…0c63 ptr = 0x99ba // 0xc42 @0x0
0x0c42…0c63 lno = 0x2162 // 0xc44 @0x2
0x0c42…0c63 at0004 = ╱54╱T╱ // 0xc46 @0x4
0x0c42…0c63 at0005 = ╱56╱V╱ // 0xc47 @0x5
0x0c42…0c63 at0006 = ╱ef╱$╱ // 0xc48 @0x6
0x0c42…0c63 at0007 = ╱ed╱(╱ // 0xc49 @0x7
0x0c42…0c63 at0008 = ╱34╱4╱ // 0xc4a @0x8
0x0c42…0c63 at0009 = ╱33╱3╱ // 0xc4b @0x9
0x0c42…0c63 at000a = ╱fe0000ac06╱ // 0xc4c @0xa
0x0c42…0c63 at000f = ╱ec╱,╱ // 0xc51 @0xf
0x0c42…0c63 at0010 = ╱57╱W╱ // 0xc52 @0x10
0x0c42…0c63 at0011 = ╱ec╱,╱ // 0xc53 @0x11
0x0c42…0c63 at0012 = ╱31╱1╱ // 0xc54 @0x12
0x0c42…0c63 at0013 = ╱31╱1╱ // 0xc55 @0x13
0x0c42…0c63 at0014 = ╱fe0000b004╱ // 0xc56 @0x14
0x0c42…0c63 at0019 = ╱ee╱)╱ // 0xc5b @0x19
0x0c42…0c63 at001a = ╱dc╱=╱ // 0xc5c @0x1a
0x0c42…0c63 at001b = ╱22╱"╱ // 0xc5d @0x1b
0x0c42…0c63 at001c = ╱30╱0╱ // 0xc5e @0x1c
0x0c42…0c63 at001d = ╱30╱0╱ // 0xc5f @0x1d
0x0c42…0c63 at001e = ╱20╱…╱ // 0xc60 @0x1e
0x0c42…0c63 at001f = ╱22╱"╱ // 0xc61 @0x1f
0x0c42…0c63 at0020 = EOL // 0xc62 @0x20
0x0c42…0c63 }
0x0c63…0c84 99db 8547 TV$(40,W,11)="00 "
0x0c63…0c84 LineComalBin {
0x0c63…0c84 ptr = 0x99db // 0xc63 @0x0
0x0c63…0c84 lno = 0x2163 // 0xc65 @0x2
0x0c63…0c84 at0004 = ╱54╱T╱ // 0xc67 @0x4
0x0c63…0c84 at0005 = ╱56╱V╱ // 0xc68 @0x5
0x0c63…0c84 at0006 = ╱ef╱$╱ // 0xc69 @0x6
0x0c63…0c84 at0007 = ╱ed╱(╱ // 0xc6a @0x7
0x0c63…0c84 at0008 = ╱34╱4╱ // 0xc6b @0x8
0x0c63…0c84 at0009 = ╱30╱0╱ // 0xc6c @0x9
0x0c63…0c84 at000a = ╱fe0000a006╱ // 0xc6d @0xa
0x0c63…0c84 at000f = ╱ec╱,╱ // 0xc72 @0xf
0x0c63…0c84 at0010 = ╱57╱W╱ // 0xc73 @0x10
0x0c63…0c84 at0011 = ╱ec╱,╱ // 0xc74 @0x11
0x0c63…0c84 at0012 = ╱31╱1╱ // 0xc75 @0x12
0x0c63…0c84 at0013 = ╱31╱1╱ // 0xc76 @0x13
0x0c63…0c84 at0014 = ╱fe0000b004╱ // 0xc77 @0x14
0x0c63…0c84 at0019 = ╱ee╱)╱ // 0xc7c @0x19
0x0c63…0c84 at001a = ╱dc╱=╱ // 0xc7d @0x1a
0x0c63…0c84 at001b = ╱22╱"╱ // 0xc7e @0x1b
0x0c63…0c84 at001c = ╱30╱0╱ // 0xc7f @0x1c
0x0c63…0c84 at001d = ╱30╱0╱ // 0xc80 @0x1d
0x0c63…0c84 at001e = ╱20╱…╱ // 0xc81 @0x1e
0x0c63…0c84 at001f = ╱22╱"╱ // 0xc82 @0x1f
0x0c63…0c84 at0020 = EOL // 0xc83 @0x20
0x0c63…0c84 }
0x0c84…0ca5 99fc 8548 TV$(37,W,11)="00 "
0x0c84…0ca5 LineComalBin {
0x0c84…0ca5 ptr = 0x99fc // 0xc84 @0x0
0x0c84…0ca5 lno = 0x2164 // 0xc86 @0x2
0x0c84…0ca5 at0004 = ╱54╱T╱ // 0xc88 @0x4
0x0c84…0ca5 at0005 = ╱56╱V╱ // 0xc89 @0x5
0x0c84…0ca5 at0006 = ╱ef╱$╱ // 0xc8a @0x6
0x0c84…0ca5 at0007 = ╱ed╱(╱ // 0xc8b @0x7
0x0c84…0ca5 at0008 = ╱33╱3╱ // 0xc8c @0x8
0x0c84…0ca5 at0009 = ╱37╱7╱ // 0xc8d @0x9
0x0c84…0ca5 at000a = ╱fe00009406╱ // 0xc8e @0xa
0x0c84…0ca5 at000f = ╱ec╱,╱ // 0xc93 @0xf
0x0c84…0ca5 at0010 = ╱57╱W╱ // 0xc94 @0x10
0x0c84…0ca5 at0011 = ╱ec╱,╱ // 0xc95 @0x11
0x0c84…0ca5 at0012 = ╱31╱1╱ // 0xc96 @0x12
0x0c84…0ca5 at0013 = ╱31╱1╱ // 0xc97 @0x13
0x0c84…0ca5 at0014 = ╱fe0000b004╱ // 0xc98 @0x14
0x0c84…0ca5 at0019 = ╱ee╱)╱ // 0xc9d @0x19
0x0c84…0ca5 at001a = ╱dc╱=╱ // 0xc9e @0x1a
0x0c84…0ca5 at001b = ╱22╱"╱ // 0xc9f @0x1b
0x0c84…0ca5 at001c = ╱30╱0╱ // 0xca0 @0x1c
0x0c84…0ca5 at001d = ╱30╱0╱ // 0xca1 @0x1d
0x0c84…0ca5 at001e = ╱20╱…╱ // 0xca2 @0x1e
0x0c84…0ca5 at001f = ╱22╱"╱ // 0xca3 @0x1f
0x0c84…0ca5 at0020 = EOL // 0xca4 @0x20
0x0c84…0ca5 }
0x0ca5…0cb2 9a09 8550 IF STD>LA THEN
0x0ca5…0cb2 LineComalBin {
0x0ca5…0cb2 ptr = 0x9a09 // 0xca5 @0x0
0x0ca5…0cb2 lno = 0x2166 // 0xca7 @0x2
0x0ca5…0cb2 at0004 = ╱9c╱ IF ╱ // 0xca9 @0x4
0x0ca5…0cb2 at0005 = ╱53╱S╱ // 0xcaa @0x5
0x0ca5…0cb2 at0006 = ╱54╱T╱ // 0xcab @0x6
0x0ca5…0cb2 at0007 = ╱44╱D╱ // 0xcac @0x7
0x0ca5…0cb2 at0008 = ╱de╱>╱ // 0xcad @0x8
0x0ca5…0cb2 at0009 = ╱4c╱L╱ // 0xcae @0x9
0x0ca5…0cb2 at000a = ╱41╱A╱ // 0xcaf @0xa
0x0ca5…0cb2 at000b = ╱b6╱ THEN ╱ // 0xcb0 @0xb
0x0ca5…0cb2 at000c = EOL // 0xcb1 @0xc
0x0ca5…0cb2 }
0x0cb2…0cbf 9a16 8560 STDA=STD
0x0cb2…0cbf LineComalBin {
0x0cb2…0cbf ptr = 0x9a16 // 0xcb2 @0x0
0x0cb2…0cbf lno = 0x2170 // 0xcb4 @0x2
0x0cb2…0cbf at0004 = ╱53╱S╱ // 0xcb6 @0x4
0x0cb2…0cbf at0005 = ╱54╱T╱ // 0xcb7 @0x5
0x0cb2…0cbf at0006 = ╱44╱D╱ // 0xcb8 @0x6
0x0cb2…0cbf at0007 = ╱41╱A╱ // 0xcb9 @0x7
0x0cb2…0cbf at0008 = ╱dc╱=╱ // 0xcba @0x8
0x0cb2…0cbf at0009 = ╱53╱S╱ // 0xcbb @0x9
0x0cb2…0cbf at000a = ╱54╱T╱ // 0xcbc @0xa
0x0cb2…0cbf at000b = ╱44╱D╱ // 0xcbd @0xb
0x0cb2…0cbf at000c = EOL // 0xcbe @0xc
0x0cb2…0cbf }
0x0cbf…0cc5 9a1c 8570 ELSE
0x0cbf…0cc5 LineComalBin {
0x0cbf…0cc5 ptr = 0x9a1c // 0xcbf @0x0
0x0cbf…0cc5 lno = 0x217a // 0xcc1 @0x2
0x0cbf…0cc5 at0004 = ╱9a╱ ELSE ╱ // 0xcc3 @0x4
0x0cbf…0cc5 at0005 = EOL // 0xcc4 @0x5
0x0cbf…0cc5 }
0x0cc5…0cd1 9a28 8580 STDA=LA
0x0cc5…0cd1 LineComalBin {
0x0cc5…0cd1 ptr = 0x9a28 // 0xcc5 @0x0
0x0cc5…0cd1 lno = 0x2184 // 0xcc7 @0x2
0x0cc5…0cd1 at0004 = ╱53╱S╱ // 0xcc9 @0x4
0x0cc5…0cd1 at0005 = ╱54╱T╱ // 0xcca @0x5
0x0cc5…0cd1 at0006 = ╱44╱D╱ // 0xccb @0x6
0x0cc5…0cd1 at0007 = ╱41╱A╱ // 0xccc @0x7
0x0cc5…0cd1 at0008 = ╱dc╱=╱ // 0xccd @0x8
0x0cc5…0cd1 at0009 = ╱4c╱L╱ // 0xcce @0x9
0x0cc5…0cd1 at000a = ╱41╱A╱ // 0xccf @0xa
0x0cc5…0cd1 at000b = EOL // 0xcd0 @0xb
0x0cc5…0cd1 }
0x0cd1…0cd7 9a2e 8590 ENDIF
0x0cd1…0cd7 LineComalBin {
0x0cd1…0cd7 ptr = 0x9a2e // 0xcd1 @0x0
0x0cd1…0cd7 lno = 0x218e // 0xcd3 @0x2
0x0cd1…0cd7 at0004 = ╱9b╱ ENDIF ╱ // 0xcd5 @0x4
0x0cd1…0cd7 at0005 = EOL // 0xcd6 @0x5
0x0cd1…0cd7 }
0x0cd7…0ce9 9a40 8600 IF SLD<FD OR FD=B THEN
0x0cd7…0ce9 LineComalBin {
0x0cd7…0ce9 ptr = 0x9a40 // 0xcd7 @0x0
0x0cd7…0ce9 lno = 0x2198 // 0xcd9 @0x2
0x0cd7…0ce9 at0004 = ╱9c╱ IF ╱ // 0xcdb @0x4
0x0cd7…0ce9 at0005 = ╱53╱S╱ // 0xcdc @0x5
0x0cd7…0ce9 at0006 = ╱4c╱L╱ // 0xcdd @0x6
0x0cd7…0ce9 at0007 = ╱44╱D╱ // 0xcde @0x7
0x0cd7…0ce9 at0008 = ╱dd╱<╱ // 0xcdf @0x8
0x0cd7…0ce9 at0009 = ╱46╱F╱ // 0xce0 @0x9
0x0cd7…0ce9 at000a = ╱44╱D╱ // 0xce1 @0xa
0x0cd7…0ce9 at000b = ╱db╱ OR ╱ // 0xce2 @0xb
0x0cd7…0ce9 at000c = ╱46╱F╱ // 0xce3 @0xc
0x0cd7…0ce9 at000d = ╱44╱D╱ // 0xce4 @0xd
0x0cd7…0ce9 at000e = ╱dc╱=╱ // 0xce5 @0xe
0x0cd7…0ce9 at000f = ╱42╱B╱ // 0xce6 @0xf
0x0cd7…0ce9 at0010 = ╱b6╱ THEN ╱ // 0xce7 @0x10
0x0cd7…0ce9 at0011 = EOL // 0xce8 @0x11
0x0cd7…0ce9 }
0x0ce9…0cf6 9a4d 8602 SLDA=SLD
0x0ce9…0cf6 LineComalBin {
0x0ce9…0cf6 ptr = 0x9a4d // 0xce9 @0x0
0x0ce9…0cf6 lno = 0x219a // 0xceb @0x2
0x0ce9…0cf6 at0004 = ╱53╱S╱ // 0xced @0x4
0x0ce9…0cf6 at0005 = ╱4c╱L╱ // 0xcee @0x5
0x0ce9…0cf6 at0006 = ╱44╱D╱ // 0xcef @0x6
0x0ce9…0cf6 at0007 = ╱41╱A╱ // 0xcf0 @0x7
0x0ce9…0cf6 at0008 = ╱dc╱=╱ // 0xcf1 @0x8
0x0ce9…0cf6 at0009 = ╱53╱S╱ // 0xcf2 @0x9
0x0ce9…0cf6 at000a = ╱4c╱L╱ // 0xcf3 @0xa
0x0ce9…0cf6 at000b = ╱44╱D╱ // 0xcf4 @0xb
0x0ce9…0cf6 at000c = EOL // 0xcf5 @0xc
0x0ce9…0cf6 }
0x0cf6…0cfc 9a53 8604 ELSE
0x0cf6…0cfc LineComalBin {
0x0cf6…0cfc ptr = 0x9a53 // 0xcf6 @0x0
0x0cf6…0cfc lno = 0x219c // 0xcf8 @0x2
0x0cf6…0cfc at0004 = ╱9a╱ ELSE ╱ // 0xcfa @0x4
0x0cf6…0cfc at0005 = EOL // 0xcfb @0x5
0x0cf6…0cfc }
0x0cfc…0d08 9a5f 8606 SLDA=FD
0x0cfc…0d08 LineComalBin {
0x0cfc…0d08 ptr = 0x9a5f // 0xcfc @0x0
0x0cfc…0d08 lno = 0x219e // 0xcfe @0x2
0x0cfc…0d08 at0004 = ╱53╱S╱ // 0xd00 @0x4
0x0cfc…0d08 at0005 = ╱4c╱L╱ // 0xd01 @0x5
0x0cfc…0d08 at0006 = ╱44╱D╱ // 0xd02 @0x6
0x0cfc…0d08 at0007 = ╱41╱A╱ // 0xd03 @0x7
0x0cfc…0d08 at0008 = ╱dc╱=╱ // 0xd04 @0x8
0x0cfc…0d08 at0009 = ╱46╱F╱ // 0xd05 @0x9
0x0cfc…0d08 at000a = ╱44╱D╱ // 0xd06 @0xa
0x0cfc…0d08 at000b = EOL // 0xd07 @0xb
0x0cfc…0d08 }
0x0d08…0d0e 9a65 8608 ENDIF
0x0d08…0d0e LineComalBin {
0x0d08…0d0e ptr = 0x9a65 // 0xd08 @0x0
0x0d08…0d0e lno = 0x21a0 // 0xd0a @0x2
0x0d08…0d0e at0004 = ╱9b╱ ENDIF ╱ // 0xd0c @0x4
0x0d08…0d0e at0005 = EOL // 0xd0d @0x5
0x0d08…0d0e }
0x0d0e…0d22 9a79 8609 IF FD>B THEN LA=B;FD=B
0x0d0e…0d22 LineComalBin {
0x0d0e…0d22 ptr = 0x9a79 // 0xd0e @0x0
0x0d0e…0d22 lno = 0x21a1 // 0xd10 @0x2
0x0d0e…0d22 at0004 = ╱82╱ IF ╱ // 0xd12 @0x4
0x0d0e…0d22 at0005 = ╱46╱F╱ // 0xd13 @0x5
0x0d0e…0d22 at0006 = ╱44╱D╱ // 0xd14 @0x6
0x0d0e…0d22 at0007 = ╱de╱>╱ // 0xd15 @0x7
0x0d0e…0d22 at0008 = ╱42╱B╱ // 0xd16 @0x8
0x0d0e…0d22 at0009 = ╱b6╱ THEN ╱ // 0xd17 @0x9
0x0d0e…0d22 at000a = ╱4c╱L╱ // 0xd18 @0xa
0x0d0e…0d22 at000b = ╱41╱A╱ // 0xd19 @0xb
0x0d0e…0d22 at000c = ╱dc╱=╱ // 0xd1a @0xc
0x0d0e…0d22 at000d = ╱42╱B╱ // 0xd1b @0xd
0x0d0e…0d22 at000e = ╱eb╱;╱ // 0xd1c @0xe
0x0d0e…0d22 at000f = ╱46╱F╱ // 0xd1d @0xf
0x0d0e…0d22 at0010 = ╱44╱D╱ // 0xd1e @0x10
0x0d0e…0d22 at0011 = ╱dc╱=╱ // 0xd1f @0x11
0x0d0e…0d22 at0012 = ╱42╱B╱ // 0xd20 @0x12
0x0d0e…0d22 at0013 = EOL // 0xd21 @0x13
0x0d0e…0d22 }
0x0d22…0d32 9a89 8610 FOR I=E TO 7
0x0d22…0d32 LineComalBin {
0x0d22…0d32 ptr = 0x9a89 // 0xd22 @0x0
0x0d22…0d32 lno = 0x21a2 // 0xd24 @0x2
0x0d22…0d32 at0004 = ╱83╱ FOR ╱ // 0xd26 @0x4
0x0d22…0d32 at0005 = ╱49╱I╱ // 0xd27 @0x5
0x0d22…0d32 at0006 = ╱dc╱=╱ // 0xd28 @0x6
0x0d22…0d32 at0007 = ╱45╱E╱ // 0xd29 @0x7
0x0d22…0d32 at0008 = ╱b7╱ TO ╱ // 0xd2a @0x8
0x0d22…0d32 at0009 = ╱37╱7╱ // 0xd2b @0x9
0x0d22…0d32 at000a = ╱fe0000e003╱ // 0xd2c @0xa
0x0d22…0d32 at000f = EOL // 0xd31 @0xf
0x0d22…0d32 }
0x0d32…0d5d 9ab4 8612 IF TV$(34,I)=" " THEN TV$(34,I)="*"
0x0d32…0d5d LineComalBin {
0x0d32…0d5d ptr = 0x9ab4 // 0xd32 @0x0
0x0d32…0d5d lno = 0x21a4 // 0xd34 @0x2
0x0d32…0d5d at0004 = ╱82╱ IF ╱ // 0xd36 @0x4
0x0d32…0d5d at0005 = ╱54╱T╱ // 0xd37 @0x5
0x0d32…0d5d at0006 = ╱56╱V╱ // 0xd38 @0x6
0x0d32…0d5d at0007 = ╱ef╱$╱ // 0xd39 @0x7
0x0d32…0d5d at0008 = ╱ed╱(╱ // 0xd3a @0x8
0x0d32…0d5d at0009 = ╱33╱3╱ // 0xd3b @0x9
0x0d32…0d5d at000a = ╱34╱4╱ // 0xd3c @0xa
0x0d32…0d5d at000b = ╱fe00008806╱ // 0xd3d @0xb
0x0d32…0d5d at0010 = ╱ec╱,╱ // 0xd42 @0x10
0x0d32…0d5d at0011 = ╱49╱I╱ // 0xd43 @0x11
0x0d32…0d5d at0012 = ╱ee╱)╱ // 0xd44 @0x12
0x0d32…0d5d at0013 = ╱dc╱=╱ // 0xd45 @0x13
0x0d32…0d5d at0014 = ╱22╱"╱ // 0xd46 @0x14
0x0d32…0d5d at0015 = ╱20╱…╱ // 0xd47 @0x15
0x0d32…0d5d at0016 = ╱22╱"╱ // 0xd48 @0x16
0x0d32…0d5d at0017 = ╱b6╱ THEN ╱ // 0xd49 @0x17
0x0d32…0d5d at0018 = ╱54╱T╱ // 0xd4a @0x18
0x0d32…0d5d at0019 = ╱56╱V╱ // 0xd4b @0x19
0x0d32…0d5d at001a = ╱ef╱$╱ // 0xd4c @0x1a
0x0d32…0d5d at001b = ╱ed╱(╱ // 0xd4d @0x1b
0x0d32…0d5d at001c = ╱33╱3╱ // 0xd4e @0x1c
0x0d32…0d5d at001d = ╱34╱4╱ // 0xd4f @0x1d
0x0d32…0d5d at001e = ╱fe00008806╱ // 0xd50 @0x1e
0x0d32…0d5d at0023 = ╱ec╱,╱ // 0xd55 @0x23
0x0d32…0d5d at0024 = ╱49╱I╱ // 0xd56 @0x24
0x0d32…0d5d at0025 = ╱ee╱)╱ // 0xd57 @0x25
0x0d32…0d5d at0026 = ╱dc╱=╱ // 0xd58 @0x26
0x0d32…0d5d at0027 = ╱22╱"╱ // 0xd59 @0x27
0x0d32…0d5d at0028 = ╱2a╱*╱ // 0xd5a @0x28
0x0d32…0d5d at0029 = ╱22╱"╱ // 0xd5b @0x29
0x0d32…0d5d at002a = EOL // 0xd5c @0x2a
0x0d32…0d5d }
0x0d5d…0d88 9adf 8614 IF TV$(43,I)=" " THEN TV$(43,I)="*"
0x0d5d…0d88 LineComalBin {
0x0d5d…0d88 ptr = 0x9adf // 0xd5d @0x0
0x0d5d…0d88 lno = 0x21a6 // 0xd5f @0x2
0x0d5d…0d88 at0004 = ╱82╱ IF ╱ // 0xd61 @0x4
0x0d5d…0d88 at0005 = ╱54╱T╱ // 0xd62 @0x5
0x0d5d…0d88 at0006 = ╱56╱V╱ // 0xd63 @0x6
0x0d5d…0d88 at0007 = ╱ef╱$╱ // 0xd64 @0x7
0x0d5d…0d88 at0008 = ╱ed╱(╱ // 0xd65 @0x8
0x0d5d…0d88 at0009 = ╱34╱4╱ // 0xd66 @0x9
0x0d5d…0d88 at000a = ╱33╱3╱ // 0xd67 @0xa
0x0d5d…0d88 at000b = ╱fe0000ac06╱ // 0xd68 @0xb
0x0d5d…0d88 at0010 = ╱ec╱,╱ // 0xd6d @0x10
0x0d5d…0d88 at0011 = ╱49╱I╱ // 0xd6e @0x11
0x0d5d…0d88 at0012 = ╱ee╱)╱ // 0xd6f @0x12
0x0d5d…0d88 at0013 = ╱dc╱=╱ // 0xd70 @0x13
0x0d5d…0d88 at0014 = ╱22╱"╱ // 0xd71 @0x14
0x0d5d…0d88 at0015 = ╱20╱…╱ // 0xd72 @0x15
0x0d5d…0d88 at0016 = ╱22╱"╱ // 0xd73 @0x16
0x0d5d…0d88 at0017 = ╱b6╱ THEN ╱ // 0xd74 @0x17
0x0d5d…0d88 at0018 = ╱54╱T╱ // 0xd75 @0x18
0x0d5d…0d88 at0019 = ╱56╱V╱ // 0xd76 @0x19
0x0d5d…0d88 at001a = ╱ef╱$╱ // 0xd77 @0x1a
0x0d5d…0d88 at001b = ╱ed╱(╱ // 0xd78 @0x1b
0x0d5d…0d88 at001c = ╱34╱4╱ // 0xd79 @0x1c
0x0d5d…0d88 at001d = ╱33╱3╱ // 0xd7a @0x1d
0x0d5d…0d88 at001e = ╱fe0000ac06╱ // 0xd7b @0x1e
0x0d5d…0d88 at0023 = ╱ec╱,╱ // 0xd80 @0x23
0x0d5d…0d88 at0024 = ╱49╱I╱ // 0xd81 @0x24
0x0d5d…0d88 at0025 = ╱ee╱)╱ // 0xd82 @0x25
0x0d5d…0d88 at0026 = ╱dc╱=╱ // 0xd83 @0x26
0x0d5d…0d88 at0027 = ╱22╱"╱ // 0xd84 @0x27
0x0d5d…0d88 at0028 = ╱2a╱*╱ // 0xd85 @0x28
0x0d5d…0d88 at0029 = ╱22╱"╱ // 0xd86 @0x29
0x0d5d…0d88 at002a = EOL // 0xd87 @0x2a
0x0d5d…0d88 }
0x0d88…0db3 9b0a 8616 IF TV$(40,I)=" " THEN TV$(40,I)="*"
0x0d88…0db3 LineComalBin {
0x0d88…0db3 ptr = 0x9b0a // 0xd88 @0x0
0x0d88…0db3 lno = 0x21a8 // 0xd8a @0x2
0x0d88…0db3 at0004 = ╱82╱ IF ╱ // 0xd8c @0x4
0x0d88…0db3 at0005 = ╱54╱T╱ // 0xd8d @0x5
0x0d88…0db3 at0006 = ╱56╱V╱ // 0xd8e @0x6
0x0d88…0db3 at0007 = ╱ef╱$╱ // 0xd8f @0x7
0x0d88…0db3 at0008 = ╱ed╱(╱ // 0xd90 @0x8
0x0d88…0db3 at0009 = ╱34╱4╱ // 0xd91 @0x9
0x0d88…0db3 at000a = ╱30╱0╱ // 0xd92 @0xa
0x0d88…0db3 at000b = ╱fe0000a006╱ // 0xd93 @0xb
0x0d88…0db3 at0010 = ╱ec╱,╱ // 0xd98 @0x10
0x0d88…0db3 at0011 = ╱49╱I╱ // 0xd99 @0x11
0x0d88…0db3 at0012 = ╱ee╱)╱ // 0xd9a @0x12
0x0d88…0db3 at0013 = ╱dc╱=╱ // 0xd9b @0x13
0x0d88…0db3 at0014 = ╱22╱"╱ // 0xd9c @0x14
0x0d88…0db3 at0015 = ╱20╱…╱ // 0xd9d @0x15
0x0d88…0db3 at0016 = ╱22╱"╱ // 0xd9e @0x16
0x0d88…0db3 at0017 = ╱b6╱ THEN ╱ // 0xd9f @0x17
0x0d88…0db3 at0018 = ╱54╱T╱ // 0xda0 @0x18
0x0d88…0db3 at0019 = ╱56╱V╱ // 0xda1 @0x19
0x0d88…0db3 at001a = ╱ef╱$╱ // 0xda2 @0x1a
0x0d88…0db3 at001b = ╱ed╱(╱ // 0xda3 @0x1b
0x0d88…0db3 at001c = ╱34╱4╱ // 0xda4 @0x1c
0x0d88…0db3 at001d = ╱30╱0╱ // 0xda5 @0x1d
0x0d88…0db3 at001e = ╱fe0000a006╱ // 0xda6 @0x1e
0x0d88…0db3 at0023 = ╱ec╱,╱ // 0xdab @0x23
0x0d88…0db3 at0024 = ╱49╱I╱ // 0xdac @0x24
0x0d88…0db3 at0025 = ╱ee╱)╱ // 0xdad @0x25
0x0d88…0db3 at0026 = ╱dc╱=╱ // 0xdae @0x26
0x0d88…0db3 at0027 = ╱22╱"╱ // 0xdaf @0x27
0x0d88…0db3 at0028 = ╱2a╱*╱ // 0xdb0 @0x28
0x0d88…0db3 at0029 = ╱22╱"╱ // 0xdb1 @0x29
0x0d88…0db3 at002a = EOL // 0xdb2 @0x2a
0x0d88…0db3 }
0x0db3…0dde 9b35 8618 IF TV$(37,I)=" " THEN TV$(37,I)="*"
0x0db3…0dde LineComalBin {
0x0db3…0dde ptr = 0x9b35 // 0xdb3 @0x0
0x0db3…0dde lno = 0x21aa // 0xdb5 @0x2
0x0db3…0dde at0004 = ╱82╱ IF ╱ // 0xdb7 @0x4
0x0db3…0dde at0005 = ╱54╱T╱ // 0xdb8 @0x5
0x0db3…0dde at0006 = ╱56╱V╱ // 0xdb9 @0x6
0x0db3…0dde at0007 = ╱ef╱$╱ // 0xdba @0x7
0x0db3…0dde at0008 = ╱ed╱(╱ // 0xdbb @0x8
0x0db3…0dde at0009 = ╱33╱3╱ // 0xdbc @0x9
0x0db3…0dde at000a = ╱37╱7╱ // 0xdbd @0xa
0x0db3…0dde at000b = ╱fe00009406╱ // 0xdbe @0xb
0x0db3…0dde at0010 = ╱ec╱,╱ // 0xdc3 @0x10
0x0db3…0dde at0011 = ╱49╱I╱ // 0xdc4 @0x11
0x0db3…0dde at0012 = ╱ee╱)╱ // 0xdc5 @0x12
0x0db3…0dde at0013 = ╱dc╱=╱ // 0xdc6 @0x13
0x0db3…0dde at0014 = ╱22╱"╱ // 0xdc7 @0x14
0x0db3…0dde at0015 = ╱20╱…╱ // 0xdc8 @0x15
0x0db3…0dde at0016 = ╱22╱"╱ // 0xdc9 @0x16
0x0db3…0dde at0017 = ╱b6╱ THEN ╱ // 0xdca @0x17
0x0db3…0dde at0018 = ╱54╱T╱ // 0xdcb @0x18
0x0db3…0dde at0019 = ╱56╱V╱ // 0xdcc @0x19
0x0db3…0dde at001a = ╱ef╱$╱ // 0xdcd @0x1a
0x0db3…0dde at001b = ╱ed╱(╱ // 0xdce @0x1b
0x0db3…0dde at001c = ╱33╱3╱ // 0xdcf @0x1c
0x0db3…0dde at001d = ╱37╱7╱ // 0xdd0 @0x1d
0x0db3…0dde at001e = ╱fe00009406╱ // 0xdd1 @0x1e
0x0db3…0dde at0023 = ╱ec╱,╱ // 0xdd6 @0x23
0x0db3…0dde at0024 = ╱49╱I╱ // 0xdd7 @0x24
0x0db3…0dde at0025 = ╱ee╱)╱ // 0xdd8 @0x25
0x0db3…0dde at0026 = ╱dc╱=╱ // 0xdd9 @0x26
0x0db3…0dde at0027 = ╱22╱"╱ // 0xdda @0x27
0x0db3…0dde at0028 = ╱2a╱*╱ // 0xddb @0x28
0x0db3…0dde at0029 = ╱22╱"╱ // 0xddc @0x29
0x0db3…0dde at002a = EOL // 0xddd @0x2a
0x0db3…0dde }
0x0dde…0de5 9b3c 8620 NEXT I
0x0dde…0de5 LineComalBin {
0x0dde…0de5 ptr = 0x9b3c // 0xdde @0x0
0x0dde…0de5 lno = 0x21ac // 0xde0 @0x2
0x0dde…0de5 at0004 = ╱84╱ NEXT ╱ // 0xde2 @0x4
0x0dde…0de5 at0005 = ╱49╱I╱ // 0xde3 @0x5
0x0dde…0de5 at0006 = EOL // 0xde4 @0x6
0x0dde…0de5 }
0x0de5…0deb 9b42 8622 PRINT
0x0de5…0deb LineComalBin {
0x0de5…0deb ptr = 0x9b42 // 0xde5 @0x0
0x0de5…0deb lno = 0x21ae // 0xde7 @0x2
0x0de5…0deb at0004 = ╱92╱ PRINT ╱ // 0xde9 @0x4
0x0de5…0deb at0005 = EOL // 0xdea @0x5
0x0de5…0deb }
0x0deb…0df1 9b48 8624 PRINT
0x0deb…0df1 LineComalBin {
0x0deb…0df1 ptr = 0x9b48 // 0xdeb @0x0
0x0deb…0df1 lno = 0x21b0 // 0xded @0x2
0x0deb…0df1 at0004 = ╱92╱ PRINT ╱ // 0xdef @0x4
0x0deb…0df1 at0005 = EOL // 0xdf0 @0x5
0x0deb…0df1 }
0x0df1…0df7 9b4e 8626 PRINT
0x0df1…0df7 LineComalBin {
0x0df1…0df7 ptr = 0x9b4e // 0xdf1 @0x0
0x0df1…0df7 lno = 0x21b2 // 0xdf3 @0x2
0x0df1…0df7 at0004 = ╱92╱ PRINT ╱ // 0xdf5 @0x4
0x0df1…0df7 at0005 = EOL // 0xdf6 @0x5
0x0df1…0df7 }
0x0df7…0e0f 9b66 8628 EXEC CONV(L$,C1,6)
0x0df7…0e0f LineComalBin {
0x0df7…0e0f ptr = 0x9b66 // 0xdf7 @0x0
0x0df7…0e0f lno = 0x21b4 // 0xdf9 @0x2
0x0df7…0e0f at0004 = ╱9d╱ EXEC ╱ // 0xdfb @0x4
0x0df7…0e0f at0005 = ╱43╱C╱ // 0xdfc @0x5
0x0df7…0e0f at0006 = ╱4f╱O╱ // 0xdfd @0x6
0x0df7…0e0f at0007 = ╱4e╱N╱ // 0xdfe @0x7
0x0df7…0e0f at0008 = ╱56╱V╱ // 0xdff @0x8
0x0df7…0e0f at0009 = ╱ed╱(╱ // 0xe00 @0x9
0x0df7…0e0f at000a = ╱4c╱L╱ // 0xe01 @0xa
0x0df7…0e0f at000b = ╱ef╱$╱ // 0xe02 @0xb
0x0df7…0e0f at000c = ╱ec╱,╱ // 0xe03 @0xc
0x0df7…0e0f at000d = ╱43╱C╱ // 0xe04 @0xd
0x0df7…0e0f at000e = ╱31╱1╱ // 0xe05 @0xe
0x0df7…0e0f at000f = ╱ec╱,╱ // 0xe06 @0xf
0x0df7…0e0f at0010 = ╱36╱6╱ // 0xe07 @0x10
0x0df7…0e0f at0011 = ╱fe0000c003╱ // 0xe08 @0x11
0x0df7…0e0f at0016 = ╱ee╱)╱ // 0xe0d @0x16
0x0df7…0e0f at0017 = EOL // 0xe0e @0x17
0x0df7…0e0f }
0x0e0f…0e29 9b80 8630 EXEC CONV(LIN$,C2,4)
0x0e0f…0e29 LineComalBin {
0x0e0f…0e29 ptr = 0x9b80 // 0xe0f @0x0
0x0e0f…0e29 lno = 0x21b6 // 0xe11 @0x2
0x0e0f…0e29 at0004 = ╱9d╱ EXEC ╱ // 0xe13 @0x4
0x0e0f…0e29 at0005 = ╱43╱C╱ // 0xe14 @0x5
0x0e0f…0e29 at0006 = ╱4f╱O╱ // 0xe15 @0x6
0x0e0f…0e29 at0007 = ╱4e╱N╱ // 0xe16 @0x7
0x0e0f…0e29 at0008 = ╱56╱V╱ // 0xe17 @0x8
0x0e0f…0e29 at0009 = ╱ed╱(╱ // 0xe18 @0x9
0x0e0f…0e29 at000a = ╱4c╱L╱ // 0xe19 @0xa
0x0e0f…0e29 at000b = ╱49╱I╱ // 0xe1a @0xb
0x0e0f…0e29 at000c = ╱4e╱N╱ // 0xe1b @0xc
0x0e0f…0e29 at000d = ╱ef╱$╱ // 0xe1c @0xd
0x0e0f…0e29 at000e = ╱ec╱,╱ // 0xe1d @0xe
0x0e0f…0e29 at000f = ╱43╱C╱ // 0xe1e @0xf
0x0e0f…0e29 at0010 = ╱32╱2╱ // 0xe1f @0x10
0x0e0f…0e29 at0011 = ╱ec╱,╱ // 0xe20 @0x11
0x0e0f…0e29 at0012 = ╱34╱4╱ // 0xe21 @0x12
0x0e0f…0e29 at0013 = ╱fe00008003╱ // 0xe22 @0x13
0x0e0f…0e29 at0018 = ╱ee╱)╱ // 0xe27 @0x18
0x0e0f…0e29 at0019 = EOL // 0xe28 @0x19
0x0e0f…0e29 }
0x0e29…0e38 9b8f 8632 L$=L$+LIN$
0x0e29…0e38 LineComalBin {
0x0e29…0e38 ptr = 0x9b8f // 0xe29 @0x0
0x0e29…0e38 lno = 0x21b8 // 0xe2b @0x2
0x0e29…0e38 at0004 = ╱4c╱L╱ // 0xe2d @0x4
0x0e29…0e38 at0005 = ╱ef╱$╱ // 0xe2e @0x5
0x0e29…0e38 at0006 = ╱dc╱=╱ // 0xe2f @0x6
0x0e29…0e38 at0007 = ╱4c╱L╱ // 0xe30 @0x7
0x0e29…0e38 at0008 = ╱ef╱$╱ // 0xe31 @0x8
0x0e29…0e38 at0009 = ╱f1╱+╱ // 0xe32 @0x9
0x0e29…0e38 at000a = ╱4c╱L╱ // 0xe33 @0xa
0x0e29…0e38 at000b = ╱49╱I╱ // 0xe34 @0xb
0x0e29…0e38 at000c = ╱4e╱N╱ // 0xe35 @0xc
0x0e29…0e38 at000d = ╱ef╱$╱ // 0xe36 @0xd
0x0e29…0e38 at000e = EOL // 0xe37 @0xe
0x0e29…0e38 }
0x0e38…0e61 9bb8 8634 PRINT TAB(W);L$;TAB(58);POST3$(E,7)
0x0e38…0e61 LineComalBin {
0x0e38…0e61 ptr = 0x9bb8 // 0xe38 @0x0
0x0e38…0e61 lno = 0x21ba // 0xe3a @0x2
0x0e38…0e61 at0004 = ╱92╱ PRINT ╱ // 0xe3c @0x4
0x0e38…0e61 at0005 = ╱d2╱TAB╱ // 0xe3d @0x5
0x0e38…0e61 at0006 = ╱ed╱(╱ // 0xe3e @0x6
0x0e38…0e61 at0007 = ╱57╱W╱ // 0xe3f @0x7
0x0e38…0e61 at0008 = ╱ee╱)╱ // 0xe40 @0x8
0x0e38…0e61 at0009 = ╱eb╱;╱ // 0xe41 @0x9
0x0e38…0e61 at000a = ╱4c╱L╱ // 0xe42 @0xa
0x0e38…0e61 at000b = ╱ef╱$╱ // 0xe43 @0xb
0x0e38…0e61 at000c = ╱eb╱;╱ // 0xe44 @0xc
0x0e38…0e61 at000d = ╱d2╱TAB╱ // 0xe45 @0xd
0x0e38…0e61 at000e = ╱ed╱(╱ // 0xe46 @0xe
0x0e38…0e61 at000f = ╱35╱5╱ // 0xe47 @0xf
0x0e38…0e61 at0010 = ╱38╱8╱ // 0xe48 @0x10
0x0e38…0e61 at0011 = ╱fe0000e806╱ // 0xe49 @0x11
0x0e38…0e61 at0016 = ╱ee╱)╱ // 0xe4e @0x16
0x0e38…0e61 at0017 = ╱eb╱;╱ // 0xe4f @0x17
0x0e38…0e61 at0018 = ╱50╱P╱ // 0xe50 @0x18
0x0e38…0e61 at0019 = ╱4f╱O╱ // 0xe51 @0x19
0x0e38…0e61 at001a = ╱53╱S╱ // 0xe52 @0x1a
0x0e38…0e61 at001b = ╱54╱T╱ // 0xe53 @0x1b
0x0e38…0e61 at001c = ╱33╱3╱ // 0xe54 @0x1c
0x0e38…0e61 at001d = ╱ef╱$╱ // 0xe55 @0x1d
0x0e38…0e61 at001e = ╱ed╱(╱ // 0xe56 @0x1e
0x0e38…0e61 at001f = ╱45╱E╱ // 0xe57 @0x1f
0x0e38…0e61 at0020 = ╱ec╱,╱ // 0xe58 @0x20
0x0e38…0e61 at0021 = ╱37╱7╱ // 0xe59 @0x21
0x0e38…0e61 at0022 = ╱fe0000e003╱ // 0xe5a @0x22
0x0e38…0e61 at0027 = ╱ee╱)╱ // 0xe5f @0x27
0x0e38…0e61 at0028 = EOL // 0xe60 @0x28
0x0e38…0e61 }
0x0e61…0e67 9bbe 8636 PRINT
0x0e61…0e67 LineComalBin {
0x0e61…0e67 ptr = 0x9bbe // 0xe61 @0x0
0x0e61…0e67 lno = 0x21bc // 0xe63 @0x2
0x0e61…0e67 at0004 = ╱92╱ PRINT ╱ // 0xe65 @0x4
0x0e61…0e67 at0005 = EOL // 0xe66 @0x5
0x0e61…0e67 }
0x0e67…0e6d 9bc4 8638 PRINT
0x0e67…0e6d LineComalBin {
0x0e67…0e6d ptr = 0x9bc4 // 0xe67 @0x0
0x0e67…0e6d lno = 0x21be // 0xe69 @0x2
0x0e67…0e6d at0004 = ╱92╱ PRINT ╱ // 0xe6b @0x4
0x0e67…0e6d at0005 = EOL // 0xe6c @0x5
0x0e67…0e6d }
0x0e6d…0e94 9beb 8640 PRINT TAB(46);POST3$(8,32)
0x0e6d…0e94 LineComalBin {
0x0e6d…0e94 ptr = 0x9beb // 0xe6d @0x0
0x0e6d…0e94 lno = 0x21c0 // 0xe6f @0x2
0x0e6d…0e94 at0004 = ╱92╱ PRINT ╱ // 0xe71 @0x4
0x0e6d…0e94 at0005 = ╱d2╱TAB╱ // 0xe72 @0x5
0x0e6d…0e94 at0006 = ╱ed╱(╱ // 0xe73 @0x6
0x0e6d…0e94 at0007 = ╱34╱4╱ // 0xe74 @0x7
0x0e6d…0e94 at0008 = ╱36╱6╱ // 0xe75 @0x8
0x0e6d…0e94 at0009 = ╱fe0000b806╱ // 0xe76 @0x9
0x0e6d…0e94 at000e = ╱ee╱)╱ // 0xe7b @0xe
0x0e6d…0e94 at000f = ╱eb╱;╱ // 0xe7c @0xf
0x0e6d…0e94 at0010 = ╱50╱P╱ // 0xe7d @0x10
0x0e6d…0e94 at0011 = ╱4f╱O╱ // 0xe7e @0x11
0x0e6d…0e94 at0012 = ╱53╱S╱ // 0xe7f @0x12
0x0e6d…0e94 at0013 = ╱54╱T╱ // 0xe80 @0x13
0x0e6d…0e94 at0014 = ╱33╱3╱ // 0xe81 @0x14
0x0e6d…0e94 at0015 = ╱ef╱$╱ // 0xe82 @0x15
0x0e6d…0e94 at0016 = ╱ed╱(╱ // 0xe83 @0x16
0x0e6d…0e94 at0017 = ╱38╱8╱ // 0xe84 @0x17
0x0e6d…0e94 at0018 = ╱fe00008004╱ // 0xe85 @0x18
0x0e6d…0e94 at001d = ╱ec╱,╱ // 0xe8a @0x1d
0x0e6d…0e94 at001e = ╱33╱3╱ // 0xe8b @0x1e
0x0e6d…0e94 at001f = ╱32╱2╱ // 0xe8c @0x1f
0x0e6d…0e94 at0020 = ╱fe00008006╱ // 0xe8d @0x20
0x0e6d…0e94 at0025 = ╱ee╱)╱ // 0xe92 @0x25
0x0e6d…0e94 at0026 = EOL // 0xe93 @0x26
0x0e6d…0e94 }
0x0e94…0ebc 9c13 8642 PRINT TAB(46);POST3$(33,55)
0x0e94…0ebc LineComalBin {
0x0e94…0ebc ptr = 0x9c13 // 0xe94 @0x0
0x0e94…0ebc lno = 0x21c2 // 0xe96 @0x2
0x0e94…0ebc at0004 = ╱92╱ PRINT ╱ // 0xe98 @0x4
0x0e94…0ebc at0005 = ╱d2╱TAB╱ // 0xe99 @0x5
0x0e94…0ebc at0006 = ╱ed╱(╱ // 0xe9a @0x6
0x0e94…0ebc at0007 = ╱34╱4╱ // 0xe9b @0x7
0x0e94…0ebc at0008 = ╱36╱6╱ // 0xe9c @0x8
0x0e94…0ebc at0009 = ╱fe0000b806╱ // 0xe9d @0x9
0x0e94…0ebc at000e = ╱ee╱)╱ // 0xea2 @0xe
0x0e94…0ebc at000f = ╱eb╱;╱ // 0xea3 @0xf
0x0e94…0ebc at0010 = ╱50╱P╱ // 0xea4 @0x10
0x0e94…0ebc at0011 = ╱4f╱O╱ // 0xea5 @0x11
0x0e94…0ebc at0012 = ╱53╱S╱ // 0xea6 @0x12
0x0e94…0ebc at0013 = ╱54╱T╱ // 0xea7 @0x13
0x0e94…0ebc at0014 = ╱33╱3╱ // 0xea8 @0x14
0x0e94…0ebc at0015 = ╱ef╱$╱ // 0xea9 @0x15
0x0e94…0ebc at0016 = ╱ed╱(╱ // 0xeaa @0x16
0x0e94…0ebc at0017 = ╱33╱3╱ // 0xeab @0x17
0x0e94…0ebc at0018 = ╱33╱3╱ // 0xeac @0x18
0x0e94…0ebc at0019 = ╱fe00008406╱ // 0xead @0x19
0x0e94…0ebc at001e = ╱ec╱,╱ // 0xeb2 @0x1e
0x0e94…0ebc at001f = ╱35╱5╱ // 0xeb3 @0x1f
0x0e94…0ebc at0020 = ╱35╱5╱ // 0xeb4 @0x20
0x0e94…0ebc at0021 = ╱fe0000dc06╱ // 0xeb5 @0x21
0x0e94…0ebc at0026 = ╱ee╱)╱ // 0xeba @0x26
0x0e94…0ebc at0027 = EOL // 0xebb @0x27
0x0e94…0ebc }
0x0ebc…0ef8 9c4f 8644 PRINT TAB(46);POST4$(E,4);" ";POST4$(5,18)
0x0ebc…0ef8 LineComalBin {
0x0ebc…0ef8 ptr = 0x9c4f // 0xebc @0x0
0x0ebc…0ef8 lno = 0x21c4 // 0xebe @0x2
0x0ebc…0ef8 at0004 = ╱92╱ PRINT ╱ // 0xec0 @0x4
0x0ebc…0ef8 at0005 = ╱d2╱TAB╱ // 0xec1 @0x5
0x0ebc…0ef8 at0006 = ╱ed╱(╱ // 0xec2 @0x6
0x0ebc…0ef8 at0007 = ╱34╱4╱ // 0xec3 @0x7
0x0ebc…0ef8 at0008 = ╱36╱6╱ // 0xec4 @0x8
0x0ebc…0ef8 at0009 = ╱fe0000b806╱ // 0xec5 @0x9
0x0ebc…0ef8 at000e = ╱ee╱)╱ // 0xeca @0xe
0x0ebc…0ef8 at000f = ╱eb╱;╱ // 0xecb @0xf
0x0ebc…0ef8 at0010 = ╱50╱P╱ // 0xecc @0x10
0x0ebc…0ef8 at0011 = ╱4f╱O╱ // 0xecd @0x11
0x0ebc…0ef8 at0012 = ╱53╱S╱ // 0xece @0x12
0x0ebc…0ef8 at0013 = ╱54╱T╱ // 0xecf @0x13
0x0ebc…0ef8 at0014 = ╱34╱4╱ // 0xed0 @0x14
0x0ebc…0ef8 at0015 = ╱ef╱$╱ // 0xed1 @0x15
0x0ebc…0ef8 at0016 = ╱ed╱(╱ // 0xed2 @0x16
0x0ebc…0ef8 at0017 = ╱45╱E╱ // 0xed3 @0x17
0x0ebc…0ef8 at0018 = ╱ec╱,╱ // 0xed4 @0x18
0x0ebc…0ef8 at0019 = ╱34╱4╱ // 0xed5 @0x19
0x0ebc…0ef8 at001a = ╱fe00008003╱ // 0xed6 @0x1a
0x0ebc…0ef8 at001f = ╱ee╱)╱ // 0xedb @0x1f
0x0ebc…0ef8 at0020 = ╱eb╱;╱ // 0xedc @0x20
0x0ebc…0ef8 at0021 = ╱22╱"╱ // 0xedd @0x21
0x0ebc…0ef8 at0022 = ╱20╱…╱ // 0xede @0x22
0x0ebc…0ef8 at0023 = ╱22╱"╱ // 0xedf @0x23
0x0ebc…0ef8 at0024 = ╱eb╱;╱ // 0xee0 @0x24
0x0ebc…0ef8 at0025 = ╱50╱P╱ // 0xee1 @0x25
0x0ebc…0ef8 at0026 = ╱4f╱O╱ // 0xee2 @0x26
0x0ebc…0ef8 at0027 = ╱53╱S╱ // 0xee3 @0x27
0x0ebc…0ef8 at0028 = ╱54╱T╱ // 0xee4 @0x28
0x0ebc…0ef8 at0029 = ╱34╱4╱ // 0xee5 @0x29
0x0ebc…0ef8 at002a = ╱ef╱$╱ // 0xee6 @0x2a
0x0ebc…0ef8 at002b = ╱ed╱(╱ // 0xee7 @0x2b
0x0ebc…0ef8 at002c = ╱35╱5╱ // 0xee8 @0x2c
0x0ebc…0ef8 at002d = ╱fe0000a003╱ // 0xee9 @0x2d
0x0ebc…0ef8 at0032 = ╱ec╱,╱ // 0xeee @0x32
0x0ebc…0ef8 at0033 = ╱31╱1╱ // 0xeef @0x33
0x0ebc…0ef8 at0034 = ╱38╱8╱ // 0xef0 @0x34
0x0ebc…0ef8 at0035 = ╱fe00009005╱ // 0xef1 @0x35
0x0ebc…0ef8 at003a = ╱ee╱)╱ // 0xef6 @0x3a
0x0ebc…0ef8 at003b = EOL // 0xef7 @0x3b
0x0ebc…0ef8 }
0x0ef8…0efe 9c55 8646 PRINT
0x0ef8…0efe LineComalBin {
0x0ef8…0efe ptr = 0x9c55 // 0xef8 @0x0
0x0ef8…0efe lno = 0x21c6 // 0xefa @0x2
0x0ef8…0efe at0004 = ╱92╱ PRINT ╱ // 0xefc @0x4
0x0ef8…0efe at0005 = EOL // 0xefd @0x5
0x0ef8…0efe }
0x0efe…0f1b 9c72 8648 PRINT TAB(W);POST1$(E,25);
0x0efe…0f1b LineComalBin {
0x0efe…0f1b ptr = 0x9c72 // 0xefe @0x0
0x0efe…0f1b lno = 0x21c8 // 0xf00 @0x2
0x0efe…0f1b at0004 = ╱92╱ PRINT ╱ // 0xf02 @0x4
0x0efe…0f1b at0005 = ╱d2╱TAB╱ // 0xf03 @0x5
0x0efe…0f1b at0006 = ╱ed╱(╱ // 0xf04 @0x6
0x0efe…0f1b at0007 = ╱57╱W╱ // 0xf05 @0x7
0x0efe…0f1b at0008 = ╱ee╱)╱ // 0xf06 @0x8
0x0efe…0f1b at0009 = ╱eb╱;╱ // 0xf07 @0x9
0x0efe…0f1b at000a = ╱50╱P╱ // 0xf08 @0xa
0x0efe…0f1b at000b = ╱4f╱O╱ // 0xf09 @0xb
0x0efe…0f1b at000c = ╱53╱S╱ // 0xf0a @0xc
0x0efe…0f1b at000d = ╱54╱T╱ // 0xf0b @0xd
0x0efe…0f1b at000e = ╱31╱1╱ // 0xf0c @0xe
0x0efe…0f1b at000f = ╱ef╱$╱ // 0xf0d @0xf
0x0efe…0f1b at0010 = ╱ed╱(╱ // 0xf0e @0x10
0x0efe…0f1b at0011 = ╱45╱E╱ // 0xf0f @0x11
0x0efe…0f1b at0012 = ╱ec╱,╱ // 0xf10 @0x12
0x0efe…0f1b at0013 = ╱32╱2╱ // 0xf11 @0x13
0x0efe…0f1b at0014 = ╱35╱5╱ // 0xf12 @0x14
0x0efe…0f1b at0015 = ╱fe0000c805╱ // 0xf13 @0x15
0x0efe…0f1b at001a = ╱ee╱)╱ // 0xf18 @0x1a
0x0efe…0f1b at001b = ╱eb╱;╱ // 0xf19 @0x1b
0x0efe…0f1b at001c = EOL // 0xf1a @0x1c
0x0efe…0f1b }
0x0f1b…0f2e 9c85 8650 PRINT USING " ####":LMNR
0x0f1b…0f2e LineComalBin {
0x0f1b…0f2e ptr = 0x9c85 // 0xf1b @0x0
0x0f1b…0f2e lno = 0x21ca // 0xf1d @0x2
0x0f1b…0f2e at0004 = ╱92╱ PRINT ╱ // 0xf1f @0x4
0x0f1b…0f2e at0005 = ╱b9╱ USING ╱ // 0xf20 @0x5
0x0f1b…0f2e at0006 = ╱22╱"╱ // 0xf21 @0x6
0x0f1b…0f2e at0007 = ╱20╱…╱ // 0xf22 @0x7
0x0f1b…0f2e at0008 = ╱23╱#╱ // 0xf23 @0x8
0x0f1b…0f2e at0009 = ╱23╱#╱ // 0xf24 @0x9
0x0f1b…0f2e at000a = ╱23╱#╱ // 0xf25 @0xa
0x0f1b…0f2e at000b = ╱23╱#╱ // 0xf26 @0xb
0x0f1b…0f2e at000c = ╱22╱"╱ // 0xf27 @0xc
0x0f1b…0f2e at000d = ╱f0╱:╱ // 0xf28 @0xd
0x0f1b…0f2e at000e = ╱4c╱L╱ // 0xf29 @0xe
0x0f1b…0f2e at000f = ╱4d╱M╱ // 0xf2a @0xf
0x0f1b…0f2e at0010 = ╱4e╱N╱ // 0xf2b @0x10
0x0f1b…0f2e at0011 = ╱52╱R╱ // 0xf2c @0x11
0x0f1b…0f2e at0012 = EOL // 0xf2d @0x12
0x0f1b…0f2e }
0x0f2e…0f34 9c8b 8652 PRINT
0x0f2e…0f34 LineComalBin {
0x0f2e…0f34 ptr = 0x9c8b // 0xf2e @0x0
0x0f2e…0f34 lno = 0x21cc // 0xf30 @0x2
0x0f2e…0f34 at0004 = ╱92╱ PRINT ╱ // 0xf32 @0x4
0x0f2e…0f34 at0005 = EOL // 0xf33 @0x5
0x0f2e…0f34 }
0x0f34…0f56 9cad 8654 PRINT TAB(W);POST1$(26,48)
0x0f34…0f56 LineComalBin {
0x0f34…0f56 ptr = 0x9cad // 0xf34 @0x0
0x0f34…0f56 lno = 0x21ce // 0xf36 @0x2
0x0f34…0f56 at0004 = ╱92╱ PRINT ╱ // 0xf38 @0x4
0x0f34…0f56 at0005 = ╱d2╱TAB╱ // 0xf39 @0x5
0x0f34…0f56 at0006 = ╱ed╱(╱ // 0xf3a @0x6
0x0f34…0f56 at0007 = ╱57╱W╱ // 0xf3b @0x7
0x0f34…0f56 at0008 = ╱ee╱)╱ // 0xf3c @0x8
0x0f34…0f56 at0009 = ╱eb╱;╱ // 0xf3d @0x9
0x0f34…0f56 at000a = ╱50╱P╱ // 0xf3e @0xa
0x0f34…0f56 at000b = ╱4f╱O╱ // 0xf3f @0xb
0x0f34…0f56 at000c = ╱53╱S╱ // 0xf40 @0xc
0x0f34…0f56 at000d = ╱54╱T╱ // 0xf41 @0xd
0x0f34…0f56 at000e = ╱31╱1╱ // 0xf42 @0xe
0x0f34…0f56 at000f = ╱ef╱$╱ // 0xf43 @0xf
0x0f34…0f56 at0010 = ╱ed╱(╱ // 0xf44 @0x10
0x0f34…0f56 at0011 = ╱32╱2╱ // 0xf45 @0x11
0x0f34…0f56 at0012 = ╱36╱6╱ // 0xf46 @0x12
0x0f34…0f56 at0013 = ╱fe0000d005╱ // 0xf47 @0x13
0x0f34…0f56 at0018 = ╱ec╱,╱ // 0xf4c @0x18
0x0f34…0f56 at0019 = ╱34╱4╱ // 0xf4d @0x19
0x0f34…0f56 at001a = ╱38╱8╱ // 0xf4e @0x1a
0x0f34…0f56 at001b = ╱fe0000c006╱ // 0xf4f @0x1b
0x0f34…0f56 at0020 = ╱ee╱)╱ // 0xf54 @0x20
0x0f34…0f56 at0021 = EOL // 0xf55 @0x21
0x0f34…0f56 }
0x0f56…0f78 9ccf 8656 PRINT TAB(W);POST1$(49,71)
0x0f56…0f78 LineComalBin {
0x0f56…0f78 ptr = 0x9ccf // 0xf56 @0x0
0x0f56…0f78 lno = 0x21d0 // 0xf58 @0x2
0x0f56…0f78 at0004 = ╱92╱ PRINT ╱ // 0xf5a @0x4
0x0f56…0f78 at0005 = ╱d2╱TAB╱ // 0xf5b @0x5
0x0f56…0f78 at0006 = ╱ed╱(╱ // 0xf5c @0x6
0x0f56…0f78 at0007 = ╱57╱W╱ // 0xf5d @0x7
0x0f56…0f78 at0008 = ╱ee╱)╱ // 0xf5e @0x8
0x0f56…0f78 at0009 = ╱eb╱;╱ // 0xf5f @0x9
0x0f56…0f78 at000a = ╱50╱P╱ // 0xf60 @0xa
0x0f56…0f78 at000b = ╱4f╱O╱ // 0xf61 @0xb
0x0f56…0f78 at000c = ╱53╱S╱ // 0xf62 @0xc
0x0f56…0f78 at000d = ╱54╱T╱ // 0xf63 @0xd
0x0f56…0f78 at000e = ╱31╱1╱ // 0xf64 @0xe
0x0f56…0f78 at000f = ╱ef╱$╱ // 0xf65 @0xf
0x0f56…0f78 at0010 = ╱ed╱(╱ // 0xf66 @0x10
0x0f56…0f78 at0011 = ╱34╱4╱ // 0xf67 @0x11
0x0f56…0f78 at0012 = ╱39╱9╱ // 0xf68 @0x12
0x0f56…0f78 at0013 = ╱fe0000c406╱ // 0xf69 @0x13
0x0f56…0f78 at0018 = ╱ec╱,╱ // 0xf6e @0x18
0x0f56…0f78 at0019 = ╱37╱7╱ // 0xf6f @0x19
0x0f56…0f78 at001a = ╱31╱1╱ // 0xf70 @0x1a
0x0f56…0f78 at001b = ╱fe00008e07╱ // 0xf71 @0x1b
0x0f56…0f78 at0020 = ╱ee╱)╱ // 0xf76 @0x20
0x0f56…0f78 at0021 = EOL // 0xf77 @0x21
0x0f56…0f78 }
0x0f78…0fae 9d05 8658 PRINT TAB(W);POST2$(E,4);" ";POST2$(5,18)
0x0f78…0fae LineComalBin {
0x0f78…0fae ptr = 0x9d05 // 0xf78 @0x0
0x0f78…0fae lno = 0x21d2 // 0xf7a @0x2
0x0f78…0fae at0004 = ╱92╱ PRINT ╱ // 0xf7c @0x4
0x0f78…0fae at0005 = ╱d2╱TAB╱ // 0xf7d @0x5
0x0f78…0fae at0006 = ╱ed╱(╱ // 0xf7e @0x6
0x0f78…0fae at0007 = ╱57╱W╱ // 0xf7f @0x7
0x0f78…0fae at0008 = ╱ee╱)╱ // 0xf80 @0x8
0x0f78…0fae at0009 = ╱eb╱;╱ // 0xf81 @0x9
0x0f78…0fae at000a = ╱50╱P╱ // 0xf82 @0xa
0x0f78…0fae at000b = ╱4f╱O╱ // 0xf83 @0xb
0x0f78…0fae at000c = ╱53╱S╱ // 0xf84 @0xc
0x0f78…0fae at000d = ╱54╱T╱ // 0xf85 @0xd
0x0f78…0fae at000e = ╱32╱2╱ // 0xf86 @0xe
0x0f78…0fae at000f = ╱ef╱$╱ // 0xf87 @0xf
0x0f78…0fae at0010 = ╱ed╱(╱ // 0xf88 @0x10
0x0f78…0fae at0011 = ╱45╱E╱ // 0xf89 @0x11
0x0f78…0fae at0012 = ╱ec╱,╱ // 0xf8a @0x12
0x0f78…0fae at0013 = ╱34╱4╱ // 0xf8b @0x13
0x0f78…0fae at0014 = ╱fe00008003╱ // 0xf8c @0x14
0x0f78…0fae at0019 = ╱ee╱)╱ // 0xf91 @0x19
0x0f78…0fae at001a = ╱eb╱;╱ // 0xf92 @0x1a
0x0f78…0fae at001b = ╱22╱"╱ // 0xf93 @0x1b
0x0f78…0fae at001c = ╱20╱…╱ // 0xf94 @0x1c
0x0f78…0fae at001d = ╱22╱"╱ // 0xf95 @0x1d
0x0f78…0fae at001e = ╱eb╱;╱ // 0xf96 @0x1e
0x0f78…0fae at001f = ╱50╱P╱ // 0xf97 @0x1f
0x0f78…0fae at0020 = ╱4f╱O╱ // 0xf98 @0x20
0x0f78…0fae at0021 = ╱53╱S╱ // 0xf99 @0x21
0x0f78…0fae at0022 = ╱54╱T╱ // 0xf9a @0x22
0x0f78…0fae at0023 = ╱32╱2╱ // 0xf9b @0x23
0x0f78…0fae at0024 = ╱ef╱$╱ // 0xf9c @0x24
0x0f78…0fae at0025 = ╱ed╱(╱ // 0xf9d @0x25
0x0f78…0fae at0026 = ╱35╱5╱ // 0xf9e @0x26
0x0f78…0fae at0027 = ╱fe0000a003╱ // 0xf9f @0x27
0x0f78…0fae at002c = ╱ec╱,╱ // 0xfa4 @0x2c
0x0f78…0fae at002d = ╱31╱1╱ // 0xfa5 @0x2d
0x0f78…0fae at002e = ╱38╱8╱ // 0xfa6 @0x2e
0x0f78…0fae at002f = ╱fe00009005╱ // 0xfa7 @0x2f
0x0f78…0fae at0034 = ╱ee╱)╱ // 0xfac @0x34
0x0f78…0fae at0035 = EOL // 0xfad @0x35
0x0f78…0fae }
0x0fae…0fb4 9d0b 8660 PRINT
0x0fae…0fb4 LineComalBin {
0x0fae…0fb4 ptr = 0x9d0b // 0xfae @0x0
0x0fae…0fb4 lno = 0x21d4 // 0xfb0 @0x2
0x0fae…0fb4 at0004 = ╱92╱ PRINT ╱ // 0xfb2 @0x4
0x0fae…0fb4 at0005 = EOL // 0xfb3 @0x5
0x0fae…0fb4 }
0x0fb4…0fba 9d11 8662 PRINT
0x0fb4…0fba LineComalBin {
0x0fb4…0fba ptr = 0x9d11 // 0xfb4 @0x0
0x0fb4…0fba lno = 0x21d6 // 0xfb6 @0x2
0x0fb4…0fba at0004 = ╱92╱ PRINT ╱ // 0xfb8 @0x4
0x0fb4…0fba at0005 = EOL // 0xfb9 @0x5
0x0fb4…0fba }
0x0fba…0fdc 9d33 8664 PRINT TAB(24);STDA;"-";SLDA;" "
0x0fba…0fdc LineComalBin {
0x0fba…0fdc ptr = 0x9d33 // 0xfba @0x0
0x0fba…0fdc lno = 0x21d8 // 0xfbc @0x2
0x0fba…0fdc at0004 = ╱92╱ PRINT ╱ // 0xfbe @0x4
0x0fba…0fdc at0005 = ╱d2╱TAB╱ // 0xfbf @0x5
0x0fba…0fdc at0006 = ╱ed╱(╱ // 0xfc0 @0x6
0x0fba…0fdc at0007 = ╱32╱2╱ // 0xfc1 @0x7
0x0fba…0fdc at0008 = ╱34╱4╱ // 0xfc2 @0x8
0x0fba…0fdc at0009 = ╱fe0000c005╱ // 0xfc3 @0x9
0x0fba…0fdc at000e = ╱ee╱)╱ // 0xfc8 @0xe
0x0fba…0fdc at000f = ╱eb╱;╱ // 0xfc9 @0xf
0x0fba…0fdc at0010 = ╱53╱S╱ // 0xfca @0x10
0x0fba…0fdc at0011 = ╱54╱T╱ // 0xfcb @0x11
0x0fba…0fdc at0012 = ╱44╱D╱ // 0xfcc @0x12
0x0fba…0fdc at0013 = ╱41╱A╱ // 0xfcd @0x13
0x0fba…0fdc at0014 = ╱eb╱;╱ // 0xfce @0x14
0x0fba…0fdc at0015 = ╱22╱"╱ // 0xfcf @0x15
0x0fba…0fdc at0016 = ╱2d╱-╱ // 0xfd0 @0x16
0x0fba…0fdc at0017 = ╱22╱"╱ // 0xfd1 @0x17
0x0fba…0fdc at0018 = ╱eb╱;╱ // 0xfd2 @0x18
0x0fba…0fdc at0019 = ╱53╱S╱ // 0xfd3 @0x19
0x0fba…0fdc at001a = ╱4c╱L╱ // 0xfd4 @0x1a
0x0fba…0fdc at001b = ╱44╱D╱ // 0xfd5 @0x1b
0x0fba…0fdc at001c = ╱41╱A╱ // 0xfd6 @0x1c
0x0fba…0fdc at001d = ╱eb╱;╱ // 0xfd7 @0x1d
0x0fba…0fdc at001e = ╱22╱"╱ // 0xfd8 @0x1e
0x0fba…0fdc at001f = ╱20╱…╱ // 0xfd9 @0x1f
0x0fba…0fdc at0020 = ╱22╱"╱ // 0xfda @0x20
0x0fba…0fdc at0021 = EOL // 0xfdb @0x21
0x0fba…0fdc }
0x0fdc…0fe2 9d39 8666 PRINT
0x0fdc…0fe2 LineComalBin {
0x0fdc…0fe2 ptr = 0x9d39 // 0xfdc @0x0
0x0fdc…0fe2 lno = 0x21da // 0xfde @0x2
0x0fdc…0fe2 at0004 = ╱92╱ PRINT ╱ // 0xfe0 @0x4
0x0fdc…0fe2 at0005 = EOL // 0xfe1 @0x5
0x0fdc…0fe2 }
0x0fe2…0fe8 9d3f 8668 PRINT
0x0fe2…0fe8 LineComalBin {
0x0fe2…0fe8 ptr = 0x9d3f // 0xfe2 @0x0
0x0fe2…0fe8 lno = 0x21dc // 0xfe4 @0x2
0x0fe2…0fe8 at0004 = ╱92╱ PRINT ╱ // 0xfe6 @0x4
0x0fe2…0fe8 at0005 = EOL // 0xfe7 @0x5
0x0fe2…0fe8 }
0x0fe8…1012 9d69 8670 PRINT TAB(68);"*";TV$(43,E,7)
0x0fe8…1012 LineComalBin {
0x0fe8…1012 ptr = 0x9d69 // 0xfe8 @0x0
0x0fe8…1012 lno = 0x21de // 0xfea @0x2
0x0fe8…1012 at0004 = ╱92╱ PRINT ╱ // 0xfec @0x4
0x0fe8…1012 at0005 = ╱d2╱TAB╱ // 0xfed @0x5
0x0fe8…1012 at0006 = ╱ed╱(╱ // 0xfee @0x6
0x0fe8…1012 at0007 = ╱36╱6╱ // 0xfef @0x7
0x0fe8…1012 at0008 = ╱38╱8╱ // 0xff0 @0x8
0x0fe8…1012 at0009 = ╱fe00008807╱ // 0xff1 @0x9
0x0fe8…1012 at000e = ╱ee╱)╱ // 0xff6 @0xe
0x0fe8…1012 at000f = ╱eb╱;╱ // 0xff7 @0xf
0x0fe8…1012 at0010 = ╱22╱"╱ // 0xff8 @0x10
0x0fe8…1012 at0011 = ╱2a╱*╱ // 0xff9 @0x11
0x0fe8…1012 at0012 = ╱22╱"╱ // 0xffa @0x12
0x0fe8…1012 at0013 = ╱eb╱;╱ // 0xffb @0x13
0x0fe8…1012 at0014 = ╱54╱T╱ // 0xffc @0x14
0x0fe8…1012 at0015 = ╱56╱V╱ // 0xffd @0x15
0x0fe8…1012 at0016 = ╱ef╱$╱ // 0xffe @0x16
0x0fe8…1012 at0017 = ╱ed╱(╱ // 0xfff @0x17
0x0fe8…1012 at0018 = ╱34╱4╱ // 0x1000 @0x18
0x0fe8…1012 at0019 = ╱33╱3╱ // 0x1001 @0x19
0x0fe8…1012 at001a = ╱fe0000ac06╱ // 0x1002 @0x1a
0x0fe8…1012 at001f = ╱ec╱,╱ // 0x1007 @0x1f
0x0fe8…1012 at0020 = ╱45╱E╱ // 0x1008 @0x20
0x0fe8…1012 at0021 = ╱ec╱,╱ // 0x1009 @0x21
0x0fe8…1012 at0022 = ╱37╱7╱ // 0x100a @0x22
0x0fe8…1012 at0023 = ╱fe0000e003╱ // 0x100b @0x23
0x0fe8…1012 at0028 = ╱ee╱)╱ // 0x1010 @0x28
0x0fe8…1012 at0029 = EOL // 0x1011 @0x29
0x0fe8…1012 }
0x1012…1018 9d6f 8672 PRINT
0x1012…1018 LineComalBin {
0x1012…1018 ptr = 0x9d6f // 0x1012 @0x0
0x1012…1018 lno = 0x21e0 // 0x1014 @0x2
0x1012…1018 at0004 = ╱92╱ PRINT ╱ // 0x1016 @0x4
0x1012…1018 at0005 = EOL // 0x1017 @0x5
0x1012…1018 }
0x1018…101e 9d75 8674 PRINT
0x1018…101e LineComalBin {
0x1018…101e ptr = 0x9d75 // 0x1018 @0x0
0x1018…101e lno = 0x21e2 // 0x101a @0x2
0x1018…101e at0004 = ╱92╱ PRINT ╱ // 0x101c @0x4
0x1018…101e at0005 = EOL // 0x101d @0x5
0x1018…101e }
0x101e…1048 9d9f 8676 PRINT TAB(68);"*";TV$(34,E,7)
0x101e…1048 LineComalBin {
0x101e…1048 ptr = 0x9d9f // 0x101e @0x0
0x101e…1048 lno = 0x21e4 // 0x1020 @0x2
0x101e…1048 at0004 = ╱92╱ PRINT ╱ // 0x1022 @0x4
0x101e…1048 at0005 = ╱d2╱TAB╱ // 0x1023 @0x5
0x101e…1048 at0006 = ╱ed╱(╱ // 0x1024 @0x6
0x101e…1048 at0007 = ╱36╱6╱ // 0x1025 @0x7
0x101e…1048 at0008 = ╱38╱8╱ // 0x1026 @0x8
0x101e…1048 at0009 = ╱fe00008807╱ // 0x1027 @0x9
0x101e…1048 at000e = ╱ee╱)╱ // 0x102c @0xe
0x101e…1048 at000f = ╱eb╱;╱ // 0x102d @0xf
0x101e…1048 at0010 = ╱22╱"╱ // 0x102e @0x10
0x101e…1048 at0011 = ╱2a╱*╱ // 0x102f @0x11
0x101e…1048 at0012 = ╱22╱"╱ // 0x1030 @0x12
0x101e…1048 at0013 = ╱eb╱;╱ // 0x1031 @0x13
0x101e…1048 at0014 = ╱54╱T╱ // 0x1032 @0x14
0x101e…1048 at0015 = ╱56╱V╱ // 0x1033 @0x15
0x101e…1048 at0016 = ╱ef╱$╱ // 0x1034 @0x16
0x101e…1048 at0017 = ╱ed╱(╱ // 0x1035 @0x17
0x101e…1048 at0018 = ╱33╱3╱ // 0x1036 @0x18
0x101e…1048 at0019 = ╱34╱4╱ // 0x1037 @0x19
0x101e…1048 at001a = ╱fe00008806╱ // 0x1038 @0x1a
0x101e…1048 at001f = ╱ec╱,╱ // 0x103d @0x1f
0x101e…1048 at0020 = ╱45╱E╱ // 0x103e @0x20
0x101e…1048 at0021 = ╱ec╱,╱ // 0x103f @0x21
0x101e…1048 at0022 = ╱37╱7╱ // 0x1040 @0x22
0x101e…1048 at0023 = ╱fe0000e003╱ // 0x1041 @0x23
0x101e…1048 at0028 = ╱ee╱)╱ // 0x1046 @0x28
0x101e…1048 at0029 = EOL // 0x1047 @0x29
0x101e…1048 }
0x1048…104e 9da5 8678 PRINT
0x1048…104e LineComalBin {
0x1048…104e ptr = 0x9da5 // 0x1048 @0x0
0x1048…104e lno = 0x21e6 // 0x104a @0x2
0x1048…104e at0004 = ╱92╱ PRINT ╱ // 0x104c @0x4
0x1048…104e at0005 = EOL // 0x104d @0x5
0x1048…104e }
0x104e…1054 9dab 8680 PRINT
0x104e…1054 LineComalBin {
0x104e…1054 ptr = 0x9dab // 0x104e @0x0
0x104e…1054 lno = 0x21e8 // 0x1050 @0x2
0x104e…1054 at0004 = ╱92╱ PRINT ╱ // 0x1052 @0x4
0x104e…1054 at0005 = EOL // 0x1053 @0x5
0x104e…1054 }
0x1054…105a 9db1 8682 PRINT
0x1054…105a LineComalBin {
0x1054…105a ptr = 0x9db1 // 0x1054 @0x0
0x1054…105a lno = 0x21ea // 0x1056 @0x2
0x1054…105a at0004 = ╱92╱ PRINT ╱ // 0x1058 @0x4
0x1054…105a at0005 = EOL // 0x1059 @0x5
0x1054…105a }
0x105a…1060 9db7 8684 PRINT
0x105a…1060 LineComalBin {
0x105a…1060 ptr = 0x9db7 // 0x105a @0x0
0x105a…1060 lno = 0x21ec // 0x105c @0x2
0x105a…1060 at0004 = ╱92╱ PRINT ╱ // 0x105e @0x4
0x105a…1060 at0005 = EOL // 0x105f @0x5
0x105a…1060 }
0x1060…108a 9de1 8686 PRINT TAB(68);"*";TV$(40,E,7)
0x1060…108a LineComalBin {
0x1060…108a ptr = 0x9de1 // 0x1060 @0x0
0x1060…108a lno = 0x21ee // 0x1062 @0x2
0x1060…108a at0004 = ╱92╱ PRINT ╱ // 0x1064 @0x4
0x1060…108a at0005 = ╱d2╱TAB╱ // 0x1065 @0x5
0x1060…108a at0006 = ╱ed╱(╱ // 0x1066 @0x6
0x1060…108a at0007 = ╱36╱6╱ // 0x1067 @0x7
0x1060…108a at0008 = ╱38╱8╱ // 0x1068 @0x8
0x1060…108a at0009 = ╱fe00008807╱ // 0x1069 @0x9
0x1060…108a at000e = ╱ee╱)╱ // 0x106e @0xe
0x1060…108a at000f = ╱eb╱;╱ // 0x106f @0xf
0x1060…108a at0010 = ╱22╱"╱ // 0x1070 @0x10
0x1060…108a at0011 = ╱2a╱*╱ // 0x1071 @0x11
0x1060…108a at0012 = ╱22╱"╱ // 0x1072 @0x12
0x1060…108a at0013 = ╱eb╱;╱ // 0x1073 @0x13
0x1060…108a at0014 = ╱54╱T╱ // 0x1074 @0x14
0x1060…108a at0015 = ╱56╱V╱ // 0x1075 @0x15
0x1060…108a at0016 = ╱ef╱$╱ // 0x1076 @0x16
0x1060…108a at0017 = ╱ed╱(╱ // 0x1077 @0x17
0x1060…108a at0018 = ╱34╱4╱ // 0x1078 @0x18
0x1060…108a at0019 = ╱30╱0╱ // 0x1079 @0x19
0x1060…108a at001a = ╱fe0000a006╱ // 0x107a @0x1a
0x1060…108a at001f = ╱ec╱,╱ // 0x107f @0x1f
0x1060…108a at0020 = ╱45╱E╱ // 0x1080 @0x20
0x1060…108a at0021 = ╱ec╱,╱ // 0x1081 @0x21
0x1060…108a at0022 = ╱37╱7╱ // 0x1082 @0x22
0x1060…108a at0023 = ╱fe0000e003╱ // 0x1083 @0x23
0x1060…108a at0028 = ╱ee╱)╱ // 0x1088 @0x28
0x1060…108a at0029 = EOL // 0x1089 @0x29
0x1060…108a }
0x108a…1090 9de7 8688 PRINT
0x108a…1090 LineComalBin {
0x108a…1090 ptr = 0x9de7 // 0x108a @0x0
0x108a…1090 lno = 0x21f0 // 0x108c @0x2
0x108a…1090 at0004 = ╱92╱ PRINT ╱ // 0x108e @0x4
0x108a…1090 at0005 = EOL // 0x108f @0x5
0x108a…1090 }
0x1090…1096 9ded 8690 PRINT
0x1090…1096 LineComalBin {
0x1090…1096 ptr = 0x9ded // 0x1090 @0x0
0x1090…1096 lno = 0x21f2 // 0x1092 @0x2
0x1090…1096 at0004 = ╱92╱ PRINT ╱ // 0x1094 @0x4
0x1090…1096 at0005 = EOL // 0x1095 @0x5
0x1090…1096 }
0x1096…10c0 9e17 8692 PRINT TAB(68);"*";TV$(37,E,7)
0x1096…10c0 LineComalBin {
0x1096…10c0 ptr = 0x9e17 // 0x1096 @0x0
0x1096…10c0 lno = 0x21f4 // 0x1098 @0x2
0x1096…10c0 at0004 = ╱92╱ PRINT ╱ // 0x109a @0x4
0x1096…10c0 at0005 = ╱d2╱TAB╱ // 0x109b @0x5
0x1096…10c0 at0006 = ╱ed╱(╱ // 0x109c @0x6
0x1096…10c0 at0007 = ╱36╱6╱ // 0x109d @0x7
0x1096…10c0 at0008 = ╱38╱8╱ // 0x109e @0x8
0x1096…10c0 at0009 = ╱fe00008807╱ // 0x109f @0x9
0x1096…10c0 at000e = ╱ee╱)╱ // 0x10a4 @0xe
0x1096…10c0 at000f = ╱eb╱;╱ // 0x10a5 @0xf
0x1096…10c0 at0010 = ╱22╱"╱ // 0x10a6 @0x10
0x1096…10c0 at0011 = ╱2a╱*╱ // 0x10a7 @0x11
0x1096…10c0 at0012 = ╱22╱"╱ // 0x10a8 @0x12
0x1096…10c0 at0013 = ╱eb╱;╱ // 0x10a9 @0x13
0x1096…10c0 at0014 = ╱54╱T╱ // 0x10aa @0x14
0x1096…10c0 at0015 = ╱56╱V╱ // 0x10ab @0x15
0x1096…10c0 at0016 = ╱ef╱$╱ // 0x10ac @0x16
0x1096…10c0 at0017 = ╱ed╱(╱ // 0x10ad @0x17
0x1096…10c0 at0018 = ╱33╱3╱ // 0x10ae @0x18
0x1096…10c0 at0019 = ╱37╱7╱ // 0x10af @0x19
0x1096…10c0 at001a = ╱fe00009406╱ // 0x10b0 @0x1a
0x1096…10c0 at001f = ╱ec╱,╱ // 0x10b5 @0x1f
0x1096…10c0 at0020 = ╱45╱E╱ // 0x10b6 @0x20
0x1096…10c0 at0021 = ╱ec╱,╱ // 0x10b7 @0x21
0x1096…10c0 at0022 = ╱37╱7╱ // 0x10b8 @0x22
0x1096…10c0 at0023 = ╱fe0000e003╱ // 0x10b9 @0x23
0x1096…10c0 at0028 = ╱ee╱)╱ // 0x10be @0x28
0x1096…10c0 at0029 = EOL // 0x10bf @0x29
0x1096…10c0 }
0x10c0…10d1 9e28 8694 FOR I=E TO 45
0x10c0…10d1 LineComalBin {
0x10c0…10d1 ptr = 0x9e28 // 0x10c0 @0x0
0x10c0…10d1 lno = 0x21f6 // 0x10c2 @0x2
0x10c0…10d1 at0004 = ╱83╱ FOR ╱ // 0x10c4 @0x4
0x10c0…10d1 at0005 = ╱49╱I╱ // 0x10c5 @0x5
0x10c0…10d1 at0006 = ╱dc╱=╱ // 0x10c6 @0x6
0x10c0…10d1 at0007 = ╱45╱E╱ // 0x10c7 @0x7
0x10c0…10d1 at0008 = ╱b7╱ TO ╱ // 0x10c8 @0x8
0x10c0…10d1 at0009 = ╱34╱4╱ // 0x10c9 @0x9
0x10c0…10d1 at000a = ╱35╱5╱ // 0x10ca @0xa
0x10c0…10d1 at000b = ╱fe0000b406╱ // 0x10cb @0xb
0x10c0…10d1 at0010 = EOL // 0x10d0 @0x10
0x10c0…10d1 }
0x10d1…10ec 9e43 8696 TV$(I)=TAH$(G:11)
0x10d1…10ec LineComalBin {
0x10d1…10ec ptr = 0x9e43 // 0x10d1 @0x0
0x10d1…10ec lno = 0x21f8 // 0x10d3 @0x2
0x10d1…10ec at0004 = ╱54╱T╱ // 0x10d5 @0x4
0x10d1…10ec at0005 = ╱56╱V╱ // 0x10d6 @0x5
0x10d1…10ec at0006 = ╱ef╱$╱ // 0x10d7 @0x6
0x10d1…10ec at0007 = ╱ed╱(╱ // 0x10d8 @0x7
0x10d1…10ec at0008 = ╱49╱I╱ // 0x10d9 @0x8
0x10d1…10ec at0009 = ╱ee╱)╱ // 0x10da @0x9
0x10d1…10ec at000a = ╱dc╱=╱ // 0x10db @0xa
0x10d1…10ec at000b = ╱54╱T╱ // 0x10dc @0xb
0x10d1…10ec at000c = ╱41╱A╱ // 0x10dd @0xc
0x10d1…10ec at000d = ╱48╱H╱ // 0x10de @0xd
0x10d1…10ec at000e = ╱ef╱$╱ // 0x10df @0xe
0x10d1…10ec at000f = ╱ed╱(╱ // 0x10e0 @0xf
0x10d1…10ec at0010 = ╱47╱G╱ // 0x10e1 @0x10
0x10d1…10ec at0011 = ╱f0╱:╱ // 0x10e2 @0x11
0x10d1…10ec at0012 = ╱31╱1╱ // 0x10e3 @0x12
0x10d1…10ec at0013 = ╱31╱1╱ // 0x10e4 @0x13
0x10d1…10ec at0014 = ╱fe0000b004╱ // 0x10e5 @0x14
0x10d1…10ec at0019 = ╱ee╱)╱ // 0x10ea @0x19
0x10d1…10ec at001a = EOL // 0x10eb @0x1a
0x10d1…10ec }
0x10ec…10f3 9e4a 8698 NEXT I
0x10ec…10f3 LineComalBin {
0x10ec…10f3 ptr = 0x9e4a // 0x10ec @0x0
0x10ec…10f3 lno = 0x21fa // 0x10ee @0x2
0x10ec…10f3 at0004 = ╱84╱ NEXT ╱ // 0x10f0 @0x4
0x10ec…10f3 at0005 = ╱49╱I╱ // 0x10f1 @0x5
0x10ec…10f3 at0006 = EOL // 0x10f2 @0x6
0x10ec…10f3 }
0x10f3…10fc 9e53 8700 LT=B
0x10f3…10fc LineComalBin {
0x10f3…10fc ptr = 0x9e53 // 0x10f3 @0x0
0x10f3…10fc lno = 0x21fc // 0x10f5 @0x2
0x10f3…10fc at0004 = ╱4c╱L╱ // 0x10f7 @0x4
0x10f3…10fc at0005 = ╱54╱T╱ // 0x10f8 @0x5
0x10f3…10fc at0006 = ╱dc╱=╱ // 0x10f9 @0x6
0x10f3…10fc at0007 = ╱42╱B╱ // 0x10fa @0x7
0x10f3…10fc at0008 = EOL // 0x10fb @0x8
0x10f3…10fc }
0x10fc…1105 9e5c 8702 LF=B
0x10fc…1105 LineComalBin {
0x10fc…1105 ptr = 0x9e5c // 0x10fc @0x0
0x10fc…1105 lno = 0x21fe // 0x10fe @0x2
0x10fc…1105 at0004 = ╱4c╱L╱ // 0x1100 @0x4
0x10fc…1105 at0005 = ╱46╱F╱ // 0x1101 @0x5
0x10fc…1105 at0006 = ╱dc╱=╱ // 0x1102 @0x6
0x10fc…1105 at0007 = ╱42╱B╱ // 0x1103 @0x7
0x10fc…1105 at0008 = EOL // 0x1104 @0x8
0x10fc…1105 }
0x1105…110e 9e65 8704 LR=B
0x1105…110e LineComalBin {
0x1105…110e ptr = 0x9e65 // 0x1105 @0x0
0x1105…110e lno = 0x2200 // 0x1107 @0x2
0x1105…110e at0004 = ╱4c╱L╱ // 0x1109 @0x4
0x1105…110e at0005 = ╱52╱R╱ // 0x110a @0x5
0x1105…110e at0006 = ╱dc╱=╱ // 0x110b @0x6
0x1105…110e at0007 = ╱42╱B╱ // 0x110c @0x7
0x1105…110e at0008 = EOL // 0x110d @0x8
0x1105…110e }
0x110e…1125 9e7c 8706 FOR I=33 TO 48
0x110e…1125 LineComalBin {
0x110e…1125 ptr = 0x9e7c // 0x110e @0x0
0x110e…1125 lno = 0x2202 // 0x1110 @0x2
0x110e…1125 at0004 = ╱83╱ FOR ╱ // 0x1112 @0x4
0x110e…1125 at0005 = ╱49╱I╱ // 0x1113 @0x5
0x110e…1125 at0006 = ╱dc╱=╱ // 0x1114 @0x6
0x110e…1125 at0007 = ╱33╱3╱ // 0x1115 @0x7
0x110e…1125 at0008 = ╱33╱3╱ // 0x1116 @0x8
0x110e…1125 at0009 = ╱fe00008406╱ // 0x1117 @0x9
0x110e…1125 at000e = ╱b7╱ TO ╱ // 0x111c @0xe
0x110e…1125 at000f = ╱34╱4╱ // 0x111d @0xf
0x110e…1125 at0010 = ╱38╱8╱ // 0x111e @0x10
0x110e…1125 at0011 = ╱fe0000c006╱ // 0x111f @0x11
0x110e…1125 at0016 = EOL // 0x1124 @0x16
0x110e…1125 }
0x1125…112b (57,) 9e82 8708 PRINT
0x1125…112b LineComalBin {
0x1125…112b ptr = 0x9e82 // 0x1125 @0x0
0x1125…112b lno = 0x2204 // 0x1127 @0x2
0x1125…112b at0004 = ╱92╱ PRINT ╱ // 0x1129 @0x4
0x1125…112b at0005 = EOL // 0x112a @0x5
0x1125…112b }
0x112b…1132 9e89 8710 NEXT I
0x112b…1132 LineComalBin {
0x112b…1132 ptr = 0x9e89 // 0x112b @0x0
0x112b…1132 lno = 0x2206 // 0x112d @0x2
0x112b…1132 at0004 = ╱84╱ NEXT ╱ // 0x112f @0x4
0x112b…1132 at0005 = ╱49╱I╱ // 0x1130 @0x5
0x112b…1132 at0006 = EOL // 0x1131 @0x6
0x112b…1132 }
0x1132…1146 9e9d 8712 EXEC UDLØNMOD(LMNR)
0x1132…1146 LineComalBin {
0x1132…1146 ptr = 0x9e9d // 0x1132 @0x0
0x1132…1146 lno = 0x2208 // 0x1134 @0x2
0x1132…1146 at0004 = ╱9d╱ EXEC ╱ // 0x1136 @0x4
0x1132…1146 at0005 = ╱55╱U╱ // 0x1137 @0x5
0x1132…1146 at0006 = ╱44╱D╱ // 0x1138 @0x6
0x1132…1146 at0007 = ╱4c╱L╱ // 0x1139 @0x7
0x1132…1146 at0008 = ╱5c╱Ø╱ // 0x113a @0x8
0x1132…1146 at0009 = ╱4e╱N╱ // 0x113b @0x9
0x1132…1146 at000a = ╱4d╱M╱ // 0x113c @0xa
0x1132…1146 at000b = ╱4f╱O╱ // 0x113d @0xb
0x1132…1146 at000c = ╱44╱D╱ // 0x113e @0xc
0x1132…1146 at000d = ╱ed╱(╱ // 0x113f @0xd
0x1132…1146 at000e = ╱4c╱L╱ // 0x1140 @0xe
0x1132…1146 at000f = ╱4d╱M╱ // 0x1141 @0xf
0x1132…1146 at0010 = ╱4e╱N╱ // 0x1142 @0x10
0x1132…1146 at0011 = ╱52╱R╱ // 0x1143 @0x11
0x1132…1146 at0012 = ╱ee╱)╱ // 0x1144 @0x12
0x1132…1146 at0013 = EOL // 0x1145 @0x13
0x1132…1146 }
0x1146…1151 9ea8 8714 EXEC UDTÆL
0x1146…1151 LineComalBin {
0x1146…1151 ptr = 0x9ea8 // 0x1146 @0x0
0x1146…1151 lno = 0x220a // 0x1148 @0x2
0x1146…1151 at0004 = ╱9d╱ EXEC ╱ // 0x114a @0x4
0x1146…1151 at0005 = ╱55╱U╱ // 0x114b @0x5
0x1146…1151 at0006 = ╱44╱D╱ // 0x114c @0x6
0x1146…1151 at0007 = ╱54╱T╱ // 0x114d @0x7
0x1146…1151 at0008 = ╱5b╱Æ╱ // 0x114e @0x8
0x1146…1151 at0009 = ╱4c╱L╱ // 0x114f @0x9
0x1146…1151 at000a = EOL // 0x1150 @0xa
0x1146…1151 }
0x1151…1157 9eae 8880 ENDIF
0x1151…1157 LineComalBin {
0x1151…1157 ptr = 0x9eae // 0x1151 @0x0
0x1151…1157 lno = 0x22b0 // 0x1153 @0x2
0x1151…1157 at0004 = ╱9b╱ ENDIF ╱ // 0x1155 @0x4
0x1151…1157 at0005 = EOL // 0x1156 @0x5
0x1151…1157 }
0x1157…1167 9ebe 8890 UNTIL LMNR=>MLMNR
0x1157…1167 LineComalBin {
0x1157…1167 ptr = 0x9ebe // 0x1157 @0x0
0x1157…1167 lno = 0x22ba // 0x1159 @0x2
0x1157…1167 at0004 = ╱98╱ UNTIL ╱ // 0x115b @0x4
0x1157…1167 at0005 = ╱4c╱L╱ // 0x115c @0x5
0x1157…1167 at0006 = ╱4d╱M╱ // 0x115d @0x6
0x1157…1167 at0007 = ╱4e╱N╱ // 0x115e @0x7
0x1157…1167 at0008 = ╱52╱R╱ // 0x115f @0x8
0x1157…1167 at0009 = ╱e0╱=>╱ // 0x1160 @0x9
0x1157…1167 at000a = ╱4d╱M╱ // 0x1161 @0xa
0x1157…1167 at000b = ╱4c╱L╱ // 0x1162 @0xb
0x1157…1167 at000c = ╱4d╱M╱ // 0x1163 @0xc
0x1157…1167 at000d = ╱4e╱N╱ // 0x1164 @0xd
0x1157…1167 at000e = ╱52╱R╱ // 0x1165 @0xe
0x1157…1167 at000f = EOL // 0x1166 @0xf
0x1157…1167 }
0x1167…1177 9ece 8900 FOR I=E TO 4
0x1167…1177 LineComalBin {
0x1167…1177 ptr = 0x9ece // 0x1167 @0x0
0x1167…1177 lno = 0x22c4 // 0x1169 @0x2
0x1167…1177 at0004 = ╱83╱ FOR ╱ // 0x116b @0x4
0x1167…1177 at0005 = ╱49╱I╱ // 0x116c @0x5
0x1167…1177 at0006 = ╱dc╱=╱ // 0x116d @0x6
0x1167…1177 at0007 = ╱45╱E╱ // 0x116e @0x7
0x1167…1177 at0008 = ╱b7╱ TO ╱ // 0x116f @0x8
0x1167…1177 at0009 = ╱34╱4╱ // 0x1170 @0x9
0x1167…1177 at000a = ╱fe00008003╱ // 0x1171 @0xa
0x1167…1177 at000f = EOL // 0x1176 @0xf
0x1167…1177 }
0x1177…1187 9ede 8910 FOR J=E TO 8
0x1177…1187 LineComalBin {
0x1177…1187 ptr = 0x9ede // 0x1177 @0x0
0x1177…1187 lno = 0x22ce // 0x1179 @0x2
0x1177…1187 at0004 = ╱83╱ FOR ╱ // 0x117b @0x4
0x1177…1187 at0005 = ╱4a╱J╱ // 0x117c @0x5
0x1177…1187 at0006 = ╱dc╱=╱ // 0x117d @0x6
0x1177…1187 at0007 = ╱45╱E╱ // 0x117e @0x7
0x1177…1187 at0008 = ╱b7╱ TO ╱ // 0x117f @0x8
0x1177…1187 at0009 = ╱38╱8╱ // 0x1180 @0x9
0x1177…1187 at000a = ╱fe00008004╱ // 0x1181 @0xa
0x1177…1187 at000f = EOL // 0x1186 @0xf
0x1177…1187 }
0x1187…11ac 9f03 8920 IF TOTAL$(I,J)=" " THEN TOTAL$(I,J)="*"
0x1187…11ac LineComalBin {
0x1187…11ac ptr = 0x9f03 // 0x1187 @0x0
0x1187…11ac lno = 0x22d8 // 0x1189 @0x2
0x1187…11ac at0004 = ╱82╱ IF ╱ // 0x118b @0x4
0x1187…11ac at0005 = ╱54╱T╱ // 0x118c @0x5
0x1187…11ac at0006 = ╱4f╱O╱ // 0x118d @0x6
0x1187…11ac at0007 = ╱54╱T╱ // 0x118e @0x7
0x1187…11ac at0008 = ╱41╱A╱ // 0x118f @0x8
0x1187…11ac at0009 = ╱4c╱L╱ // 0x1190 @0x9
0x1187…11ac at000a = ╱ef╱$╱ // 0x1191 @0xa
0x1187…11ac at000b = ╱ed╱(╱ // 0x1192 @0xb
0x1187…11ac at000c = ╱49╱I╱ // 0x1193 @0xc
0x1187…11ac at000d = ╱ec╱,╱ // 0x1194 @0xd
0x1187…11ac at000e = ╱4a╱J╱ // 0x1195 @0xe
0x1187…11ac at000f = ╱ee╱)╱ // 0x1196 @0xf
0x1187…11ac at0010 = ╱dc╱=╱ // 0x1197 @0x10
0x1187…11ac at0011 = ╱22╱"╱ // 0x1198 @0x11
0x1187…11ac at0012 = ╱20╱…╱ // 0x1199 @0x12
0x1187…11ac at0013 = ╱22╱"╱ // 0x119a @0x13
0x1187…11ac at0014 = ╱b6╱ THEN ╱ // 0x119b @0x14
0x1187…11ac at0015 = ╱54╱T╱ // 0x119c @0x15
0x1187…11ac at0016 = ╱4f╱O╱ // 0x119d @0x16
0x1187…11ac at0017 = ╱54╱T╱ // 0x119e @0x17
0x1187…11ac at0018 = ╱41╱A╱ // 0x119f @0x18
0x1187…11ac at0019 = ╱4c╱L╱ // 0x11a0 @0x19
0x1187…11ac at001a = ╱ef╱$╱ // 0x11a1 @0x1a
0x1187…11ac at001b = ╱ed╱(╱ // 0x11a2 @0x1b
0x1187…11ac at001c = ╱49╱I╱ // 0x11a3 @0x1c
0x1187…11ac at001d = ╱ec╱,╱ // 0x11a4 @0x1d
0x1187…11ac at001e = ╱4a╱J╱ // 0x11a5 @0x1e
0x1187…11ac at001f = ╱ee╱)╱ // 0x11a6 @0x1f
0x1187…11ac at0020 = ╱dc╱=╱ // 0x11a7 @0x20
0x1187…11ac at0021 = ╱22╱"╱ // 0x11a8 @0x21
0x1187…11ac at0022 = ╱2a╱*╱ // 0x11a9 @0x22
0x1187…11ac at0023 = ╱22╱"╱ // 0x11aa @0x23
0x1187…11ac at0024 = EOL // 0x11ab @0x24
0x1187…11ac }
0x11ac…11b3 9f0a 8930 NEXT J
0x11ac…11b3 LineComalBin {
0x11ac…11b3 ptr = 0x9f0a // 0x11ac @0x0
0x11ac…11b3 lno = 0x22e2 // 0x11ae @0x2
0x11ac…11b3 at0004 = ╱84╱ NEXT ╱ // 0x11b0 @0x4
0x11ac…11b3 at0005 = ╱4a╱J╱ // 0x11b1 @0x5
0x11ac…11b3 at0006 = EOL // 0x11b2 @0x6
0x11ac…11b3 }
0x11b3…11ba 9f11 8940 NEXT I
0x11b3…11ba LineComalBin {
0x11b3…11ba ptr = 0x9f11 // 0x11b3 @0x0
0x11b3…11ba lno = 0x22ec // 0x11b5 @0x2
0x11b3…11ba at0004 = ╱84╱ NEXT ╱ // 0x11b7 @0x4
0x11b3…11ba at0005 = ╱49╱I╱ // 0x11b8 @0x5
0x11b3…11ba at0006 = EOL // 0x11b9 @0x6
0x11b3…11ba }
0x11ba…11c0 9f17 8950 PRINT
0x11ba…11c0 LineComalBin {
0x11ba…11c0 ptr = 0x9f17 // 0x11ba @0x0
0x11ba…11c0 lno = 0x22f6 // 0x11bc @0x2
0x11ba…11c0 at0004 = ╱92╱ PRINT ╱ // 0x11be @0x4
0x11ba…11c0 at0005 = EOL // 0x11bf @0x5
0x11ba…11c0 }
0x11c0…11c6 9f1d 8960 PRINT
0x11c0…11c6 LineComalBin {
0x11c0…11c6 ptr = 0x9f1d // 0x11c0 @0x0
0x11c0…11c6 lno = 0x2300 // 0x11c2 @0x2
0x11c0…11c6 at0004 = ╱92╱ PRINT ╱ // 0x11c4 @0x4
0x11c0…11c6 at0005 = EOL // 0x11c5 @0x5
0x11c0…11c6 }
0x11c6…11cc 9f23 8970 PRINT
0x11c6…11cc LineComalBin {
0x11c6…11cc ptr = 0x9f23 // 0x11c6 @0x0
0x11c6…11cc lno = 0x230a // 0x11c8 @0x2
0x11c6…11cc at0004 = ╱92╱ PRINT ╱ // 0x11ca @0x4
0x11c6…11cc at0005 = EOL // 0x11cb @0x5
0x11c6…11cc }
0x11cc…11ed 9f44 8980 PRINT TAB(58);POST3$(E,7)
0x11cc…11ed LineComalBin {
0x11cc…11ed ptr = 0x9f44 // 0x11cc @0x0
0x11cc…11ed lno = 0x2314 // 0x11ce @0x2
0x11cc…11ed at0004 = ╱92╱ PRINT ╱ // 0x11d0 @0x4
0x11cc…11ed at0005 = ╱d2╱TAB╱ // 0x11d1 @0x5
0x11cc…11ed at0006 = ╱ed╱(╱ // 0x11d2 @0x6
0x11cc…11ed at0007 = ╱35╱5╱ // 0x11d3 @0x7
0x11cc…11ed at0008 = ╱38╱8╱ // 0x11d4 @0x8
0x11cc…11ed at0009 = ╱fe0000e806╱ // 0x11d5 @0x9
0x11cc…11ed at000e = ╱ee╱)╱ // 0x11da @0xe
0x11cc…11ed at000f = ╱eb╱;╱ // 0x11db @0xf
0x11cc…11ed at0010 = ╱50╱P╱ // 0x11dc @0x10
0x11cc…11ed at0011 = ╱4f╱O╱ // 0x11dd @0x11
0x11cc…11ed at0012 = ╱53╱S╱ // 0x11de @0x12
0x11cc…11ed at0013 = ╱54╱T╱ // 0x11df @0x13
0x11cc…11ed at0014 = ╱33╱3╱ // 0x11e0 @0x14
0x11cc…11ed at0015 = ╱ef╱$╱ // 0x11e1 @0x15
0x11cc…11ed at0016 = ╱ed╱(╱ // 0x11e2 @0x16
0x11cc…11ed at0017 = ╱45╱E╱ // 0x11e3 @0x17
0x11cc…11ed at0018 = ╱ec╱,╱ // 0x11e4 @0x18
0x11cc…11ed at0019 = ╱37╱7╱ // 0x11e5 @0x19
0x11cc…11ed at001a = ╱fe0000e003╱ // 0x11e6 @0x1a
0x11cc…11ed at001f = ╱ee╱)╱ // 0x11eb @0x1f
0x11cc…11ed at0020 = EOL // 0x11ec @0x20
0x11cc…11ed }
0x11ed…11f3 9f4a 8990 PRINT
0x11ed…11f3 LineComalBin {
0x11ed…11f3 ptr = 0x9f4a // 0x11ed @0x0
0x11ed…11f3 lno = 0x231e // 0x11ef @0x2
0x11ed…11f3 at0004 = ╱92╱ PRINT ╱ // 0x11f1 @0x4
0x11ed…11f3 at0005 = EOL // 0x11f2 @0x5
0x11ed…11f3 }
0x11f3…11f9 9f50 9000 PRINT
0x11f3…11f9 LineComalBin {
0x11f3…11f9 ptr = 0x9f50 // 0x11f3 @0x0
0x11f3…11f9 lno = 0x2328 // 0x11f5 @0x2
0x11f3…11f9 at0004 = ╱92╱ PRINT ╱ // 0x11f7 @0x4
0x11f3…11f9 at0005 = EOL // 0x11f8 @0x5
0x11f3…11f9 }
0x11f9…1220 9f77 9010 PRINT TAB(46);POST3$(8,32)
0x11f9…1220 LineComalBin {
0x11f9…1220 ptr = 0x9f77 // 0x11f9 @0x0
0x11f9…1220 lno = 0x2332 // 0x11fb @0x2
0x11f9…1220 at0004 = ╱92╱ PRINT ╱ // 0x11fd @0x4
0x11f9…1220 at0005 = ╱d2╱TAB╱ // 0x11fe @0x5
0x11f9…1220 at0006 = ╱ed╱(╱ // 0x11ff @0x6
0x11f9…1220 at0007 = ╱34╱4╱ // 0x1200 @0x7
0x11f9…1220 at0008 = ╱36╱6╱ // 0x1201 @0x8
0x11f9…1220 at0009 = ╱fe0000b806╱ // 0x1202 @0x9
0x11f9…1220 at000e = ╱ee╱)╱ // 0x1207 @0xe
0x11f9…1220 at000f = ╱eb╱;╱ // 0x1208 @0xf
0x11f9…1220 at0010 = ╱50╱P╱ // 0x1209 @0x10
0x11f9…1220 at0011 = ╱4f╱O╱ // 0x120a @0x11
0x11f9…1220 at0012 = ╱53╱S╱ // 0x120b @0x12
0x11f9…1220 at0013 = ╱54╱T╱ // 0x120c @0x13
0x11f9…1220 at0014 = ╱33╱3╱ // 0x120d @0x14
0x11f9…1220 at0015 = ╱ef╱$╱ // 0x120e @0x15
0x11f9…1220 at0016 = ╱ed╱(╱ // 0x120f @0x16
0x11f9…1220 at0017 = ╱38╱8╱ // 0x1210 @0x17
0x11f9…1220 at0018 = ╱fe00008004╱ // 0x1211 @0x18
0x11f9…1220 at001d = ╱ec╱,╱ // 0x1216 @0x1d
0x11f9…1220 at001e = ╱33╱3╱ // 0x1217 @0x1e
0x11f9…1220 at001f = ╱32╱2╱ // 0x1218 @0x1f
0x11f9…1220 at0020 = ╱fe00008006╱ // 0x1219 @0x20
0x11f9…1220 at0025 = ╱ee╱)╱ // 0x121e @0x25
0x11f9…1220 at0026 = EOL // 0x121f @0x26
0x11f9…1220 }
0x1220…1248 9f9f 9020 PRINT TAB(46);POST3$(33,55)
0x1220…1248 LineComalBin {
0x1220…1248 ptr = 0x9f9f // 0x1220 @0x0
0x1220…1248 lno = 0x233c // 0x1222 @0x2
0x1220…1248 at0004 = ╱92╱ PRINT ╱ // 0x1224 @0x4
0x1220…1248 at0005 = ╱d2╱TAB╱ // 0x1225 @0x5
0x1220…1248 at0006 = ╱ed╱(╱ // 0x1226 @0x6
0x1220…1248 at0007 = ╱34╱4╱ // 0x1227 @0x7
0x1220…1248 at0008 = ╱36╱6╱ // 0x1228 @0x8
0x1220…1248 at0009 = ╱fe0000b806╱ // 0x1229 @0x9
0x1220…1248 at000e = ╱ee╱)╱ // 0x122e @0xe
0x1220…1248 at000f = ╱eb╱;╱ // 0x122f @0xf
0x1220…1248 at0010 = ╱50╱P╱ // 0x1230 @0x10
0x1220…1248 at0011 = ╱4f╱O╱ // 0x1231 @0x11
0x1220…1248 at0012 = ╱53╱S╱ // 0x1232 @0x12
0x1220…1248 at0013 = ╱54╱T╱ // 0x1233 @0x13
0x1220…1248 at0014 = ╱33╱3╱ // 0x1234 @0x14
0x1220…1248 at0015 = ╱ef╱$╱ // 0x1235 @0x15
0x1220…1248 at0016 = ╱ed╱(╱ // 0x1236 @0x16
0x1220…1248 at0017 = ╱33╱3╱ // 0x1237 @0x17
0x1220…1248 at0018 = ╱33╱3╱ // 0x1238 @0x18
0x1220…1248 at0019 = ╱fe00008406╱ // 0x1239 @0x19
0x1220…1248 at001e = ╱ec╱,╱ // 0x123e @0x1e
0x1220…1248 at001f = ╱35╱5╱ // 0x123f @0x1f
0x1220…1248 at0020 = ╱35╱5╱ // 0x1240 @0x20
0x1220…1248 at0021 = ╱fe0000dc06╱ // 0x1241 @0x21
0x1220…1248 at0026 = ╱ee╱)╱ // 0x1246 @0x26
0x1220…1248 at0027 = EOL // 0x1247 @0x27
0x1220…1248 }
0x1248…1284 9fdb 9030 PRINT TAB(46);POST4$(E,4);" ";POST4$(5,18)
0x1248…1284 LineComalBin {
0x1248…1284 ptr = 0x9fdb // 0x1248 @0x0
0x1248…1284 lno = 0x2346 // 0x124a @0x2
0x1248…1284 at0004 = ╱92╱ PRINT ╱ // 0x124c @0x4
0x1248…1284 at0005 = ╱d2╱TAB╱ // 0x124d @0x5
0x1248…1284 at0006 = ╱ed╱(╱ // 0x124e @0x6
0x1248…1284 at0007 = ╱34╱4╱ // 0x124f @0x7
0x1248…1284 at0008 = ╱36╱6╱ // 0x1250 @0x8
0x1248…1284 at0009 = ╱fe0000b806╱ // 0x1251 @0x9
0x1248…1284 at000e = ╱ee╱)╱ // 0x1256 @0xe
0x1248…1284 at000f = ╱eb╱;╱ // 0x1257 @0xf
0x1248…1284 at0010 = ╱50╱P╱ // 0x1258 @0x10
0x1248…1284 at0011 = ╱4f╱O╱ // 0x1259 @0x11
0x1248…1284 at0012 = ╱53╱S╱ // 0x125a @0x12
0x1248…1284 at0013 = ╱54╱T╱ // 0x125b @0x13
0x1248…1284 at0014 = ╱34╱4╱ // 0x125c @0x14
0x1248…1284 at0015 = ╱ef╱$╱ // 0x125d @0x15
0x1248…1284 at0016 = ╱ed╱(╱ // 0x125e @0x16
0x1248…1284 at0017 = ╱45╱E╱ // 0x125f @0x17
0x1248…1284 at0018 = ╱ec╱,╱ // 0x1260 @0x18
0x1248…1284 at0019 = ╱34╱4╱ // 0x1261 @0x19
0x1248…1284 at001a = ╱fe00008003╱ // 0x1262 @0x1a
0x1248…1284 at001f = ╱ee╱)╱ // 0x1267 @0x1f
0x1248…1284 at0020 = ╱eb╱;╱ // 0x1268 @0x20
0x1248…1284 at0021 = ╱22╱"╱ // 0x1269 @0x21
0x1248…1284 at0022 = ╱20╱…╱ // 0x126a @0x22
0x1248…1284 at0023 = ╱22╱"╱ // 0x126b @0x23
0x1248…1284 at0024 = ╱eb╱;╱ // 0x126c @0x24
0x1248…1284 at0025 = ╱50╱P╱ // 0x126d @0x25
0x1248…1284 at0026 = ╱4f╱O╱ // 0x126e @0x26
0x1248…1284 at0027 = ╱53╱S╱ // 0x126f @0x27
0x1248…1284 at0028 = ╱54╱T╱ // 0x1270 @0x28
0x1248…1284 at0029 = ╱34╱4╱ // 0x1271 @0x29
0x1248…1284 at002a = ╱ef╱$╱ // 0x1272 @0x2a
0x1248…1284 at002b = ╱ed╱(╱ // 0x1273 @0x2b
0x1248…1284 at002c = ╱35╱5╱ // 0x1274 @0x2c
0x1248…1284 at002d = ╱fe0000a003╱ // 0x1275 @0x2d
0x1248…1284 at0032 = ╱ec╱,╱ // 0x127a @0x32
0x1248…1284 at0033 = ╱31╱1╱ // 0x127b @0x33
0x1248…1284 at0034 = ╱38╱8╱ // 0x127c @0x34
0x1248…1284 at0035 = ╱fe00009005╱ // 0x127d @0x35
0x1248…1284 at003a = ╱ee╱)╱ // 0x1282 @0x3a
0x1248…1284 at003b = EOL // 0x1283 @0x3b
0x1248…1284 }
0x1284…128a 9fe1 9040 PRINT
0x1284…128a LineComalBin {
0x1284…128a ptr = 0x9fe1 // 0x1284 @0x0
0x1284…128a lno = 0x2350 // 0x1286 @0x2
0x1284…128a at0004 = ╱92╱ PRINT ╱ // 0x1288 @0x4
0x1284…128a at0005 = EOL // 0x1289 @0x5
0x1284…128a }
0x128a…1290 9fe7 9050 PRINT
0x128a…1290 LineComalBin {
0x128a…1290 ptr = 0x9fe7 // 0x128a @0x0
0x128a…1290 lno = 0x235a // 0x128c @0x2
0x128a…1290 at0004 = ╱92╱ PRINT ╱ // 0x128e @0x4
0x128a…1290 at0005 = EOL // 0x128f @0x5
0x128a…1290 }
0x1290…1296 9fed 9060 PRINT
0x1290…1296 LineComalBin {
0x1290…1296 ptr = 0x9fed // 0x1290 @0x0
0x1290…1296 lno = 0x2364 // 0x1292 @0x2
0x1290…1296 at0004 = ╱92╱ PRINT ╱ // 0x1294 @0x4
0x1290…1296 at0005 = EOL // 0x1295 @0x5
0x1290…1296 }
0x1296…12ba a011 9070 PRINT TAB(W);"**T O T A L B I L A G**"
0x1296…12ba LineComalBin {
0x1296…12ba ptr = 0xa011 // 0x1296 @0x0
0x1296…12ba lno = 0x236e // 0x1298 @0x2
0x1296…12ba at0004 = ╱92╱ PRINT ╱ // 0x129a @0x4
0x1296…12ba at0005 = ╱d2╱TAB╱ // 0x129b @0x5
0x1296…12ba at0006 = ╱ed╱(╱ // 0x129c @0x6
0x1296…12ba at0007 = ╱57╱W╱ // 0x129d @0x7
0x1296…12ba at0008 = ╱ee╱)╱ // 0x129e @0x8
0x1296…12ba at0009 = ╱eb╱;╱ // 0x129f @0x9
0x1296…12ba at000a = ╱22╱"╱ // 0x12a0 @0xa
0x1296…12ba at000b = ╱2a╱*╱ // 0x12a1 @0xb
0x1296…12ba at000c = ╱2a╱*╱ // 0x12a2 @0xc
0x1296…12ba at000d = ╱54╱T╱ // 0x12a3 @0xd
0x1296…12ba at000e = ╱20╱…╱ // 0x12a4 @0xe
0x1296…12ba at000f = ╱4f╱O╱ // 0x12a5 @0xf
0x1296…12ba at0010 = ╱20╱…╱ // 0x12a6 @0x10
0x1296…12ba at0011 = ╱54╱T╱ // 0x12a7 @0x11
0x1296…12ba at0012 = ╱20╱…╱ // 0x12a8 @0x12
0x1296…12ba at0013 = ╱41╱A╱ // 0x12a9 @0x13
0x1296…12ba at0014 = ╱20╱…╱ // 0x12aa @0x14
0x1296…12ba at0015 = ╱4c╱L╱ // 0x12ab @0x15
0x1296…12ba at0016 = ╱20╱…╱ // 0x12ac @0x16
0x1296…12ba at0017 = ╱42╱B╱ // 0x12ad @0x17
0x1296…12ba at0018 = ╱20╱…╱ // 0x12ae @0x18
0x1296…12ba at0019 = ╱49╱I╱ // 0x12af @0x19
0x1296…12ba at001a = ╱20╱…╱ // 0x12b0 @0x1a
0x1296…12ba at001b = ╱4c╱L╱ // 0x12b1 @0x1b
0x1296…12ba at001c = ╱20╱…╱ // 0x12b2 @0x1c
0x1296…12ba at001d = ╱41╱A╱ // 0x12b3 @0x1d
0x1296…12ba at001e = ╱20╱…╱ // 0x12b4 @0x1e
0x1296…12ba at001f = ╱47╱G╱ // 0x12b5 @0x1f
0x1296…12ba at0020 = ╱2a╱*╱ // 0x12b6 @0x20
0x1296…12ba at0021 = ╱2a╱*╱ // 0x12b7 @0x21
0x1296…12ba at0022 = ╱22╱"╱ // 0x12b8 @0x22
0x1296…12ba at0023 = EOL // 0x12b9 @0x23
0x1296…12ba }
0x12ba…12da a031 9080 PRINT TAB(W);"ANTAL BILAG";ABL;" "
0x12ba…12da LineComalBin {
0x12ba…12da ptr = 0xa031 // 0x12ba @0x0
0x12ba…12da lno = 0x2378 // 0x12bc @0x2
0x12ba…12da at0004 = ╱92╱ PRINT ╱ // 0x12be @0x4
0x12ba…12da at0005 = ╱d2╱TAB╱ // 0x12bf @0x5
0x12ba…12da at0006 = ╱ed╱(╱ // 0x12c0 @0x6
0x12ba…12da at0007 = ╱57╱W╱ // 0x12c1 @0x7
0x12ba…12da at0008 = ╱ee╱)╱ // 0x12c2 @0x8
0x12ba…12da at0009 = ╱eb╱;╱ // 0x12c3 @0x9
0x12ba…12da at000a = ╱22╱"╱ // 0x12c4 @0xa
0x12ba…12da at000b = ╱41╱A╱ // 0x12c5 @0xb
0x12ba…12da at000c = ╱4e╱N╱ // 0x12c6 @0xc
0x12ba…12da at000d = ╱54╱T╱ // 0x12c7 @0xd
0x12ba…12da at000e = ╱41╱A╱ // 0x12c8 @0xe
0x12ba…12da at000f = ╱4c╱L╱ // 0x12c9 @0xf
0x12ba…12da at0010 = ╱20╱…╱ // 0x12ca @0x10
0x12ba…12da at0011 = ╱42╱B╱ // 0x12cb @0x11
0x12ba…12da at0012 = ╱49╱I╱ // 0x12cc @0x12
0x12ba…12da at0013 = ╱4c╱L╱ // 0x12cd @0x13
0x12ba…12da at0014 = ╱41╱A╱ // 0x12ce @0x14
0x12ba…12da at0015 = ╱47╱G╱ // 0x12cf @0x15
0x12ba…12da at0016 = ╱22╱"╱ // 0x12d0 @0x16
0x12ba…12da at0017 = ╱eb╱;╱ // 0x12d1 @0x17
0x12ba…12da at0018 = ╱41╱A╱ // 0x12d2 @0x18
0x12ba…12da at0019 = ╱42╱B╱ // 0x12d3 @0x19
0x12ba…12da at001a = ╱4c╱L╱ // 0x12d4 @0x1a
0x12ba…12da at001b = ╱eb╱;╱ // 0x12d5 @0x1b
0x12ba…12da at001c = ╱22╱"╱ // 0x12d6 @0x1c
0x12ba…12da at001d = ╱20╱…╱ // 0x12d7 @0x1d
0x12ba…12da at001e = ╱22╱"╱ // 0x12d8 @0x1e
0x12ba…12da at001f = EOL // 0x12d9 @0x1f
0x12ba…12da }
0x12da…12e0 a037 9090 PRINT
0x12da…12e0 LineComalBin {
0x12da…12e0 ptr = 0xa037 // 0x12da @0x0
0x12da…12e0 lno = 0x2382 // 0x12dc @0x2
0x12da…12e0 at0004 = ╱92╱ PRINT ╱ // 0x12de @0x4
0x12da…12e0 at0005 = EOL // 0x12df @0x5
0x12da…12e0 }
0x12e0…12e6 a03d 9100 PRINT
0x12e0…12e6 LineComalBin {
0x12e0…12e6 ptr = 0xa03d // 0x12e0 @0x0
0x12e0…12e6 lno = 0x238c // 0x12e2 @0x2
0x12e0…12e6 at0004 = ╱92╱ PRINT ╱ // 0x12e4 @0x4
0x12e0…12e6 at0005 = EOL // 0x12e5 @0x5
0x12e0…12e6 }
0x12e6…12ec a043 9110 PRINT
0x12e6…12ec LineComalBin {
0x12e6…12ec ptr = 0xa043 // 0x12e6 @0x0
0x12e6…12ec lno = 0x2396 // 0x12e8 @0x2
0x12e6…12ec at0004 = ╱92╱ PRINT ╱ // 0x12ea @0x4
0x12e6…12ec at0005 = EOL // 0x12eb @0x5
0x12e6…12ec }
0x12ec…12f2 a049 9120 PRINT
0x12ec…12f2 LineComalBin {
0x12ec…12f2 ptr = 0xa049 // 0x12ec @0x0
0x12ec…12f2 lno = 0x23a0 // 0x12ee @0x2
0x12ec…12f2 at0004 = ╱92╱ PRINT ╱ // 0x12f0 @0x4
0x12ec…12f2 at0005 = EOL // 0x12f1 @0x5
0x12ec…12f2 }
0x12f2…12f8 a04f 9130 PRINT
0x12f2…12f8 LineComalBin {
0x12f2…12f8 ptr = 0xa04f // 0x12f2 @0x0
0x12f2…12f8 lno = 0x23aa // 0x12f4 @0x2
0x12f2…12f8 at0004 = ╱92╱ PRINT ╱ // 0x12f6 @0x4
0x12f2…12f8 at0005 = EOL // 0x12f7 @0x5
0x12f2…12f8 }
0x12f8…12fe a055 9140 PRINT
0x12f8…12fe LineComalBin {
0x12f8…12fe ptr = 0xa055 // 0x12f8 @0x0
0x12f8…12fe lno = 0x23b4 // 0x12fa @0x2
0x12f8…12fe at0004 = ╱92╱ PRINT ╱ // 0x12fc @0x4
0x12f8…12fe at0005 = EOL // 0x12fd @0x5
0x12f8…12fe }
0x12fe…1321 a078 9150 PRINT TAB(68);TOTAL$(E,E,8)
0x12fe…1321 LineComalBin {
0x12fe…1321 ptr = 0xa078 // 0x12fe @0x0
0x12fe…1321 lno = 0x23be // 0x1300 @0x2
0x12fe…1321 at0004 = ╱92╱ PRINT ╱ // 0x1302 @0x4
0x12fe…1321 at0005 = ╱d2╱TAB╱ // 0x1303 @0x5
0x12fe…1321 at0006 = ╱ed╱(╱ // 0x1304 @0x6
0x12fe…1321 at0007 = ╱36╱6╱ // 0x1305 @0x7
0x12fe…1321 at0008 = ╱38╱8╱ // 0x1306 @0x8
0x12fe…1321 at0009 = ╱fe00008807╱ // 0x1307 @0x9
0x12fe…1321 at000e = ╱ee╱)╱ // 0x130c @0xe
0x12fe…1321 at000f = ╱eb╱;╱ // 0x130d @0xf
0x12fe…1321 at0010 = ╱54╱T╱ // 0x130e @0x10
0x12fe…1321 at0011 = ╱4f╱O╱ // 0x130f @0x11
0x12fe…1321 at0012 = ╱54╱T╱ // 0x1310 @0x12
0x12fe…1321 at0013 = ╱41╱A╱ // 0x1311 @0x13
0x12fe…1321 at0014 = ╱4c╱L╱ // 0x1312 @0x14
0x12fe…1321 at0015 = ╱ef╱$╱ // 0x1313 @0x15
0x12fe…1321 at0016 = ╱ed╱(╱ // 0x1314 @0x16
0x12fe…1321 at0017 = ╱45╱E╱ // 0x1315 @0x17
0x12fe…1321 at0018 = ╱ec╱,╱ // 0x1316 @0x18
0x12fe…1321 at0019 = ╱45╱E╱ // 0x1317 @0x19
0x12fe…1321 at001a = ╱ec╱,╱ // 0x1318 @0x1a
0x12fe…1321 at001b = ╱38╱8╱ // 0x1319 @0x1b
0x12fe…1321 at001c = ╱fe00008004╱ // 0x131a @0x1c
0x12fe…1321 at0021 = ╱ee╱)╱ // 0x131f @0x21
0x12fe…1321 at0022 = EOL // 0x1320 @0x22
0x12fe…1321 }
0x1321…1327 a07e 9160 PRINT
0x1321…1327 LineComalBin {
0x1321…1327 ptr = 0xa07e // 0x1321 @0x0
0x1321…1327 lno = 0x23c8 // 0x1323 @0x2
0x1321…1327 at0004 = ╱92╱ PRINT ╱ // 0x1325 @0x4
0x1321…1327 at0005 = EOL // 0x1326 @0x5
0x1321…1327 }
0x1327…132d a084 9170 PRINT
0x1327…132d LineComalBin {
0x1327…132d ptr = 0xa084 // 0x1327 @0x0
0x1327…132d lno = 0x23d2 // 0x1329 @0x2
0x1327…132d at0004 = ╱92╱ PRINT ╱ // 0x132b @0x4
0x1327…132d at0005 = EOL // 0x132c @0x5
0x1327…132d }
0x132d…1350 a0a7 9180 PRINT TAB(68);TOTAL$(G,E,8)
0x132d…1350 LineComalBin {
0x132d…1350 ptr = 0xa0a7 // 0x132d @0x0
0x132d…1350 lno = 0x23dc // 0x132f @0x2
0x132d…1350 at0004 = ╱92╱ PRINT ╱ // 0x1331 @0x4
0x132d…1350 at0005 = ╱d2╱TAB╱ // 0x1332 @0x5
0x132d…1350 at0006 = ╱ed╱(╱ // 0x1333 @0x6
0x132d…1350 at0007 = ╱36╱6╱ // 0x1334 @0x7
0x132d…1350 at0008 = ╱38╱8╱ // 0x1335 @0x8
0x132d…1350 at0009 = ╱fe00008807╱ // 0x1336 @0x9
0x132d…1350 at000e = ╱ee╱)╱ // 0x133b @0xe
0x132d…1350 at000f = ╱eb╱;╱ // 0x133c @0xf
0x132d…1350 at0010 = ╱54╱T╱ // 0x133d @0x10
0x132d…1350 at0011 = ╱4f╱O╱ // 0x133e @0x11
0x132d…1350 at0012 = ╱54╱T╱ // 0x133f @0x12
0x132d…1350 at0013 = ╱41╱A╱ // 0x1340 @0x13
0x132d…1350 at0014 = ╱4c╱L╱ // 0x1341 @0x14
0x132d…1350 at0015 = ╱ef╱$╱ // 0x1342 @0x15
0x132d…1350 at0016 = ╱ed╱(╱ // 0x1343 @0x16
0x132d…1350 at0017 = ╱47╱G╱ // 0x1344 @0x17
0x132d…1350 at0018 = ╱ec╱,╱ // 0x1345 @0x18
0x132d…1350 at0019 = ╱45╱E╱ // 0x1346 @0x19
0x132d…1350 at001a = ╱ec╱,╱ // 0x1347 @0x1a
0x132d…1350 at001b = ╱38╱8╱ // 0x1348 @0x1b
0x132d…1350 at001c = ╱fe00008004╱ // 0x1349 @0x1c
0x132d…1350 at0021 = ╱ee╱)╱ // 0x134e @0x21
0x132d…1350 at0022 = EOL // 0x134f @0x22
0x132d…1350 }
0x1350…1356 a0ad 9190 PRINT
0x1350…1356 LineComalBin {
0x1350…1356 ptr = 0xa0ad // 0x1350 @0x0
0x1350…1356 lno = 0x23e6 // 0x1352 @0x2
0x1350…1356 at0004 = ╱92╱ PRINT ╱ // 0x1354 @0x4
0x1350…1356 at0005 = EOL // 0x1355 @0x5
0x1350…1356 }
0x1356…135c a0b3 9200 PRINT
0x1356…135c LineComalBin {
0x1356…135c ptr = 0xa0b3 // 0x1356 @0x0
0x1356…135c lno = 0x23f0 // 0x1358 @0x2
0x1356…135c at0004 = ╱92╱ PRINT ╱ // 0x135a @0x4
0x1356…135c at0005 = EOL // 0x135b @0x5
0x1356…135c }
0x135c…1362 a0b9 9210 PRINT
0x135c…1362 LineComalBin {
0x135c…1362 ptr = 0xa0b9 // 0x135c @0x0
0x135c…1362 lno = 0x23fa // 0x135e @0x2
0x135c…1362 at0004 = ╱92╱ PRINT ╱ // 0x1360 @0x4
0x135c…1362 at0005 = EOL // 0x1361 @0x5
0x135c…1362 }
0x1362…1368 a0bf 9220 PRINT
0x1362…1368 LineComalBin {
0x1362…1368 ptr = 0xa0bf // 0x1362 @0x0
0x1362…1368 lno = 0x2404 // 0x1364 @0x2
0x1362…1368 at0004 = ╱92╱ PRINT ╱ // 0x1366 @0x4
0x1362…1368 at0005 = EOL // 0x1367 @0x5
0x1362…1368 }
0x1368…138b a0e2 9230 PRINT TAB(68);TOTAL$(V,E,8)
0x1368…138b LineComalBin {
0x1368…138b ptr = 0xa0e2 // 0x1368 @0x0
0x1368…138b lno = 0x240e // 0x136a @0x2
0x1368…138b at0004 = ╱92╱ PRINT ╱ // 0x136c @0x4
0x1368…138b at0005 = ╱d2╱TAB╱ // 0x136d @0x5
0x1368…138b at0006 = ╱ed╱(╱ // 0x136e @0x6
0x1368…138b at0007 = ╱36╱6╱ // 0x136f @0x7
0x1368…138b at0008 = ╱38╱8╱ // 0x1370 @0x8
0x1368…138b at0009 = ╱fe00008807╱ // 0x1371 @0x9
0x1368…138b at000e = ╱ee╱)╱ // 0x1376 @0xe
0x1368…138b at000f = ╱eb╱;╱ // 0x1377 @0xf
0x1368…138b at0010 = ╱54╱T╱ // 0x1378 @0x10
0x1368…138b at0011 = ╱4f╱O╱ // 0x1379 @0x11
0x1368…138b at0012 = ╱54╱T╱ // 0x137a @0x12
0x1368…138b at0013 = ╱41╱A╱ // 0x137b @0x13
0x1368…138b at0014 = ╱4c╱L╱ // 0x137c @0x14
0x1368…138b at0015 = ╱ef╱$╱ // 0x137d @0x15
0x1368…138b at0016 = ╱ed╱(╱ // 0x137e @0x16
0x1368…138b at0017 = ╱56╱V╱ // 0x137f @0x17
0x1368…138b at0018 = ╱ec╱,╱ // 0x1380 @0x18
0x1368…138b at0019 = ╱45╱E╱ // 0x1381 @0x19
0x1368…138b at001a = ╱ec╱,╱ // 0x1382 @0x1a
0x1368…138b at001b = ╱38╱8╱ // 0x1383 @0x1b
0x1368…138b at001c = ╱fe00008004╱ // 0x1384 @0x1c
0x1368…138b at0021 = ╱ee╱)╱ // 0x1389 @0x21
0x1368…138b at0022 = EOL // 0x138a @0x22
0x1368…138b }
0x138b…1391 a0e8 9240 PRINT
0x138b…1391 LineComalBin {
0x138b…1391 ptr = 0xa0e8 // 0x138b @0x0
0x138b…1391 lno = 0x2418 // 0x138d @0x2
0x138b…1391 at0004 = ╱92╱ PRINT ╱ // 0x138f @0x4
0x138b…1391 at0005 = EOL // 0x1390 @0x5
0x138b…1391 }
0x1391…1397 a0ee 9250 PRINT
0x1391…1397 LineComalBin {
0x1391…1397 ptr = 0xa0ee // 0x1391 @0x0
0x1391…1397 lno = 0x2422 // 0x1393 @0x2
0x1391…1397 at0004 = ╱92╱ PRINT ╱ // 0x1395 @0x4
0x1391…1397 at0005 = EOL // 0x1396 @0x5
0x1391…1397 }
0x1397…13bf a116 9260 PRINT TAB(68);TOTAL$(4,E,8)
0x1397…13bf LineComalBin {
0x1397…13bf ptr = 0xa116 // 0x1397 @0x0
0x1397…13bf lno = 0x242c // 0x1399 @0x2
0x1397…13bf at0004 = ╱92╱ PRINT ╱ // 0x139b @0x4
0x1397…13bf at0005 = ╱d2╱TAB╱ // 0x139c @0x5
0x1397…13bf at0006 = ╱ed╱(╱ // 0x139d @0x6
0x1397…13bf at0007 = ╱36╱6╱ // 0x139e @0x7
0x1397…13bf at0008 = ╱38╱8╱ // 0x139f @0x8
0x1397…13bf at0009 = ╱fe00008807╱ // 0x13a0 @0x9
0x1397…13bf at000e = ╱ee╱)╱ // 0x13a5 @0xe
0x1397…13bf at000f = ╱eb╱;╱ // 0x13a6 @0xf
0x1397…13bf at0010 = ╱54╱T╱ // 0x13a7 @0x10
0x1397…13bf at0011 = ╱4f╱O╱ // 0x13a8 @0x11
0x1397…13bf at0012 = ╱54╱T╱ // 0x13a9 @0x12
0x1397…13bf at0013 = ╱41╱A╱ // 0x13aa @0x13
0x1397…13bf at0014 = ╱4c╱L╱ // 0x13ab @0x14
0x1397…13bf at0015 = ╱ef╱$╱ // 0x13ac @0x15
0x1397…13bf at0016 = ╱ed╱(╱ // 0x13ad @0x16
0x1397…13bf at0017 = ╱34╱4╱ // 0x13ae @0x17
0x1397…13bf at0018 = ╱fe00008003╱ // 0x13af @0x18
0x1397…13bf at001d = ╱ec╱,╱ // 0x13b4 @0x1d
0x1397…13bf at001e = ╱45╱E╱ // 0x13b5 @0x1e
0x1397…13bf at001f = ╱ec╱,╱ // 0x13b6 @0x1f
0x1397…13bf at0020 = ╱38╱8╱ // 0x13b7 @0x20
0x1397…13bf at0021 = ╱fe00008004╱ // 0x13b8 @0x21
0x1397…13bf at0026 = ╱ee╱)╱ // 0x13bd @0x26
0x1397…13bf at0027 = EOL // 0x13be @0x27
0x1397…13bf }
0x13bf…13d6 a12d 9265 FOR I=33 TO 48
0x13bf…13d6 LineComalBin {
0x13bf…13d6 ptr = 0xa12d // 0x13bf @0x0
0x13bf…13d6 lno = 0x2431 // 0x13c1 @0x2
0x13bf…13d6 at0004 = ╱83╱ FOR ╱ // 0x13c3 @0x4
0x13bf…13d6 at0005 = ╱49╱I╱ // 0x13c4 @0x5
0x13bf…13d6 at0006 = ╱dc╱=╱ // 0x13c5 @0x6
0x13bf…13d6 at0007 = ╱33╱3╱ // 0x13c6 @0x7
0x13bf…13d6 at0008 = ╱33╱3╱ // 0x13c7 @0x8
0x13bf…13d6 at0009 = ╱fe00008406╱ // 0x13c8 @0x9
0x13bf…13d6 at000e = ╱b7╱ TO ╱ // 0x13cd @0xe
0x13bf…13d6 at000f = ╱34╱4╱ // 0x13ce @0xf
0x13bf…13d6 at0010 = ╱38╱8╱ // 0x13cf @0x10
0x13bf…13d6 at0011 = ╱fe0000c006╱ // 0x13d0 @0x11
0x13bf…13d6 at0016 = EOL // 0x13d5 @0x16
0x13bf…13d6 }
0x13d6…13dc a133 9270 PRINT
0x13d6…13dc LineComalBin {
0x13d6…13dc ptr = 0xa133 // 0x13d6 @0x0
0x13d6…13dc lno = 0x2436 // 0x13d8 @0x2
0x13d6…13dc at0004 = ╱92╱ PRINT ╱ // 0x13da @0x4
0x13d6…13dc at0005 = EOL // 0x13db @0x5
0x13d6…13dc }
0x13dc…13e3 a13a 9275 NEXT I
0x13dc…13e3 LineComalBin {
0x13dc…13e3 ptr = 0xa13a // 0x13dc @0x0
0x13dc…13e3 lno = 0x243b // 0x13de @0x2
0x13dc…13e3 at0004 = ╱84╱ NEXT ╱ // 0x13e0 @0x4
0x13dc…13e3 at0005 = ╱49╱I╱ // 0x13e1 @0x5
0x13dc…13e3 at0006 = EOL // 0x13e2 @0x6
0x13dc…13e3 }
0x13e3…13e9 a140 9730 CLOSE
0x13e3…13e9 LineComalBin {
0x13e3…13e9 ptr = 0xa140 // 0x13e3 @0x0
0x13e3…13e9 lno = 0x2602 // 0x13e5 @0x2
0x13e3…13e9 at0004 = ╱a8╱ CLOSE ╱ // 0x13e7 @0x4
0x13e3…13e9 at0005 = EOL // 0x13e8 @0x5
0x13e3…13e9 }
0x13e9…13f0 a147 9735 OUTPUT T
0x13e9…13f0 LineComalBin {
0x13e9…13f0 ptr = 0xa147 // 0x13e9 @0x0
0x13e9…13f0 lno = 0x2607 // 0x13eb @0x2
0x13e9…13f0 at0004 = ╱a5╱ OUTPUT ╱ // 0x13ed @0x4
0x13e9…13f0 at0005 = ╱54╱T╱ // 0x13ee @0x5
0x13e9…13f0 at0006 = EOL // 0x13ef @0x6
0x13e9…13f0 }
0x13f0…1406 0000 9740 CHAIN "P641210:STARTB"
0x13f0…1406 LineComalBin {
0x13f0…1406 ptr = 0x0000 // 0x13f0 @0x0
0x13f0…1406 lno = 0x260c // 0x13f2 @0x2
0x13f0…1406 at0004 = ╱ac╱ CHAIN ╱ // 0x13f4 @0x4
0x13f0…1406 at0005 = ╱22╱"╱ // 0x13f5 @0x5
0x13f0…1406 at0006 = ╱50╱P╱ // 0x13f6 @0x6
0x13f0…1406 at0007 = ╱36╱6╱ // 0x13f7 @0x7
0x13f0…1406 at0008 = ╱34╱4╱ // 0x13f8 @0x8
0x13f0…1406 at0009 = ╱31╱1╱ // 0x13f9 @0x9
0x13f0…1406 at000a = ╱32╱2╱ // 0x13fa @0xa
0x13f0…1406 at000b = ╱31╱1╱ // 0x13fb @0xb
0x13f0…1406 at000c = ╱30╱0╱ // 0x13fc @0xc
0x13f0…1406 at000d = ╱3a╱:╱ // 0x13fd @0xd
0x13f0…1406 at000e = ╱53╱S╱ // 0x13fe @0xe
0x13f0…1406 at000f = ╱54╱T╱ // 0x13ff @0xf
0x13f0…1406 at0010 = ╱41╱A╱ // 0x1400 @0x10
0x13f0…1406 at0011 = ╱52╱R╱ // 0x1401 @0x11
0x13f0…1406 at0012 = ╱54╱T╱ // 0x1402 @0x12
0x13f0…1406 at0013 = ╱42╱B╱ // 0x1403 @0x13
0x13f0…1406 at0014 = ╱22╱"╱ // 0x1404 @0x14
0x13f0…1406 at0015 = EOL // 0x1405 @0x15
0x13f0…1406 }
0x1406…1420 57 8d 64 00 42 dc 30 fe 00 00 00 00 eb 45 dc 31 fe 00 00 80 01 eb 47 dc 32 fe ┆W d B 0 E 1 G 2 ┆
0x1420…1427 00 00 80 02 eb 56 dc ┆ V ┆
0x1427…1437 (67,) 33 fe 00 00 c0 02 eb 57 dc 39 fe 00 00 90 04 ff ┆3 W 9 ┆
0x1437…143d (68,) 57 8d 5d a1 10 00 ┆W Å ┆