|
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: 7455 (0x1d1f)
Types: SPC/1-COMAL-BIN
Notes: Mikados_B
Names: »FSORT.B«
└─⟦385f097a1⟧ Bits:30008988 SPC/1 COMAL programmer til bogføring
└─⟦this⟧ »FSORT.B«
0100 REM FSORT 0110 DIM K1$(17),K2$(17),K3$(17),K4$(17),K5$(17),K6$(17),K7$(17),T11(W) 0120 DIM K9$(17),T12(W),N1$(6),A$(E),BLANK$(25),TKO$(E),BEO$(12),TEO$(25) 0130 DIM T21(W),T22(W),K8$(17),K10$(17),K19$(17),K23$(17),T13(W),T23(W) 0140 DIM K20$(17),K21$(17),K22$(17),K40$(17),K41$(17),K42$(17),K43$(17) 0150 BLANK$=" " 0160 CLEAR 0170 REPEAT 0180 CURSOR 30,13 0190 INPUT "Sæt plade nr 21 i ,tast RETURN",A$ 0200 UNTIL ORD(A$)=255 0210 K1$="P641220:SYSTEM1" 0220 OPEN K1$,R 0230 EXEC FEJL(E,E,K1$) 0240 GET K1$,G:MKASPOST,MPPOST,MBHPOST,MFMID 0250 EXEC FEJL(E,G,K1$) 0260 GET K1$,V:MDMID,MKMID,MFPOST,MDPOST 0270 EXEC FEJL(E,V,K1$) 0280 GET K1$,4:MKPOST 0290 EXEC FEJL(E,4,K1$) 0300 GET K1$,10:N1$ 0310 EXEC FEJL(E,6,K1$) 0320 GET K1$,22:K3$ 0330 EXEC FEJL(V,E,K1$) 0340 GET K1$,23:K4$ 0350 EXEC FEJL(V,G,K1$) 0360 GET K1$,24:K5$ 0370 EXEC FEJL(V,V,K1$) 0380 GET K1$,25:K6$ 0390 EXEC FEJL(V,4,K1$) 0400 GET K1$,26:K7$ 0410 EXEC FEJL(V,5,K1$) 0420 GET K1$,27:K8$ 0430 EXEC FEJL(V,6,K1$) 0440 GET K1$,32:K9$ 0450 EXEC FEJL(V,7,K1$) 0460 GET K1$,33:K10$ 0470 EXEC FEJL(V,8,K1$) 0480 GET K1$,34:K19$ 0490 EXEC FEJL(V,W,K1$) 0500 GET K1$,40:K40$ 0510 EXEC FEJL(20,20,K1$) 0520 GET K1$,41:K41$ 0530 EXEC FEJL(20,21,K1$) 0540 GET K1$,42:K42$ 0550 EXEC FEJL(20,22,K1$) 0560 GET K1$,43:METOT,MEMID,MEPOST 0570 EXEC FEJL(20,23,K1$) 0580 CLOSE K1$ 0590 EXEC FEJL(E,5,K1$) 0591 IMD=MDPOST 0592 IF IMD<MFPOST THEN IMD=MFPOST 0593 IF IMD<MKPOST THEN IMD=MKPOST 0594 IF IMD<MEPOST THEN IMD=MEPOST 0600 DIM HDTAB(IMD DIV 40,G),UDTAB(4,G) 0620 K20$=K7$+"1";K20$(G)="1";K21$=K6$+"1";K21$(G)="1";K22$=K8$+"1" 0630 K22$(G)="1";K3$=N1$+K3$;K4$=N1$+K4$;K5$=N1$+K5$;K6$=N1$+K6$;K7$=N1$+K7$ 0640 K8$=N1$+K8$;K9$=N1$+K9$;K10$=N1$+K10$;K19$=N1$+K19$;K20$=N1$+K20$ 0650 K21$=N1$+K21$;K22$=N1$+K22$;K43$=K41$+"1";K43$(G)="1";K40$=N1$+K40$ 0660 K41$=N1$+K41$;K42$=N1$+K42$;K43$=N1$+K43$;IMD=MFMID 0670 IF IMD<MDMID THEN IMD=MDMID 0680 IF IMD<MKMID THEN IMD=MKMID 0690 IF IMD<MEMID THEN IMD=MEMID 0700 DIM N(IMD),D(IMD),BI(IMD),TK$(IMD,E),BE$(IMD,12),TE$(IMD,25),PEG(IMD) 0710 DIM ENT(IMD) 0720 K1$=N1$+"20:SYSTEM2" 0730 EXEC FSYSIN(K1$,T11,T12,T13) 0740 K2$=N1$+"21:SYSTEM21" 0750 EXEC FSYSIN(K2$,T21,T22,T23) 0760 EXEC FSORT(K4$,T11(3)) 0770 EXEC FFLET(K20$,K7$,T11(3),T21(6),T11(6)) 0780 CLEAR 0790 CURSOR 10,11 0795 T35=T11(6) 0800 PRINT USING "Antal debitorposteringer :###### Max:######":T35,MDPOST 0810 EXEC FSYSUD(K1$,T11,T12,T13) 0820 EXEC TABINIT(K7$,K10$,MDPOST,HDTAB,UDTAB) 0830 EXEC FSORT(K3$,T11(2)) 0840 EXEC FFLET(K21$,K6$,T11(2),T21(5),T11(5)) 0850 CURSOR 10,13 0855 T40=T11(5) 0860 PRINT USING "Antal finansposteringer :###### Max:######":T40,MFPOST 0870 EXEC FSYSUD(K1$,T11,T12,T13) 0880 EXEC TABINIT(K6$,K9$,MFPOST,HDTAB,UDTAB) 0890 EXEC FSORT(K5$,T11(4)) 0900 EXEC FFLET(K22$,K8$,T11(4),T21(7),T11(7)) 0910 CURSOR 10,15 0915 T45=T11(7) 0920 PRINT USING "Antal kreditorposteringer :###### Max:######":T45,MKPOST 0930 EXEC FSYSUD(K1$,T11,T12,T13) 0940 EXEC TABINIT(K8$,K19$,MKPOST,HDTAB,UDTAB) 0950 EXEC FSORT(K40$,T13(4)) 0960 EXEC FFLET(K43$,K41$,T13(4),T23(5),T13(5)) 0970 CURSOR 10,17 0975 T30=T13(5) 0980 PRINT USING "Antal entrepriseposteringer:###### Max:######":T30,MEPOST 0990 EXEC FSYSUD(K1$,T11,T12,T13) 1000 EXEC TABINIT(K41$,K42$,MEPOST,HDTAB,UDTAB) 1010 T11(V)=B;T11(4)=B;T11(G)=B;T12(E)=B;T12(G)=V;T13(4)=B 1020 EXEC FSYSUD(K1$,T11,T12,T13) 1030 CLEAR 1080 CHAIN "P641210:ÅKOPI" 1090 END 1100 PROC FEJL(NR1,NR2,NR3) 1110 IF STATUS(NR3$)<>B THEN 1120 PRINT NR1,NR2,NR3$,STATUS(NR3$) 1130 STOP 1140 ENDIF 1150 ENDPROC 1160 PROC FSORT(K,MID) 1170 OPEN K$,R 1180 EXEC FEJL(G,E,K$) 1190 J=E 1200 FOR I=E TO MID 1210 EXEC FGET2(K$,I,N(J),D(J),BI(J),TK$(J),BE$(J),TE$(J),ENT(J)) 1220 J=J+E 1230 NEXT I 1240 FOR I=E TO J-E 1250 PEG(I)=I 1260 NEXT I 1270 FOR I=E TO J-E 1280 MIN=I 1290 FOR H=I+E TO J-E 1300 IF N(PEG(H))<N(PEG(MIN)) THEN 1310 MIN=H 1320 ELSE 1330 IF N(PEG(H))=N(PEG(MIN)) THEN 1340 IF D(PEG(H))<D(PEG(MIN)) THEN MIN=H 1350 ENDIF 1360 ENDIF 1370 NEXT H 1380 MP=PEG(I) 1390 PEG(I)=PEG(MIN) 1400 PEG(MIN)=MP 1410 NEXT I 1420 CLOSE K$ 1430 EXEC FEJL(G,4,K$) 1440 ENDPROC 1450 PROC FSYSIN(K11,T1,T2,T5) 1460 OPEN K11$,R 1470 EXEC FEJL(5,E,K11$) 1480 GET K11$,13:T1(E),T1(G),T1(V),T1(4),T1(5),T1(6),T1(7),T1(8),T1(W) 1490 EXEC FEJL(5,G,K11$) 1500 GET K11$,17:T2(E),T2(G),T2(V),T2(4),T2(5),T2(6),T2(7),T2(8),T2(W) 1510 EXEC FEJL(5,V,K11$) 1512 GET K11$,21:T5(E),T5(G),T5(V),T5(4),T5(5),T5(6),T5(7),T5(8),T5(W) 1514 EXEC FEJL(20,30,K11$) 1520 CLOSE K11$ 1530 EXEC FEJL(5,4,K11$) 1540 ENDPROC 1550 PROC FSYSUD(K12,T3,T4,T6) 1560 OPEN K12$,W 1570 EXEC FEJL(6,E,K12$) 1580 PUT K12$,13:T3(E),T3(G),T3(V),T3(4),T3(5),T3(6),T3(7),T3(8),T3(W) 1590 EXEC FEJL(6,G,K12$) 1600 PUT K12$,17:T4(E),T4(G),T4(V),T4(4),T4(5),T4(6),T4(7),T4(8),T4(W) 1610 EXEC FEJL(6,V,K12$) 1612 PUT K12$,21:T6(E),T6(G),T6(V),T6(4),T6(5),T6(6),T6(7),T6(8),T6(W) 1614 EXEC FEJL(20,31,K12$) 1620 CLOSE K12$ 1630 EXEC FEJL(6,4,K12$) 1640 ENDPROC 1650 PROC FGET2(K15,I3,N3,D3,BI3,TK3,BE3,TE3,ENT3) 1660 GET K15$,I3:N3,D3,BI3,TK3$,BE3$,ENT3 1670 EXEC FEJL(W,E,K15$) 1680 IF ORD(TK3$)-48>W AND ORD(TK3$)-48<20 THEN 1690 I3=I3+E 1700 GET K15$,I3:N3,TE3$ 1710 EXEC FEJL(W,G,K15$) 1720 ELSE 1730 TE3$=BLANK$ 1740 ENDIF 1750 ENDPROC 1760 PROC FPUT2(K16,I4,N4,D4,BI4,TK4,BE4,TE4,ENT4) 1770 PUT K16$,I4:N4,D4,BI4,TK4$,BE4$,ENT4 1780 EXEC FEJL(10,E,K16$) 1790 IF ORD(TK4$)-48>W AND ORD(TK4$)-48<20 THEN 1800 I4=I4+E 1810 PUT K16$,I4:N4,TE4$ 1820 EXEC FEJL(10,G,K16$) 1830 ENDIF 1840 ENDPROC 1850 PROC FFLET(K17,K18,DPM2,DPO2,DPO3) 1860 OPEN K17$,R 1870 EXEC FEJL(11,E,K17$) 1880 OPEN K18$,W 1890 EXEC FEJL(11,G,K18$) 1900 L=E 1910 M=E 1920 P=E 1930 TEST=B 1940 IF DPM2<>B AND DPO2<>B THEN 1950 REPEAT 1960 IF TEST=B THEN 1970 EXEC FGET2(K17$,L,NO,DO,BIO,TKO$,BEO$,TEO$,ENTO) 1980 L=L+E 1990 TEST=E 2000 ENDIF 2010 IF M<J THEN 2020 Q=PEG(M) 2030 ELSE 2040 N(Q)=100000 2050 ENDIF 2060 IF N(Q)<NO THEN 2070 EXEC FPUT2(K18$,P,N(Q),D(Q),BI(Q),TK$(Q),BE$(Q),TE$(Q),ENT(Q)) 2080 M=M+E 2090 ELSE 2100 IF N(Q)=NO AND D(Q)<DO THEN 2110 EXEC FPUT2(K18$,P,N(Q),D(Q),BI(Q),TK$(Q),BE$(Q),TE$(Q),ENT(Q)) 2120 M=M+E 2130 ELSE 2140 EXEC FPUT2(K18$,P,NO,DO,BIO,TKO$,BEO$,TEO$,ENTO) 2150 TEST=B 2160 ENDIF 2170 ENDIF 2180 P=P+E 2190 UNTIL (DPO2=L-E OR M=J) AND TEST=B 2200 IF DPO2=L-E THEN 2210 STYR=E 2220 ELSE 2230 STYR=B 2240 ENDIF 2250 ELSE 2260 IF DPM2=B THEN 2270 STYR=B 2280 ELSE 2290 STYR=E 2300 ENDIF 2310 ENDIF 2320 IF STYR=E THEN 2330 FOR I=M TO J-E 2340 Q=PEG(I) 2350 EXEC FPUT2(K18$,P,N(Q),D(Q),BI(Q),TK$(Q),BE$(Q),TE$(Q),ENT(Q)) 2360 P=P+E 2370 NEXT I 2380 ELSE 2390 FOR I=L TO DPO2 2400 EXEC FGET2(K17$,I,NO,DO,BIO,TKO$,BEO$,TEO$,ENTO) 2410 EXEC FPUT2(K18$,P,NO,DO,BIO,TKO$,BEO$,TEO$,ENTO) 2420 P=P+E 2430 NEXT I 2440 ENDIF 2450 DPO3=P-E 2460 CLOSE K17$ 2470 EXEC FEJL(11,V,K17$) 2480 CLOSE K18$ 2490 EXEC FEJL(11,4,K18$) 2500 ENDPROC 2510 PROC TABINIT(K31,K32,MPOSTANTAL3,HTAB2,UTAB2) 2520 OPEN K31$,R 2530 EXEC FEJL(15,E,K31$) 2540 OPEN K32$,W 2550 EXEC FEJL(15,G,K32$) 2560 H=E 2570 FOR I=E TO MPOSTANTAL3 DIV 40 2580 GET K31$,H:KONR 2590 EXEC FEJL(15,V,K31$) 2600 HTAB2(I,E)=KONR 2610 FOR J=E TO 4 2620 GET K31$,H:KONR 2630 EXEC FEJL(15,4,K31$) 2640 UTAB2(J,E)=KONR 2650 H=H+W 2660 GET K31$,H:KONR 2670 EXEC FEJL(15,5,K31$) 2680 UTAB2(J,G)=KONR 2690 H=H+E 2700 NEXT J 2710 HTAB2(I,G)=KONR 2720 EXEC UNDUD(K32$,I,UTAB2,MPOSTANTAL3) 2730 NEXT I 2740 EXEC HOVUD(K32$,MPOSTANTAL3,HTAB2) 2750 CLOSE K31$ 2760 EXEC FEJL(15,6,K31$) 2770 CLOSE K32$ 2780 EXEC FEJL(15,7,K32$) 2790 ENDPROC ;TABINIT 2800 PROC UNDUD(V3,U2,T,MPOSTANT) 2810 U3=U2+MPOSTANT DIV 160 2820 PUT V3$,U3:T(E,E),T(E,G),T(G,E),T(G,G),T(V,E),T(V,G),T(4,E),T(4,G) 2830 EXEC FEJL(16,E,V3$) 2840 ENDPROC ;UNDUD 2850 PROC HOVUD(V4,MPOSTANTAL4,S) 2860 FOR I=E TO MPOSTANTAL4 DIV 160 2870 J=(I-E)*4+E;J1=J+E;J2=J+G;J3=J+V 2880 PUT V4$,I:S(J,E),S(J,G),S(J1,E),S(J1,G),S(J2,E),S(J2,G),S(J3,E),S(J3,G) 2890 EXEC FEJL(17,G,V4$) 2900 NEXT I 2910 ENDPROC
0x0000…000b (0,) aa3f 0100 REM FSORT
0x0000…000b LineComalBin {
0x0000…000b ptr = 0xaa3f // 0x0 @0x0
0x0000…000b lno = 0x0064 // 0x2 @0x2
0x0000…000b at0004 = ╱89╱ REM ╱ // 0x4 @0x4
0x0000…000b at0005 = ╱46╱F╱ // 0x5 @0x5
0x0000…000b at0006 = ╱53╱S╱ // 0x6 @0x6
0x0000…000b at0007 = ╱4f╱O╱ // 0x7 @0x7
0x0000…000b at0008 = ╱52╱R╱ // 0x8 @0x8
0x0000…000b at0009 = ╱54╱T╱ // 0x9 @0x9
0x0000…000b at000a = EOL // 0xa @0xa
0x0000…000b }
0x000b…0072 8dc9 0110 DIM K1$(17),K2$(17),K3$(17),K4$(17),K5$(17),K6$(17),K7$(17),T11(W)
0x000b…0072 LineComalBin {
0x000b…0072 ptr = 0x8dc9 // 0xb @0x0
0x000b…0072 lno = 0x006e // 0xd @0x2
0x000b…0072 at0004 = ╱87╱ DIM ╱ // 0xf @0x4
0x000b…0072 at0005 = ╱4b╱K╱ // 0x10 @0x5
0x000b…0072 at0006 = ╱31╱1╱ // 0x11 @0x6
0x000b…0072 at0007 = ╱ef╱$╱ // 0x12 @0x7
0x000b…0072 at0008 = ╱ed╱(╱ // 0x13 @0x8
0x000b…0072 at0009 = ╱31╱1╱ // 0x14 @0x9
0x000b…0072 at000a = ╱37╱7╱ // 0x15 @0xa
0x000b…0072 at000b = ╱fe00008805╱ // 0x16 @0xb
0x000b…0072 at0010 = ╱ee╱)╱ // 0x1b @0x10
0x000b…0072 at0011 = ╱ec╱,╱ // 0x1c @0x11
0x000b…0072 at0012 = ╱4b╱K╱ // 0x1d @0x12
0x000b…0072 at0013 = ╱32╱2╱ // 0x1e @0x13
0x000b…0072 at0014 = ╱ef╱$╱ // 0x1f @0x14
0x000b…0072 at0015 = ╱ed╱(╱ // 0x20 @0x15
0x000b…0072 at0016 = ╱31╱1╱ // 0x21 @0x16
0x000b…0072 at0017 = ╱37╱7╱ // 0x22 @0x17
0x000b…0072 at0018 = ╱fe00008805╱ // 0x23 @0x18
0x000b…0072 at001d = ╱ee╱)╱ // 0x28 @0x1d
0x000b…0072 at001e = ╱ec╱,╱ // 0x29 @0x1e
0x000b…0072 at001f = ╱4b╱K╱ // 0x2a @0x1f
0x000b…0072 at0020 = ╱33╱3╱ // 0x2b @0x20
0x000b…0072 at0021 = ╱ef╱$╱ // 0x2c @0x21
0x000b…0072 at0022 = ╱ed╱(╱ // 0x2d @0x22
0x000b…0072 at0023 = ╱31╱1╱ // 0x2e @0x23
0x000b…0072 at0024 = ╱37╱7╱ // 0x2f @0x24
0x000b…0072 at0025 = ╱fe00008805╱ // 0x30 @0x25
0x000b…0072 at002a = ╱ee╱)╱ // 0x35 @0x2a
0x000b…0072 at002b = ╱ec╱,╱ // 0x36 @0x2b
0x000b…0072 at002c = ╱4b╱K╱ // 0x37 @0x2c
0x000b…0072 at002d = ╱34╱4╱ // 0x38 @0x2d
0x000b…0072 at002e = ╱ef╱$╱ // 0x39 @0x2e
0x000b…0072 at002f = ╱ed╱(╱ // 0x3a @0x2f
0x000b…0072 at0030 = ╱31╱1╱ // 0x3b @0x30
0x000b…0072 at0031 = ╱37╱7╱ // 0x3c @0x31
0x000b…0072 at0032 = ╱fe00008805╱ // 0x3d @0x32
0x000b…0072 at0037 = ╱ee╱)╱ // 0x42 @0x37
0x000b…0072 at0038 = ╱ec╱,╱ // 0x43 @0x38
0x000b…0072 at0039 = ╱4b╱K╱ // 0x44 @0x39
0x000b…0072 at003a = ╱35╱5╱ // 0x45 @0x3a
0x000b…0072 at003b = ╱ef╱$╱ // 0x46 @0x3b
0x000b…0072 at003c = ╱ed╱(╱ // 0x47 @0x3c
0x000b…0072 at003d = ╱31╱1╱ // 0x48 @0x3d
0x000b…0072 at003e = ╱37╱7╱ // 0x49 @0x3e
0x000b…0072 at003f = ╱fe00008805╱ // 0x4a @0x3f
0x000b…0072 at0044 = ╱ee╱)╱ // 0x4f @0x44
0x000b…0072 at0045 = ╱ec╱,╱ // 0x50 @0x45
0x000b…0072 at0046 = ╱4b╱K╱ // 0x51 @0x46
0x000b…0072 at0047 = ╱36╱6╱ // 0x52 @0x47
0x000b…0072 at0048 = ╱ef╱$╱ // 0x53 @0x48
0x000b…0072 at0049 = ╱ed╱(╱ // 0x54 @0x49
0x000b…0072 at004a = ╱31╱1╱ // 0x55 @0x4a
0x000b…0072 at004b = ╱37╱7╱ // 0x56 @0x4b
0x000b…0072 at004c = ╱fe00008805╱ // 0x57 @0x4c
0x000b…0072 at0051 = ╱ee╱)╱ // 0x5c @0x51
0x000b…0072 at0052 = ╱ec╱,╱ // 0x5d @0x52
0x000b…0072 at0053 = ╱4b╱K╱ // 0x5e @0x53
0x000b…0072 at0054 = ╱37╱7╱ // 0x5f @0x54
0x000b…0072 at0055 = ╱ef╱$╱ // 0x60 @0x55
0x000b…0072 at0056 = ╱ed╱(╱ // 0x61 @0x56
0x000b…0072 at0057 = ╱31╱1╱ // 0x62 @0x57
0x000b…0072 at0058 = ╱37╱7╱ // 0x63 @0x58
0x000b…0072 at0059 = ╱fe00008805╱ // 0x64 @0x59
0x000b…0072 at005e = ╱ee╱)╱ // 0x69 @0x5e
0x000b…0072 at005f = ╱ec╱,╱ // 0x6a @0x5f
0x000b…0072 at0060 = ╱54╱T╱ // 0x6b @0x60
0x000b…0072 at0061 = ╱31╱1╱ // 0x6c @0x61
0x000b…0072 at0062 = ╱31╱1╱ // 0x6d @0x62
0x000b…0072 at0063 = ╱ed╱(╱ // 0x6e @0x63
0x000b…0072 at0064 = ╱57╱W╱ // 0x6f @0x64
0x000b…0072 at0065 = ╱ee╱)╱ // 0x70 @0x65
0x000b…0072 at0066 = EOL // 0x71 @0x66
0x000b…0072 }
0x0072…00d1 8e28 0120 DIM K9$(17),T12(W),N1$(6),A$(E),BLANK$(25),TKO$(E),BEO$(12),TEO$(25)
0x0072…00d1 LineComalBin {
0x0072…00d1 ptr = 0x8e28 // 0x72 @0x0
0x0072…00d1 lno = 0x0078 // 0x74 @0x2
0x0072…00d1 at0004 = ╱87╱ DIM ╱ // 0x76 @0x4
0x0072…00d1 at0005 = ╱4b╱K╱ // 0x77 @0x5
0x0072…00d1 at0006 = ╱39╱9╱ // 0x78 @0x6
0x0072…00d1 at0007 = ╱ef╱$╱ // 0x79 @0x7
0x0072…00d1 at0008 = ╱ed╱(╱ // 0x7a @0x8
0x0072…00d1 at0009 = ╱31╱1╱ // 0x7b @0x9
0x0072…00d1 at000a = ╱37╱7╱ // 0x7c @0xa
0x0072…00d1 at000b = ╱fe00008805╱ // 0x7d @0xb
0x0072…00d1 at0010 = ╱ee╱)╱ // 0x82 @0x10
0x0072…00d1 at0011 = ╱ec╱,╱ // 0x83 @0x11
0x0072…00d1 at0012 = ╱54╱T╱ // 0x84 @0x12
0x0072…00d1 at0013 = ╱31╱1╱ // 0x85 @0x13
0x0072…00d1 at0014 = ╱32╱2╱ // 0x86 @0x14
0x0072…00d1 at0015 = ╱ed╱(╱ // 0x87 @0x15
0x0072…00d1 at0016 = ╱57╱W╱ // 0x88 @0x16
0x0072…00d1 at0017 = ╱ee╱)╱ // 0x89 @0x17
0x0072…00d1 at0018 = ╱ec╱,╱ // 0x8a @0x18
0x0072…00d1 at0019 = ╱4e╱N╱ // 0x8b @0x19
0x0072…00d1 at001a = ╱31╱1╱ // 0x8c @0x1a
0x0072…00d1 at001b = ╱ef╱$╱ // 0x8d @0x1b
0x0072…00d1 at001c = ╱ed╱(╱ // 0x8e @0x1c
0x0072…00d1 at001d = ╱36╱6╱ // 0x8f @0x1d
0x0072…00d1 at001e = ╱fe0000c003╱ // 0x90 @0x1e
0x0072…00d1 at0023 = ╱ee╱)╱ // 0x95 @0x23
0x0072…00d1 at0024 = ╱ec╱,╱ // 0x96 @0x24
0x0072…00d1 at0025 = ╱41╱A╱ // 0x97 @0x25
0x0072…00d1 at0026 = ╱ef╱$╱ // 0x98 @0x26
0x0072…00d1 at0027 = ╱ed╱(╱ // 0x99 @0x27
0x0072…00d1 at0028 = ╱45╱E╱ // 0x9a @0x28
0x0072…00d1 at0029 = ╱ee╱)╱ // 0x9b @0x29
0x0072…00d1 at002a = ╱ec╱,╱ // 0x9c @0x2a
0x0072…00d1 at002b = ╱42╱B╱ // 0x9d @0x2b
0x0072…00d1 at002c = ╱4c╱L╱ // 0x9e @0x2c
0x0072…00d1 at002d = ╱41╱A╱ // 0x9f @0x2d
0x0072…00d1 at002e = ╱4e╱N╱ // 0xa0 @0x2e
0x0072…00d1 at002f = ╱4b╱K╱ // 0xa1 @0x2f
0x0072…00d1 at0030 = ╱ef╱$╱ // 0xa2 @0x30
0x0072…00d1 at0031 = ╱ed╱(╱ // 0xa3 @0x31
0x0072…00d1 at0032 = ╱32╱2╱ // 0xa4 @0x32
0x0072…00d1 at0033 = ╱35╱5╱ // 0xa5 @0x33
0x0072…00d1 at0034 = ╱fe0000c805╱ // 0xa6 @0x34
0x0072…00d1 at0039 = ╱ee╱)╱ // 0xab @0x39
0x0072…00d1 at003a = ╱ec╱,╱ // 0xac @0x3a
0x0072…00d1 at003b = ╱54╱T╱ // 0xad @0x3b
0x0072…00d1 at003c = ╱4b╱K╱ // 0xae @0x3c
0x0072…00d1 at003d = ╱4f╱O╱ // 0xaf @0x3d
0x0072…00d1 at003e = ╱ef╱$╱ // 0xb0 @0x3e
0x0072…00d1 at003f = ╱ed╱(╱ // 0xb1 @0x3f
0x0072…00d1 at0040 = ╱45╱E╱ // 0xb2 @0x40
0x0072…00d1 at0041 = ╱ee╱)╱ // 0xb3 @0x41
0x0072…00d1 at0042 = ╱ec╱,╱ // 0xb4 @0x42
0x0072…00d1 at0043 = ╱42╱B╱ // 0xb5 @0x43
0x0072…00d1 at0044 = ╱45╱E╱ // 0xb6 @0x44
0x0072…00d1 at0045 = ╱4f╱O╱ // 0xb7 @0x45
0x0072…00d1 at0046 = ╱ef╱$╱ // 0xb8 @0x46
0x0072…00d1 at0047 = ╱ed╱(╱ // 0xb9 @0x47
0x0072…00d1 at0048 = ╱31╱1╱ // 0xba @0x48
0x0072…00d1 at0049 = ╱32╱2╱ // 0xbb @0x49
0x0072…00d1 at004a = ╱fe0000c004╱ // 0xbc @0x4a
0x0072…00d1 at004f = ╱ee╱)╱ // 0xc1 @0x4f
0x0072…00d1 at0050 = ╱ec╱,╱ // 0xc2 @0x50
0x0072…00d1 at0051 = ╱54╱T╱ // 0xc3 @0x51
0x0072…00d1 at0052 = ╱45╱E╱ // 0xc4 @0x52
0x0072…00d1 at0053 = ╱4f╱O╱ // 0xc5 @0x53
0x0072…00d1 at0054 = ╱ef╱$╱ // 0xc6 @0x54
0x0072…00d1 at0055 = ╱ed╱(╱ // 0xc7 @0x55
0x0072…00d1 at0056 = ╱32╱2╱ // 0xc8 @0x56
0x0072…00d1 at0057 = ╱35╱5╱ // 0xc9 @0x57
0x0072…00d1 at0058 = ╱fe0000c805╱ // 0xca @0x58
0x0072…00d1 at005d = ╱ee╱)╱ // 0xcf @0x5d
0x0072…00d1 at005e = EOL // 0xd0 @0x5e
0x0072…00d1 }
0x00d1…0129 8e80 0130 DIM T21(W),T22(W),K8$(17),K10$(17),K19$(17),K23$(17),T13(W),T23(W)
0x00d1…0129 LineComalBin {
0x00d1…0129 ptr = 0x8e80 // 0xd1 @0x0
0x00d1…0129 lno = 0x0082 // 0xd3 @0x2
0x00d1…0129 at0004 = ╱87╱ DIM ╱ // 0xd5 @0x4
0x00d1…0129 at0005 = ╱54╱T╱ // 0xd6 @0x5
0x00d1…0129 at0006 = ╱32╱2╱ // 0xd7 @0x6
0x00d1…0129 at0007 = ╱31╱1╱ // 0xd8 @0x7
0x00d1…0129 at0008 = ╱ed╱(╱ // 0xd9 @0x8
0x00d1…0129 at0009 = ╱57╱W╱ // 0xda @0x9
0x00d1…0129 at000a = ╱ee╱)╱ // 0xdb @0xa
0x00d1…0129 at000b = ╱ec╱,╱ // 0xdc @0xb
0x00d1…0129 at000c = ╱54╱T╱ // 0xdd @0xc
0x00d1…0129 at000d = ╱32╱2╱ // 0xde @0xd
0x00d1…0129 at000e = ╱32╱2╱ // 0xdf @0xe
0x00d1…0129 at000f = ╱ed╱(╱ // 0xe0 @0xf
0x00d1…0129 at0010 = ╱57╱W╱ // 0xe1 @0x10
0x00d1…0129 at0011 = ╱ee╱)╱ // 0xe2 @0x11
0x00d1…0129 at0012 = ╱ec╱,╱ // 0xe3 @0x12
0x00d1…0129 at0013 = ╱4b╱K╱ // 0xe4 @0x13
0x00d1…0129 at0014 = ╱38╱8╱ // 0xe5 @0x14
0x00d1…0129 at0015 = ╱ef╱$╱ // 0xe6 @0x15
0x00d1…0129 at0016 = ╱ed╱(╱ // 0xe7 @0x16
0x00d1…0129 at0017 = ╱31╱1╱ // 0xe8 @0x17
0x00d1…0129 at0018 = ╱37╱7╱ // 0xe9 @0x18
0x00d1…0129 at0019 = ╱fe00008805╱ // 0xea @0x19
0x00d1…0129 at001e = ╱ee╱)╱ // 0xef @0x1e
0x00d1…0129 at001f = ╱ec╱,╱ // 0xf0 @0x1f
0x00d1…0129 at0020 = ╱4b╱K╱ // 0xf1 @0x20
0x00d1…0129 at0021 = ╱31╱1╱ // 0xf2 @0x21
0x00d1…0129 at0022 = ╱30╱0╱ // 0xf3 @0x22
0x00d1…0129 at0023 = ╱ef╱$╱ // 0xf4 @0x23
0x00d1…0129 at0024 = ╱ed╱(╱ // 0xf5 @0x24
0x00d1…0129 at0025 = ╱31╱1╱ // 0xf6 @0x25
0x00d1…0129 at0026 = ╱37╱7╱ // 0xf7 @0x26
0x00d1…0129 at0027 = ╱fe00008805╱ // 0xf8 @0x27
0x00d1…0129 at002c = ╱ee╱)╱ // 0xfd @0x2c
0x00d1…0129 at002d = ╱ec╱,╱ // 0xfe @0x2d
0x00d1…0129 at002e = ╱4b╱K╱ // 0xff @0x2e
0x00d1…0129 at002f = ╱31╱1╱ // 0x100 @0x2f
0x00d1…0129 at0030 = ╱39╱9╱ // 0x101 @0x30
0x00d1…0129 at0031 = ╱ef╱$╱ // 0x102 @0x31
0x00d1…0129 at0032 = ╱ed╱(╱ // 0x103 @0x32
0x00d1…0129 at0033 = ╱31╱1╱ // 0x104 @0x33
0x00d1…0129 at0034 = ╱37╱7╱ // 0x105 @0x34
0x00d1…0129 at0035 = ╱fe00008805╱ // 0x106 @0x35
0x00d1…0129 at003a = ╱ee╱)╱ // 0x10b @0x3a
0x00d1…0129 at003b = ╱ec╱,╱ // 0x10c @0x3b
0x00d1…0129 at003c = ╱4b╱K╱ // 0x10d @0x3c
0x00d1…0129 at003d = ╱32╱2╱ // 0x10e @0x3d
0x00d1…0129 at003e = ╱33╱3╱ // 0x10f @0x3e
0x00d1…0129 at003f = ╱ef╱$╱ // 0x110 @0x3f
0x00d1…0129 at0040 = ╱ed╱(╱ // 0x111 @0x40
0x00d1…0129 at0041 = ╱31╱1╱ // 0x112 @0x41
0x00d1…0129 at0042 = ╱37╱7╱ // 0x113 @0x42
0x00d1…0129 at0043 = ╱fe00008805╱ // 0x114 @0x43
0x00d1…0129 at0048 = ╱ee╱)╱ // 0x119 @0x48
0x00d1…0129 at0049 = ╱ec╱,╱ // 0x11a @0x49
0x00d1…0129 at004a = ╱54╱T╱ // 0x11b @0x4a
0x00d1…0129 at004b = ╱31╱1╱ // 0x11c @0x4b
0x00d1…0129 at004c = ╱33╱3╱ // 0x11d @0x4c
0x00d1…0129 at004d = ╱ed╱(╱ // 0x11e @0x4d
0x00d1…0129 at004e = ╱57╱W╱ // 0x11f @0x4e
0x00d1…0129 at004f = ╱ee╱)╱ // 0x120 @0x4f
0x00d1…0129 at0050 = ╱ec╱,╱ // 0x121 @0x50
0x00d1…0129 at0051 = ╱54╱T╱ // 0x122 @0x51
0x00d1…0129 at0052 = ╱32╱2╱ // 0x123 @0x52
0x00d1…0129 at0053 = ╱33╱3╱ // 0x124 @0x53
0x00d1…0129 at0054 = ╱ed╱(╱ // 0x125 @0x54
0x00d1…0129 at0055 = ╱57╱W╱ // 0x126 @0x55
0x00d1…0129 at0056 = ╱ee╱)╱ // 0x127 @0x56
0x00d1…0129 at0057 = EOL // 0x128 @0x57
0x00d1…0129 }
0x0129…0190 8ee7 0140 DIM K20$(17),K21$(17),K22$(17),K40$(17),K41$(17),K42$(17),K43$(17)
0x0129…0190 LineComalBin {
0x0129…0190 ptr = 0x8ee7 // 0x129 @0x0
0x0129…0190 lno = 0x008c // 0x12b @0x2
0x0129…0190 at0004 = ╱87╱ DIM ╱ // 0x12d @0x4
0x0129…0190 at0005 = ╱4b╱K╱ // 0x12e @0x5
0x0129…0190 at0006 = ╱32╱2╱ // 0x12f @0x6
0x0129…0190 at0007 = ╱30╱0╱ // 0x130 @0x7
0x0129…0190 at0008 = ╱ef╱$╱ // 0x131 @0x8
0x0129…0190 at0009 = ╱ed╱(╱ // 0x132 @0x9
0x0129…0190 at000a = ╱31╱1╱ // 0x133 @0xa
0x0129…0190 at000b = ╱37╱7╱ // 0x134 @0xb
0x0129…0190 at000c = ╱fe00008805╱ // 0x135 @0xc
0x0129…0190 at0011 = ╱ee╱)╱ // 0x13a @0x11
0x0129…0190 at0012 = ╱ec╱,╱ // 0x13b @0x12
0x0129…0190 at0013 = ╱4b╱K╱ // 0x13c @0x13
0x0129…0190 at0014 = ╱32╱2╱ // 0x13d @0x14
0x0129…0190 at0015 = ╱31╱1╱ // 0x13e @0x15
0x0129…0190 at0016 = ╱ef╱$╱ // 0x13f @0x16
0x0129…0190 at0017 = ╱ed╱(╱ // 0x140 @0x17
0x0129…0190 at0018 = ╱31╱1╱ // 0x141 @0x18
0x0129…0190 at0019 = ╱37╱7╱ // 0x142 @0x19
0x0129…0190 at001a = ╱fe00008805╱ // 0x143 @0x1a
0x0129…0190 at001f = ╱ee╱)╱ // 0x148 @0x1f
0x0129…0190 at0020 = ╱ec╱,╱ // 0x149 @0x20
0x0129…0190 at0021 = ╱4b╱K╱ // 0x14a @0x21
0x0129…0190 at0022 = ╱32╱2╱ // 0x14b @0x22
0x0129…0190 at0023 = ╱32╱2╱ // 0x14c @0x23
0x0129…0190 at0024 = ╱ef╱$╱ // 0x14d @0x24
0x0129…0190 at0025 = ╱ed╱(╱ // 0x14e @0x25
0x0129…0190 at0026 = ╱31╱1╱ // 0x14f @0x26
0x0129…0190 at0027 = ╱37╱7╱ // 0x150 @0x27
0x0129…0190 at0028 = ╱fe00008805╱ // 0x151 @0x28
0x0129…0190 at002d = ╱ee╱)╱ // 0x156 @0x2d
0x0129…0190 at002e = ╱ec╱,╱ // 0x157 @0x2e
0x0129…0190 at002f = ╱4b╱K╱ // 0x158 @0x2f
0x0129…0190 at0030 = ╱34╱4╱ // 0x159 @0x30
0x0129…0190 at0031 = ╱30╱0╱ // 0x15a @0x31
0x0129…0190 at0032 = ╱ef╱$╱ // 0x15b @0x32
0x0129…0190 at0033 = ╱ed╱(╱ // 0x15c @0x33
0x0129…0190 at0034 = ╱31╱1╱ // 0x15d @0x34
0x0129…0190 at0035 = ╱37╱7╱ // 0x15e @0x35
0x0129…0190 at0036 = ╱fe00008805╱ // 0x15f @0x36
0x0129…0190 at003b = ╱ee╱)╱ // 0x164 @0x3b
0x0129…0190 at003c = ╱ec╱,╱ // 0x165 @0x3c
0x0129…0190 at003d = ╱4b╱K╱ // 0x166 @0x3d
0x0129…0190 at003e = ╱34╱4╱ // 0x167 @0x3e
0x0129…0190 at003f = ╱31╱1╱ // 0x168 @0x3f
0x0129…0190 at0040 = ╱ef╱$╱ // 0x169 @0x40
0x0129…0190 at0041 = ╱ed╱(╱ // 0x16a @0x41
0x0129…0190 at0042 = ╱31╱1╱ // 0x16b @0x42
0x0129…0190 at0043 = ╱37╱7╱ // 0x16c @0x43
0x0129…0190 at0044 = ╱fe00008805╱ // 0x16d @0x44
0x0129…0190 at0049 = ╱ee╱)╱ // 0x172 @0x49
0x0129…0190 at004a = ╱ec╱,╱ // 0x173 @0x4a
0x0129…0190 at004b = ╱4b╱K╱ // 0x174 @0x4b
0x0129…0190 at004c = ╱34╱4╱ // 0x175 @0x4c
0x0129…0190 at004d = ╱32╱2╱ // 0x176 @0x4d
0x0129…0190 at004e = ╱ef╱$╱ // 0x177 @0x4e
0x0129…0190 at004f = ╱ed╱(╱ // 0x178 @0x4f
0x0129…0190 at0050 = ╱31╱1╱ // 0x179 @0x50
0x0129…0190 at0051 = ╱37╱7╱ // 0x17a @0x51
0x0129…0190 at0052 = ╱fe00008805╱ // 0x17b @0x52
0x0129…0190 at0057 = ╱ee╱)╱ // 0x180 @0x57
0x0129…0190 at0058 = ╱ec╱,╱ // 0x181 @0x58
0x0129…0190 at0059 = ╱4b╱K╱ // 0x182 @0x59
0x0129…0190 at005a = ╱34╱4╱ // 0x183 @0x5a
0x0129…0190 at005b = ╱33╱3╱ // 0x184 @0x5b
0x0129…0190 at005c = ╱ef╱$╱ // 0x185 @0x5c
0x0129…0190 at005d = ╱ed╱(╱ // 0x186 @0x5d
0x0129…0190 at005e = ╱31╱1╱ // 0x187 @0x5e
0x0129…0190 at005f = ╱37╱7╱ // 0x188 @0x5f
0x0129…0190 at0060 = ╱fe00008805╱ // 0x189 @0x60
0x0129…0190 at0065 = ╱ee╱)╱ // 0x18e @0x65
0x0129…0190 at0066 = EOL // 0x18f @0x66
0x0129…0190 }
0x0190…01b7 8f0e 0150 BLANK$=" "
0x0190…01b7 LineComalBin {
0x0190…01b7 ptr = 0x8f0e // 0x190 @0x0
0x0190…01b7 lno = 0x0096 // 0x192 @0x2
0x0190…01b7 at0004 = ╱42╱B╱ // 0x194 @0x4
0x0190…01b7 at0005 = ╱4c╱L╱ // 0x195 @0x5
0x0190…01b7 at0006 = ╱41╱A╱ // 0x196 @0x6
0x0190…01b7 at0007 = ╱4e╱N╱ // 0x197 @0x7
0x0190…01b7 at0008 = ╱4b╱K╱ // 0x198 @0x8
0x0190…01b7 at0009 = ╱ef╱$╱ // 0x199 @0x9
0x0190…01b7 at000a = ╱dc╱=╱ // 0x19a @0xa
0x0190…01b7 at000b = ╱22╱"╱ // 0x19b @0xb
0x0190…01b7 at000c = ╱20╱…╱ // 0x19c @0xc
0x0190…01b7 at000d = ╱20╱…╱ // 0x19d @0xd
0x0190…01b7 at000e = ╱20╱…╱ // 0x19e @0xe
0x0190…01b7 at000f = ╱20╱…╱ // 0x19f @0xf
0x0190…01b7 at0010 = ╱20╱…╱ // 0x1a0 @0x10
0x0190…01b7 at0011 = ╱20╱…╱ // 0x1a1 @0x11
0x0190…01b7 at0012 = ╱20╱…╱ // 0x1a2 @0x12
0x0190…01b7 at0013 = ╱20╱…╱ // 0x1a3 @0x13
0x0190…01b7 at0014 = ╱20╱…╱ // 0x1a4 @0x14
0x0190…01b7 at0015 = ╱20╱…╱ // 0x1a5 @0x15
0x0190…01b7 at0016 = ╱20╱…╱ // 0x1a6 @0x16
0x0190…01b7 at0017 = ╱20╱…╱ // 0x1a7 @0x17
0x0190…01b7 at0018 = ╱20╱…╱ // 0x1a8 @0x18
0x0190…01b7 at0019 = ╱20╱…╱ // 0x1a9 @0x19
0x0190…01b7 at001a = ╱20╱…╱ // 0x1aa @0x1a
0x0190…01b7 at001b = ╱20╱…╱ // 0x1ab @0x1b
0x0190…01b7 at001c = ╱20╱…╱ // 0x1ac @0x1c
0x0190…01b7 at001d = ╱20╱…╱ // 0x1ad @0x1d
0x0190…01b7 at001e = ╱20╱…╱ // 0x1ae @0x1e
0x0190…01b7 at001f = ╱20╱…╱ // 0x1af @0x1f
0x0190…01b7 at0020 = ╱20╱…╱ // 0x1b0 @0x20
0x0190…01b7 at0021 = ╱20╱…╱ // 0x1b1 @0x21
0x0190…01b7 at0022 = ╱20╱…╱ // 0x1b2 @0x22
0x0190…01b7 at0023 = ╱20╱…╱ // 0x1b3 @0x23
0x0190…01b7 at0024 = ╱20╱…╱ // 0x1b4 @0x24
0x0190…01b7 at0025 = ╱22╱"╱ // 0x1b5 @0x25
0x0190…01b7 at0026 = EOL // 0x1b6 @0x26
0x0190…01b7 }
0x01b7…01bd 8f14 0160 CLEAR
0x01b7…01bd LineComalBin {
0x01b7…01bd ptr = 0x8f14 // 0x1b7 @0x0
0x01b7…01bd lno = 0x00a0 // 0x1b9 @0x2
0x01b7…01bd at0004 = ╱a0╱ CLEAR ╱ // 0x1bb @0x4
0x01b7…01bd at0005 = EOL // 0x1bc @0x5
0x01b7…01bd }
0x01bd…01c3 8f1a 0170 REPEAT
0x01bd…01c3 LineComalBin {
0x01bd…01c3 ptr = 0x8f1a // 0x1bd @0x0
0x01bd…01c3 lno = 0x00aa // 0x1bf @0x2
0x01bd…01c3 at0004 = ╱97╱ REPEAT ╱ // 0x1c1 @0x4
0x01bd…01c3 at0005 = EOL // 0x1c2 @0x5
0x01bd…01c3 }
0x01c3…01d8 8f2f 0180 CURSOR 30,13
0x01c3…01d8 LineComalBin {
0x01c3…01d8 ptr = 0x8f2f // 0x1c3 @0x0
0x01c3…01d8 lno = 0x00b4 // 0x1c5 @0x2
0x01c3…01d8 at0004 = ╱a1╱ CURSOR ╱ // 0x1c7 @0x4
0x01c3…01d8 at0005 = ╱33╱3╱ // 0x1c8 @0x5
0x01c3…01d8 at0006 = ╱30╱0╱ // 0x1c9 @0x6
0x01c3…01d8 at0007 = ╱fe0000f005╱ // 0x1ca @0x7
0x01c3…01d8 at000c = ╱ec╱,╱ // 0x1cf @0xc
0x01c3…01d8 at000d = ╱31╱1╱ // 0x1d0 @0xd
0x01c3…01d8 at000e = ╱33╱3╱ // 0x1d1 @0xe
0x01c3…01d8 at000f = ╱fe0000d004╱ // 0x1d2 @0xf
0x01c3…01d8 at0014 = EOL // 0x1d7 @0x14
0x01c3…01d8 }
0x01d8…0201 8f58 0190 INPUT "Sæt plade nr 21 i ,tast RETURN",A$
0x01d8…0201 LineComalBin {
0x01d8…0201 ptr = 0x8f58 // 0x1d8 @0x0
0x01d8…0201 lno = 0x00be // 0x1da @0x2
0x01d8…0201 at0004 = ╱91╱ INPUT ╱ // 0x1dc @0x4
0x01d8…0201 at0005 = ╱22╱"╱ // 0x1dd @0x5
0x01d8…0201 at0006 = ╱53╱S╱ // 0x1de @0x6
0x01d8…0201 at0007 = ╱7b╱æ╱ // 0x1df @0x7
0x01d8…0201 at0008 = ╱74╱t╱ // 0x1e0 @0x8
0x01d8…0201 at0009 = ╱20╱…╱ // 0x1e1 @0x9
0x01d8…0201 at000a = ╱70╱p╱ // 0x1e2 @0xa
0x01d8…0201 at000b = ╱6c╱l╱ // 0x1e3 @0xb
0x01d8…0201 at000c = ╱61╱a╱ // 0x1e4 @0xc
0x01d8…0201 at000d = ╱64╱d╱ // 0x1e5 @0xd
0x01d8…0201 at000e = ╱65╱e╱ // 0x1e6 @0xe
0x01d8…0201 at000f = ╱20╱…╱ // 0x1e7 @0xf
0x01d8…0201 at0010 = ╱6e╱n╱ // 0x1e8 @0x10
0x01d8…0201 at0011 = ╱72╱r╱ // 0x1e9 @0x11
0x01d8…0201 at0012 = ╱20╱…╱ // 0x1ea @0x12
0x01d8…0201 at0013 = ╱32╱2╱ // 0x1eb @0x13
0x01d8…0201 at0014 = ╱31╱1╱ // 0x1ec @0x14
0x01d8…0201 at0015 = ╱20╱…╱ // 0x1ed @0x15
0x01d8…0201 at0016 = ╱69╱i╱ // 0x1ee @0x16
0x01d8…0201 at0017 = ╱20╱…╱ // 0x1ef @0x17
0x01d8…0201 at0018 = ╱2c╱,╱ // 0x1f0 @0x18
0x01d8…0201 at0019 = ╱74╱t╱ // 0x1f1 @0x19
0x01d8…0201 at001a = ╱61╱a╱ // 0x1f2 @0x1a
0x01d8…0201 at001b = ╱73╱s╱ // 0x1f3 @0x1b
0x01d8…0201 at001c = ╱74╱t╱ // 0x1f4 @0x1c
0x01d8…0201 at001d = ╱20╱…╱ // 0x1f5 @0x1d
0x01d8…0201 at001e = ╱52╱R╱ // 0x1f6 @0x1e
0x01d8…0201 at001f = ╱45╱E╱ // 0x1f7 @0x1f
0x01d8…0201 at0020 = ╱54╱T╱ // 0x1f8 @0x20
0x01d8…0201 at0021 = ╱55╱U╱ // 0x1f9 @0x21
0x01d8…0201 at0022 = ╱52╱R╱ // 0x1fa @0x22
0x01d8…0201 at0023 = ╱4e╱N╱ // 0x1fb @0x23
0x01d8…0201 at0024 = ╱22╱"╱ // 0x1fc @0x24
0x01d8…0201 at0025 = ╱ec╱,╱ // 0x1fd @0x25
0x01d8…0201 at0026 = ╱41╱A╱ // 0x1fe @0x26
0x01d8…0201 at0027 = ╱ef╱$╱ // 0x1ff @0x27
0x01d8…0201 at0028 = EOL // 0x200 @0x28
0x01d8…0201 }
0x0201…0215 8f6c 0200 UNTIL ORD(A$)=255
0x0201…0215 LineComalBin {
0x0201…0215 ptr = 0x8f6c // 0x201 @0x0
0x0201…0215 lno = 0x00c8 // 0x203 @0x2
0x0201…0215 at0004 = ╱98╱ UNTIL ╱ // 0x205 @0x4
0x0201…0215 at0005 = ╱cd╱ORD╱ // 0x206 @0x5
0x0201…0215 at0006 = ╱ed╱(╱ // 0x207 @0x6
0x0201…0215 at0007 = ╱41╱A╱ // 0x208 @0x7
0x0201…0215 at0008 = ╱ef╱$╱ // 0x209 @0x8
0x0201…0215 at0009 = ╱ee╱)╱ // 0x20a @0x9
0x0201…0215 at000a = ╱dc╱=╱ // 0x20b @0xa
0x0201…0215 at000b = ╱32╱2╱ // 0x20c @0xb
0x0201…0215 at000c = ╱35╱5╱ // 0x20d @0xc
0x0201…0215 at000d = ╱35╱5╱ // 0x20e @0xd
0x0201…0215 at000e = ╱fe0000ff08╱ // 0x20f @0xe
0x0201…0215 at0013 = EOL // 0x214 @0x13
0x0201…0215 }
0x0215…022f 8f86 0210 K1$="P641220:SYSTEM1"
0x0215…022f LineComalBin {
0x0215…022f ptr = 0x8f86 // 0x215 @0x0
0x0215…022f lno = 0x00d2 // 0x217 @0x2
0x0215…022f at0004 = ╱4b╱K╱ // 0x219 @0x4
0x0215…022f at0005 = ╱31╱1╱ // 0x21a @0x5
0x0215…022f at0006 = ╱ef╱$╱ // 0x21b @0x6
0x0215…022f at0007 = ╱dc╱=╱ // 0x21c @0x7
0x0215…022f at0008 = ╱22╱"╱ // 0x21d @0x8
0x0215…022f at0009 = ╱50╱P╱ // 0x21e @0x9
0x0215…022f at000a = ╱36╱6╱ // 0x21f @0xa
0x0215…022f at000b = ╱34╱4╱ // 0x220 @0xb
0x0215…022f at000c = ╱31╱1╱ // 0x221 @0xc
0x0215…022f at000d = ╱32╱2╱ // 0x222 @0xd
0x0215…022f at000e = ╱32╱2╱ // 0x223 @0xe
0x0215…022f at000f = ╱30╱0╱ // 0x224 @0xf
0x0215…022f at0010 = ╱3a╱:╱ // 0x225 @0x10
0x0215…022f at0011 = ╱53╱S╱ // 0x226 @0x11
0x0215…022f at0012 = ╱59╱Y╱ // 0x227 @0x12
0x0215…022f at0013 = ╱53╱S╱ // 0x228 @0x13
0x0215…022f at0014 = ╱54╱T╱ // 0x229 @0x14
0x0215…022f at0015 = ╱45╱E╱ // 0x22a @0x15
0x0215…022f at0016 = ╱4d╱M╱ // 0x22b @0x16
0x0215…022f at0017 = ╱31╱1╱ // 0x22c @0x17
0x0215…022f at0018 = ╱22╱"╱ // 0x22d @0x18
0x0215…022f at0019 = EOL // 0x22e @0x19
0x0215…022f }
0x022f…023a 8f91 0220 OPEN K1$,R
0x022f…023a LineComalBin {
0x022f…023a ptr = 0x8f91 // 0x22f @0x0
0x022f…023a lno = 0x00dc // 0x231 @0x2
0x022f…023a at0004 = ╱a7╱ OPEN ╱ // 0x233 @0x4
0x022f…023a at0005 = ╱4b╱K╱ // 0x234 @0x5
0x022f…023a at0006 = ╱31╱1╱ // 0x235 @0x6
0x022f…023a at0007 = ╱ef╱$╱ // 0x236 @0x7
0x022f…023a at0008 = ╱ec╱,╱ // 0x237 @0x8
0x022f…023a at0009 = ╱52╱R╱ // 0x238 @0x9
0x022f…023a at000a = EOL // 0x239 @0xa
0x022f…023a }
0x023a…024d 8fa4 0230 EXEC FEJL(E,E,K1$)
0x023a…024d LineComalBin {
0x023a…024d ptr = 0x8fa4 // 0x23a @0x0
0x023a…024d lno = 0x00e6 // 0x23c @0x2
0x023a…024d at0004 = ╱9d╱ EXEC ╱ // 0x23e @0x4
0x023a…024d at0005 = ╱46╱F╱ // 0x23f @0x5
0x023a…024d at0006 = ╱45╱E╱ // 0x240 @0x6
0x023a…024d at0007 = ╱4a╱J╱ // 0x241 @0x7
0x023a…024d at0008 = ╱4c╱L╱ // 0x242 @0x8
0x023a…024d at0009 = ╱ed╱(╱ // 0x243 @0x9
0x023a…024d at000a = ╱45╱E╱ // 0x244 @0xa
0x023a…024d at000b = ╱ec╱,╱ // 0x245 @0xb
0x023a…024d at000c = ╱45╱E╱ // 0x246 @0xc
0x023a…024d at000d = ╱ec╱,╱ // 0x247 @0xd
0x023a…024d at000e = ╱4b╱K╱ // 0x248 @0xe
0x023a…024d at000f = ╱31╱1╱ // 0x249 @0xf
0x023a…024d at0010 = ╱ef╱$╱ // 0x24a @0x10
0x023a…024d at0011 = ╱ee╱)╱ // 0x24b @0x11
0x023a…024d at0012 = EOL // 0x24c @0x12
0x023a…024d }
0x024d…0276 8fcd 0240 GET K1$,G:MKASPOST,MPPOST,MBHPOST,MFMID
0x024d…0276 LineComalBin {
0x024d…0276 ptr = 0x8fcd // 0x24d @0x0
0x024d…0276 lno = 0x00f0 // 0x24f @0x2
0x024d…0276 at0004 = ╱a9╱ GET ╱ // 0x251 @0x4
0x024d…0276 at0005 = ╱4b╱K╱ // 0x252 @0x5
0x024d…0276 at0006 = ╱31╱1╱ // 0x253 @0x6
0x024d…0276 at0007 = ╱ef╱$╱ // 0x254 @0x7
0x024d…0276 at0008 = ╱ec╱,╱ // 0x255 @0x8
0x024d…0276 at0009 = ╱47╱G╱ // 0x256 @0x9
0x024d…0276 at000a = ╱f0╱:╱ // 0x257 @0xa
0x024d…0276 at000b = ╱4d╱M╱ // 0x258 @0xb
0x024d…0276 at000c = ╱4b╱K╱ // 0x259 @0xc
0x024d…0276 at000d = ╱41╱A╱ // 0x25a @0xd
0x024d…0276 at000e = ╱53╱S╱ // 0x25b @0xe
0x024d…0276 at000f = ╱50╱P╱ // 0x25c @0xf
0x024d…0276 at0010 = ╱4f╱O╱ // 0x25d @0x10
0x024d…0276 at0011 = ╱53╱S╱ // 0x25e @0x11
0x024d…0276 at0012 = ╱54╱T╱ // 0x25f @0x12
0x024d…0276 at0013 = ╱ec╱,╱ // 0x260 @0x13
0x024d…0276 at0014 = ╱4d╱M╱ // 0x261 @0x14
0x024d…0276 at0015 = ╱50╱P╱ // 0x262 @0x15
0x024d…0276 at0016 = ╱50╱P╱ // 0x263 @0x16
0x024d…0276 at0017 = ╱4f╱O╱ // 0x264 @0x17
0x024d…0276 at0018 = ╱53╱S╱ // 0x265 @0x18
0x024d…0276 at0019 = ╱54╱T╱ // 0x266 @0x19
0x024d…0276 at001a = ╱ec╱,╱ // 0x267 @0x1a
0x024d…0276 at001b = ╱4d╱M╱ // 0x268 @0x1b
0x024d…0276 at001c = ╱42╱B╱ // 0x269 @0x1c
0x024d…0276 at001d = ╱48╱H╱ // 0x26a @0x1d
0x024d…0276 at001e = ╱50╱P╱ // 0x26b @0x1e
0x024d…0276 at001f = ╱4f╱O╱ // 0x26c @0x1f
0x024d…0276 at0020 = ╱53╱S╱ // 0x26d @0x20
0x024d…0276 at0021 = ╱54╱T╱ // 0x26e @0x21
0x024d…0276 at0022 = ╱ec╱,╱ // 0x26f @0x22
0x024d…0276 at0023 = ╱4d╱M╱ // 0x270 @0x23
0x024d…0276 at0024 = ╱46╱F╱ // 0x271 @0x24
0x024d…0276 at0025 = ╱4d╱M╱ // 0x272 @0x25
0x024d…0276 at0026 = ╱49╱I╱ // 0x273 @0x26
0x024d…0276 at0027 = ╱44╱D╱ // 0x274 @0x27
0x024d…0276 at0028 = EOL // 0x275 @0x28
0x024d…0276 }
0x0276…0289 8fe0 0250 EXEC FEJL(E,G,K1$)
0x0276…0289 LineComalBin {
0x0276…0289 ptr = 0x8fe0 // 0x276 @0x0
0x0276…0289 lno = 0x00fa // 0x278 @0x2
0x0276…0289 at0004 = ╱9d╱ EXEC ╱ // 0x27a @0x4
0x0276…0289 at0005 = ╱46╱F╱ // 0x27b @0x5
0x0276…0289 at0006 = ╱45╱E╱ // 0x27c @0x6
0x0276…0289 at0007 = ╱4a╱J╱ // 0x27d @0x7
0x0276…0289 at0008 = ╱4c╱L╱ // 0x27e @0x8
0x0276…0289 at0009 = ╱ed╱(╱ // 0x27f @0x9
0x0276…0289 at000a = ╱45╱E╱ // 0x280 @0xa
0x0276…0289 at000b = ╱ec╱,╱ // 0x281 @0xb
0x0276…0289 at000c = ╱47╱G╱ // 0x282 @0xc
0x0276…0289 at000d = ╱ec╱,╱ // 0x283 @0xd
0x0276…0289 at000e = ╱4b╱K╱ // 0x284 @0xe
0x0276…0289 at000f = ╱31╱1╱ // 0x285 @0xf
0x0276…0289 at0010 = ╱ef╱$╱ // 0x286 @0x10
0x0276…0289 at0011 = ╱ee╱)╱ // 0x287 @0x11
0x0276…0289 at0012 = EOL // 0x288 @0x12
0x0276…0289 }
0x0289…02ae 9005 0260 GET K1$,V:MDMID,MKMID,MFPOST,MDPOST
0x0289…02ae LineComalBin {
0x0289…02ae ptr = 0x9005 // 0x289 @0x0
0x0289…02ae lno = 0x0104 // 0x28b @0x2
0x0289…02ae at0004 = ╱a9╱ GET ╱ // 0x28d @0x4
0x0289…02ae at0005 = ╱4b╱K╱ // 0x28e @0x5
0x0289…02ae at0006 = ╱31╱1╱ // 0x28f @0x6
0x0289…02ae at0007 = ╱ef╱$╱ // 0x290 @0x7
0x0289…02ae at0008 = ╱ec╱,╱ // 0x291 @0x8
0x0289…02ae at0009 = ╱56╱V╱ // 0x292 @0x9
0x0289…02ae at000a = ╱f0╱:╱ // 0x293 @0xa
0x0289…02ae at000b = ╱4d╱M╱ // 0x294 @0xb
0x0289…02ae at000c = ╱44╱D╱ // 0x295 @0xc
0x0289…02ae at000d = ╱4d╱M╱ // 0x296 @0xd
0x0289…02ae at000e = ╱49╱I╱ // 0x297 @0xe
0x0289…02ae at000f = ╱44╱D╱ // 0x298 @0xf
0x0289…02ae at0010 = ╱ec╱,╱ // 0x299 @0x10
0x0289…02ae at0011 = ╱4d╱M╱ // 0x29a @0x11
0x0289…02ae at0012 = ╱4b╱K╱ // 0x29b @0x12
0x0289…02ae at0013 = ╱4d╱M╱ // 0x29c @0x13
0x0289…02ae at0014 = ╱49╱I╱ // 0x29d @0x14
0x0289…02ae at0015 = ╱44╱D╱ // 0x29e @0x15
0x0289…02ae at0016 = ╱ec╱,╱ // 0x29f @0x16
0x0289…02ae at0017 = ╱4d╱M╱ // 0x2a0 @0x17
0x0289…02ae at0018 = ╱46╱F╱ // 0x2a1 @0x18
0x0289…02ae at0019 = ╱50╱P╱ // 0x2a2 @0x19
0x0289…02ae at001a = ╱4f╱O╱ // 0x2a3 @0x1a
0x0289…02ae at001b = ╱53╱S╱ // 0x2a4 @0x1b
0x0289…02ae at001c = ╱54╱T╱ // 0x2a5 @0x1c
0x0289…02ae at001d = ╱ec╱,╱ // 0x2a6 @0x1d
0x0289…02ae at001e = ╱4d╱M╱ // 0x2a7 @0x1e
0x0289…02ae at001f = ╱44╱D╱ // 0x2a8 @0x1f
0x0289…02ae at0020 = ╱50╱P╱ // 0x2a9 @0x20
0x0289…02ae at0021 = ╱4f╱O╱ // 0x2aa @0x21
0x0289…02ae at0022 = ╱53╱S╱ // 0x2ab @0x22
0x0289…02ae at0023 = ╱54╱T╱ // 0x2ac @0x23
0x0289…02ae at0024 = EOL // 0x2ad @0x24
0x0289…02ae }
0x02ae…02c1 9018 0270 EXEC FEJL(E,V,K1$)
0x02ae…02c1 LineComalBin {
0x02ae…02c1 ptr = 0x9018 // 0x2ae @0x0
0x02ae…02c1 lno = 0x010e // 0x2b0 @0x2
0x02ae…02c1 at0004 = ╱9d╱ EXEC ╱ // 0x2b2 @0x4
0x02ae…02c1 at0005 = ╱46╱F╱ // 0x2b3 @0x5
0x02ae…02c1 at0006 = ╱45╱E╱ // 0x2b4 @0x6
0x02ae…02c1 at0007 = ╱4a╱J╱ // 0x2b5 @0x7
0x02ae…02c1 at0008 = ╱4c╱L╱ // 0x2b6 @0x8
0x02ae…02c1 at0009 = ╱ed╱(╱ // 0x2b7 @0x9
0x02ae…02c1 at000a = ╱45╱E╱ // 0x2b8 @0xa
0x02ae…02c1 at000b = ╱ec╱,╱ // 0x2b9 @0xb
0x02ae…02c1 at000c = ╱56╱V╱ // 0x2ba @0xc
0x02ae…02c1 at000d = ╱ec╱,╱ // 0x2bb @0xd
0x02ae…02c1 at000e = ╱4b╱K╱ // 0x2bc @0xe
0x02ae…02c1 at000f = ╱31╱1╱ // 0x2bd @0xf
0x02ae…02c1 at0010 = ╱ef╱$╱ // 0x2be @0x10
0x02ae…02c1 at0011 = ╱ee╱)╱ // 0x2bf @0x11
0x02ae…02c1 at0012 = EOL // 0x2c0 @0x12
0x02ae…02c1 }
0x02c1…02d8 902f 0280 GET K1$,4:MKPOST
0x02c1…02d8 LineComalBin {
0x02c1…02d8 ptr = 0x902f // 0x2c1 @0x0
0x02c1…02d8 lno = 0x0118 // 0x2c3 @0x2
0x02c1…02d8 at0004 = ╱a9╱ GET ╱ // 0x2c5 @0x4
0x02c1…02d8 at0005 = ╱4b╱K╱ // 0x2c6 @0x5
0x02c1…02d8 at0006 = ╱31╱1╱ // 0x2c7 @0x6
0x02c1…02d8 at0007 = ╱ef╱$╱ // 0x2c8 @0x7
0x02c1…02d8 at0008 = ╱ec╱,╱ // 0x2c9 @0x8
0x02c1…02d8 at0009 = ╱34╱4╱ // 0x2ca @0x9
0x02c1…02d8 at000a = ╱fe00008003╱ // 0x2cb @0xa
0x02c1…02d8 at000f = ╱f0╱:╱ // 0x2d0 @0xf
0x02c1…02d8 at0010 = ╱4d╱M╱ // 0x2d1 @0x10
0x02c1…02d8 at0011 = ╱4b╱K╱ // 0x2d2 @0x11
0x02c1…02d8 at0012 = ╱50╱P╱ // 0x2d3 @0x12
0x02c1…02d8 at0013 = ╱4f╱O╱ // 0x2d4 @0x13
0x02c1…02d8 at0014 = ╱53╱S╱ // 0x2d5 @0x14
0x02c1…02d8 at0015 = ╱54╱T╱ // 0x2d6 @0x15
0x02c1…02d8 at0016 = EOL // 0x2d7 @0x16
0x02c1…02d8 }
0x02d8…02f0 9047 0290 EXEC FEJL(E,4,K1$)
0x02d8…02f0 LineComalBin {
0x02d8…02f0 ptr = 0x9047 // 0x2d8 @0x0
0x02d8…02f0 lno = 0x0122 // 0x2da @0x2
0x02d8…02f0 at0004 = ╱9d╱ EXEC ╱ // 0x2dc @0x4
0x02d8…02f0 at0005 = ╱46╱F╱ // 0x2dd @0x5
0x02d8…02f0 at0006 = ╱45╱E╱ // 0x2de @0x6
0x02d8…02f0 at0007 = ╱4a╱J╱ // 0x2df @0x7
0x02d8…02f0 at0008 = ╱4c╱L╱ // 0x2e0 @0x8
0x02d8…02f0 at0009 = ╱ed╱(╱ // 0x2e1 @0x9
0x02d8…02f0 at000a = ╱45╱E╱ // 0x2e2 @0xa
0x02d8…02f0 at000b = ╱ec╱,╱ // 0x2e3 @0xb
0x02d8…02f0 at000c = ╱34╱4╱ // 0x2e4 @0xc
0x02d8…02f0 at000d = ╱fe00008003╱ // 0x2e5 @0xd
0x02d8…02f0 at0012 = ╱ec╱,╱ // 0x2ea @0x12
0x02d8…02f0 at0013 = ╱4b╱K╱ // 0x2eb @0x13
0x02d8…02f0 at0014 = ╱31╱1╱ // 0x2ec @0x14
0x02d8…02f0 at0015 = ╱ef╱$╱ // 0x2ed @0x15
0x02d8…02f0 at0016 = ╱ee╱)╱ // 0x2ee @0x16
0x02d8…02f0 at0017 = EOL // 0x2ef @0x17
0x02d8…02f0 }
0x02f0…0305 905c 0300 GET K1$,10:N1$
0x02f0…0305 LineComalBin {
0x02f0…0305 ptr = 0x905c // 0x2f0 @0x0
0x02f0…0305 lno = 0x012c // 0x2f2 @0x2
0x02f0…0305 at0004 = ╱a9╱ GET ╱ // 0x2f4 @0x4
0x02f0…0305 at0005 = ╱4b╱K╱ // 0x2f5 @0x5
0x02f0…0305 at0006 = ╱31╱1╱ // 0x2f6 @0x6
0x02f0…0305 at0007 = ╱ef╱$╱ // 0x2f7 @0x7
0x02f0…0305 at0008 = ╱ec╱,╱ // 0x2f8 @0x8
0x02f0…0305 at0009 = ╱31╱1╱ // 0x2f9 @0x9
0x02f0…0305 at000a = ╱30╱0╱ // 0x2fa @0xa
0x02f0…0305 at000b = ╱fe0000a004╱ // 0x2fb @0xb
0x02f0…0305 at0010 = ╱f0╱:╱ // 0x300 @0x10
0x02f0…0305 at0011 = ╱4e╱N╱ // 0x301 @0x11
0x02f0…0305 at0012 = ╱31╱1╱ // 0x302 @0x12
0x02f0…0305 at0013 = ╱ef╱$╱ // 0x303 @0x13
0x02f0…0305 at0014 = EOL // 0x304 @0x14
0x02f0…0305 }
0x0305…031d 9074 0310 EXEC FEJL(E,6,K1$)
0x0305…031d LineComalBin {
0x0305…031d ptr = 0x9074 // 0x305 @0x0
0x0305…031d lno = 0x0136 // 0x307 @0x2
0x0305…031d at0004 = ╱9d╱ EXEC ╱ // 0x309 @0x4
0x0305…031d at0005 = ╱46╱F╱ // 0x30a @0x5
0x0305…031d at0006 = ╱45╱E╱ // 0x30b @0x6
0x0305…031d at0007 = ╱4a╱J╱ // 0x30c @0x7
0x0305…031d at0008 = ╱4c╱L╱ // 0x30d @0x8
0x0305…031d at0009 = ╱ed╱(╱ // 0x30e @0x9
0x0305…031d at000a = ╱45╱E╱ // 0x30f @0xa
0x0305…031d at000b = ╱ec╱,╱ // 0x310 @0xb
0x0305…031d at000c = ╱36╱6╱ // 0x311 @0xc
0x0305…031d at000d = ╱fe0000c003╱ // 0x312 @0xd
0x0305…031d at0012 = ╱ec╱,╱ // 0x317 @0x12
0x0305…031d at0013 = ╱4b╱K╱ // 0x318 @0x13
0x0305…031d at0014 = ╱31╱1╱ // 0x319 @0x14
0x0305…031d at0015 = ╱ef╱$╱ // 0x31a @0x15
0x0305…031d at0016 = ╱ee╱)╱ // 0x31b @0x16
0x0305…031d at0017 = EOL // 0x31c @0x17
0x0305…031d }
0x031d…0332 9089 0320 GET K1$,22:K3$
0x031d…0332 LineComalBin {
0x031d…0332 ptr = 0x9089 // 0x31d @0x0
0x031d…0332 lno = 0x0140 // 0x31f @0x2
0x031d…0332 at0004 = ╱a9╱ GET ╱ // 0x321 @0x4
0x031d…0332 at0005 = ╱4b╱K╱ // 0x322 @0x5
0x031d…0332 at0006 = ╱31╱1╱ // 0x323 @0x6
0x031d…0332 at0007 = ╱ef╱$╱ // 0x324 @0x7
0x031d…0332 at0008 = ╱ec╱,╱ // 0x325 @0x8
0x031d…0332 at0009 = ╱32╱2╱ // 0x326 @0x9
0x031d…0332 at000a = ╱32╱2╱ // 0x327 @0xa
0x031d…0332 at000b = ╱fe0000b005╱ // 0x328 @0xb
0x031d…0332 at0010 = ╱f0╱:╱ // 0x32d @0x10
0x031d…0332 at0011 = ╱4b╱K╱ // 0x32e @0x11
0x031d…0332 at0012 = ╱33╱3╱ // 0x32f @0x12
0x031d…0332 at0013 = ╱ef╱$╱ // 0x330 @0x13
0x031d…0332 at0014 = EOL // 0x331 @0x14
0x031d…0332 }
0x0332…0345 909c 0330 EXEC FEJL(V,E,K1$)
0x0332…0345 LineComalBin {
0x0332…0345 ptr = 0x909c // 0x332 @0x0
0x0332…0345 lno = 0x014a // 0x334 @0x2
0x0332…0345 at0004 = ╱9d╱ EXEC ╱ // 0x336 @0x4
0x0332…0345 at0005 = ╱46╱F╱ // 0x337 @0x5
0x0332…0345 at0006 = ╱45╱E╱ // 0x338 @0x6
0x0332…0345 at0007 = ╱4a╱J╱ // 0x339 @0x7
0x0332…0345 at0008 = ╱4c╱L╱ // 0x33a @0x8
0x0332…0345 at0009 = ╱ed╱(╱ // 0x33b @0x9
0x0332…0345 at000a = ╱56╱V╱ // 0x33c @0xa
0x0332…0345 at000b = ╱ec╱,╱ // 0x33d @0xb
0x0332…0345 at000c = ╱45╱E╱ // 0x33e @0xc
0x0332…0345 at000d = ╱ec╱,╱ // 0x33f @0xd
0x0332…0345 at000e = ╱4b╱K╱ // 0x340 @0xe
0x0332…0345 at000f = ╱31╱1╱ // 0x341 @0xf
0x0332…0345 at0010 = ╱ef╱$╱ // 0x342 @0x10
0x0332…0345 at0011 = ╱ee╱)╱ // 0x343 @0x11
0x0332…0345 at0012 = EOL // 0x344 @0x12
0x0332…0345 }
0x0345…035a 90b1 0340 GET K1$,23:K4$
0x0345…035a LineComalBin {
0x0345…035a ptr = 0x90b1 // 0x345 @0x0
0x0345…035a lno = 0x0154 // 0x347 @0x2
0x0345…035a at0004 = ╱a9╱ GET ╱ // 0x349 @0x4
0x0345…035a at0005 = ╱4b╱K╱ // 0x34a @0x5
0x0345…035a at0006 = ╱31╱1╱ // 0x34b @0x6
0x0345…035a at0007 = ╱ef╱$╱ // 0x34c @0x7
0x0345…035a at0008 = ╱ec╱,╱ // 0x34d @0x8
0x0345…035a at0009 = ╱32╱2╱ // 0x34e @0x9
0x0345…035a at000a = ╱33╱3╱ // 0x34f @0xa
0x0345…035a at000b = ╱fe0000b805╱ // 0x350 @0xb
0x0345…035a at0010 = ╱f0╱:╱ // 0x355 @0x10
0x0345…035a at0011 = ╱4b╱K╱ // 0x356 @0x11
0x0345…035a at0012 = ╱34╱4╱ // 0x357 @0x12
0x0345…035a at0013 = ╱ef╱$╱ // 0x358 @0x13
0x0345…035a at0014 = EOL // 0x359 @0x14
0x0345…035a }
0x035a…036d 90c4 0350 EXEC FEJL(V,G,K1$)
0x035a…036d LineComalBin {
0x035a…036d ptr = 0x90c4 // 0x35a @0x0
0x035a…036d lno = 0x015e // 0x35c @0x2
0x035a…036d at0004 = ╱9d╱ EXEC ╱ // 0x35e @0x4
0x035a…036d at0005 = ╱46╱F╱ // 0x35f @0x5
0x035a…036d at0006 = ╱45╱E╱ // 0x360 @0x6
0x035a…036d at0007 = ╱4a╱J╱ // 0x361 @0x7
0x035a…036d at0008 = ╱4c╱L╱ // 0x362 @0x8
0x035a…036d at0009 = ╱ed╱(╱ // 0x363 @0x9
0x035a…036d at000a = ╱56╱V╱ // 0x364 @0xa
0x035a…036d at000b = ╱ec╱,╱ // 0x365 @0xb
0x035a…036d at000c = ╱47╱G╱ // 0x366 @0xc
0x035a…036d at000d = ╱ec╱,╱ // 0x367 @0xd
0x035a…036d at000e = ╱4b╱K╱ // 0x368 @0xe
0x035a…036d at000f = ╱31╱1╱ // 0x369 @0xf
0x035a…036d at0010 = ╱ef╱$╱ // 0x36a @0x10
0x035a…036d at0011 = ╱ee╱)╱ // 0x36b @0x11
0x035a…036d at0012 = EOL // 0x36c @0x12
0x035a…036d }
0x036d…0382 90d9 0360 GET K1$,24:K5$
0x036d…0382 LineComalBin {
0x036d…0382 ptr = 0x90d9 // 0x36d @0x0
0x036d…0382 lno = 0x0168 // 0x36f @0x2
0x036d…0382 at0004 = ╱a9╱ GET ╱ // 0x371 @0x4
0x036d…0382 at0005 = ╱4b╱K╱ // 0x372 @0x5
0x036d…0382 at0006 = ╱31╱1╱ // 0x373 @0x6
0x036d…0382 at0007 = ╱ef╱$╱ // 0x374 @0x7
0x036d…0382 at0008 = ╱ec╱,╱ // 0x375 @0x8
0x036d…0382 at0009 = ╱32╱2╱ // 0x376 @0x9
0x036d…0382 at000a = ╱34╱4╱ // 0x377 @0xa
0x036d…0382 at000b = ╱fe0000c005╱ // 0x378 @0xb
0x036d…0382 at0010 = ╱f0╱:╱ // 0x37d @0x10
0x036d…0382 at0011 = ╱4b╱K╱ // 0x37e @0x11
0x036d…0382 at0012 = ╱35╱5╱ // 0x37f @0x12
0x036d…0382 at0013 = ╱ef╱$╱ // 0x380 @0x13
0x036d…0382 at0014 = EOL // 0x381 @0x14
0x036d…0382 }
0x0382…0395 90ec 0370 EXEC FEJL(V,V,K1$)
0x0382…0395 LineComalBin {
0x0382…0395 ptr = 0x90ec // 0x382 @0x0
0x0382…0395 lno = 0x0172 // 0x384 @0x2
0x0382…0395 at0004 = ╱9d╱ EXEC ╱ // 0x386 @0x4
0x0382…0395 at0005 = ╱46╱F╱ // 0x387 @0x5
0x0382…0395 at0006 = ╱45╱E╱ // 0x388 @0x6
0x0382…0395 at0007 = ╱4a╱J╱ // 0x389 @0x7
0x0382…0395 at0008 = ╱4c╱L╱ // 0x38a @0x8
0x0382…0395 at0009 = ╱ed╱(╱ // 0x38b @0x9
0x0382…0395 at000a = ╱56╱V╱ // 0x38c @0xa
0x0382…0395 at000b = ╱ec╱,╱ // 0x38d @0xb
0x0382…0395 at000c = ╱56╱V╱ // 0x38e @0xc
0x0382…0395 at000d = ╱ec╱,╱ // 0x38f @0xd
0x0382…0395 at000e = ╱4b╱K╱ // 0x390 @0xe
0x0382…0395 at000f = ╱31╱1╱ // 0x391 @0xf
0x0382…0395 at0010 = ╱ef╱$╱ // 0x392 @0x10
0x0382…0395 at0011 = ╱ee╱)╱ // 0x393 @0x11
0x0382…0395 at0012 = EOL // 0x394 @0x12
0x0382…0395 }
0x0395…03aa 9101 0380 GET K1$,25:K6$
0x0395…03aa LineComalBin {
0x0395…03aa ptr = 0x9101 // 0x395 @0x0
0x0395…03aa lno = 0x017c // 0x397 @0x2
0x0395…03aa at0004 = ╱a9╱ GET ╱ // 0x399 @0x4
0x0395…03aa at0005 = ╱4b╱K╱ // 0x39a @0x5
0x0395…03aa at0006 = ╱31╱1╱ // 0x39b @0x6
0x0395…03aa at0007 = ╱ef╱$╱ // 0x39c @0x7
0x0395…03aa at0008 = ╱ec╱,╱ // 0x39d @0x8
0x0395…03aa at0009 = ╱32╱2╱ // 0x39e @0x9
0x0395…03aa at000a = ╱35╱5╱ // 0x39f @0xa
0x0395…03aa at000b = ╱fe0000c805╱ // 0x3a0 @0xb
0x0395…03aa at0010 = ╱f0╱:╱ // 0x3a5 @0x10
0x0395…03aa at0011 = ╱4b╱K╱ // 0x3a6 @0x11
0x0395…03aa at0012 = ╱36╱6╱ // 0x3a7 @0x12
0x0395…03aa at0013 = ╱ef╱$╱ // 0x3a8 @0x13
0x0395…03aa at0014 = EOL // 0x3a9 @0x14
0x0395…03aa }
0x03aa…03c2 9119 0390 EXEC FEJL(V,4,K1$)
0x03aa…03c2 LineComalBin {
0x03aa…03c2 ptr = 0x9119 // 0x3aa @0x0
0x03aa…03c2 lno = 0x0186 // 0x3ac @0x2
0x03aa…03c2 at0004 = ╱9d╱ EXEC ╱ // 0x3ae @0x4
0x03aa…03c2 at0005 = ╱46╱F╱ // 0x3af @0x5
0x03aa…03c2 at0006 = ╱45╱E╱ // 0x3b0 @0x6
0x03aa…03c2 at0007 = ╱4a╱J╱ // 0x3b1 @0x7
0x03aa…03c2 at0008 = ╱4c╱L╱ // 0x3b2 @0x8
0x03aa…03c2 at0009 = ╱ed╱(╱ // 0x3b3 @0x9
0x03aa…03c2 at000a = ╱56╱V╱ // 0x3b4 @0xa
0x03aa…03c2 at000b = ╱ec╱,╱ // 0x3b5 @0xb
0x03aa…03c2 at000c = ╱34╱4╱ // 0x3b6 @0xc
0x03aa…03c2 at000d = ╱fe00008003╱ // 0x3b7 @0xd
0x03aa…03c2 at0012 = ╱ec╱,╱ // 0x3bc @0x12
0x03aa…03c2 at0013 = ╱4b╱K╱ // 0x3bd @0x13
0x03aa…03c2 at0014 = ╱31╱1╱ // 0x3be @0x14
0x03aa…03c2 at0015 = ╱ef╱$╱ // 0x3bf @0x15
0x03aa…03c2 at0016 = ╱ee╱)╱ // 0x3c0 @0x16
0x03aa…03c2 at0017 = EOL // 0x3c1 @0x17
0x03aa…03c2 }
0x03c2…03d7 912e 0400 GET K1$,26:K7$
0x03c2…03d7 LineComalBin {
0x03c2…03d7 ptr = 0x912e // 0x3c2 @0x0
0x03c2…03d7 lno = 0x0190 // 0x3c4 @0x2
0x03c2…03d7 at0004 = ╱a9╱ GET ╱ // 0x3c6 @0x4
0x03c2…03d7 at0005 = ╱4b╱K╱ // 0x3c7 @0x5
0x03c2…03d7 at0006 = ╱31╱1╱ // 0x3c8 @0x6
0x03c2…03d7 at0007 = ╱ef╱$╱ // 0x3c9 @0x7
0x03c2…03d7 at0008 = ╱ec╱,╱ // 0x3ca @0x8
0x03c2…03d7 at0009 = ╱32╱2╱ // 0x3cb @0x9
0x03c2…03d7 at000a = ╱36╱6╱ // 0x3cc @0xa
0x03c2…03d7 at000b = ╱fe0000d005╱ // 0x3cd @0xb
0x03c2…03d7 at0010 = ╱f0╱:╱ // 0x3d2 @0x10
0x03c2…03d7 at0011 = ╱4b╱K╱ // 0x3d3 @0x11
0x03c2…03d7 at0012 = ╱37╱7╱ // 0x3d4 @0x12
0x03c2…03d7 at0013 = ╱ef╱$╱ // 0x3d5 @0x13
0x03c2…03d7 at0014 = EOL // 0x3d6 @0x14
0x03c2…03d7 }
0x03d7…03ef 9146 0410 EXEC FEJL(V,5,K1$)
0x03d7…03ef LineComalBin {
0x03d7…03ef ptr = 0x9146 // 0x3d7 @0x0
0x03d7…03ef lno = 0x019a // 0x3d9 @0x2
0x03d7…03ef at0004 = ╱9d╱ EXEC ╱ // 0x3db @0x4
0x03d7…03ef at0005 = ╱46╱F╱ // 0x3dc @0x5
0x03d7…03ef at0006 = ╱45╱E╱ // 0x3dd @0x6
0x03d7…03ef at0007 = ╱4a╱J╱ // 0x3de @0x7
0x03d7…03ef at0008 = ╱4c╱L╱ // 0x3df @0x8
0x03d7…03ef at0009 = ╱ed╱(╱ // 0x3e0 @0x9
0x03d7…03ef at000a = ╱56╱V╱ // 0x3e1 @0xa
0x03d7…03ef at000b = ╱ec╱,╱ // 0x3e2 @0xb
0x03d7…03ef at000c = ╱35╱5╱ // 0x3e3 @0xc
0x03d7…03ef at000d = ╱fe0000a003╱ // 0x3e4 @0xd
0x03d7…03ef at0012 = ╱ec╱,╱ // 0x3e9 @0x12
0x03d7…03ef at0013 = ╱4b╱K╱ // 0x3ea @0x13
0x03d7…03ef at0014 = ╱31╱1╱ // 0x3eb @0x14
0x03d7…03ef at0015 = ╱ef╱$╱ // 0x3ec @0x15
0x03d7…03ef at0016 = ╱ee╱)╱ // 0x3ed @0x16
0x03d7…03ef at0017 = EOL // 0x3ee @0x17
0x03d7…03ef }
0x03ef…0404 915b 0420 GET K1$,27:K8$
0x03ef…0404 LineComalBin {
0x03ef…0404 ptr = 0x915b // 0x3ef @0x0
0x03ef…0404 lno = 0x01a4 // 0x3f1 @0x2
0x03ef…0404 at0004 = ╱a9╱ GET ╱ // 0x3f3 @0x4
0x03ef…0404 at0005 = ╱4b╱K╱ // 0x3f4 @0x5
0x03ef…0404 at0006 = ╱31╱1╱ // 0x3f5 @0x6
0x03ef…0404 at0007 = ╱ef╱$╱ // 0x3f6 @0x7
0x03ef…0404 at0008 = ╱ec╱,╱ // 0x3f7 @0x8
0x03ef…0404 at0009 = ╱32╱2╱ // 0x3f8 @0x9
0x03ef…0404 at000a = ╱37╱7╱ // 0x3f9 @0xa
0x03ef…0404 at000b = ╱fe0000d805╱ // 0x3fa @0xb
0x03ef…0404 at0010 = ╱f0╱:╱ // 0x3ff @0x10
0x03ef…0404 at0011 = ╱4b╱K╱ // 0x400 @0x11
0x03ef…0404 at0012 = ╱38╱8╱ // 0x401 @0x12
0x03ef…0404 at0013 = ╱ef╱$╱ // 0x402 @0x13
0x03ef…0404 at0014 = EOL // 0x403 @0x14
0x03ef…0404 }
0x0404…041c 9173 0430 EXEC FEJL(V,6,K1$)
0x0404…041c LineComalBin {
0x0404…041c ptr = 0x9173 // 0x404 @0x0
0x0404…041c lno = 0x01ae // 0x406 @0x2
0x0404…041c at0004 = ╱9d╱ EXEC ╱ // 0x408 @0x4
0x0404…041c at0005 = ╱46╱F╱ // 0x409 @0x5
0x0404…041c at0006 = ╱45╱E╱ // 0x40a @0x6
0x0404…041c at0007 = ╱4a╱J╱ // 0x40b @0x7
0x0404…041c at0008 = ╱4c╱L╱ // 0x40c @0x8
0x0404…041c at0009 = ╱ed╱(╱ // 0x40d @0x9
0x0404…041c at000a = ╱56╱V╱ // 0x40e @0xa
0x0404…041c at000b = ╱ec╱,╱ // 0x40f @0xb
0x0404…041c at000c = ╱36╱6╱ // 0x410 @0xc
0x0404…041c at000d = ╱fe0000c003╱ // 0x411 @0xd
0x0404…041c at0012 = ╱ec╱,╱ // 0x416 @0x12
0x0404…041c at0013 = ╱4b╱K╱ // 0x417 @0x13
0x0404…041c at0014 = ╱31╱1╱ // 0x418 @0x14
0x0404…041c at0015 = ╱ef╱$╱ // 0x419 @0x15
0x0404…041c at0016 = ╱ee╱)╱ // 0x41a @0x16
0x0404…041c at0017 = EOL // 0x41b @0x17
0x0404…041c }
0x041c…0431 9188 0440 GET K1$,32:K9$
0x041c…0431 LineComalBin {
0x041c…0431 ptr = 0x9188 // 0x41c @0x0
0x041c…0431 lno = 0x01b8 // 0x41e @0x2
0x041c…0431 at0004 = ╱a9╱ GET ╱ // 0x420 @0x4
0x041c…0431 at0005 = ╱4b╱K╱ // 0x421 @0x5
0x041c…0431 at0006 = ╱31╱1╱ // 0x422 @0x6
0x041c…0431 at0007 = ╱ef╱$╱ // 0x423 @0x7
0x041c…0431 at0008 = ╱ec╱,╱ // 0x424 @0x8
0x041c…0431 at0009 = ╱33╱3╱ // 0x425 @0x9
0x041c…0431 at000a = ╱32╱2╱ // 0x426 @0xa
0x041c…0431 at000b = ╱fe00008006╱ // 0x427 @0xb
0x041c…0431 at0010 = ╱f0╱:╱ // 0x42c @0x10
0x041c…0431 at0011 = ╱4b╱K╱ // 0x42d @0x11
0x041c…0431 at0012 = ╱39╱9╱ // 0x42e @0x12
0x041c…0431 at0013 = ╱ef╱$╱ // 0x42f @0x13
0x041c…0431 at0014 = EOL // 0x430 @0x14
0x041c…0431 }
0x0431…0449 91a0 0450 EXEC FEJL(V,7,K1$)
0x0431…0449 LineComalBin {
0x0431…0449 ptr = 0x91a0 // 0x431 @0x0
0x0431…0449 lno = 0x01c2 // 0x433 @0x2
0x0431…0449 at0004 = ╱9d╱ EXEC ╱ // 0x435 @0x4
0x0431…0449 at0005 = ╱46╱F╱ // 0x436 @0x5
0x0431…0449 at0006 = ╱45╱E╱ // 0x437 @0x6
0x0431…0449 at0007 = ╱4a╱J╱ // 0x438 @0x7
0x0431…0449 at0008 = ╱4c╱L╱ // 0x439 @0x8
0x0431…0449 at0009 = ╱ed╱(╱ // 0x43a @0x9
0x0431…0449 at000a = ╱56╱V╱ // 0x43b @0xa
0x0431…0449 at000b = ╱ec╱,╱ // 0x43c @0xb
0x0431…0449 at000c = ╱37╱7╱ // 0x43d @0xc
0x0431…0449 at000d = ╱fe0000e003╱ // 0x43e @0xd
0x0431…0449 at0012 = ╱ec╱,╱ // 0x443 @0x12
0x0431…0449 at0013 = ╱4b╱K╱ // 0x444 @0x13
0x0431…0449 at0014 = ╱31╱1╱ // 0x445 @0x14
0x0431…0449 at0015 = ╱ef╱$╱ // 0x446 @0x15
0x0431…0449 at0016 = ╱ee╱)╱ // 0x447 @0x16
0x0431…0449 at0017 = EOL // 0x448 @0x17
0x0431…0449 }
0x0449…045f 91b6 0460 GET K1$,33:K10$
0x0449…045f LineComalBin {
0x0449…045f ptr = 0x91b6 // 0x449 @0x0
0x0449…045f lno = 0x01cc // 0x44b @0x2
0x0449…045f at0004 = ╱a9╱ GET ╱ // 0x44d @0x4
0x0449…045f at0005 = ╱4b╱K╱ // 0x44e @0x5
0x0449…045f at0006 = ╱31╱1╱ // 0x44f @0x6
0x0449…045f at0007 = ╱ef╱$╱ // 0x450 @0x7
0x0449…045f at0008 = ╱ec╱,╱ // 0x451 @0x8
0x0449…045f at0009 = ╱33╱3╱ // 0x452 @0x9
0x0449…045f at000a = ╱33╱3╱ // 0x453 @0xa
0x0449…045f at000b = ╱fe00008406╱ // 0x454 @0xb
0x0449…045f at0010 = ╱f0╱:╱ // 0x459 @0x10
0x0449…045f at0011 = ╱4b╱K╱ // 0x45a @0x11
0x0449…045f at0012 = ╱31╱1╱ // 0x45b @0x12
0x0449…045f at0013 = ╱30╱0╱ // 0x45c @0x13
0x0449…045f at0014 = ╱ef╱$╱ // 0x45d @0x14
0x0449…045f at0015 = EOL // 0x45e @0x15
0x0449…045f }
0x045f…0477 91ce 0470 EXEC FEJL(V,8,K1$)
0x045f…0477 LineComalBin {
0x045f…0477 ptr = 0x91ce // 0x45f @0x0
0x045f…0477 lno = 0x01d6 // 0x461 @0x2
0x045f…0477 at0004 = ╱9d╱ EXEC ╱ // 0x463 @0x4
0x045f…0477 at0005 = ╱46╱F╱ // 0x464 @0x5
0x045f…0477 at0006 = ╱45╱E╱ // 0x465 @0x6
0x045f…0477 at0007 = ╱4a╱J╱ // 0x466 @0x7
0x045f…0477 at0008 = ╱4c╱L╱ // 0x467 @0x8
0x045f…0477 at0009 = ╱ed╱(╱ // 0x468 @0x9
0x045f…0477 at000a = ╱56╱V╱ // 0x469 @0xa
0x045f…0477 at000b = ╱ec╱,╱ // 0x46a @0xb
0x045f…0477 at000c = ╱38╱8╱ // 0x46b @0xc
0x045f…0477 at000d = ╱fe00008004╱ // 0x46c @0xd
0x045f…0477 at0012 = ╱ec╱,╱ // 0x471 @0x12
0x045f…0477 at0013 = ╱4b╱K╱ // 0x472 @0x13
0x045f…0477 at0014 = ╱31╱1╱ // 0x473 @0x14
0x045f…0477 at0015 = ╱ef╱$╱ // 0x474 @0x15
0x045f…0477 at0016 = ╱ee╱)╱ // 0x475 @0x16
0x045f…0477 at0017 = EOL // 0x476 @0x17
0x045f…0477 }
0x0477…048d 91e4 0480 GET K1$,34:K19$
0x0477…048d LineComalBin {
0x0477…048d ptr = 0x91e4 // 0x477 @0x0
0x0477…048d lno = 0x01e0 // 0x479 @0x2
0x0477…048d at0004 = ╱a9╱ GET ╱ // 0x47b @0x4
0x0477…048d at0005 = ╱4b╱K╱ // 0x47c @0x5
0x0477…048d at0006 = ╱31╱1╱ // 0x47d @0x6
0x0477…048d at0007 = ╱ef╱$╱ // 0x47e @0x7
0x0477…048d at0008 = ╱ec╱,╱ // 0x47f @0x8
0x0477…048d at0009 = ╱33╱3╱ // 0x480 @0x9
0x0477…048d at000a = ╱34╱4╱ // 0x481 @0xa
0x0477…048d at000b = ╱fe00008806╱ // 0x482 @0xb
0x0477…048d at0010 = ╱f0╱:╱ // 0x487 @0x10
0x0477…048d at0011 = ╱4b╱K╱ // 0x488 @0x11
0x0477…048d at0012 = ╱31╱1╱ // 0x489 @0x12
0x0477…048d at0013 = ╱39╱9╱ // 0x48a @0x13
0x0477…048d at0014 = ╱ef╱$╱ // 0x48b @0x14
0x0477…048d at0015 = EOL // 0x48c @0x15
0x0477…048d }
0x048d…04a0 91f7 0490 EXEC FEJL(V,W,K1$)
0x048d…04a0 LineComalBin {
0x048d…04a0 ptr = 0x91f7 // 0x48d @0x0
0x048d…04a0 lno = 0x01ea // 0x48f @0x2
0x048d…04a0 at0004 = ╱9d╱ EXEC ╱ // 0x491 @0x4
0x048d…04a0 at0005 = ╱46╱F╱ // 0x492 @0x5
0x048d…04a0 at0006 = ╱45╱E╱ // 0x493 @0x6
0x048d…04a0 at0007 = ╱4a╱J╱ // 0x494 @0x7
0x048d…04a0 at0008 = ╱4c╱L╱ // 0x495 @0x8
0x048d…04a0 at0009 = ╱ed╱(╱ // 0x496 @0x9
0x048d…04a0 at000a = ╱56╱V╱ // 0x497 @0xa
0x048d…04a0 at000b = ╱ec╱,╱ // 0x498 @0xb
0x048d…04a0 at000c = ╱57╱W╱ // 0x499 @0xc
0x048d…04a0 at000d = ╱ec╱,╱ // 0x49a @0xd
0x048d…04a0 at000e = ╱4b╱K╱ // 0x49b @0xe
0x048d…04a0 at000f = ╱31╱1╱ // 0x49c @0xf
0x048d…04a0 at0010 = ╱ef╱$╱ // 0x49d @0x10
0x048d…04a0 at0011 = ╱ee╱)╱ // 0x49e @0x11
0x048d…04a0 at0012 = EOL // 0x49f @0x12
0x048d…04a0 }
0x04a0…04b6 920d 0500 GET K1$,40:K40$
0x04a0…04b6 LineComalBin {
0x04a0…04b6 ptr = 0x920d // 0x4a0 @0x0
0x04a0…04b6 lno = 0x01f4 // 0x4a2 @0x2
0x04a0…04b6 at0004 = ╱a9╱ GET ╱ // 0x4a4 @0x4
0x04a0…04b6 at0005 = ╱4b╱K╱ // 0x4a5 @0x5
0x04a0…04b6 at0006 = ╱31╱1╱ // 0x4a6 @0x6
0x04a0…04b6 at0007 = ╱ef╱$╱ // 0x4a7 @0x7
0x04a0…04b6 at0008 = ╱ec╱,╱ // 0x4a8 @0x8
0x04a0…04b6 at0009 = ╱34╱4╱ // 0x4a9 @0x9
0x04a0…04b6 at000a = ╱30╱0╱ // 0x4aa @0xa
0x04a0…04b6 at000b = ╱fe0000a006╱ // 0x4ab @0xb
0x04a0…04b6 at0010 = ╱f0╱:╱ // 0x4b0 @0x10
0x04a0…04b6 at0011 = ╱4b╱K╱ // 0x4b1 @0x11
0x04a0…04b6 at0012 = ╱34╱4╱ // 0x4b2 @0x12
0x04a0…04b6 at0013 = ╱30╱0╱ // 0x4b3 @0x13
0x04a0…04b6 at0014 = ╱ef╱$╱ // 0x4b4 @0x14
0x04a0…04b6 at0015 = EOL // 0x4b5 @0x15
0x04a0…04b6 }
0x04b6…04d5 922c 0510 EXEC FEJL(20,20,K1$)
0x04b6…04d5 LineComalBin {
0x04b6…04d5 ptr = 0x922c // 0x4b6 @0x0
0x04b6…04d5 lno = 0x01fe // 0x4b8 @0x2
0x04b6…04d5 at0004 = ╱9d╱ EXEC ╱ // 0x4ba @0x4
0x04b6…04d5 at0005 = ╱46╱F╱ // 0x4bb @0x5
0x04b6…04d5 at0006 = ╱45╱E╱ // 0x4bc @0x6
0x04b6…04d5 at0007 = ╱4a╱J╱ // 0x4bd @0x7
0x04b6…04d5 at0008 = ╱4c╱L╱ // 0x4be @0x8
0x04b6…04d5 at0009 = ╱ed╱(╱ // 0x4bf @0x9
0x04b6…04d5 at000a = ╱32╱2╱ // 0x4c0 @0xa
0x04b6…04d5 at000b = ╱30╱0╱ // 0x4c1 @0xb
0x04b6…04d5 at000c = ╱fe0000a005╱ // 0x4c2 @0xc
0x04b6…04d5 at0011 = ╱ec╱,╱ // 0x4c7 @0x11
0x04b6…04d5 at0012 = ╱32╱2╱ // 0x4c8 @0x12
0x04b6…04d5 at0013 = ╱30╱0╱ // 0x4c9 @0x13
0x04b6…04d5 at0014 = ╱fe0000a005╱ // 0x4ca @0x14
0x04b6…04d5 at0019 = ╱ec╱,╱ // 0x4cf @0x19
0x04b6…04d5 at001a = ╱4b╱K╱ // 0x4d0 @0x1a
0x04b6…04d5 at001b = ╱31╱1╱ // 0x4d1 @0x1b
0x04b6…04d5 at001c = ╱ef╱$╱ // 0x4d2 @0x1c
0x04b6…04d5 at001d = ╱ee╱)╱ // 0x4d3 @0x1d
0x04b6…04d5 at001e = EOL // 0x4d4 @0x1e
0x04b6…04d5 }
0x04d5…04eb 9242 0520 GET K1$,41:K41$
0x04d5…04eb LineComalBin {
0x04d5…04eb ptr = 0x9242 // 0x4d5 @0x0
0x04d5…04eb lno = 0x0208 // 0x4d7 @0x2
0x04d5…04eb at0004 = ╱a9╱ GET ╱ // 0x4d9 @0x4
0x04d5…04eb at0005 = ╱4b╱K╱ // 0x4da @0x5
0x04d5…04eb at0006 = ╱31╱1╱ // 0x4db @0x6
0x04d5…04eb at0007 = ╱ef╱$╱ // 0x4dc @0x7
0x04d5…04eb at0008 = ╱ec╱,╱ // 0x4dd @0x8
0x04d5…04eb at0009 = ╱34╱4╱ // 0x4de @0x9
0x04d5…04eb at000a = ╱31╱1╱ // 0x4df @0xa
0x04d5…04eb at000b = ╱fe0000a406╱ // 0x4e0 @0xb
0x04d5…04eb at0010 = ╱f0╱:╱ // 0x4e5 @0x10
0x04d5…04eb at0011 = ╱4b╱K╱ // 0x4e6 @0x11
0x04d5…04eb at0012 = ╱34╱4╱ // 0x4e7 @0x12
0x04d5…04eb at0013 = ╱31╱1╱ // 0x4e8 @0x13
0x04d5…04eb at0014 = ╱ef╱$╱ // 0x4e9 @0x14
0x04d5…04eb at0015 = EOL // 0x4ea @0x15
0x04d5…04eb }
0x04eb…050a 9261 0530 EXEC FEJL(20,21,K1$)
0x04eb…050a LineComalBin {
0x04eb…050a ptr = 0x9261 // 0x4eb @0x0
0x04eb…050a lno = 0x0212 // 0x4ed @0x2
0x04eb…050a at0004 = ╱9d╱ EXEC ╱ // 0x4ef @0x4
0x04eb…050a at0005 = ╱46╱F╱ // 0x4f0 @0x5
0x04eb…050a at0006 = ╱45╱E╱ // 0x4f1 @0x6
0x04eb…050a at0007 = ╱4a╱J╱ // 0x4f2 @0x7
0x04eb…050a at0008 = ╱4c╱L╱ // 0x4f3 @0x8
0x04eb…050a at0009 = ╱ed╱(╱ // 0x4f4 @0x9
0x04eb…050a at000a = ╱32╱2╱ // 0x4f5 @0xa
0x04eb…050a at000b = ╱30╱0╱ // 0x4f6 @0xb
0x04eb…050a at000c = ╱fe0000a005╱ // 0x4f7 @0xc
0x04eb…050a at0011 = ╱ec╱,╱ // 0x4fc @0x11
0x04eb…050a at0012 = ╱32╱2╱ // 0x4fd @0x12
0x04eb…050a at0013 = ╱31╱1╱ // 0x4fe @0x13
0x04eb…050a at0014 = ╱fe0000a805╱ // 0x4ff @0x14
0x04eb…050a at0019 = ╱ec╱,╱ // 0x504 @0x19
0x04eb…050a at001a = ╱4b╱K╱ // 0x505 @0x1a
0x04eb…050a at001b = ╱31╱1╱ // 0x506 @0x1b
0x04eb…050a at001c = ╱ef╱$╱ // 0x507 @0x1c
0x04eb…050a at001d = ╱ee╱)╱ // 0x508 @0x1d
0x04eb…050a at001e = EOL // 0x509 @0x1e
0x04eb…050a }
0x050a…0520 9277 0540 GET K1$,42:K42$
0x050a…0520 LineComalBin {
0x050a…0520 ptr = 0x9277 // 0x50a @0x0
0x050a…0520 lno = 0x021c // 0x50c @0x2
0x050a…0520 at0004 = ╱a9╱ GET ╱ // 0x50e @0x4
0x050a…0520 at0005 = ╱4b╱K╱ // 0x50f @0x5
0x050a…0520 at0006 = ╱31╱1╱ // 0x510 @0x6
0x050a…0520 at0007 = ╱ef╱$╱ // 0x511 @0x7
0x050a…0520 at0008 = ╱ec╱,╱ // 0x512 @0x8
0x050a…0520 at0009 = ╱34╱4╱ // 0x513 @0x9
0x050a…0520 at000a = ╱32╱2╱ // 0x514 @0xa
0x050a…0520 at000b = ╱fe0000a806╱ // 0x515 @0xb
0x050a…0520 at0010 = ╱f0╱:╱ // 0x51a @0x10
0x050a…0520 at0011 = ╱4b╱K╱ // 0x51b @0x11
0x050a…0520 at0012 = ╱34╱4╱ // 0x51c @0x12
0x050a…0520 at0013 = ╱32╱2╱ // 0x51d @0x13
0x050a…0520 at0014 = ╱ef╱$╱ // 0x51e @0x14
0x050a…0520 at0015 = EOL // 0x51f @0x15
0x050a…0520 }
0x0520…053f 9296 0550 EXEC FEJL(20,22,K1$)
0x0520…053f LineComalBin {
0x0520…053f ptr = 0x9296 // 0x520 @0x0
0x0520…053f lno = 0x0226 // 0x522 @0x2
0x0520…053f at0004 = ╱9d╱ EXEC ╱ // 0x524 @0x4
0x0520…053f at0005 = ╱46╱F╱ // 0x525 @0x5
0x0520…053f at0006 = ╱45╱E╱ // 0x526 @0x6
0x0520…053f at0007 = ╱4a╱J╱ // 0x527 @0x7
0x0520…053f at0008 = ╱4c╱L╱ // 0x528 @0x8
0x0520…053f at0009 = ╱ed╱(╱ // 0x529 @0x9
0x0520…053f at000a = ╱32╱2╱ // 0x52a @0xa
0x0520…053f at000b = ╱30╱0╱ // 0x52b @0xb
0x0520…053f at000c = ╱fe0000a005╱ // 0x52c @0xc
0x0520…053f at0011 = ╱ec╱,╱ // 0x531 @0x11
0x0520…053f at0012 = ╱32╱2╱ // 0x532 @0x12
0x0520…053f at0013 = ╱32╱2╱ // 0x533 @0x13
0x0520…053f at0014 = ╱fe0000b005╱ // 0x534 @0x14
0x0520…053f at0019 = ╱ec╱,╱ // 0x539 @0x19
0x0520…053f at001a = ╱4b╱K╱ // 0x53a @0x1a
0x0520…053f at001b = ╱31╱1╱ // 0x53b @0x1b
0x0520…053f at001c = ╱ef╱$╱ // 0x53c @0x1c
0x0520…053f at001d = ╱ee╱)╱ // 0x53d @0x1d
0x0520…053f at001e = EOL // 0x53e @0x1e
0x0520…053f }
0x053f…0563 92ba 0560 GET K1$,43:METOT,MEMID,MEPOST
0x053f…0563 LineComalBin {
0x053f…0563 ptr = 0x92ba // 0x53f @0x0
0x053f…0563 lno = 0x0230 // 0x541 @0x2
0x053f…0563 at0004 = ╱a9╱ GET ╱ // 0x543 @0x4
0x053f…0563 at0005 = ╱4b╱K╱ // 0x544 @0x5
0x053f…0563 at0006 = ╱31╱1╱ // 0x545 @0x6
0x053f…0563 at0007 = ╱ef╱$╱ // 0x546 @0x7
0x053f…0563 at0008 = ╱ec╱,╱ // 0x547 @0x8
0x053f…0563 at0009 = ╱34╱4╱ // 0x548 @0x9
0x053f…0563 at000a = ╱33╱3╱ // 0x549 @0xa
0x053f…0563 at000b = ╱fe0000ac06╱ // 0x54a @0xb
0x053f…0563 at0010 = ╱f0╱:╱ // 0x54f @0x10
0x053f…0563 at0011 = ╱4d╱M╱ // 0x550 @0x11
0x053f…0563 at0012 = ╱45╱E╱ // 0x551 @0x12
0x053f…0563 at0013 = ╱54╱T╱ // 0x552 @0x13
0x053f…0563 at0014 = ╱4f╱O╱ // 0x553 @0x14
0x053f…0563 at0015 = ╱54╱T╱ // 0x554 @0x15
0x053f…0563 at0016 = ╱ec╱,╱ // 0x555 @0x16
0x053f…0563 at0017 = ╱4d╱M╱ // 0x556 @0x17
0x053f…0563 at0018 = ╱45╱E╱ // 0x557 @0x18
0x053f…0563 at0019 = ╱4d╱M╱ // 0x558 @0x19
0x053f…0563 at001a = ╱49╱I╱ // 0x559 @0x1a
0x053f…0563 at001b = ╱44╱D╱ // 0x55a @0x1b
0x053f…0563 at001c = ╱ec╱,╱ // 0x55b @0x1c
0x053f…0563 at001d = ╱4d╱M╱ // 0x55c @0x1d
0x053f…0563 at001e = ╱45╱E╱ // 0x55d @0x1e
0x053f…0563 at001f = ╱50╱P╱ // 0x55e @0x1f
0x053f…0563 at0020 = ╱4f╱O╱ // 0x55f @0x20
0x053f…0563 at0021 = ╱53╱S╱ // 0x560 @0x21
0x053f…0563 at0022 = ╱54╱T╱ // 0x561 @0x22
0x053f…0563 at0023 = EOL // 0x562 @0x23
0x053f…0563 }
0x0563…0582 92d9 0570 EXEC FEJL(20,23,K1$)
0x0563…0582 LineComalBin {
0x0563…0582 ptr = 0x92d9 // 0x563 @0x0
0x0563…0582 lno = 0x023a // 0x565 @0x2
0x0563…0582 at0004 = ╱9d╱ EXEC ╱ // 0x567 @0x4
0x0563…0582 at0005 = ╱46╱F╱ // 0x568 @0x5
0x0563…0582 at0006 = ╱45╱E╱ // 0x569 @0x6
0x0563…0582 at0007 = ╱4a╱J╱ // 0x56a @0x7
0x0563…0582 at0008 = ╱4c╱L╱ // 0x56b @0x8
0x0563…0582 at0009 = ╱ed╱(╱ // 0x56c @0x9
0x0563…0582 at000a = ╱32╱2╱ // 0x56d @0xa
0x0563…0582 at000b = ╱30╱0╱ // 0x56e @0xb
0x0563…0582 at000c = ╱fe0000a005╱ // 0x56f @0xc
0x0563…0582 at0011 = ╱ec╱,╱ // 0x574 @0x11
0x0563…0582 at0012 = ╱32╱2╱ // 0x575 @0x12
0x0563…0582 at0013 = ╱33╱3╱ // 0x576 @0x13
0x0563…0582 at0014 = ╱fe0000b805╱ // 0x577 @0x14
0x0563…0582 at0019 = ╱ec╱,╱ // 0x57c @0x19
0x0563…0582 at001a = ╱4b╱K╱ // 0x57d @0x1a
0x0563…0582 at001b = ╱31╱1╱ // 0x57e @0x1b
0x0563…0582 at001c = ╱ef╱$╱ // 0x57f @0x1c
0x0563…0582 at001d = ╱ee╱)╱ // 0x580 @0x1d
0x0563…0582 at001e = EOL // 0x581 @0x1e
0x0563…0582 }
0x0582…058b 92e2 0580 CLOSE K1$
0x0582…058b LineComalBin {
0x0582…058b ptr = 0x92e2 // 0x582 @0x0
0x0582…058b lno = 0x0244 // 0x584 @0x2
0x0582…058b at0004 = ╱a8╱ CLOSE ╱ // 0x586 @0x4
0x0582…058b at0005 = ╱4b╱K╱ // 0x587 @0x5
0x0582…058b at0006 = ╱31╱1╱ // 0x588 @0x6
0x0582…058b at0007 = ╱ef╱$╱ // 0x589 @0x7
0x0582…058b at0008 = EOL // 0x58a @0x8
0x0582…058b }
0x058b…05a3 92fa 0590 EXEC FEJL(E,5,K1$)
0x058b…05a3 LineComalBin {
0x058b…05a3 ptr = 0x92fa // 0x58b @0x0
0x058b…05a3 lno = 0x024e // 0x58d @0x2
0x058b…05a3 at0004 = ╱9d╱ EXEC ╱ // 0x58f @0x4
0x058b…05a3 at0005 = ╱46╱F╱ // 0x590 @0x5
0x058b…05a3 at0006 = ╱45╱E╱ // 0x591 @0x6
0x058b…05a3 at0007 = ╱4a╱J╱ // 0x592 @0x7
0x058b…05a3 at0008 = ╱4c╱L╱ // 0x593 @0x8
0x058b…05a3 at0009 = ╱ed╱(╱ // 0x594 @0x9
0x058b…05a3 at000a = ╱45╱E╱ // 0x595 @0xa
0x058b…05a3 at000b = ╱ec╱,╱ // 0x596 @0xb
0x058b…05a3 at000c = ╱35╱5╱ // 0x597 @0xc
0x058b…05a3 at000d = ╱fe0000a003╱ // 0x598 @0xd
0x058b…05a3 at0012 = ╱ec╱,╱ // 0x59d @0x12
0x058b…05a3 at0013 = ╱4b╱K╱ // 0x59e @0x13
0x058b…05a3 at0014 = ╱31╱1╱ // 0x59f @0x14
0x058b…05a3 at0015 = ╱ef╱$╱ // 0x5a0 @0x15
0x058b…05a3 at0016 = ╱ee╱)╱ // 0x5a1 @0x16
0x058b…05a3 at0017 = EOL // 0x5a2 @0x17
0x058b…05a3 }
0x05a3…05b2 9309 0591 IMD=MDPOST
0x05a3…05b2 LineComalBin {
0x05a3…05b2 ptr = 0x9309 // 0x5a3 @0x0
0x05a3…05b2 lno = 0x024f // 0x5a5 @0x2
0x05a3…05b2 at0004 = ╱49╱I╱ // 0x5a7 @0x4
0x05a3…05b2 at0005 = ╱4d╱M╱ // 0x5a8 @0x5
0x05a3…05b2 at0006 = ╱44╱D╱ // 0x5a9 @0x6
0x05a3…05b2 at0007 = ╱dc╱=╱ // 0x5aa @0x7
0x05a3…05b2 at0008 = ╱4d╱M╱ // 0x5ab @0x8
0x05a3…05b2 at0009 = ╱44╱D╱ // 0x5ac @0x9
0x05a3…05b2 at000a = ╱50╱P╱ // 0x5ad @0xa
0x05a3…05b2 at000b = ╱4f╱O╱ // 0x5ae @0xb
0x05a3…05b2 at000c = ╱53╱S╱ // 0x5af @0xc
0x05a3…05b2 at000d = ╱54╱T╱ // 0x5b0 @0xd
0x05a3…05b2 at000e = EOL // 0x5b1 @0xe
0x05a3…05b2 }
0x05b2…05cd 9324 0592 IF IMD<MFPOST THEN IMD=MFPOST
0x05b2…05cd LineComalBin {
0x05b2…05cd ptr = 0x9324 // 0x5b2 @0x0
0x05b2…05cd lno = 0x0250 // 0x5b4 @0x2
0x05b2…05cd at0004 = ╱82╱ IF ╱ // 0x5b6 @0x4
0x05b2…05cd at0005 = ╱49╱I╱ // 0x5b7 @0x5
0x05b2…05cd at0006 = ╱4d╱M╱ // 0x5b8 @0x6
0x05b2…05cd at0007 = ╱44╱D╱ // 0x5b9 @0x7
0x05b2…05cd at0008 = ╱dd╱<╱ // 0x5ba @0x8
0x05b2…05cd at0009 = ╱4d╱M╱ // 0x5bb @0x9
0x05b2…05cd at000a = ╱46╱F╱ // 0x5bc @0xa
0x05b2…05cd at000b = ╱50╱P╱ // 0x5bd @0xb
0x05b2…05cd at000c = ╱4f╱O╱ // 0x5be @0xc
0x05b2…05cd at000d = ╱53╱S╱ // 0x5bf @0xd
0x05b2…05cd at000e = ╱54╱T╱ // 0x5c0 @0xe
0x05b2…05cd at000f = ╱b6╱ THEN ╱ // 0x5c1 @0xf
0x05b2…05cd at0010 = ╱49╱I╱ // 0x5c2 @0x10
0x05b2…05cd at0011 = ╱4d╱M╱ // 0x5c3 @0x11
0x05b2…05cd at0012 = ╱44╱D╱ // 0x5c4 @0x12
0x05b2…05cd at0013 = ╱dc╱=╱ // 0x5c5 @0x13
0x05b2…05cd at0014 = ╱4d╱M╱ // 0x5c6 @0x14
0x05b2…05cd at0015 = ╱46╱F╱ // 0x5c7 @0x15
0x05b2…05cd at0016 = ╱50╱P╱ // 0x5c8 @0x16
0x05b2…05cd at0017 = ╱4f╱O╱ // 0x5c9 @0x17
0x05b2…05cd at0018 = ╱53╱S╱ // 0x5ca @0x18
0x05b2…05cd at0019 = ╱54╱T╱ // 0x5cb @0x19
0x05b2…05cd at001a = EOL // 0x5cc @0x1a
0x05b2…05cd }
0x05cd…05e8 933f 0593 IF IMD<MKPOST THEN IMD=MKPOST
0x05cd…05e8 LineComalBin {
0x05cd…05e8 ptr = 0x933f // 0x5cd @0x0
0x05cd…05e8 lno = 0x0251 // 0x5cf @0x2
0x05cd…05e8 at0004 = ╱82╱ IF ╱ // 0x5d1 @0x4
0x05cd…05e8 at0005 = ╱49╱I╱ // 0x5d2 @0x5
0x05cd…05e8 at0006 = ╱4d╱M╱ // 0x5d3 @0x6
0x05cd…05e8 at0007 = ╱44╱D╱ // 0x5d4 @0x7
0x05cd…05e8 at0008 = ╱dd╱<╱ // 0x5d5 @0x8
0x05cd…05e8 at0009 = ╱4d╱M╱ // 0x5d6 @0x9
0x05cd…05e8 at000a = ╱4b╱K╱ // 0x5d7 @0xa
0x05cd…05e8 at000b = ╱50╱P╱ // 0x5d8 @0xb
0x05cd…05e8 at000c = ╱4f╱O╱ // 0x5d9 @0xc
0x05cd…05e8 at000d = ╱53╱S╱ // 0x5da @0xd
0x05cd…05e8 at000e = ╱54╱T╱ // 0x5db @0xe
0x05cd…05e8 at000f = ╱b6╱ THEN ╱ // 0x5dc @0xf
0x05cd…05e8 at0010 = ╱49╱I╱ // 0x5dd @0x10
0x05cd…05e8 at0011 = ╱4d╱M╱ // 0x5de @0x11
0x05cd…05e8 at0012 = ╱44╱D╱ // 0x5df @0x12
0x05cd…05e8 at0013 = ╱dc╱=╱ // 0x5e0 @0x13
0x05cd…05e8 at0014 = ╱4d╱M╱ // 0x5e1 @0x14
0x05cd…05e8 at0015 = ╱4b╱K╱ // 0x5e2 @0x15
0x05cd…05e8 at0016 = ╱50╱P╱ // 0x5e3 @0x16
0x05cd…05e8 at0017 = ╱4f╱O╱ // 0x5e4 @0x17
0x05cd…05e8 at0018 = ╱53╱S╱ // 0x5e5 @0x18
0x05cd…05e8 at0019 = ╱54╱T╱ // 0x5e6 @0x19
0x05cd…05e8 at001a = EOL // 0x5e7 @0x1a
0x05cd…05e8 }
0x05e8…0603 935a 0594 IF IMD<MEPOST THEN IMD=MEPOST
0x05e8…0603 LineComalBin {
0x05e8…0603 ptr = 0x935a // 0x5e8 @0x0
0x05e8…0603 lno = 0x0252 // 0x5ea @0x2
0x05e8…0603 at0004 = ╱82╱ IF ╱ // 0x5ec @0x4
0x05e8…0603 at0005 = ╱49╱I╱ // 0x5ed @0x5
0x05e8…0603 at0006 = ╱4d╱M╱ // 0x5ee @0x6
0x05e8…0603 at0007 = ╱44╱D╱ // 0x5ef @0x7
0x05e8…0603 at0008 = ╱dd╱<╱ // 0x5f0 @0x8
0x05e8…0603 at0009 = ╱4d╱M╱ // 0x5f1 @0x9
0x05e8…0603 at000a = ╱45╱E╱ // 0x5f2 @0xa
0x05e8…0603 at000b = ╱50╱P╱ // 0x5f3 @0xb
0x05e8…0603 at000c = ╱4f╱O╱ // 0x5f4 @0xc
0x05e8…0603 at000d = ╱53╱S╱ // 0x5f5 @0xd
0x05e8…0603 at000e = ╱54╱T╱ // 0x5f6 @0xe
0x05e8…0603 at000f = ╱b6╱ THEN ╱ // 0x5f7 @0xf
0x05e8…0603 at0010 = ╱49╱I╱ // 0x5f8 @0x10
0x05e8…0603 at0011 = ╱4d╱M╱ // 0x5f9 @0x11
0x05e8…0603 at0012 = ╱44╱D╱ // 0x5fa @0x12
0x05e8…0603 at0013 = ╱dc╱=╱ // 0x5fb @0x13
0x05e8…0603 at0014 = ╱4d╱M╱ // 0x5fc @0x14
0x05e8…0603 at0015 = ╱45╱E╱ // 0x5fd @0x15
0x05e8…0603 at0016 = ╱50╱P╱ // 0x5fe @0x16
0x05e8…0603 at0017 = ╱4f╱O╱ // 0x5ff @0x17
0x05e8…0603 at0018 = ╱53╱S╱ // 0x600 @0x18
0x05e8…0603 at0019 = ╱54╱T╱ // 0x601 @0x19
0x05e8…0603 at001a = EOL // 0x602 @0x1a
0x05e8…0603 }
0x0603…062d 9384 0600 DIM HDTAB(IMD DIV 40,G),UDTAB(4,G)
0x0603…062d LineComalBin {
0x0603…062d ptr = 0x9384 // 0x603 @0x0
0x0603…062d lno = 0x0258 // 0x605 @0x2
0x0603…062d at0004 = ╱87╱ DIM ╱ // 0x607 @0x4
0x0603…062d at0005 = ╱48╱H╱ // 0x608 @0x5
0x0603…062d at0006 = ╱44╱D╱ // 0x609 @0x6
0x0603…062d at0007 = ╱54╱T╱ // 0x60a @0x7
0x0603…062d at0008 = ╱41╱A╱ // 0x60b @0x8
0x0603…062d at0009 = ╱42╱B╱ // 0x60c @0x9
0x0603…062d at000a = ╱ed╱(╱ // 0x60d @0xa
0x0603…062d at000b = ╱49╱I╱ // 0x60e @0xb
0x0603…062d at000c = ╱4d╱M╱ // 0x60f @0xc
0x0603…062d at000d = ╱44╱D╱ // 0x610 @0xd
0x0603…062d at000e = ╱e7╱ DIV ╱ // 0x611 @0xe
0x0603…062d at000f = ╱34╱4╱ // 0x612 @0xf
0x0603…062d at0010 = ╱30╱0╱ // 0x613 @0x10
0x0603…062d at0011 = ╱fe0000a006╱ // 0x614 @0x11
0x0603…062d at0016 = ╱ec╱,╱ // 0x619 @0x16
0x0603…062d at0017 = ╱47╱G╱ // 0x61a @0x17
0x0603…062d at0018 = ╱ee╱)╱ // 0x61b @0x18
0x0603…062d at0019 = ╱ec╱,╱ // 0x61c @0x19
0x0603…062d at001a = ╱55╱U╱ // 0x61d @0x1a
0x0603…062d at001b = ╱44╱D╱ // 0x61e @0x1b
0x0603…062d at001c = ╱54╱T╱ // 0x61f @0x1c
0x0603…062d at001d = ╱41╱A╱ // 0x620 @0x1d
0x0603…062d at001e = ╱42╱B╱ // 0x621 @0x1e
0x0603…062d at001f = ╱ed╱(╱ // 0x622 @0x1f
0x0603…062d at0020 = ╱34╱4╱ // 0x623 @0x20
0x0603…062d at0021 = ╱fe00008003╱ // 0x624 @0x21
0x0603…062d at0026 = ╱ec╱,╱ // 0x629 @0x26
0x0603…062d at0027 = ╱47╱G╱ // 0x62a @0x27
0x0603…062d at0028 = ╱ee╱)╱ // 0x62b @0x28
0x0603…062d at0029 = EOL // 0x62c @0x29
0x0603…062d }
0x062d…0670 93c7 0620 K20$=K7$+"1";K20$(G)="1";K21$=K6$+"1";K21$(G)="1";K22$=K8$+"1"
0x062d…0670 LineComalBin {
0x062d…0670 ptr = 0x93c7 // 0x62d @0x0
0x062d…0670 lno = 0x026c // 0x62f @0x2
0x062d…0670 at0004 = ╱4b╱K╱ // 0x631 @0x4
0x062d…0670 at0005 = ╱32╱2╱ // 0x632 @0x5
0x062d…0670 at0006 = ╱30╱0╱ // 0x633 @0x6
0x062d…0670 at0007 = ╱ef╱$╱ // 0x634 @0x7
0x062d…0670 at0008 = ╱dc╱=╱ // 0x635 @0x8
0x062d…0670 at0009 = ╱4b╱K╱ // 0x636 @0x9
0x062d…0670 at000a = ╱37╱7╱ // 0x637 @0xa
0x062d…0670 at000b = ╱ef╱$╱ // 0x638 @0xb
0x062d…0670 at000c = ╱f1╱+╱ // 0x639 @0xc
0x062d…0670 at000d = ╱22╱"╱ // 0x63a @0xd
0x062d…0670 at000e = ╱31╱1╱ // 0x63b @0xe
0x062d…0670 at000f = ╱22╱"╱ // 0x63c @0xf
0x062d…0670 at0010 = ╱eb╱;╱ // 0x63d @0x10
0x062d…0670 at0011 = ╱4b╱K╱ // 0x63e @0x11
0x062d…0670 at0012 = ╱32╱2╱ // 0x63f @0x12
0x062d…0670 at0013 = ╱30╱0╱ // 0x640 @0x13
0x062d…0670 at0014 = ╱ef╱$╱ // 0x641 @0x14
0x062d…0670 at0015 = ╱ed╱(╱ // 0x642 @0x15
0x062d…0670 at0016 = ╱47╱G╱ // 0x643 @0x16
0x062d…0670 at0017 = ╱ee╱)╱ // 0x644 @0x17
0x062d…0670 at0018 = ╱dc╱=╱ // 0x645 @0x18
0x062d…0670 at0019 = ╱22╱"╱ // 0x646 @0x19
0x062d…0670 at001a = ╱31╱1╱ // 0x647 @0x1a
0x062d…0670 at001b = ╱22╱"╱ // 0x648 @0x1b
0x062d…0670 at001c = ╱eb╱;╱ // 0x649 @0x1c
0x062d…0670 at001d = ╱4b╱K╱ // 0x64a @0x1d
0x062d…0670 at001e = ╱32╱2╱ // 0x64b @0x1e
0x062d…0670 at001f = ╱31╱1╱ // 0x64c @0x1f
0x062d…0670 at0020 = ╱ef╱$╱ // 0x64d @0x20
0x062d…0670 at0021 = ╱dc╱=╱ // 0x64e @0x21
0x062d…0670 at0022 = ╱4b╱K╱ // 0x64f @0x22
0x062d…0670 at0023 = ╱36╱6╱ // 0x650 @0x23
0x062d…0670 at0024 = ╱ef╱$╱ // 0x651 @0x24
0x062d…0670 at0025 = ╱f1╱+╱ // 0x652 @0x25
0x062d…0670 at0026 = ╱22╱"╱ // 0x653 @0x26
0x062d…0670 at0027 = ╱31╱1╱ // 0x654 @0x27
0x062d…0670 at0028 = ╱22╱"╱ // 0x655 @0x28
0x062d…0670 at0029 = ╱eb╱;╱ // 0x656 @0x29
0x062d…0670 at002a = ╱4b╱K╱ // 0x657 @0x2a
0x062d…0670 at002b = ╱32╱2╱ // 0x658 @0x2b
0x062d…0670 at002c = ╱31╱1╱ // 0x659 @0x2c
0x062d…0670 at002d = ╱ef╱$╱ // 0x65a @0x2d
0x062d…0670 at002e = ╱ed╱(╱ // 0x65b @0x2e
0x062d…0670 at002f = ╱47╱G╱ // 0x65c @0x2f
0x062d…0670 at0030 = ╱ee╱)╱ // 0x65d @0x30
0x062d…0670 at0031 = ╱dc╱=╱ // 0x65e @0x31
0x062d…0670 at0032 = ╱22╱"╱ // 0x65f @0x32
0x062d…0670 at0033 = ╱31╱1╱ // 0x660 @0x33
0x062d…0670 at0034 = ╱22╱"╱ // 0x661 @0x34
0x062d…0670 at0035 = ╱eb╱;╱ // 0x662 @0x35
0x062d…0670 at0036 = ╱4b╱K╱ // 0x663 @0x36
0x062d…0670 at0037 = ╱32╱2╱ // 0x664 @0x37
0x062d…0670 at0038 = ╱32╱2╱ // 0x665 @0x38
0x062d…0670 at0039 = ╱ef╱$╱ // 0x666 @0x39
0x062d…0670 at003a = ╱dc╱=╱ // 0x667 @0x3a
0x062d…0670 at003b = ╱4b╱K╱ // 0x668 @0x3b
0x062d…0670 at003c = ╱38╱8╱ // 0x669 @0x3c
0x062d…0670 at003d = ╱ef╱$╱ // 0x66a @0x3d
0x062d…0670 at003e = ╱f1╱+╱ // 0x66b @0x3e
0x062d…0670 at003f = ╱22╱"╱ // 0x66c @0x3f
0x062d…0670 at0040 = ╱31╱1╱ // 0x66d @0x40
0x062d…0670 at0041 = ╱22╱"╱ // 0x66e @0x41
0x062d…0670 at0042 = EOL // 0x66f @0x42
0x062d…0670 }
0x0670…06bc 9413 0630 K22$(G)="1";K3$=N1$+K3$;K4$=N1$+K4$;K5$=N1$+K5$;K6$=N1$+K6$;K7$=N1$+K7$
0x0670…06bc LineComalBin {
0x0670…06bc ptr = 0x9413 // 0x670 @0x0
0x0670…06bc lno = 0x0276 // 0x672 @0x2
0x0670…06bc at0004 = ╱4b╱K╱ // 0x674 @0x4
0x0670…06bc at0005 = ╱32╱2╱ // 0x675 @0x5
0x0670…06bc at0006 = ╱32╱2╱ // 0x676 @0x6
0x0670…06bc at0007 = ╱ef╱$╱ // 0x677 @0x7
0x0670…06bc at0008 = ╱ed╱(╱ // 0x678 @0x8
0x0670…06bc at0009 = ╱47╱G╱ // 0x679 @0x9
0x0670…06bc at000a = ╱ee╱)╱ // 0x67a @0xa
0x0670…06bc at000b = ╱dc╱=╱ // 0x67b @0xb
0x0670…06bc at000c = ╱22╱"╱ // 0x67c @0xc
0x0670…06bc at000d = ╱31╱1╱ // 0x67d @0xd
0x0670…06bc at000e = ╱22╱"╱ // 0x67e @0xe
0x0670…06bc at000f = ╱eb╱;╱ // 0x67f @0xf
0x0670…06bc at0010 = ╱4b╱K╱ // 0x680 @0x10
0x0670…06bc at0011 = ╱33╱3╱ // 0x681 @0x11
0x0670…06bc at0012 = ╱ef╱$╱ // 0x682 @0x12
0x0670…06bc at0013 = ╱dc╱=╱ // 0x683 @0x13
0x0670…06bc at0014 = ╱4e╱N╱ // 0x684 @0x14
0x0670…06bc at0015 = ╱31╱1╱ // 0x685 @0x15
0x0670…06bc at0016 = ╱ef╱$╱ // 0x686 @0x16
0x0670…06bc at0017 = ╱f1╱+╱ // 0x687 @0x17
0x0670…06bc at0018 = ╱4b╱K╱ // 0x688 @0x18
0x0670…06bc at0019 = ╱33╱3╱ // 0x689 @0x19
0x0670…06bc at001a = ╱ef╱$╱ // 0x68a @0x1a
0x0670…06bc at001b = ╱eb╱;╱ // 0x68b @0x1b
0x0670…06bc at001c = ╱4b╱K╱ // 0x68c @0x1c
0x0670…06bc at001d = ╱34╱4╱ // 0x68d @0x1d
0x0670…06bc at001e = ╱ef╱$╱ // 0x68e @0x1e
0x0670…06bc at001f = ╱dc╱=╱ // 0x68f @0x1f
0x0670…06bc at0020 = ╱4e╱N╱ // 0x690 @0x20
0x0670…06bc at0021 = ╱31╱1╱ // 0x691 @0x21
0x0670…06bc at0022 = ╱ef╱$╱ // 0x692 @0x22
0x0670…06bc at0023 = ╱f1╱+╱ // 0x693 @0x23
0x0670…06bc at0024 = ╱4b╱K╱ // 0x694 @0x24
0x0670…06bc at0025 = ╱34╱4╱ // 0x695 @0x25
0x0670…06bc at0026 = ╱ef╱$╱ // 0x696 @0x26
0x0670…06bc at0027 = ╱eb╱;╱ // 0x697 @0x27
0x0670…06bc at0028 = ╱4b╱K╱ // 0x698 @0x28
0x0670…06bc at0029 = ╱35╱5╱ // 0x699 @0x29
0x0670…06bc at002a = ╱ef╱$╱ // 0x69a @0x2a
0x0670…06bc at002b = ╱dc╱=╱ // 0x69b @0x2b
0x0670…06bc at002c = ╱4e╱N╱ // 0x69c @0x2c
0x0670…06bc at002d = ╱31╱1╱ // 0x69d @0x2d
0x0670…06bc at002e = ╱ef╱$╱ // 0x69e @0x2e
0x0670…06bc at002f = ╱f1╱+╱ // 0x69f @0x2f
0x0670…06bc at0030 = ╱4b╱K╱ // 0x6a0 @0x30
0x0670…06bc at0031 = ╱35╱5╱ // 0x6a1 @0x31
0x0670…06bc at0032 = ╱ef╱$╱ // 0x6a2 @0x32
0x0670…06bc at0033 = ╱eb╱;╱ // 0x6a3 @0x33
0x0670…06bc at0034 = ╱4b╱K╱ // 0x6a4 @0x34
0x0670…06bc at0035 = ╱36╱6╱ // 0x6a5 @0x35
0x0670…06bc at0036 = ╱ef╱$╱ // 0x6a6 @0x36
0x0670…06bc at0037 = ╱dc╱=╱ // 0x6a7 @0x37
0x0670…06bc at0038 = ╱4e╱N╱ // 0x6a8 @0x38
0x0670…06bc at0039 = ╱31╱1╱ // 0x6a9 @0x39
0x0670…06bc at003a = ╱ef╱$╱ // 0x6aa @0x3a
0x0670…06bc at003b = ╱f1╱+╱ // 0x6ab @0x3b
0x0670…06bc at003c = ╱4b╱K╱ // 0x6ac @0x3c
0x0670…06bc at003d = ╱36╱6╱ // 0x6ad @0x3d
0x0670…06bc at003e = ╱ef╱$╱ // 0x6ae @0x3e
0x0670…06bc at003f = ╱eb╱;╱ // 0x6af @0x3f
0x0670…06bc at0040 = ╱4b╱K╱ // 0x6b0 @0x40
0x0670…06bc at0041 = ╱37╱7╱ // 0x6b1 @0x41
0x0670…06bc at0042 = ╱ef╱$╱ // 0x6b2 @0x42
0x0670…06bc at0043 = ╱dc╱=╱ // 0x6b3 @0x43
0x0670…06bc at0044 = ╱4e╱N╱ // 0x6b4 @0x44
0x0670…06bc at0045 = ╱31╱1╱ // 0x6b5 @0x45
0x0670…06bc at0046 = ╱ef╱$╱ // 0x6b6 @0x46
0x0670…06bc at0047 = ╱f1╱+╱ // 0x6b7 @0x47
0x0670…06bc at0048 = ╱4b╱K╱ // 0x6b8 @0x48
0x0670…06bc at0049 = ╱37╱7╱ // 0x6b9 @0x49
0x0670…06bc at004a = ╱ef╱$╱ // 0x6ba @0x4a
0x0670…06bc at004b = EOL // 0x6bb @0x4b
0x0670…06bc }
0x06bc…0702 9459 0640 K8$=N1$+K8$;K9$=N1$+K9$;K10$=N1$+K10$;K19$=N1$+K19$;K20$=N1$+K20$
0x06bc…0702 LineComalBin {
0x06bc…0702 ptr = 0x9459 // 0x6bc @0x0
0x06bc…0702 lno = 0x0280 // 0x6be @0x2
0x06bc…0702 at0004 = ╱4b╱K╱ // 0x6c0 @0x4
0x06bc…0702 at0005 = ╱38╱8╱ // 0x6c1 @0x5
0x06bc…0702 at0006 = ╱ef╱$╱ // 0x6c2 @0x6
0x06bc…0702 at0007 = ╱dc╱=╱ // 0x6c3 @0x7
0x06bc…0702 at0008 = ╱4e╱N╱ // 0x6c4 @0x8
0x06bc…0702 at0009 = ╱31╱1╱ // 0x6c5 @0x9
0x06bc…0702 at000a = ╱ef╱$╱ // 0x6c6 @0xa
0x06bc…0702 at000b = ╱f1╱+╱ // 0x6c7 @0xb
0x06bc…0702 at000c = ╱4b╱K╱ // 0x6c8 @0xc
0x06bc…0702 at000d = ╱38╱8╱ // 0x6c9 @0xd
0x06bc…0702 at000e = ╱ef╱$╱ // 0x6ca @0xe
0x06bc…0702 at000f = ╱eb╱;╱ // 0x6cb @0xf
0x06bc…0702 at0010 = ╱4b╱K╱ // 0x6cc @0x10
0x06bc…0702 at0011 = ╱39╱9╱ // 0x6cd @0x11
0x06bc…0702 at0012 = ╱ef╱$╱ // 0x6ce @0x12
0x06bc…0702 at0013 = ╱dc╱=╱ // 0x6cf @0x13
0x06bc…0702 at0014 = ╱4e╱N╱ // 0x6d0 @0x14
0x06bc…0702 at0015 = ╱31╱1╱ // 0x6d1 @0x15
0x06bc…0702 at0016 = ╱ef╱$╱ // 0x6d2 @0x16
0x06bc…0702 at0017 = ╱f1╱+╱ // 0x6d3 @0x17
0x06bc…0702 at0018 = ╱4b╱K╱ // 0x6d4 @0x18
0x06bc…0702 at0019 = ╱39╱9╱ // 0x6d5 @0x19
0x06bc…0702 at001a = ╱ef╱$╱ // 0x6d6 @0x1a
0x06bc…0702 at001b = ╱eb╱;╱ // 0x6d7 @0x1b
0x06bc…0702 at001c = ╱4b╱K╱ // 0x6d8 @0x1c
0x06bc…0702 at001d = ╱31╱1╱ // 0x6d9 @0x1d
0x06bc…0702 at001e = ╱30╱0╱ // 0x6da @0x1e
0x06bc…0702 at001f = ╱ef╱$╱ // 0x6db @0x1f
0x06bc…0702 at0020 = ╱dc╱=╱ // 0x6dc @0x20
0x06bc…0702 at0021 = ╱4e╱N╱ // 0x6dd @0x21
0x06bc…0702 at0022 = ╱31╱1╱ // 0x6de @0x22
0x06bc…0702 at0023 = ╱ef╱$╱ // 0x6df @0x23
0x06bc…0702 at0024 = ╱f1╱+╱ // 0x6e0 @0x24
0x06bc…0702 at0025 = ╱4b╱K╱ // 0x6e1 @0x25
0x06bc…0702 at0026 = ╱31╱1╱ // 0x6e2 @0x26
0x06bc…0702 at0027 = ╱30╱0╱ // 0x6e3 @0x27
0x06bc…0702 at0028 = ╱ef╱$╱ // 0x6e4 @0x28
0x06bc…0702 at0029 = ╱eb╱;╱ // 0x6e5 @0x29
0x06bc…0702 at002a = ╱4b╱K╱ // 0x6e6 @0x2a
0x06bc…0702 at002b = ╱31╱1╱ // 0x6e7 @0x2b
0x06bc…0702 at002c = ╱39╱9╱ // 0x6e8 @0x2c
0x06bc…0702 at002d = ╱ef╱$╱ // 0x6e9 @0x2d
0x06bc…0702 at002e = ╱dc╱=╱ // 0x6ea @0x2e
0x06bc…0702 at002f = ╱4e╱N╱ // 0x6eb @0x2f
0x06bc…0702 at0030 = ╱31╱1╱ // 0x6ec @0x30
0x06bc…0702 at0031 = ╱ef╱$╱ // 0x6ed @0x31
0x06bc…0702 at0032 = ╱f1╱+╱ // 0x6ee @0x32
0x06bc…0702 at0033 = ╱4b╱K╱ // 0x6ef @0x33
0x06bc…0702 at0034 = ╱31╱1╱ // 0x6f0 @0x34
0x06bc…0702 at0035 = ╱39╱9╱ // 0x6f1 @0x35
0x06bc…0702 at0036 = ╱ef╱$╱ // 0x6f2 @0x36
0x06bc…0702 at0037 = ╱eb╱;╱ // 0x6f3 @0x37
0x06bc…0702 at0038 = ╱4b╱K╱ // 0x6f4 @0x38
0x06bc…0702 at0039 = ╱32╱2╱ // 0x6f5 @0x39
0x06bc…0702 at003a = ╱30╱0╱ // 0x6f6 @0x3a
0x06bc…0702 at003b = ╱ef╱$╱ // 0x6f7 @0x3b
0x06bc…0702 at003c = ╱dc╱=╱ // 0x6f8 @0x3c
0x06bc…0702 at003d = ╱4e╱N╱ // 0x6f9 @0x3d
0x06bc…0702 at003e = ╱31╱1╱ // 0x6fa @0x3e
0x06bc…0702 at003f = ╱ef╱$╱ // 0x6fb @0x3f
0x06bc…0702 at0040 = ╱f1╱+╱ // 0x6fc @0x40
0x06bc…0702 at0041 = ╱4b╱K╱ // 0x6fd @0x41
0x06bc…0702 at0042 = ╱32╱2╱ // 0x6fe @0x42
0x06bc…0702 at0043 = ╱30╱0╱ // 0x6ff @0x43
0x06bc…0702 at0044 = ╱ef╱$╱ // 0x700 @0x44
0x06bc…0702 at0045 = EOL // 0x701 @0x45
0x06bc…0702 }
0x0702…074a 94a1 0650 K21$=N1$+K21$;K22$=N1$+K22$;K43$=K41$+"1";K43$(G)="1";K40$=N1$+K40$
0x0702…074a LineComalBin {
0x0702…074a ptr = 0x94a1 // 0x702 @0x0
0x0702…074a lno = 0x028a // 0x704 @0x2
0x0702…074a at0004 = ╱4b╱K╱ // 0x706 @0x4
0x0702…074a at0005 = ╱32╱2╱ // 0x707 @0x5
0x0702…074a at0006 = ╱31╱1╱ // 0x708 @0x6
0x0702…074a at0007 = ╱ef╱$╱ // 0x709 @0x7
0x0702…074a at0008 = ╱dc╱=╱ // 0x70a @0x8
0x0702…074a at0009 = ╱4e╱N╱ // 0x70b @0x9
0x0702…074a at000a = ╱31╱1╱ // 0x70c @0xa
0x0702…074a at000b = ╱ef╱$╱ // 0x70d @0xb
0x0702…074a at000c = ╱f1╱+╱ // 0x70e @0xc
0x0702…074a at000d = ╱4b╱K╱ // 0x70f @0xd
0x0702…074a at000e = ╱32╱2╱ // 0x710 @0xe
0x0702…074a at000f = ╱31╱1╱ // 0x711 @0xf
0x0702…074a at0010 = ╱ef╱$╱ // 0x712 @0x10
0x0702…074a at0011 = ╱eb╱;╱ // 0x713 @0x11
0x0702…074a at0012 = ╱4b╱K╱ // 0x714 @0x12
0x0702…074a at0013 = ╱32╱2╱ // 0x715 @0x13
0x0702…074a at0014 = ╱32╱2╱ // 0x716 @0x14
0x0702…074a at0015 = ╱ef╱$╱ // 0x717 @0x15
0x0702…074a at0016 = ╱dc╱=╱ // 0x718 @0x16
0x0702…074a at0017 = ╱4e╱N╱ // 0x719 @0x17
0x0702…074a at0018 = ╱31╱1╱ // 0x71a @0x18
0x0702…074a at0019 = ╱ef╱$╱ // 0x71b @0x19
0x0702…074a at001a = ╱f1╱+╱ // 0x71c @0x1a
0x0702…074a at001b = ╱4b╱K╱ // 0x71d @0x1b
0x0702…074a at001c = ╱32╱2╱ // 0x71e @0x1c
0x0702…074a at001d = ╱32╱2╱ // 0x71f @0x1d
0x0702…074a at001e = ╱ef╱$╱ // 0x720 @0x1e
0x0702…074a at001f = ╱eb╱;╱ // 0x721 @0x1f
0x0702…074a at0020 = ╱4b╱K╱ // 0x722 @0x20
0x0702…074a at0021 = ╱34╱4╱ // 0x723 @0x21
0x0702…074a at0022 = ╱33╱3╱ // 0x724 @0x22
0x0702…074a at0023 = ╱ef╱$╱ // 0x725 @0x23
0x0702…074a at0024 = ╱dc╱=╱ // 0x726 @0x24
0x0702…074a at0025 = ╱4b╱K╱ // 0x727 @0x25
0x0702…074a at0026 = ╱34╱4╱ // 0x728 @0x26
0x0702…074a at0027 = ╱31╱1╱ // 0x729 @0x27
0x0702…074a at0028 = ╱ef╱$╱ // 0x72a @0x28
0x0702…074a at0029 = ╱f1╱+╱ // 0x72b @0x29
0x0702…074a at002a = ╱22╱"╱ // 0x72c @0x2a
0x0702…074a at002b = ╱31╱1╱ // 0x72d @0x2b
0x0702…074a at002c = ╱22╱"╱ // 0x72e @0x2c
0x0702…074a at002d = ╱eb╱;╱ // 0x72f @0x2d
0x0702…074a at002e = ╱4b╱K╱ // 0x730 @0x2e
0x0702…074a at002f = ╱34╱4╱ // 0x731 @0x2f
0x0702…074a at0030 = ╱33╱3╱ // 0x732 @0x30
0x0702…074a at0031 = ╱ef╱$╱ // 0x733 @0x31
0x0702…074a at0032 = ╱ed╱(╱ // 0x734 @0x32
0x0702…074a at0033 = ╱47╱G╱ // 0x735 @0x33
0x0702…074a at0034 = ╱ee╱)╱ // 0x736 @0x34
0x0702…074a at0035 = ╱dc╱=╱ // 0x737 @0x35
0x0702…074a at0036 = ╱22╱"╱ // 0x738 @0x36
0x0702…074a at0037 = ╱31╱1╱ // 0x739 @0x37
0x0702…074a at0038 = ╱22╱"╱ // 0x73a @0x38
0x0702…074a at0039 = ╱eb╱;╱ // 0x73b @0x39
0x0702…074a at003a = ╱4b╱K╱ // 0x73c @0x3a
0x0702…074a at003b = ╱34╱4╱ // 0x73d @0x3b
0x0702…074a at003c = ╱30╱0╱ // 0x73e @0x3c
0x0702…074a at003d = ╱ef╱$╱ // 0x73f @0x3d
0x0702…074a at003e = ╱dc╱=╱ // 0x740 @0x3e
0x0702…074a at003f = ╱4e╱N╱ // 0x741 @0x3f
0x0702…074a at0040 = ╱31╱1╱ // 0x742 @0x40
0x0702…074a at0041 = ╱ef╱$╱ // 0x743 @0x41
0x0702…074a at0042 = ╱f1╱+╱ // 0x744 @0x42
0x0702…074a at0043 = ╱4b╱K╱ // 0x745 @0x43
0x0702…074a at0044 = ╱34╱4╱ // 0x746 @0x44
0x0702…074a at0045 = ╱30╱0╱ // 0x747 @0x45
0x0702…074a at0046 = ╱ef╱$╱ // 0x748 @0x46
0x0702…074a at0047 = EOL // 0x749 @0x47
0x0702…074a }
0x074a…0782 94d9 0660 K41$=N1$+K41$;K42$=N1$+K42$;K43$=N1$+K43$;IMD=MFMID
0x074a…0782 LineComalBin {
0x074a…0782 ptr = 0x94d9 // 0x74a @0x0
0x074a…0782 lno = 0x0294 // 0x74c @0x2
0x074a…0782 at0004 = ╱4b╱K╱ // 0x74e @0x4
0x074a…0782 at0005 = ╱34╱4╱ // 0x74f @0x5
0x074a…0782 at0006 = ╱31╱1╱ // 0x750 @0x6
0x074a…0782 at0007 = ╱ef╱$╱ // 0x751 @0x7
0x074a…0782 at0008 = ╱dc╱=╱ // 0x752 @0x8
0x074a…0782 at0009 = ╱4e╱N╱ // 0x753 @0x9
0x074a…0782 at000a = ╱31╱1╱ // 0x754 @0xa
0x074a…0782 at000b = ╱ef╱$╱ // 0x755 @0xb
0x074a…0782 at000c = ╱f1╱+╱ // 0x756 @0xc
0x074a…0782 at000d = ╱4b╱K╱ // 0x757 @0xd
0x074a…0782 at000e = ╱34╱4╱ // 0x758 @0xe
0x074a…0782 at000f = ╱31╱1╱ // 0x759 @0xf
0x074a…0782 at0010 = ╱ef╱$╱ // 0x75a @0x10
0x074a…0782 at0011 = ╱eb╱;╱ // 0x75b @0x11
0x074a…0782 at0012 = ╱4b╱K╱ // 0x75c @0x12
0x074a…0782 at0013 = ╱34╱4╱ // 0x75d @0x13
0x074a…0782 at0014 = ╱32╱2╱ // 0x75e @0x14
0x074a…0782 at0015 = ╱ef╱$╱ // 0x75f @0x15
0x074a…0782 at0016 = ╱dc╱=╱ // 0x760 @0x16
0x074a…0782 at0017 = ╱4e╱N╱ // 0x761 @0x17
0x074a…0782 at0018 = ╱31╱1╱ // 0x762 @0x18
0x074a…0782 at0019 = ╱ef╱$╱ // 0x763 @0x19
0x074a…0782 at001a = ╱f1╱+╱ // 0x764 @0x1a
0x074a…0782 at001b = ╱4b╱K╱ // 0x765 @0x1b
0x074a…0782 at001c = ╱34╱4╱ // 0x766 @0x1c
0x074a…0782 at001d = ╱32╱2╱ // 0x767 @0x1d
0x074a…0782 at001e = ╱ef╱$╱ // 0x768 @0x1e
0x074a…0782 at001f = ╱eb╱;╱ // 0x769 @0x1f
0x074a…0782 at0020 = ╱4b╱K╱ // 0x76a @0x20
0x074a…0782 at0021 = ╱34╱4╱ // 0x76b @0x21
0x074a…0782 at0022 = ╱33╱3╱ // 0x76c @0x22
0x074a…0782 at0023 = ╱ef╱$╱ // 0x76d @0x23
0x074a…0782 at0024 = ╱dc╱=╱ // 0x76e @0x24
0x074a…0782 at0025 = ╱4e╱N╱ // 0x76f @0x25
0x074a…0782 at0026 = ╱31╱1╱ // 0x770 @0x26
0x074a…0782 at0027 = ╱ef╱$╱ // 0x771 @0x27
0x074a…0782 at0028 = ╱f1╱+╱ // 0x772 @0x28
0x074a…0782 at0029 = ╱4b╱K╱ // 0x773 @0x29
0x074a…0782 at002a = ╱34╱4╱ // 0x774 @0x2a
0x074a…0782 at002b = ╱33╱3╱ // 0x775 @0x2b
0x074a…0782 at002c = ╱ef╱$╱ // 0x776 @0x2c
0x074a…0782 at002d = ╱eb╱;╱ // 0x777 @0x2d
0x074a…0782 at002e = ╱49╱I╱ // 0x778 @0x2e
0x074a…0782 at002f = ╱4d╱M╱ // 0x779 @0x2f
0x074a…0782 at0030 = ╱44╱D╱ // 0x77a @0x30
0x074a…0782 at0031 = ╱dc╱=╱ // 0x77b @0x31
0x074a…0782 at0032 = ╱4d╱M╱ // 0x77c @0x32
0x074a…0782 at0033 = ╱46╱F╱ // 0x77d @0x33
0x074a…0782 at0034 = ╱4d╱M╱ // 0x77e @0x34
0x074a…0782 at0035 = ╱49╱I╱ // 0x77f @0x35
0x074a…0782 at0036 = ╱44╱D╱ // 0x780 @0x36
0x074a…0782 at0037 = EOL // 0x781 @0x37
0x074a…0782 }
0x0782…079b 94f2 0670 IF IMD<MDMID THEN IMD=MDMID
0x0782…079b LineComalBin {
0x0782…079b ptr = 0x94f2 // 0x782 @0x0
0x0782…079b lno = 0x029e // 0x784 @0x2
0x0782…079b at0004 = ╱82╱ IF ╱ // 0x786 @0x4
0x0782…079b at0005 = ╱49╱I╱ // 0x787 @0x5
0x0782…079b at0006 = ╱4d╱M╱ // 0x788 @0x6
0x0782…079b at0007 = ╱44╱D╱ // 0x789 @0x7
0x0782…079b at0008 = ╱dd╱<╱ // 0x78a @0x8
0x0782…079b at0009 = ╱4d╱M╱ // 0x78b @0x9
0x0782…079b at000a = ╱44╱D╱ // 0x78c @0xa
0x0782…079b at000b = ╱4d╱M╱ // 0x78d @0xb
0x0782…079b at000c = ╱49╱I╱ // 0x78e @0xc
0x0782…079b at000d = ╱44╱D╱ // 0x78f @0xd
0x0782…079b at000e = ╱b6╱ THEN ╱ // 0x790 @0xe
0x0782…079b at000f = ╱49╱I╱ // 0x791 @0xf
0x0782…079b at0010 = ╱4d╱M╱ // 0x792 @0x10
0x0782…079b at0011 = ╱44╱D╱ // 0x793 @0x11
0x0782…079b at0012 = ╱dc╱=╱ // 0x794 @0x12
0x0782…079b at0013 = ╱4d╱M╱ // 0x795 @0x13
0x0782…079b at0014 = ╱44╱D╱ // 0x796 @0x14
0x0782…079b at0015 = ╱4d╱M╱ // 0x797 @0x15
0x0782…079b at0016 = ╱49╱I╱ // 0x798 @0x16
0x0782…079b at0017 = ╱44╱D╱ // 0x799 @0x17
0x0782…079b at0018 = EOL // 0x79a @0x18
0x0782…079b }
0x079b…07b4 950b 0680 IF IMD<MKMID THEN IMD=MKMID
0x079b…07b4 LineComalBin {
0x079b…07b4 ptr = 0x950b // 0x79b @0x0
0x079b…07b4 lno = 0x02a8 // 0x79d @0x2
0x079b…07b4 at0004 = ╱82╱ IF ╱ // 0x79f @0x4
0x079b…07b4 at0005 = ╱49╱I╱ // 0x7a0 @0x5
0x079b…07b4 at0006 = ╱4d╱M╱ // 0x7a1 @0x6
0x079b…07b4 at0007 = ╱44╱D╱ // 0x7a2 @0x7
0x079b…07b4 at0008 = ╱dd╱<╱ // 0x7a3 @0x8
0x079b…07b4 at0009 = ╱4d╱M╱ // 0x7a4 @0x9
0x079b…07b4 at000a = ╱4b╱K╱ // 0x7a5 @0xa
0x079b…07b4 at000b = ╱4d╱M╱ // 0x7a6 @0xb
0x079b…07b4 at000c = ╱49╱I╱ // 0x7a7 @0xc
0x079b…07b4 at000d = ╱44╱D╱ // 0x7a8 @0xd
0x079b…07b4 at000e = ╱b6╱ THEN ╱ // 0x7a9 @0xe
0x079b…07b4 at000f = ╱49╱I╱ // 0x7aa @0xf
0x079b…07b4 at0010 = ╱4d╱M╱ // 0x7ab @0x10
0x079b…07b4 at0011 = ╱44╱D╱ // 0x7ac @0x11
0x079b…07b4 at0012 = ╱dc╱=╱ // 0x7ad @0x12
0x079b…07b4 at0013 = ╱4d╱M╱ // 0x7ae @0x13
0x079b…07b4 at0014 = ╱4b╱K╱ // 0x7af @0x14
0x079b…07b4 at0015 = ╱4d╱M╱ // 0x7b0 @0x15
0x079b…07b4 at0016 = ╱49╱I╱ // 0x7b1 @0x16
0x079b…07b4 at0017 = ╱44╱D╱ // 0x7b2 @0x17
0x079b…07b4 at0018 = EOL // 0x7b3 @0x18
0x079b…07b4 }
0x07b4…07cd 9524 0690 IF IMD<MEMID THEN IMD=MEMID
0x07b4…07cd LineComalBin {
0x07b4…07cd ptr = 0x9524 // 0x7b4 @0x0
0x07b4…07cd lno = 0x02b2 // 0x7b6 @0x2
0x07b4…07cd at0004 = ╱82╱ IF ╱ // 0x7b8 @0x4
0x07b4…07cd at0005 = ╱49╱I╱ // 0x7b9 @0x5
0x07b4…07cd at0006 = ╱4d╱M╱ // 0x7ba @0x6
0x07b4…07cd at0007 = ╱44╱D╱ // 0x7bb @0x7
0x07b4…07cd at0008 = ╱dd╱<╱ // 0x7bc @0x8
0x07b4…07cd at0009 = ╱4d╱M╱ // 0x7bd @0x9
0x07b4…07cd at000a = ╱45╱E╱ // 0x7be @0xa
0x07b4…07cd at000b = ╱4d╱M╱ // 0x7bf @0xb
0x07b4…07cd at000c = ╱49╱I╱ // 0x7c0 @0xc
0x07b4…07cd at000d = ╱44╱D╱ // 0x7c1 @0xd
0x07b4…07cd at000e = ╱b6╱ THEN ╱ // 0x7c2 @0xe
0x07b4…07cd at000f = ╱49╱I╱ // 0x7c3 @0xf
0x07b4…07cd at0010 = ╱4d╱M╱ // 0x7c4 @0x10
0x07b4…07cd at0011 = ╱44╱D╱ // 0x7c5 @0x11
0x07b4…07cd at0012 = ╱dc╱=╱ // 0x7c6 @0x12
0x07b4…07cd at0013 = ╱4d╱M╱ // 0x7c7 @0x13
0x07b4…07cd at0014 = ╱45╱E╱ // 0x7c8 @0x14
0x07b4…07cd at0015 = ╱4d╱M╱ // 0x7c9 @0x15
0x07b4…07cd at0016 = ╱49╱I╱ // 0x7ca @0x16
0x07b4…07cd at0017 = ╱44╱D╱ // 0x7cb @0x17
0x07b4…07cd at0018 = EOL // 0x7cc @0x18
0x07b4…07cd }
0x07cd…081e 9575 0700 DIM N(IMD),D(IMD),BI(IMD),TK$(IMD,E),BE$(IMD,12),TE$(IMD,25),PEG(IMD)
0x07cd…081e LineComalBin {
0x07cd…081e ptr = 0x9575 // 0x7cd @0x0
0x07cd…081e lno = 0x02bc // 0x7cf @0x2
0x07cd…081e at0004 = ╱87╱ DIM ╱ // 0x7d1 @0x4
0x07cd…081e at0005 = ╱4e╱N╱ // 0x7d2 @0x5
0x07cd…081e at0006 = ╱ed╱(╱ // 0x7d3 @0x6
0x07cd…081e at0007 = ╱49╱I╱ // 0x7d4 @0x7
0x07cd…081e at0008 = ╱4d╱M╱ // 0x7d5 @0x8
0x07cd…081e at0009 = ╱44╱D╱ // 0x7d6 @0x9
0x07cd…081e at000a = ╱ee╱)╱ // 0x7d7 @0xa
0x07cd…081e at000b = ╱ec╱,╱ // 0x7d8 @0xb
0x07cd…081e at000c = ╱44╱D╱ // 0x7d9 @0xc
0x07cd…081e at000d = ╱ed╱(╱ // 0x7da @0xd
0x07cd…081e at000e = ╱49╱I╱ // 0x7db @0xe
0x07cd…081e at000f = ╱4d╱M╱ // 0x7dc @0xf
0x07cd…081e at0010 = ╱44╱D╱ // 0x7dd @0x10
0x07cd…081e at0011 = ╱ee╱)╱ // 0x7de @0x11
0x07cd…081e at0012 = ╱ec╱,╱ // 0x7df @0x12
0x07cd…081e at0013 = ╱42╱B╱ // 0x7e0 @0x13
0x07cd…081e at0014 = ╱49╱I╱ // 0x7e1 @0x14
0x07cd…081e at0015 = ╱ed╱(╱ // 0x7e2 @0x15
0x07cd…081e at0016 = ╱49╱I╱ // 0x7e3 @0x16
0x07cd…081e at0017 = ╱4d╱M╱ // 0x7e4 @0x17
0x07cd…081e at0018 = ╱44╱D╱ // 0x7e5 @0x18
0x07cd…081e at0019 = ╱ee╱)╱ // 0x7e6 @0x19
0x07cd…081e at001a = ╱ec╱,╱ // 0x7e7 @0x1a
0x07cd…081e at001b = ╱54╱T╱ // 0x7e8 @0x1b
0x07cd…081e at001c = ╱4b╱K╱ // 0x7e9 @0x1c
0x07cd…081e at001d = ╱ef╱$╱ // 0x7ea @0x1d
0x07cd…081e at001e = ╱ed╱(╱ // 0x7eb @0x1e
0x07cd…081e at001f = ╱49╱I╱ // 0x7ec @0x1f
0x07cd…081e at0020 = ╱4d╱M╱ // 0x7ed @0x20
0x07cd…081e at0021 = ╱44╱D╱ // 0x7ee @0x21
0x07cd…081e at0022 = ╱ec╱,╱ // 0x7ef @0x22
0x07cd…081e at0023 = ╱45╱E╱ // 0x7f0 @0x23
0x07cd…081e at0024 = ╱ee╱)╱ // 0x7f1 @0x24
0x07cd…081e at0025 = ╱ec╱,╱ // 0x7f2 @0x25
0x07cd…081e at0026 = ╱42╱B╱ // 0x7f3 @0x26
0x07cd…081e at0027 = ╱45╱E╱ // 0x7f4 @0x27
0x07cd…081e at0028 = ╱ef╱$╱ // 0x7f5 @0x28
0x07cd…081e at0029 = ╱ed╱(╱ // 0x7f6 @0x29
0x07cd…081e at002a = ╱49╱I╱ // 0x7f7 @0x2a
0x07cd…081e at002b = ╱4d╱M╱ // 0x7f8 @0x2b
0x07cd…081e at002c = ╱44╱D╱ // 0x7f9 @0x2c
0x07cd…081e at002d = ╱ec╱,╱ // 0x7fa @0x2d
0x07cd…081e at002e = ╱31╱1╱ // 0x7fb @0x2e
0x07cd…081e at002f = ╱32╱2╱ // 0x7fc @0x2f
0x07cd…081e at0030 = ╱fe0000c004╱ // 0x7fd @0x30
0x07cd…081e at0035 = ╱ee╱)╱ // 0x802 @0x35
0x07cd…081e at0036 = ╱ec╱,╱ // 0x803 @0x36
0x07cd…081e at0037 = ╱54╱T╱ // 0x804 @0x37
0x07cd…081e at0038 = ╱45╱E╱ // 0x805 @0x38
0x07cd…081e at0039 = ╱ef╱$╱ // 0x806 @0x39
0x07cd…081e at003a = ╱ed╱(╱ // 0x807 @0x3a
0x07cd…081e at003b = ╱49╱I╱ // 0x808 @0x3b
0x07cd…081e at003c = ╱4d╱M╱ // 0x809 @0x3c
0x07cd…081e at003d = ╱44╱D╱ // 0x80a @0x3d
0x07cd…081e at003e = ╱ec╱,╱ // 0x80b @0x3e
0x07cd…081e at003f = ╱32╱2╱ // 0x80c @0x3f
0x07cd…081e at0040 = ╱35╱5╱ // 0x80d @0x40
0x07cd…081e at0041 = ╱fe0000c805╱ // 0x80e @0x41
0x07cd…081e at0046 = ╱ee╱)╱ // 0x813 @0x46
0x07cd…081e at0047 = ╱ec╱,╱ // 0x814 @0x47
0x07cd…081e at0048 = ╱50╱P╱ // 0x815 @0x48
0x07cd…081e at0049 = ╱45╱E╱ // 0x816 @0x49
0x07cd…081e at004a = ╱47╱G╱ // 0x817 @0x4a
0x07cd…081e at004b = ╱ed╱(╱ // 0x818 @0x4b
0x07cd…081e at004c = ╱49╱I╱ // 0x819 @0x4c
0x07cd…081e at004d = ╱4d╱M╱ // 0x81a @0x4d
0x07cd…081e at004e = ╱44╱D╱ // 0x81b @0x4e
0x07cd…081e at004f = ╱ee╱)╱ // 0x81c @0x4f
0x07cd…081e at0050 = EOL // 0x81d @0x50
0x07cd…081e }
0x081e…082c 9583 0710 DIM ENT(IMD)
0x081e…082c LineComalBin {
0x081e…082c ptr = 0x9583 // 0x81e @0x0
0x081e…082c lno = 0x02c6 // 0x820 @0x2
0x081e…082c at0004 = ╱87╱ DIM ╱ // 0x822 @0x4
0x081e…082c at0005 = ╱45╱E╱ // 0x823 @0x5
0x081e…082c at0006 = ╱4e╱N╱ // 0x824 @0x6
0x081e…082c at0007 = ╱54╱T╱ // 0x825 @0x7
0x081e…082c at0008 = ╱ed╱(╱ // 0x826 @0x8
0x081e…082c at0009 = ╱49╱I╱ // 0x827 @0x9
0x081e…082c at000a = ╱4d╱M╱ // 0x828 @0xa
0x081e…082c at000b = ╱44╱D╱ // 0x829 @0xb
0x081e…082c at000c = ╱ee╱)╱ // 0x82a @0xc
0x081e…082c at000d = EOL // 0x82b @0xd
0x081e…082c }
0x082c…0845 959c 0720 K1$=N1$+"20:SYSTEM2"
0x082c…0845 LineComalBin {
0x082c…0845 ptr = 0x959c // 0x82c @0x0
0x082c…0845 lno = 0x02d0 // 0x82e @0x2
0x082c…0845 at0004 = ╱4b╱K╱ // 0x830 @0x4
0x082c…0845 at0005 = ╱31╱1╱ // 0x831 @0x5
0x082c…0845 at0006 = ╱ef╱$╱ // 0x832 @0x6
0x082c…0845 at0007 = ╱dc╱=╱ // 0x833 @0x7
0x082c…0845 at0008 = ╱4e╱N╱ // 0x834 @0x8
0x082c…0845 at0009 = ╱31╱1╱ // 0x835 @0x9
0x082c…0845 at000a = ╱ef╱$╱ // 0x836 @0xa
0x082c…0845 at000b = ╱f1╱+╱ // 0x837 @0xb
0x082c…0845 at000c = ╱22╱"╱ // 0x838 @0xc
0x082c…0845 at000d = ╱32╱2╱ // 0x839 @0xd
0x082c…0845 at000e = ╱30╱0╱ // 0x83a @0xe
0x082c…0845 at000f = ╱3a╱:╱ // 0x83b @0xf
0x082c…0845 at0010 = ╱53╱S╱ // 0x83c @0x10
0x082c…0845 at0011 = ╱59╱Y╱ // 0x83d @0x11
0x082c…0845 at0012 = ╱53╱S╱ // 0x83e @0x12
0x082c…0845 at0013 = ╱54╱T╱ // 0x83f @0x13
0x082c…0845 at0014 = ╱45╱E╱ // 0x840 @0x14
0x082c…0845 at0015 = ╱4d╱M╱ // 0x841 @0x15
0x082c…0845 at0016 = ╱32╱2╱ // 0x842 @0x16
0x082c…0845 at0017 = ╱22╱"╱ // 0x843 @0x17
0x082c…0845 at0018 = EOL // 0x844 @0x18
0x082c…0845 }
0x0845…0862 95b9 0730 EXEC FSYSIN(K1$,T11,T12,T13)
0x0845…0862 LineComalBin {
0x0845…0862 ptr = 0x95b9 // 0x845 @0x0
0x0845…0862 lno = 0x02da // 0x847 @0x2
0x0845…0862 at0004 = ╱9d╱ EXEC ╱ // 0x849 @0x4
0x0845…0862 at0005 = ╱46╱F╱ // 0x84a @0x5
0x0845…0862 at0006 = ╱53╱S╱ // 0x84b @0x6
0x0845…0862 at0007 = ╱59╱Y╱ // 0x84c @0x7
0x0845…0862 at0008 = ╱53╱S╱ // 0x84d @0x8
0x0845…0862 at0009 = ╱49╱I╱ // 0x84e @0x9
0x0845…0862 at000a = ╱4e╱N╱ // 0x84f @0xa
0x0845…0862 at000b = ╱ed╱(╱ // 0x850 @0xb
0x0845…0862 at000c = ╱4b╱K╱ // 0x851 @0xc
0x0845…0862 at000d = ╱31╱1╱ // 0x852 @0xd
0x0845…0862 at000e = ╱ef╱$╱ // 0x853 @0xe
0x0845…0862 at000f = ╱ec╱,╱ // 0x854 @0xf
0x0845…0862 at0010 = ╱54╱T╱ // 0x855 @0x10
0x0845…0862 at0011 = ╱31╱1╱ // 0x856 @0x11
0x0845…0862 at0012 = ╱31╱1╱ // 0x857 @0x12
0x0845…0862 at0013 = ╱ec╱,╱ // 0x858 @0x13
0x0845…0862 at0014 = ╱54╱T╱ // 0x859 @0x14
0x0845…0862 at0015 = ╱31╱1╱ // 0x85a @0x15
0x0845…0862 at0016 = ╱32╱2╱ // 0x85b @0x16
0x0845…0862 at0017 = ╱ec╱,╱ // 0x85c @0x17
0x0845…0862 at0018 = ╱54╱T╱ // 0x85d @0x18
0x0845…0862 at0019 = ╱31╱1╱ // 0x85e @0x19
0x0845…0862 at001a = ╱33╱3╱ // 0x85f @0x1a
0x0845…0862 at001b = ╱ee╱)╱ // 0x860 @0x1b
0x0845…0862 at001c = EOL // 0x861 @0x1c
0x0845…0862 }
0x0862…087c 95d3 0740 K2$=N1$+"21:SYSTEM21"
0x0862…087c LineComalBin {
0x0862…087c ptr = 0x95d3 // 0x862 @0x0
0x0862…087c lno = 0x02e4 // 0x864 @0x2
0x0862…087c at0004 = ╱4b╱K╱ // 0x866 @0x4
0x0862…087c at0005 = ╱32╱2╱ // 0x867 @0x5
0x0862…087c at0006 = ╱ef╱$╱ // 0x868 @0x6
0x0862…087c at0007 = ╱dc╱=╱ // 0x869 @0x7
0x0862…087c at0008 = ╱4e╱N╱ // 0x86a @0x8
0x0862…087c at0009 = ╱31╱1╱ // 0x86b @0x9
0x0862…087c at000a = ╱ef╱$╱ // 0x86c @0xa
0x0862…087c at000b = ╱f1╱+╱ // 0x86d @0xb
0x0862…087c at000c = ╱22╱"╱ // 0x86e @0xc
0x0862…087c at000d = ╱32╱2╱ // 0x86f @0xd
0x0862…087c at000e = ╱31╱1╱ // 0x870 @0xe
0x0862…087c at000f = ╱3a╱:╱ // 0x871 @0xf
0x0862…087c at0010 = ╱53╱S╱ // 0x872 @0x10
0x0862…087c at0011 = ╱59╱Y╱ // 0x873 @0x11
0x0862…087c at0012 = ╱53╱S╱ // 0x874 @0x12
0x0862…087c at0013 = ╱54╱T╱ // 0x875 @0x13
0x0862…087c at0014 = ╱45╱E╱ // 0x876 @0x14
0x0862…087c at0015 = ╱4d╱M╱ // 0x877 @0x15
0x0862…087c at0016 = ╱32╱2╱ // 0x878 @0x16
0x0862…087c at0017 = ╱31╱1╱ // 0x879 @0x17
0x0862…087c at0018 = ╱22╱"╱ // 0x87a @0x18
0x0862…087c at0019 = EOL // 0x87b @0x19
0x0862…087c }
0x087c…0899 95f0 0750 EXEC FSYSIN(K2$,T21,T22,T23)
0x087c…0899 LineComalBin {
0x087c…0899 ptr = 0x95f0 // 0x87c @0x0
0x087c…0899 lno = 0x02ee // 0x87e @0x2
0x087c…0899 at0004 = ╱9d╱ EXEC ╱ // 0x880 @0x4
0x087c…0899 at0005 = ╱46╱F╱ // 0x881 @0x5
0x087c…0899 at0006 = ╱53╱S╱ // 0x882 @0x6
0x087c…0899 at0007 = ╱59╱Y╱ // 0x883 @0x7
0x087c…0899 at0008 = ╱53╱S╱ // 0x884 @0x8
0x087c…0899 at0009 = ╱49╱I╱ // 0x885 @0x9
0x087c…0899 at000a = ╱4e╱N╱ // 0x886 @0xa
0x087c…0899 at000b = ╱ed╱(╱ // 0x887 @0xb
0x087c…0899 at000c = ╱4b╱K╱ // 0x888 @0xc
0x087c…0899 at000d = ╱32╱2╱ // 0x889 @0xd
0x087c…0899 at000e = ╱ef╱$╱ // 0x88a @0xe
0x087c…0899 at000f = ╱ec╱,╱ // 0x88b @0xf
0x087c…0899 at0010 = ╱54╱T╱ // 0x88c @0x10
0x087c…0899 at0011 = ╱32╱2╱ // 0x88d @0x11
0x087c…0899 at0012 = ╱31╱1╱ // 0x88e @0x12
0x087c…0899 at0013 = ╱ec╱,╱ // 0x88f @0x13
0x087c…0899 at0014 = ╱54╱T╱ // 0x890 @0x14
0x087c…0899 at0015 = ╱32╱2╱ // 0x891 @0x15
0x087c…0899 at0016 = ╱32╱2╱ // 0x892 @0x16
0x087c…0899 at0017 = ╱ec╱,╱ // 0x893 @0x17
0x087c…0899 at0018 = ╱54╱T╱ // 0x894 @0x18
0x087c…0899 at0019 = ╱32╱2╱ // 0x895 @0x19
0x087c…0899 at001a = ╱33╱3╱ // 0x896 @0x1a
0x087c…0899 at001b = ╱ee╱)╱ // 0x897 @0x1b
0x087c…0899 at001c = EOL // 0x898 @0x1c
0x087c…0899 }
0x0899…08b5 960c 0760 EXEC FSORT(K4$,T11(3))
0x0899…08b5 LineComalBin {
0x0899…08b5 ptr = 0x960c // 0x899 @0x0
0x0899…08b5 lno = 0x02f8 // 0x89b @0x2
0x0899…08b5 at0004 = ╱9d╱ EXEC ╱ // 0x89d @0x4
0x0899…08b5 at0005 = ╱46╱F╱ // 0x89e @0x5
0x0899…08b5 at0006 = ╱53╱S╱ // 0x89f @0x6
0x0899…08b5 at0007 = ╱4f╱O╱ // 0x8a0 @0x7
0x0899…08b5 at0008 = ╱52╱R╱ // 0x8a1 @0x8
0x0899…08b5 at0009 = ╱54╱T╱ // 0x8a2 @0x9
0x0899…08b5 at000a = ╱ed╱(╱ // 0x8a3 @0xa
0x0899…08b5 at000b = ╱4b╱K╱ // 0x8a4 @0xb
0x0899…08b5 at000c = ╱34╱4╱ // 0x8a5 @0xc
0x0899…08b5 at000d = ╱ef╱$╱ // 0x8a6 @0xd
0x0899…08b5 at000e = ╱ec╱,╱ // 0x8a7 @0xe
0x0899…08b5 at000f = ╱54╱T╱ // 0x8a8 @0xf
0x0899…08b5 at0010 = ╱31╱1╱ // 0x8a9 @0x10
0x0899…08b5 at0011 = ╱31╱1╱ // 0x8aa @0x11
0x0899…08b5 at0012 = ╱ed╱(╱ // 0x8ab @0x12
0x0899…08b5 at0013 = ╱33╱3╱ // 0x8ac @0x13
0x0899…08b5 at0014 = ╱fe0000c002╱ // 0x8ad @0x14
0x0899…08b5 at0019 = ╱ee╱)╱ // 0x8b2 @0x19
0x0899…08b5 at001a = ╱ee╱)╱ // 0x8b3 @0x1a
0x0899…08b5 at001b = EOL // 0x8b4 @0x1b
0x0899…08b5 }
0x08b5…08ee 9645 0770 EXEC FFLET(K20$,K7$,T11(3),T21(6),T11(6))
0x08b5…08ee LineComalBin {
0x08b5…08ee ptr = 0x9645 // 0x8b5 @0x0
0x08b5…08ee lno = 0x0302 // 0x8b7 @0x2
0x08b5…08ee at0004 = ╱9d╱ EXEC ╱ // 0x8b9 @0x4
0x08b5…08ee at0005 = ╱46╱F╱ // 0x8ba @0x5
0x08b5…08ee at0006 = ╱46╱F╱ // 0x8bb @0x6
0x08b5…08ee at0007 = ╱4c╱L╱ // 0x8bc @0x7
0x08b5…08ee at0008 = ╱45╱E╱ // 0x8bd @0x8
0x08b5…08ee at0009 = ╱54╱T╱ // 0x8be @0x9
0x08b5…08ee at000a = ╱ed╱(╱ // 0x8bf @0xa
0x08b5…08ee at000b = ╱4b╱K╱ // 0x8c0 @0xb
0x08b5…08ee at000c = ╱32╱2╱ // 0x8c1 @0xc
0x08b5…08ee at000d = ╱30╱0╱ // 0x8c2 @0xd
0x08b5…08ee at000e = ╱ef╱$╱ // 0x8c3 @0xe
0x08b5…08ee at000f = ╱ec╱,╱ // 0x8c4 @0xf
0x08b5…08ee at0010 = ╱4b╱K╱ // 0x8c5 @0x10
0x08b5…08ee at0011 = ╱37╱7╱ // 0x8c6 @0x11
0x08b5…08ee at0012 = ╱ef╱$╱ // 0x8c7 @0x12
0x08b5…08ee at0013 = ╱ec╱,╱ // 0x8c8 @0x13
0x08b5…08ee at0014 = ╱54╱T╱ // 0x8c9 @0x14
0x08b5…08ee at0015 = ╱31╱1╱ // 0x8ca @0x15
0x08b5…08ee at0016 = ╱31╱1╱ // 0x8cb @0x16
0x08b5…08ee at0017 = ╱ed╱(╱ // 0x8cc @0x17
0x08b5…08ee at0018 = ╱33╱3╱ // 0x8cd @0x18
0x08b5…08ee at0019 = ╱fe0000c002╱ // 0x8ce @0x19
0x08b5…08ee at001e = ╱ee╱)╱ // 0x8d3 @0x1e
0x08b5…08ee at001f = ╱ec╱,╱ // 0x8d4 @0x1f
0x08b5…08ee at0020 = ╱54╱T╱ // 0x8d5 @0x20
0x08b5…08ee at0021 = ╱32╱2╱ // 0x8d6 @0x21
0x08b5…08ee at0022 = ╱31╱1╱ // 0x8d7 @0x22
0x08b5…08ee at0023 = ╱ed╱(╱ // 0x8d8 @0x23
0x08b5…08ee at0024 = ╱36╱6╱ // 0x8d9 @0x24
0x08b5…08ee at0025 = ╱fe0000c003╱ // 0x8da @0x25
0x08b5…08ee at002a = ╱ee╱)╱ // 0x8df @0x2a
0x08b5…08ee at002b = ╱ec╱,╱ // 0x8e0 @0x2b
0x08b5…08ee at002c = ╱54╱T╱ // 0x8e1 @0x2c
0x08b5…08ee at002d = ╱31╱1╱ // 0x8e2 @0x2d
0x08b5…08ee at002e = ╱31╱1╱ // 0x8e3 @0x2e
0x08b5…08ee at002f = ╱ed╱(╱ // 0x8e4 @0x2f
0x08b5…08ee at0030 = ╱36╱6╱ // 0x8e5 @0x30
0x08b5…08ee at0031 = ╱fe0000c003╱ // 0x8e6 @0x31
0x08b5…08ee at0036 = ╱ee╱)╱ // 0x8eb @0x36
0x08b5…08ee at0037 = ╱ee╱)╱ // 0x8ec @0x37
0x08b5…08ee at0038 = EOL // 0x8ed @0x38
0x08b5…08ee }
0x08ee…08f4 964b 0780 CLEAR
0x08ee…08f4 LineComalBin {
0x08ee…08f4 ptr = 0x964b // 0x8ee @0x0
0x08ee…08f4 lno = 0x030c // 0x8f0 @0x2
0x08ee…08f4 at0004 = ╱a0╱ CLEAR ╱ // 0x8f2 @0x4
0x08ee…08f4 at0005 = EOL // 0x8f3 @0x5
0x08ee…08f4 }
0x08f4…0909 9660 0790 CURSOR 10,11
0x08f4…0909 LineComalBin {
0x08f4…0909 ptr = 0x9660 // 0x8f4 @0x0
0x08f4…0909 lno = 0x0316 // 0x8f6 @0x2
0x08f4…0909 at0004 = ╱a1╱ CURSOR ╱ // 0x8f8 @0x4
0x08f4…0909 at0005 = ╱31╱1╱ // 0x8f9 @0x5
0x08f4…0909 at0006 = ╱30╱0╱ // 0x8fa @0x6
0x08f4…0909 at0007 = ╱fe0000a004╱ // 0x8fb @0x7
0x08f4…0909 at000c = ╱ec╱,╱ // 0x900 @0xc
0x08f4…0909 at000d = ╱31╱1╱ // 0x901 @0xd
0x08f4…0909 at000e = ╱31╱1╱ // 0x902 @0xe
0x08f4…0909 at000f = ╱fe0000b004╱ // 0x903 @0xf
0x08f4…0909 at0014 = EOL // 0x908 @0x14
0x08f4…0909 }
0x0909…091d 9674 0795 T35=T11(6)
0x0909…091d LineComalBin {
0x0909…091d ptr = 0x9674 // 0x909 @0x0
0x0909…091d lno = 0x031b // 0x90b @0x2
0x0909…091d at0004 = ╱54╱T╱ // 0x90d @0x4
0x0909…091d at0005 = ╱33╱3╱ // 0x90e @0x5
0x0909…091d at0006 = ╱35╱5╱ // 0x90f @0x6
0x0909…091d at0007 = ╱dc╱=╱ // 0x910 @0x7
0x0909…091d at0008 = ╱54╱T╱ // 0x911 @0x8
0x0909…091d at0009 = ╱31╱1╱ // 0x912 @0x9
0x0909…091d at000a = ╱31╱1╱ // 0x913 @0xa
0x0909…091d at000b = ╱ed╱(╱ // 0x914 @0xb
0x0909…091d at000c = ╱36╱6╱ // 0x915 @0xc
0x0909…091d at000d = ╱fe0000c003╱ // 0x916 @0xd
0x0909…091d at0012 = ╱ee╱)╱ // 0x91b @0x12
0x0909…091d at0013 = EOL // 0x91c @0x13
0x0909…091d }
0x091d…095e 96b5 0800 PRINT USING "Antal debitorposteringer :###### Max:######":T35,MDPOST
0x091d…095e LineComalBin {
0x091d…095e ptr = 0x96b5 // 0x91d @0x0
0x091d…095e lno = 0x0320 // 0x91f @0x2
0x091d…095e at0004 = ╱92╱ PRINT ╱ // 0x921 @0x4
0x091d…095e at0005 = ╱b9╱ USING ╱ // 0x922 @0x5
0x091d…095e at0006 = ╱22╱"╱ // 0x923 @0x6
0x091d…095e at0007 = ╱41╱A╱ // 0x924 @0x7
0x091d…095e at0008 = ╱6e╱n╱ // 0x925 @0x8
0x091d…095e at0009 = ╱74╱t╱ // 0x926 @0x9
0x091d…095e at000a = ╱61╱a╱ // 0x927 @0xa
0x091d…095e at000b = ╱6c╱l╱ // 0x928 @0xb
0x091d…095e at000c = ╱20╱…╱ // 0x929 @0xc
0x091d…095e at000d = ╱64╱d╱ // 0x92a @0xd
0x091d…095e at000e = ╱65╱e╱ // 0x92b @0xe
0x091d…095e at000f = ╱62╱b╱ // 0x92c @0xf
0x091d…095e at0010 = ╱69╱i╱ // 0x92d @0x10
0x091d…095e at0011 = ╱74╱t╱ // 0x92e @0x11
0x091d…095e at0012 = ╱6f╱o╱ // 0x92f @0x12
0x091d…095e at0013 = ╱72╱r╱ // 0x930 @0x13
0x091d…095e at0014 = ╱70╱p╱ // 0x931 @0x14
0x091d…095e at0015 = ╱6f╱o╱ // 0x932 @0x15
0x091d…095e at0016 = ╱73╱s╱ // 0x933 @0x16
0x091d…095e at0017 = ╱74╱t╱ // 0x934 @0x17
0x091d…095e at0018 = ╱65╱e╱ // 0x935 @0x18
0x091d…095e at0019 = ╱72╱r╱ // 0x936 @0x19
0x091d…095e at001a = ╱69╱i╱ // 0x937 @0x1a
0x091d…095e at001b = ╱6e╱n╱ // 0x938 @0x1b
0x091d…095e at001c = ╱67╱g╱ // 0x939 @0x1c
0x091d…095e at001d = ╱65╱e╱ // 0x93a @0x1d
0x091d…095e at001e = ╱72╱r╱ // 0x93b @0x1e
0x091d…095e at001f = ╱20╱…╱ // 0x93c @0x1f
0x091d…095e at0020 = ╱20╱…╱ // 0x93d @0x20
0x091d…095e at0021 = ╱20╱…╱ // 0x93e @0x21
0x091d…095e at0022 = ╱3a╱:╱ // 0x93f @0x22
0x091d…095e at0023 = ╱23╱#╱ // 0x940 @0x23
0x091d…095e at0024 = ╱23╱#╱ // 0x941 @0x24
0x091d…095e at0025 = ╱23╱#╱ // 0x942 @0x25
0x091d…095e at0026 = ╱23╱#╱ // 0x943 @0x26
0x091d…095e at0027 = ╱23╱#╱ // 0x944 @0x27
0x091d…095e at0028 = ╱23╱#╱ // 0x945 @0x28
0x091d…095e at0029 = ╱20╱…╱ // 0x946 @0x29
0x091d…095e at002a = ╱4d╱M╱ // 0x947 @0x2a
0x091d…095e at002b = ╱61╱a╱ // 0x948 @0x2b
0x091d…095e at002c = ╱78╱x╱ // 0x949 @0x2c
0x091d…095e at002d = ╱3a╱:╱ // 0x94a @0x2d
0x091d…095e at002e = ╱23╱#╱ // 0x94b @0x2e
0x091d…095e at002f = ╱23╱#╱ // 0x94c @0x2f
0x091d…095e at0030 = ╱23╱#╱ // 0x94d @0x30
0x091d…095e at0031 = ╱23╱#╱ // 0x94e @0x31
0x091d…095e at0032 = ╱23╱#╱ // 0x94f @0x32
0x091d…095e at0033 = ╱23╱#╱ // 0x950 @0x33
0x091d…095e at0034 = ╱22╱"╱ // 0x951 @0x34
0x091d…095e at0035 = ╱f0╱:╱ // 0x952 @0x35
0x091d…095e at0036 = ╱54╱T╱ // 0x953 @0x36
0x091d…095e at0037 = ╱33╱3╱ // 0x954 @0x37
0x091d…095e at0038 = ╱35╱5╱ // 0x955 @0x38
0x091d…095e at0039 = ╱ec╱,╱ // 0x956 @0x39
0x091d…095e at003a = ╱4d╱M╱ // 0x957 @0x3a
0x091d…095e at003b = ╱44╱D╱ // 0x958 @0x3b
0x091d…095e at003c = ╱50╱P╱ // 0x959 @0x3c
0x091d…095e at003d = ╱4f╱O╱ // 0x95a @0x3d
0x091d…095e at003e = ╱53╱S╱ // 0x95b @0x3e
0x091d…095e at003f = ╱54╱T╱ // 0x95c @0x3f
0x091d…095e at0040 = EOL // 0x95d @0x40
0x091d…095e }
0x095e…097b 96d2 0810 EXEC FSYSUD(K1$,T11,T12,T13)
0x095e…097b LineComalBin {
0x095e…097b ptr = 0x96d2 // 0x95e @0x0
0x095e…097b lno = 0x032a // 0x960 @0x2
0x095e…097b at0004 = ╱9d╱ EXEC ╱ // 0x962 @0x4
0x095e…097b at0005 = ╱46╱F╱ // 0x963 @0x5
0x095e…097b at0006 = ╱53╱S╱ // 0x964 @0x6
0x095e…097b at0007 = ╱59╱Y╱ // 0x965 @0x7
0x095e…097b at0008 = ╱53╱S╱ // 0x966 @0x8
0x095e…097b at0009 = ╱55╱U╱ // 0x967 @0x9
0x095e…097b at000a = ╱44╱D╱ // 0x968 @0xa
0x095e…097b at000b = ╱ed╱(╱ // 0x969 @0xb
0x095e…097b at000c = ╱4b╱K╱ // 0x96a @0xc
0x095e…097b at000d = ╱31╱1╱ // 0x96b @0xd
0x095e…097b at000e = ╱ef╱$╱ // 0x96c @0xe
0x095e…097b at000f = ╱ec╱,╱ // 0x96d @0xf
0x095e…097b at0010 = ╱54╱T╱ // 0x96e @0x10
0x095e…097b at0011 = ╱31╱1╱ // 0x96f @0x11
0x095e…097b at0012 = ╱31╱1╱ // 0x970 @0x12
0x095e…097b at0013 = ╱ec╱,╱ // 0x971 @0x13
0x095e…097b at0014 = ╱54╱T╱ // 0x972 @0x14
0x095e…097b at0015 = ╱31╱1╱ // 0x973 @0x15
0x095e…097b at0016 = ╱32╱2╱ // 0x974 @0x16
0x095e…097b at0017 = ╱ec╱,╱ // 0x975 @0x17
0x095e…097b at0018 = ╱54╱T╱ // 0x976 @0x18
0x095e…097b at0019 = ╱31╱1╱ // 0x977 @0x19
0x095e…097b at001a = ╱33╱3╱ // 0x978 @0x1a
0x095e…097b at001b = ╱ee╱)╱ // 0x979 @0x1b
0x095e…097b at001c = EOL // 0x97a @0x1c
0x095e…097b }
0x097b…09a5 96fc 0820 EXEC TABINIT(K7$,K10$,MDPOST,HDTAB,UDTAB)
0x097b…09a5 LineComalBin {
0x097b…09a5 ptr = 0x96fc // 0x97b @0x0
0x097b…09a5 lno = 0x0334 // 0x97d @0x2
0x097b…09a5 at0004 = ╱9d╱ EXEC ╱ // 0x97f @0x4
0x097b…09a5 at0005 = ╱54╱T╱ // 0x980 @0x5
0x097b…09a5 at0006 = ╱41╱A╱ // 0x981 @0x6
0x097b…09a5 at0007 = ╱42╱B╱ // 0x982 @0x7
0x097b…09a5 at0008 = ╱49╱I╱ // 0x983 @0x8
0x097b…09a5 at0009 = ╱4e╱N╱ // 0x984 @0x9
0x097b…09a5 at000a = ╱49╱I╱ // 0x985 @0xa
0x097b…09a5 at000b = ╱54╱T╱ // 0x986 @0xb
0x097b…09a5 at000c = ╱ed╱(╱ // 0x987 @0xc
0x097b…09a5 at000d = ╱4b╱K╱ // 0x988 @0xd
0x097b…09a5 at000e = ╱37╱7╱ // 0x989 @0xe
0x097b…09a5 at000f = ╱ef╱$╱ // 0x98a @0xf
0x097b…09a5 at0010 = ╱ec╱,╱ // 0x98b @0x10
0x097b…09a5 at0011 = ╱4b╱K╱ // 0x98c @0x11
0x097b…09a5 at0012 = ╱31╱1╱ // 0x98d @0x12
0x097b…09a5 at0013 = ╱30╱0╱ // 0x98e @0x13
0x097b…09a5 at0014 = ╱ef╱$╱ // 0x98f @0x14
0x097b…09a5 at0015 = ╱ec╱,╱ // 0x990 @0x15
0x097b…09a5 at0016 = ╱4d╱M╱ // 0x991 @0x16
0x097b…09a5 at0017 = ╱44╱D╱ // 0x992 @0x17
0x097b…09a5 at0018 = ╱50╱P╱ // 0x993 @0x18
0x097b…09a5 at0019 = ╱4f╱O╱ // 0x994 @0x19
0x097b…09a5 at001a = ╱53╱S╱ // 0x995 @0x1a
0x097b…09a5 at001b = ╱54╱T╱ // 0x996 @0x1b
0x097b…09a5 at001c = ╱ec╱,╱ // 0x997 @0x1c
0x097b…09a5 at001d = ╱48╱H╱ // 0x998 @0x1d
0x097b…09a5 at001e = ╱44╱D╱ // 0x999 @0x1e
0x097b…09a5 at001f = ╱54╱T╱ // 0x99a @0x1f
0x097b…09a5 at0020 = ╱41╱A╱ // 0x99b @0x20
0x097b…09a5 at0021 = ╱42╱B╱ // 0x99c @0x21
0x097b…09a5 at0022 = ╱ec╱,╱ // 0x99d @0x22
0x097b…09a5 at0023 = ╱55╱U╱ // 0x99e @0x23
0x097b…09a5 at0024 = ╱44╱D╱ // 0x99f @0x24
0x097b…09a5 at0025 = ╱54╱T╱ // 0x9a0 @0x25
0x097b…09a5 at0026 = ╱41╱A╱ // 0x9a1 @0x26
0x097b…09a5 at0027 = ╱42╱B╱ // 0x9a2 @0x27
0x097b…09a5 at0028 = ╱ee╱)╱ // 0x9a3 @0x28
0x097b…09a5 at0029 = EOL // 0x9a4 @0x29
0x097b…09a5 }
0x09a5…09c1 9718 0830 EXEC FSORT(K3$,T11(2))
0x09a5…09c1 LineComalBin {
0x09a5…09c1 ptr = 0x9718 // 0x9a5 @0x0
0x09a5…09c1 lno = 0x033e // 0x9a7 @0x2
0x09a5…09c1 at0004 = ╱9d╱ EXEC ╱ // 0x9a9 @0x4
0x09a5…09c1 at0005 = ╱46╱F╱ // 0x9aa @0x5
0x09a5…09c1 at0006 = ╱53╱S╱ // 0x9ab @0x6
0x09a5…09c1 at0007 = ╱4f╱O╱ // 0x9ac @0x7
0x09a5…09c1 at0008 = ╱52╱R╱ // 0x9ad @0x8
0x09a5…09c1 at0009 = ╱54╱T╱ // 0x9ae @0x9
0x09a5…09c1 at000a = ╱ed╱(╱ // 0x9af @0xa
0x09a5…09c1 at000b = ╱4b╱K╱ // 0x9b0 @0xb
0x09a5…09c1 at000c = ╱33╱3╱ // 0x9b1 @0xc
0x09a5…09c1 at000d = ╱ef╱$╱ // 0x9b2 @0xd
0x09a5…09c1 at000e = ╱ec╱,╱ // 0x9b3 @0xe
0x09a5…09c1 at000f = ╱54╱T╱ // 0x9b4 @0xf
0x09a5…09c1 at0010 = ╱31╱1╱ // 0x9b5 @0x10
0x09a5…09c1 at0011 = ╱31╱1╱ // 0x9b6 @0x11
0x09a5…09c1 at0012 = ╱ed╱(╱ // 0x9b7 @0x12
0x09a5…09c1 at0013 = ╱32╱2╱ // 0x9b8 @0x13
0x09a5…09c1 at0014 = ╱fe00008002╱ // 0x9b9 @0x14
0x09a5…09c1 at0019 = ╱ee╱)╱ // 0x9be @0x19
0x09a5…09c1 at001a = ╱ee╱)╱ // 0x9bf @0x1a
0x09a5…09c1 at001b = EOL // 0x9c0 @0x1b
0x09a5…09c1 }
0x09c1…09fa 9751 0840 EXEC FFLET(K21$,K6$,T11(2),T21(5),T11(5))
0x09c1…09fa LineComalBin {
0x09c1…09fa ptr = 0x9751 // 0x9c1 @0x0
0x09c1…09fa lno = 0x0348 // 0x9c3 @0x2
0x09c1…09fa at0004 = ╱9d╱ EXEC ╱ // 0x9c5 @0x4
0x09c1…09fa at0005 = ╱46╱F╱ // 0x9c6 @0x5
0x09c1…09fa at0006 = ╱46╱F╱ // 0x9c7 @0x6
0x09c1…09fa at0007 = ╱4c╱L╱ // 0x9c8 @0x7
0x09c1…09fa at0008 = ╱45╱E╱ // 0x9c9 @0x8
0x09c1…09fa at0009 = ╱54╱T╱ // 0x9ca @0x9
0x09c1…09fa at000a = ╱ed╱(╱ // 0x9cb @0xa
0x09c1…09fa at000b = ╱4b╱K╱ // 0x9cc @0xb
0x09c1…09fa at000c = ╱32╱2╱ // 0x9cd @0xc
0x09c1…09fa at000d = ╱31╱1╱ // 0x9ce @0xd
0x09c1…09fa at000e = ╱ef╱$╱ // 0x9cf @0xe
0x09c1…09fa at000f = ╱ec╱,╱ // 0x9d0 @0xf
0x09c1…09fa at0010 = ╱4b╱K╱ // 0x9d1 @0x10
0x09c1…09fa at0011 = ╱36╱6╱ // 0x9d2 @0x11
0x09c1…09fa at0012 = ╱ef╱$╱ // 0x9d3 @0x12
0x09c1…09fa at0013 = ╱ec╱,╱ // 0x9d4 @0x13
0x09c1…09fa at0014 = ╱54╱T╱ // 0x9d5 @0x14
0x09c1…09fa at0015 = ╱31╱1╱ // 0x9d6 @0x15
0x09c1…09fa at0016 = ╱31╱1╱ // 0x9d7 @0x16
0x09c1…09fa at0017 = ╱ed╱(╱ // 0x9d8 @0x17
0x09c1…09fa at0018 = ╱32╱2╱ // 0x9d9 @0x18
0x09c1…09fa at0019 = ╱fe00008002╱ // 0x9da @0x19
0x09c1…09fa at001e = ╱ee╱)╱ // 0x9df @0x1e
0x09c1…09fa at001f = ╱ec╱,╱ // 0x9e0 @0x1f
0x09c1…09fa at0020 = ╱54╱T╱ // 0x9e1 @0x20
0x09c1…09fa at0021 = ╱32╱2╱ // 0x9e2 @0x21
0x09c1…09fa at0022 = ╱31╱1╱ // 0x9e3 @0x22
0x09c1…09fa at0023 = ╱ed╱(╱ // 0x9e4 @0x23
0x09c1…09fa at0024 = ╱35╱5╱ // 0x9e5 @0x24
0x09c1…09fa at0025 = ╱fe0000a003╱ // 0x9e6 @0x25
0x09c1…09fa at002a = ╱ee╱)╱ // 0x9eb @0x2a
0x09c1…09fa at002b = ╱ec╱,╱ // 0x9ec @0x2b
0x09c1…09fa at002c = ╱54╱T╱ // 0x9ed @0x2c
0x09c1…09fa at002d = ╱31╱1╱ // 0x9ee @0x2d
0x09c1…09fa at002e = ╱31╱1╱ // 0x9ef @0x2e
0x09c1…09fa at002f = ╱ed╱(╱ // 0x9f0 @0x2f
0x09c1…09fa at0030 = ╱35╱5╱ // 0x9f1 @0x30
0x09c1…09fa at0031 = ╱fe0000a003╱ // 0x9f2 @0x31
0x09c1…09fa at0036 = ╱ee╱)╱ // 0x9f7 @0x36
0x09c1…09fa at0037 = ╱ee╱)╱ // 0x9f8 @0x37
0x09c1…09fa at0038 = EOL // 0x9f9 @0x38
0x09c1…09fa }
0x09fa…0a0f 9766 0850 CURSOR 10,13
0x09fa…0a0f LineComalBin {
0x09fa…0a0f ptr = 0x9766 // 0x9fa @0x0
0x09fa…0a0f lno = 0x0352 // 0x9fc @0x2
0x09fa…0a0f at0004 = ╱a1╱ CURSOR ╱ // 0x9fe @0x4
0x09fa…0a0f at0005 = ╱31╱1╱ // 0x9ff @0x5
0x09fa…0a0f at0006 = ╱30╱0╱ // 0xa00 @0x6
0x09fa…0a0f at0007 = ╱fe0000a004╱ // 0xa01 @0x7
0x09fa…0a0f at000c = ╱ec╱,╱ // 0xa06 @0xc
0x09fa…0a0f at000d = ╱31╱1╱ // 0xa07 @0xd
0x09fa…0a0f at000e = ╱33╱3╱ // 0xa08 @0xe
0x09fa…0a0f at000f = ╱fe0000d004╱ // 0xa09 @0xf
0x09fa…0a0f at0014 = EOL // 0xa0e @0x14
0x09fa…0a0f }
0x0a0f…0a23 977a 0855 T40=T11(5)
0x0a0f…0a23 LineComalBin {
0x0a0f…0a23 ptr = 0x977a // 0xa0f @0x0
0x0a0f…0a23 lno = 0x0357 // 0xa11 @0x2
0x0a0f…0a23 at0004 = ╱54╱T╱ // 0xa13 @0x4
0x0a0f…0a23 at0005 = ╱34╱4╱ // 0xa14 @0x5
0x0a0f…0a23 at0006 = ╱30╱0╱ // 0xa15 @0x6
0x0a0f…0a23 at0007 = ╱dc╱=╱ // 0xa16 @0x7
0x0a0f…0a23 at0008 = ╱54╱T╱ // 0xa17 @0x8
0x0a0f…0a23 at0009 = ╱31╱1╱ // 0xa18 @0x9
0x0a0f…0a23 at000a = ╱31╱1╱ // 0xa19 @0xa
0x0a0f…0a23 at000b = ╱ed╱(╱ // 0xa1a @0xb
0x0a0f…0a23 at000c = ╱35╱5╱ // 0xa1b @0xc
0x0a0f…0a23 at000d = ╱fe0000a003╱ // 0xa1c @0xd
0x0a0f…0a23 at0012 = ╱ee╱)╱ // 0xa21 @0x12
0x0a0f…0a23 at0013 = EOL // 0xa22 @0x13
0x0a0f…0a23 }
0x0a23…0a64 97bb 0860 PRINT USING "Antal finansposteringer :###### Max:######":T40,MFPOST
0x0a23…0a64 LineComalBin {
0x0a23…0a64 ptr = 0x97bb // 0xa23 @0x0
0x0a23…0a64 lno = 0x035c // 0xa25 @0x2
0x0a23…0a64 at0004 = ╱92╱ PRINT ╱ // 0xa27 @0x4
0x0a23…0a64 at0005 = ╱b9╱ USING ╱ // 0xa28 @0x5
0x0a23…0a64 at0006 = ╱22╱"╱ // 0xa29 @0x6
0x0a23…0a64 at0007 = ╱41╱A╱ // 0xa2a @0x7
0x0a23…0a64 at0008 = ╱6e╱n╱ // 0xa2b @0x8
0x0a23…0a64 at0009 = ╱74╱t╱ // 0xa2c @0x9
0x0a23…0a64 at000a = ╱61╱a╱ // 0xa2d @0xa
0x0a23…0a64 at000b = ╱6c╱l╱ // 0xa2e @0xb
0x0a23…0a64 at000c = ╱20╱…╱ // 0xa2f @0xc
0x0a23…0a64 at000d = ╱66╱f╱ // 0xa30 @0xd
0x0a23…0a64 at000e = ╱69╱i╱ // 0xa31 @0xe
0x0a23…0a64 at000f = ╱6e╱n╱ // 0xa32 @0xf
0x0a23…0a64 at0010 = ╱61╱a╱ // 0xa33 @0x10
0x0a23…0a64 at0011 = ╱6e╱n╱ // 0xa34 @0x11
0x0a23…0a64 at0012 = ╱73╱s╱ // 0xa35 @0x12
0x0a23…0a64 at0013 = ╱70╱p╱ // 0xa36 @0x13
0x0a23…0a64 at0014 = ╱6f╱o╱ // 0xa37 @0x14
0x0a23…0a64 at0015 = ╱73╱s╱ // 0xa38 @0x15
0x0a23…0a64 at0016 = ╱74╱t╱ // 0xa39 @0x16
0x0a23…0a64 at0017 = ╱65╱e╱ // 0xa3a @0x17
0x0a23…0a64 at0018 = ╱72╱r╱ // 0xa3b @0x18
0x0a23…0a64 at0019 = ╱69╱i╱ // 0xa3c @0x19
0x0a23…0a64 at001a = ╱6e╱n╱ // 0xa3d @0x1a
0x0a23…0a64 at001b = ╱67╱g╱ // 0xa3e @0x1b
0x0a23…0a64 at001c = ╱65╱e╱ // 0xa3f @0x1c
0x0a23…0a64 at001d = ╱72╱r╱ // 0xa40 @0x1d
0x0a23…0a64 at001e = ╱20╱…╱ // 0xa41 @0x1e
0x0a23…0a64 at001f = ╱20╱…╱ // 0xa42 @0x1f
0x0a23…0a64 at0020 = ╱20╱…╱ // 0xa43 @0x20
0x0a23…0a64 at0021 = ╱20╱…╱ // 0xa44 @0x21
0x0a23…0a64 at0022 = ╱3a╱:╱ // 0xa45 @0x22
0x0a23…0a64 at0023 = ╱23╱#╱ // 0xa46 @0x23
0x0a23…0a64 at0024 = ╱23╱#╱ // 0xa47 @0x24
0x0a23…0a64 at0025 = ╱23╱#╱ // 0xa48 @0x25
0x0a23…0a64 at0026 = ╱23╱#╱ // 0xa49 @0x26
0x0a23…0a64 at0027 = ╱23╱#╱ // 0xa4a @0x27
0x0a23…0a64 at0028 = ╱23╱#╱ // 0xa4b @0x28
0x0a23…0a64 at0029 = ╱20╱…╱ // 0xa4c @0x29
0x0a23…0a64 at002a = ╱4d╱M╱ // 0xa4d @0x2a
0x0a23…0a64 at002b = ╱61╱a╱ // 0xa4e @0x2b
0x0a23…0a64 at002c = ╱78╱x╱ // 0xa4f @0x2c
0x0a23…0a64 at002d = ╱3a╱:╱ // 0xa50 @0x2d
0x0a23…0a64 at002e = ╱23╱#╱ // 0xa51 @0x2e
0x0a23…0a64 at002f = ╱23╱#╱ // 0xa52 @0x2f
0x0a23…0a64 at0030 = ╱23╱#╱ // 0xa53 @0x30
0x0a23…0a64 at0031 = ╱23╱#╱ // 0xa54 @0x31
0x0a23…0a64 at0032 = ╱23╱#╱ // 0xa55 @0x32
0x0a23…0a64 at0033 = ╱23╱#╱ // 0xa56 @0x33
0x0a23…0a64 at0034 = ╱22╱"╱ // 0xa57 @0x34
0x0a23…0a64 at0035 = ╱f0╱:╱ // 0xa58 @0x35
0x0a23…0a64 at0036 = ╱54╱T╱ // 0xa59 @0x36
0x0a23…0a64 at0037 = ╱34╱4╱ // 0xa5a @0x37
0x0a23…0a64 at0038 = ╱30╱0╱ // 0xa5b @0x38
0x0a23…0a64 at0039 = ╱ec╱,╱ // 0xa5c @0x39
0x0a23…0a64 at003a = ╱4d╱M╱ // 0xa5d @0x3a
0x0a23…0a64 at003b = ╱46╱F╱ // 0xa5e @0x3b
0x0a23…0a64 at003c = ╱50╱P╱ // 0xa5f @0x3c
0x0a23…0a64 at003d = ╱4f╱O╱ // 0xa60 @0x3d
0x0a23…0a64 at003e = ╱53╱S╱ // 0xa61 @0x3e
0x0a23…0a64 at003f = ╱54╱T╱ // 0xa62 @0x3f
0x0a23…0a64 at0040 = EOL // 0xa63 @0x40
0x0a23…0a64 }
0x0a64…0a81 97d8 0870 EXEC FSYSUD(K1$,T11,T12,T13)
0x0a64…0a81 LineComalBin {
0x0a64…0a81 ptr = 0x97d8 // 0xa64 @0x0
0x0a64…0a81 lno = 0x0366 // 0xa66 @0x2
0x0a64…0a81 at0004 = ╱9d╱ EXEC ╱ // 0xa68 @0x4
0x0a64…0a81 at0005 = ╱46╱F╱ // 0xa69 @0x5
0x0a64…0a81 at0006 = ╱53╱S╱ // 0xa6a @0x6
0x0a64…0a81 at0007 = ╱59╱Y╱ // 0xa6b @0x7
0x0a64…0a81 at0008 = ╱53╱S╱ // 0xa6c @0x8
0x0a64…0a81 at0009 = ╱55╱U╱ // 0xa6d @0x9
0x0a64…0a81 at000a = ╱44╱D╱ // 0xa6e @0xa
0x0a64…0a81 at000b = ╱ed╱(╱ // 0xa6f @0xb
0x0a64…0a81 at000c = ╱4b╱K╱ // 0xa70 @0xc
0x0a64…0a81 at000d = ╱31╱1╱ // 0xa71 @0xd
0x0a64…0a81 at000e = ╱ef╱$╱ // 0xa72 @0xe
0x0a64…0a81 at000f = ╱ec╱,╱ // 0xa73 @0xf
0x0a64…0a81 at0010 = ╱54╱T╱ // 0xa74 @0x10
0x0a64…0a81 at0011 = ╱31╱1╱ // 0xa75 @0x11
0x0a64…0a81 at0012 = ╱31╱1╱ // 0xa76 @0x12
0x0a64…0a81 at0013 = ╱ec╱,╱ // 0xa77 @0x13
0x0a64…0a81 at0014 = ╱54╱T╱ // 0xa78 @0x14
0x0a64…0a81 at0015 = ╱31╱1╱ // 0xa79 @0x15
0x0a64…0a81 at0016 = ╱32╱2╱ // 0xa7a @0x16
0x0a64…0a81 at0017 = ╱ec╱,╱ // 0xa7b @0x17
0x0a64…0a81 at0018 = ╱54╱T╱ // 0xa7c @0x18
0x0a64…0a81 at0019 = ╱31╱1╱ // 0xa7d @0x19
0x0a64…0a81 at001a = ╱33╱3╱ // 0xa7e @0x1a
0x0a64…0a81 at001b = ╱ee╱)╱ // 0xa7f @0x1b
0x0a64…0a81 at001c = EOL // 0xa80 @0x1c
0x0a64…0a81 }
0x0a81…0aaa 9801 0880 EXEC TABINIT(K6$,K9$,MFPOST,HDTAB,UDTAB)
0x0a81…0aaa LineComalBin {
0x0a81…0aaa ptr = 0x9801 // 0xa81 @0x0
0x0a81…0aaa lno = 0x0370 // 0xa83 @0x2
0x0a81…0aaa at0004 = ╱9d╱ EXEC ╱ // 0xa85 @0x4
0x0a81…0aaa at0005 = ╱54╱T╱ // 0xa86 @0x5
0x0a81…0aaa at0006 = ╱41╱A╱ // 0xa87 @0x6
0x0a81…0aaa at0007 = ╱42╱B╱ // 0xa88 @0x7
0x0a81…0aaa at0008 = ╱49╱I╱ // 0xa89 @0x8
0x0a81…0aaa at0009 = ╱4e╱N╱ // 0xa8a @0x9
0x0a81…0aaa at000a = ╱49╱I╱ // 0xa8b @0xa
0x0a81…0aaa at000b = ╱54╱T╱ // 0xa8c @0xb
0x0a81…0aaa at000c = ╱ed╱(╱ // 0xa8d @0xc
0x0a81…0aaa at000d = ╱4b╱K╱ // 0xa8e @0xd
0x0a81…0aaa at000e = ╱36╱6╱ // 0xa8f @0xe
0x0a81…0aaa at000f = ╱ef╱$╱ // 0xa90 @0xf
0x0a81…0aaa at0010 = ╱ec╱,╱ // 0xa91 @0x10
0x0a81…0aaa at0011 = ╱4b╱K╱ // 0xa92 @0x11
0x0a81…0aaa at0012 = ╱39╱9╱ // 0xa93 @0x12
0x0a81…0aaa at0013 = ╱ef╱$╱ // 0xa94 @0x13
0x0a81…0aaa at0014 = ╱ec╱,╱ // 0xa95 @0x14
0x0a81…0aaa at0015 = ╱4d╱M╱ // 0xa96 @0x15
0x0a81…0aaa at0016 = ╱46╱F╱ // 0xa97 @0x16
0x0a81…0aaa at0017 = ╱50╱P╱ // 0xa98 @0x17
0x0a81…0aaa at0018 = ╱4f╱O╱ // 0xa99 @0x18
0x0a81…0aaa at0019 = ╱53╱S╱ // 0xa9a @0x19
0x0a81…0aaa at001a = ╱54╱T╱ // 0xa9b @0x1a
0x0a81…0aaa at001b = ╱ec╱,╱ // 0xa9c @0x1b
0x0a81…0aaa at001c = ╱48╱H╱ // 0xa9d @0x1c
0x0a81…0aaa at001d = ╱44╱D╱ // 0xa9e @0x1d
0x0a81…0aaa at001e = ╱54╱T╱ // 0xa9f @0x1e
0x0a81…0aaa at001f = ╱41╱A╱ // 0xaa0 @0x1f
0x0a81…0aaa at0020 = ╱42╱B╱ // 0xaa1 @0x20
0x0a81…0aaa at0021 = ╱ec╱,╱ // 0xaa2 @0x21
0x0a81…0aaa at0022 = ╱55╱U╱ // 0xaa3 @0x22
0x0a81…0aaa at0023 = ╱44╱D╱ // 0xaa4 @0x23
0x0a81…0aaa at0024 = ╱54╱T╱ // 0xaa5 @0x24
0x0a81…0aaa at0025 = ╱41╱A╱ // 0xaa6 @0x25
0x0a81…0aaa at0026 = ╱42╱B╱ // 0xaa7 @0x26
0x0a81…0aaa at0027 = ╱ee╱)╱ // 0xaa8 @0x27
0x0a81…0aaa at0028 = EOL // 0xaa9 @0x28
0x0a81…0aaa }
0x0aaa…0ac6 981d 0890 EXEC FSORT(K5$,T11(4))
0x0aaa…0ac6 LineComalBin {
0x0aaa…0ac6 ptr = 0x981d // 0xaaa @0x0
0x0aaa…0ac6 lno = 0x037a // 0xaac @0x2
0x0aaa…0ac6 at0004 = ╱9d╱ EXEC ╱ // 0xaae @0x4
0x0aaa…0ac6 at0005 = ╱46╱F╱ // 0xaaf @0x5
0x0aaa…0ac6 at0006 = ╱53╱S╱ // 0xab0 @0x6
0x0aaa…0ac6 at0007 = ╱4f╱O╱ // 0xab1 @0x7
0x0aaa…0ac6 at0008 = ╱52╱R╱ // 0xab2 @0x8
0x0aaa…0ac6 at0009 = ╱54╱T╱ // 0xab3 @0x9
0x0aaa…0ac6 at000a = ╱ed╱(╱ // 0xab4 @0xa
0x0aaa…0ac6 at000b = ╱4b╱K╱ // 0xab5 @0xb
0x0aaa…0ac6 at000c = ╱35╱5╱ // 0xab6 @0xc
0x0aaa…0ac6 at000d = ╱ef╱$╱ // 0xab7 @0xd
0x0aaa…0ac6 at000e = ╱ec╱,╱ // 0xab8 @0xe
0x0aaa…0ac6 at000f = ╱54╱T╱ // 0xab9 @0xf
0x0aaa…0ac6 at0010 = ╱31╱1╱ // 0xaba @0x10
0x0aaa…0ac6 at0011 = ╱31╱1╱ // 0xabb @0x11
0x0aaa…0ac6 at0012 = ╱ed╱(╱ // 0xabc @0x12
0x0aaa…0ac6 at0013 = ╱34╱4╱ // 0xabd @0x13
0x0aaa…0ac6 at0014 = ╱fe00008003╱ // 0xabe @0x14
0x0aaa…0ac6 at0019 = ╱ee╱)╱ // 0xac3 @0x19
0x0aaa…0ac6 at001a = ╱ee╱)╱ // 0xac4 @0x1a
0x0aaa…0ac6 at001b = EOL // 0xac5 @0x1b
0x0aaa…0ac6 }
0x0ac6…0aff 9856 0900 EXEC FFLET(K22$,K8$,T11(4),T21(7),T11(7))
0x0ac6…0aff LineComalBin {
0x0ac6…0aff ptr = 0x9856 // 0xac6 @0x0
0x0ac6…0aff lno = 0x0384 // 0xac8 @0x2
0x0ac6…0aff at0004 = ╱9d╱ EXEC ╱ // 0xaca @0x4
0x0ac6…0aff at0005 = ╱46╱F╱ // 0xacb @0x5
0x0ac6…0aff at0006 = ╱46╱F╱ // 0xacc @0x6
0x0ac6…0aff at0007 = ╱4c╱L╱ // 0xacd @0x7
0x0ac6…0aff at0008 = ╱45╱E╱ // 0xace @0x8
0x0ac6…0aff at0009 = ╱54╱T╱ // 0xacf @0x9
0x0ac6…0aff at000a = ╱ed╱(╱ // 0xad0 @0xa
0x0ac6…0aff at000b = ╱4b╱K╱ // 0xad1 @0xb
0x0ac6…0aff at000c = ╱32╱2╱ // 0xad2 @0xc
0x0ac6…0aff at000d = ╱32╱2╱ // 0xad3 @0xd
0x0ac6…0aff at000e = ╱ef╱$╱ // 0xad4 @0xe
0x0ac6…0aff at000f = ╱ec╱,╱ // 0xad5 @0xf
0x0ac6…0aff at0010 = ╱4b╱K╱ // 0xad6 @0x10
0x0ac6…0aff at0011 = ╱38╱8╱ // 0xad7 @0x11
0x0ac6…0aff at0012 = ╱ef╱$╱ // 0xad8 @0x12
0x0ac6…0aff at0013 = ╱ec╱,╱ // 0xad9 @0x13
0x0ac6…0aff at0014 = ╱54╱T╱ // 0xada @0x14
0x0ac6…0aff at0015 = ╱31╱1╱ // 0xadb @0x15
0x0ac6…0aff at0016 = ╱31╱1╱ // 0xadc @0x16
0x0ac6…0aff at0017 = ╱ed╱(╱ // 0xadd @0x17
0x0ac6…0aff at0018 = ╱34╱4╱ // 0xade @0x18
0x0ac6…0aff at0019 = ╱fe00008003╱ // 0xadf @0x19
0x0ac6…0aff at001e = ╱ee╱)╱ // 0xae4 @0x1e
0x0ac6…0aff at001f = ╱ec╱,╱ // 0xae5 @0x1f
0x0ac6…0aff at0020 = ╱54╱T╱ // 0xae6 @0x20
0x0ac6…0aff at0021 = ╱32╱2╱ // 0xae7 @0x21
0x0ac6…0aff at0022 = ╱31╱1╱ // 0xae8 @0x22
0x0ac6…0aff at0023 = ╱ed╱(╱ // 0xae9 @0x23
0x0ac6…0aff at0024 = ╱37╱7╱ // 0xaea @0x24
0x0ac6…0aff at0025 = ╱fe0000e003╱ // 0xaeb @0x25
0x0ac6…0aff at002a = ╱ee╱)╱ // 0xaf0 @0x2a
0x0ac6…0aff at002b = ╱ec╱,╱ // 0xaf1 @0x2b
0x0ac6…0aff at002c = ╱54╱T╱ // 0xaf2 @0x2c
0x0ac6…0aff at002d = ╱31╱1╱ // 0xaf3 @0x2d
0x0ac6…0aff at002e = ╱31╱1╱ // 0xaf4 @0x2e
0x0ac6…0aff at002f = ╱ed╱(╱ // 0xaf5 @0x2f
0x0ac6…0aff at0030 = ╱37╱7╱ // 0xaf6 @0x30
0x0ac6…0aff at0031 = ╱fe0000e003╱ // 0xaf7 @0x31
0x0ac6…0aff at0036 = ╱ee╱)╱ // 0xafc @0x36
0x0ac6…0aff at0037 = ╱ee╱)╱ // 0xafd @0x37
0x0ac6…0aff at0038 = EOL // 0xafe @0x38
0x0ac6…0aff }
0x0aff…0b14 986b 0910 CURSOR 10,15
0x0aff…0b14 LineComalBin {
0x0aff…0b14 ptr = 0x986b // 0xaff @0x0
0x0aff…0b14 lno = 0x038e // 0xb01 @0x2
0x0aff…0b14 at0004 = ╱a1╱ CURSOR ╱ // 0xb03 @0x4
0x0aff…0b14 at0005 = ╱31╱1╱ // 0xb04 @0x5
0x0aff…0b14 at0006 = ╱30╱0╱ // 0xb05 @0x6
0x0aff…0b14 at0007 = ╱fe0000a004╱ // 0xb06 @0x7
0x0aff…0b14 at000c = ╱ec╱,╱ // 0xb0b @0xc
0x0aff…0b14 at000d = ╱31╱1╱ // 0xb0c @0xd
0x0aff…0b14 at000e = ╱35╱5╱ // 0xb0d @0xe
0x0aff…0b14 at000f = ╱fe0000f004╱ // 0xb0e @0xf
0x0aff…0b14 at0014 = EOL // 0xb13 @0x14
0x0aff…0b14 }
0x0b14…0b28 987f 0915 T45=T11(7)
0x0b14…0b28 LineComalBin {
0x0b14…0b28 ptr = 0x987f // 0xb14 @0x0
0x0b14…0b28 lno = 0x0393 // 0xb16 @0x2
0x0b14…0b28 at0004 = ╱54╱T╱ // 0xb18 @0x4
0x0b14…0b28 at0005 = ╱34╱4╱ // 0xb19 @0x5
0x0b14…0b28 at0006 = ╱35╱5╱ // 0xb1a @0x6
0x0b14…0b28 at0007 = ╱dc╱=╱ // 0xb1b @0x7
0x0b14…0b28 at0008 = ╱54╱T╱ // 0xb1c @0x8
0x0b14…0b28 at0009 = ╱31╱1╱ // 0xb1d @0x9
0x0b14…0b28 at000a = ╱31╱1╱ // 0xb1e @0xa
0x0b14…0b28 at000b = ╱ed╱(╱ // 0xb1f @0xb
0x0b14…0b28 at000c = ╱37╱7╱ // 0xb20 @0xc
0x0b14…0b28 at000d = ╱fe0000e003╱ // 0xb21 @0xd
0x0b14…0b28 at0012 = ╱ee╱)╱ // 0xb26 @0x12
0x0b14…0b28 at0013 = EOL // 0xb27 @0x13
0x0b14…0b28 }
0x0b28…0b69 98c0 0920 PRINT USING "Antal kreditorposteringer :###### Max:######":T45,MKPOST
0x0b28…0b69 LineComalBin {
0x0b28…0b69 ptr = 0x98c0 // 0xb28 @0x0
0x0b28…0b69 lno = 0x0398 // 0xb2a @0x2
0x0b28…0b69 at0004 = ╱92╱ PRINT ╱ // 0xb2c @0x4
0x0b28…0b69 at0005 = ╱b9╱ USING ╱ // 0xb2d @0x5
0x0b28…0b69 at0006 = ╱22╱"╱ // 0xb2e @0x6
0x0b28…0b69 at0007 = ╱41╱A╱ // 0xb2f @0x7
0x0b28…0b69 at0008 = ╱6e╱n╱ // 0xb30 @0x8
0x0b28…0b69 at0009 = ╱74╱t╱ // 0xb31 @0x9
0x0b28…0b69 at000a = ╱61╱a╱ // 0xb32 @0xa
0x0b28…0b69 at000b = ╱6c╱l╱ // 0xb33 @0xb
0x0b28…0b69 at000c = ╱20╱…╱ // 0xb34 @0xc
0x0b28…0b69 at000d = ╱6b╱k╱ // 0xb35 @0xd
0x0b28…0b69 at000e = ╱72╱r╱ // 0xb36 @0xe
0x0b28…0b69 at000f = ╱65╱e╱ // 0xb37 @0xf
0x0b28…0b69 at0010 = ╱64╱d╱ // 0xb38 @0x10
0x0b28…0b69 at0011 = ╱69╱i╱ // 0xb39 @0x11
0x0b28…0b69 at0012 = ╱74╱t╱ // 0xb3a @0x12
0x0b28…0b69 at0013 = ╱6f╱o╱ // 0xb3b @0x13
0x0b28…0b69 at0014 = ╱72╱r╱ // 0xb3c @0x14
0x0b28…0b69 at0015 = ╱70╱p╱ // 0xb3d @0x15
0x0b28…0b69 at0016 = ╱6f╱o╱ // 0xb3e @0x16
0x0b28…0b69 at0017 = ╱73╱s╱ // 0xb3f @0x17
0x0b28…0b69 at0018 = ╱74╱t╱ // 0xb40 @0x18
0x0b28…0b69 at0019 = ╱65╱e╱ // 0xb41 @0x19
0x0b28…0b69 at001a = ╱72╱r╱ // 0xb42 @0x1a
0x0b28…0b69 at001b = ╱69╱i╱ // 0xb43 @0x1b
0x0b28…0b69 at001c = ╱6e╱n╱ // 0xb44 @0x1c
0x0b28…0b69 at001d = ╱67╱g╱ // 0xb45 @0x1d
0x0b28…0b69 at001e = ╱65╱e╱ // 0xb46 @0x1e
0x0b28…0b69 at001f = ╱72╱r╱ // 0xb47 @0x1f
0x0b28…0b69 at0020 = ╱20╱…╱ // 0xb48 @0x20
0x0b28…0b69 at0021 = ╱20╱…╱ // 0xb49 @0x21
0x0b28…0b69 at0022 = ╱3a╱:╱ // 0xb4a @0x22
0x0b28…0b69 at0023 = ╱23╱#╱ // 0xb4b @0x23
0x0b28…0b69 at0024 = ╱23╱#╱ // 0xb4c @0x24
0x0b28…0b69 at0025 = ╱23╱#╱ // 0xb4d @0x25
0x0b28…0b69 at0026 = ╱23╱#╱ // 0xb4e @0x26
0x0b28…0b69 at0027 = ╱23╱#╱ // 0xb4f @0x27
0x0b28…0b69 at0028 = ╱23╱#╱ // 0xb50 @0x28
0x0b28…0b69 at0029 = ╱20╱…╱ // 0xb51 @0x29
0x0b28…0b69 at002a = ╱4d╱M╱ // 0xb52 @0x2a
0x0b28…0b69 at002b = ╱61╱a╱ // 0xb53 @0x2b
0x0b28…0b69 at002c = ╱78╱x╱ // 0xb54 @0x2c
0x0b28…0b69 at002d = ╱3a╱:╱ // 0xb55 @0x2d
0x0b28…0b69 at002e = ╱23╱#╱ // 0xb56 @0x2e
0x0b28…0b69 at002f = ╱23╱#╱ // 0xb57 @0x2f
0x0b28…0b69 at0030 = ╱23╱#╱ // 0xb58 @0x30
0x0b28…0b69 at0031 = ╱23╱#╱ // 0xb59 @0x31
0x0b28…0b69 at0032 = ╱23╱#╱ // 0xb5a @0x32
0x0b28…0b69 at0033 = ╱23╱#╱ // 0xb5b @0x33
0x0b28…0b69 at0034 = ╱22╱"╱ // 0xb5c @0x34
0x0b28…0b69 at0035 = ╱f0╱:╱ // 0xb5d @0x35
0x0b28…0b69 at0036 = ╱54╱T╱ // 0xb5e @0x36
0x0b28…0b69 at0037 = ╱34╱4╱ // 0xb5f @0x37
0x0b28…0b69 at0038 = ╱35╱5╱ // 0xb60 @0x38
0x0b28…0b69 at0039 = ╱ec╱,╱ // 0xb61 @0x39
0x0b28…0b69 at003a = ╱4d╱M╱ // 0xb62 @0x3a
0x0b28…0b69 at003b = ╱4b╱K╱ // 0xb63 @0x3b
0x0b28…0b69 at003c = ╱50╱P╱ // 0xb64 @0x3c
0x0b28…0b69 at003d = ╱4f╱O╱ // 0xb65 @0x3d
0x0b28…0b69 at003e = ╱53╱S╱ // 0xb66 @0x3e
0x0b28…0b69 at003f = ╱54╱T╱ // 0xb67 @0x3f
0x0b28…0b69 at0040 = EOL // 0xb68 @0x40
0x0b28…0b69 }
0x0b69…0b86 98dd 0930 EXEC FSYSUD(K1$,T11,T12,T13)
0x0b69…0b86 LineComalBin {
0x0b69…0b86 ptr = 0x98dd // 0xb69 @0x0
0x0b69…0b86 lno = 0x03a2 // 0xb6b @0x2
0x0b69…0b86 at0004 = ╱9d╱ EXEC ╱ // 0xb6d @0x4
0x0b69…0b86 at0005 = ╱46╱F╱ // 0xb6e @0x5
0x0b69…0b86 at0006 = ╱53╱S╱ // 0xb6f @0x6
0x0b69…0b86 at0007 = ╱59╱Y╱ // 0xb70 @0x7
0x0b69…0b86 at0008 = ╱53╱S╱ // 0xb71 @0x8
0x0b69…0b86 at0009 = ╱55╱U╱ // 0xb72 @0x9
0x0b69…0b86 at000a = ╱44╱D╱ // 0xb73 @0xa
0x0b69…0b86 at000b = ╱ed╱(╱ // 0xb74 @0xb
0x0b69…0b86 at000c = ╱4b╱K╱ // 0xb75 @0xc
0x0b69…0b86 at000d = ╱31╱1╱ // 0xb76 @0xd
0x0b69…0b86 at000e = ╱ef╱$╱ // 0xb77 @0xe
0x0b69…0b86 at000f = ╱ec╱,╱ // 0xb78 @0xf
0x0b69…0b86 at0010 = ╱54╱T╱ // 0xb79 @0x10
0x0b69…0b86 at0011 = ╱31╱1╱ // 0xb7a @0x11
0x0b69…0b86 at0012 = ╱31╱1╱ // 0xb7b @0x12
0x0b69…0b86 at0013 = ╱ec╱,╱ // 0xb7c @0x13
0x0b69…0b86 at0014 = ╱54╱T╱ // 0xb7d @0x14
0x0b69…0b86 at0015 = ╱31╱1╱ // 0xb7e @0x15
0x0b69…0b86 at0016 = ╱32╱2╱ // 0xb7f @0x16
0x0b69…0b86 at0017 = ╱ec╱,╱ // 0xb80 @0x17
0x0b69…0b86 at0018 = ╱54╱T╱ // 0xb81 @0x18
0x0b69…0b86 at0019 = ╱31╱1╱ // 0xb82 @0x19
0x0b69…0b86 at001a = ╱33╱3╱ // 0xb83 @0x1a
0x0b69…0b86 at001b = ╱ee╱)╱ // 0xb84 @0x1b
0x0b69…0b86 at001c = EOL // 0xb85 @0x1c
0x0b69…0b86 }
0x0b86…0bb0 9907 0940 EXEC TABINIT(K8$,K19$,MKPOST,HDTAB,UDTAB)
0x0b86…0bb0 LineComalBin {
0x0b86…0bb0 ptr = 0x9907 // 0xb86 @0x0
0x0b86…0bb0 lno = 0x03ac // 0xb88 @0x2
0x0b86…0bb0 at0004 = ╱9d╱ EXEC ╱ // 0xb8a @0x4
0x0b86…0bb0 at0005 = ╱54╱T╱ // 0xb8b @0x5
0x0b86…0bb0 at0006 = ╱41╱A╱ // 0xb8c @0x6
0x0b86…0bb0 at0007 = ╱42╱B╱ // 0xb8d @0x7
0x0b86…0bb0 at0008 = ╱49╱I╱ // 0xb8e @0x8
0x0b86…0bb0 at0009 = ╱4e╱N╱ // 0xb8f @0x9
0x0b86…0bb0 at000a = ╱49╱I╱ // 0xb90 @0xa
0x0b86…0bb0 at000b = ╱54╱T╱ // 0xb91 @0xb
0x0b86…0bb0 at000c = ╱ed╱(╱ // 0xb92 @0xc
0x0b86…0bb0 at000d = ╱4b╱K╱ // 0xb93 @0xd
0x0b86…0bb0 at000e = ╱38╱8╱ // 0xb94 @0xe
0x0b86…0bb0 at000f = ╱ef╱$╱ // 0xb95 @0xf
0x0b86…0bb0 at0010 = ╱ec╱,╱ // 0xb96 @0x10
0x0b86…0bb0 at0011 = ╱4b╱K╱ // 0xb97 @0x11
0x0b86…0bb0 at0012 = ╱31╱1╱ // 0xb98 @0x12
0x0b86…0bb0 at0013 = ╱39╱9╱ // 0xb99 @0x13
0x0b86…0bb0 at0014 = ╱ef╱$╱ // 0xb9a @0x14
0x0b86…0bb0 at0015 = ╱ec╱,╱ // 0xb9b @0x15
0x0b86…0bb0 at0016 = ╱4d╱M╱ // 0xb9c @0x16
0x0b86…0bb0 at0017 = ╱4b╱K╱ // 0xb9d @0x17
0x0b86…0bb0 at0018 = ╱50╱P╱ // 0xb9e @0x18
0x0b86…0bb0 at0019 = ╱4f╱O╱ // 0xb9f @0x19
0x0b86…0bb0 at001a = ╱53╱S╱ // 0xba0 @0x1a
0x0b86…0bb0 at001b = ╱54╱T╱ // 0xba1 @0x1b
0x0b86…0bb0 at001c = ╱ec╱,╱ // 0xba2 @0x1c
0x0b86…0bb0 at001d = ╱48╱H╱ // 0xba3 @0x1d
0x0b86…0bb0 at001e = ╱44╱D╱ // 0xba4 @0x1e
0x0b86…0bb0 at001f = ╱54╱T╱ // 0xba5 @0x1f
0x0b86…0bb0 at0020 = ╱41╱A╱ // 0xba6 @0x20
0x0b86…0bb0 at0021 = ╱42╱B╱ // 0xba7 @0x21
0x0b86…0bb0 at0022 = ╱ec╱,╱ // 0xba8 @0x22
0x0b86…0bb0 at0023 = ╱55╱U╱ // 0xba9 @0x23
0x0b86…0bb0 at0024 = ╱44╱D╱ // 0xbaa @0x24
0x0b86…0bb0 at0025 = ╱54╱T╱ // 0xbab @0x25
0x0b86…0bb0 at0026 = ╱41╱A╱ // 0xbac @0x26
0x0b86…0bb0 at0027 = ╱42╱B╱ // 0xbad @0x27
0x0b86…0bb0 at0028 = ╱ee╱)╱ // 0xbae @0x28
0x0b86…0bb0 at0029 = EOL // 0xbaf @0x29
0x0b86…0bb0 }
0x0bb0…0bcd 9924 0950 EXEC FSORT(K40$,T13(4))
0x0bb0…0bcd LineComalBin {
0x0bb0…0bcd ptr = 0x9924 // 0xbb0 @0x0
0x0bb0…0bcd lno = 0x03b6 // 0xbb2 @0x2
0x0bb0…0bcd at0004 = ╱9d╱ EXEC ╱ // 0xbb4 @0x4
0x0bb0…0bcd at0005 = ╱46╱F╱ // 0xbb5 @0x5
0x0bb0…0bcd at0006 = ╱53╱S╱ // 0xbb6 @0x6
0x0bb0…0bcd at0007 = ╱4f╱O╱ // 0xbb7 @0x7
0x0bb0…0bcd at0008 = ╱52╱R╱ // 0xbb8 @0x8
0x0bb0…0bcd at0009 = ╱54╱T╱ // 0xbb9 @0x9
0x0bb0…0bcd at000a = ╱ed╱(╱ // 0xbba @0xa
0x0bb0…0bcd at000b = ╱4b╱K╱ // 0xbbb @0xb
0x0bb0…0bcd at000c = ╱34╱4╱ // 0xbbc @0xc
0x0bb0…0bcd at000d = ╱30╱0╱ // 0xbbd @0xd
0x0bb0…0bcd at000e = ╱ef╱$╱ // 0xbbe @0xe
0x0bb0…0bcd at000f = ╱ec╱,╱ // 0xbbf @0xf
0x0bb0…0bcd at0010 = ╱54╱T╱ // 0xbc0 @0x10
0x0bb0…0bcd at0011 = ╱31╱1╱ // 0xbc1 @0x11
0x0bb0…0bcd at0012 = ╱33╱3╱ // 0xbc2 @0x12
0x0bb0…0bcd at0013 = ╱ed╱(╱ // 0xbc3 @0x13
0x0bb0…0bcd at0014 = ╱34╱4╱ // 0xbc4 @0x14
0x0bb0…0bcd at0015 = ╱fe00008003╱ // 0xbc5 @0x15
0x0bb0…0bcd at001a = ╱ee╱)╱ // 0xbca @0x1a
0x0bb0…0bcd at001b = ╱ee╱)╱ // 0xbcb @0x1b
0x0bb0…0bcd at001c = EOL // 0xbcc @0x1c
0x0bb0…0bcd }
0x0bcd…0c07 995e 0960 EXEC FFLET(K43$,K41$,T13(4),T23(5),T13(5))
0x0bcd…0c07 LineComalBin {
0x0bcd…0c07 ptr = 0x995e // 0xbcd @0x0
0x0bcd…0c07 lno = 0x03c0 // 0xbcf @0x2
0x0bcd…0c07 at0004 = ╱9d╱ EXEC ╱ // 0xbd1 @0x4
0x0bcd…0c07 at0005 = ╱46╱F╱ // 0xbd2 @0x5
0x0bcd…0c07 at0006 = ╱46╱F╱ // 0xbd3 @0x6
0x0bcd…0c07 at0007 = ╱4c╱L╱ // 0xbd4 @0x7
0x0bcd…0c07 at0008 = ╱45╱E╱ // 0xbd5 @0x8
0x0bcd…0c07 at0009 = ╱54╱T╱ // 0xbd6 @0x9
0x0bcd…0c07 at000a = ╱ed╱(╱ // 0xbd7 @0xa
0x0bcd…0c07 at000b = ╱4b╱K╱ // 0xbd8 @0xb
0x0bcd…0c07 at000c = ╱34╱4╱ // 0xbd9 @0xc
0x0bcd…0c07 at000d = ╱33╱3╱ // 0xbda @0xd
0x0bcd…0c07 at000e = ╱ef╱$╱ // 0xbdb @0xe
0x0bcd…0c07 at000f = ╱ec╱,╱ // 0xbdc @0xf
0x0bcd…0c07 at0010 = ╱4b╱K╱ // 0xbdd @0x10
0x0bcd…0c07 at0011 = ╱34╱4╱ // 0xbde @0x11
0x0bcd…0c07 at0012 = ╱31╱1╱ // 0xbdf @0x12
0x0bcd…0c07 at0013 = ╱ef╱$╱ // 0xbe0 @0x13
0x0bcd…0c07 at0014 = ╱ec╱,╱ // 0xbe1 @0x14
0x0bcd…0c07 at0015 = ╱54╱T╱ // 0xbe2 @0x15
0x0bcd…0c07 at0016 = ╱31╱1╱ // 0xbe3 @0x16
0x0bcd…0c07 at0017 = ╱33╱3╱ // 0xbe4 @0x17
0x0bcd…0c07 at0018 = ╱ed╱(╱ // 0xbe5 @0x18
0x0bcd…0c07 at0019 = ╱34╱4╱ // 0xbe6 @0x19
0x0bcd…0c07 at001a = ╱fe00008003╱ // 0xbe7 @0x1a
0x0bcd…0c07 at001f = ╱ee╱)╱ // 0xbec @0x1f
0x0bcd…0c07 at0020 = ╱ec╱,╱ // 0xbed @0x20
0x0bcd…0c07 at0021 = ╱54╱T╱ // 0xbee @0x21
0x0bcd…0c07 at0022 = ╱32╱2╱ // 0xbef @0x22
0x0bcd…0c07 at0023 = ╱33╱3╱ // 0xbf0 @0x23
0x0bcd…0c07 at0024 = ╱ed╱(╱ // 0xbf1 @0x24
0x0bcd…0c07 at0025 = ╱35╱5╱ // 0xbf2 @0x25
0x0bcd…0c07 at0026 = ╱fe0000a003╱ // 0xbf3 @0x26
0x0bcd…0c07 at002b = ╱ee╱)╱ // 0xbf8 @0x2b
0x0bcd…0c07 at002c = ╱ec╱,╱ // 0xbf9 @0x2c
0x0bcd…0c07 at002d = ╱54╱T╱ // 0xbfa @0x2d
0x0bcd…0c07 at002e = ╱31╱1╱ // 0xbfb @0x2e
0x0bcd…0c07 at002f = ╱33╱3╱ // 0xbfc @0x2f
0x0bcd…0c07 at0030 = ╱ed╱(╱ // 0xbfd @0x30
0x0bcd…0c07 at0031 = ╱35╱5╱ // 0xbfe @0x31
0x0bcd…0c07 at0032 = ╱fe0000a003╱ // 0xbff @0x32
0x0bcd…0c07 at0037 = ╱ee╱)╱ // 0xc04 @0x37
0x0bcd…0c07 at0038 = ╱ee╱)╱ // 0xc05 @0x38
0x0bcd…0c07 at0039 = EOL // 0xc06 @0x39
0x0bcd…0c07 }
0x0c07…0c1c 9973 0970 CURSOR 10,17
0x0c07…0c1c LineComalBin {
0x0c07…0c1c ptr = 0x9973 // 0xc07 @0x0
0x0c07…0c1c lno = 0x03ca // 0xc09 @0x2
0x0c07…0c1c at0004 = ╱a1╱ CURSOR ╱ // 0xc0b @0x4
0x0c07…0c1c at0005 = ╱31╱1╱ // 0xc0c @0x5
0x0c07…0c1c at0006 = ╱30╱0╱ // 0xc0d @0x6
0x0c07…0c1c at0007 = ╱fe0000a004╱ // 0xc0e @0x7
0x0c07…0c1c at000c = ╱ec╱,╱ // 0xc13 @0xc
0x0c07…0c1c at000d = ╱31╱1╱ // 0xc14 @0xd
0x0c07…0c1c at000e = ╱37╱7╱ // 0xc15 @0xe
0x0c07…0c1c at000f = ╱fe00008805╱ // 0xc16 @0xf
0x0c07…0c1c at0014 = EOL // 0xc1b @0x14
0x0c07…0c1c }
0x0c1c…0c30 9987 0975 T30=T13(5)
0x0c1c…0c30 LineComalBin {
0x0c1c…0c30 ptr = 0x9987 // 0xc1c @0x0
0x0c1c…0c30 lno = 0x03cf // 0xc1e @0x2
0x0c1c…0c30 at0004 = ╱54╱T╱ // 0xc20 @0x4
0x0c1c…0c30 at0005 = ╱33╱3╱ // 0xc21 @0x5
0x0c1c…0c30 at0006 = ╱30╱0╱ // 0xc22 @0x6
0x0c1c…0c30 at0007 = ╱dc╱=╱ // 0xc23 @0x7
0x0c1c…0c30 at0008 = ╱54╱T╱ // 0xc24 @0x8
0x0c1c…0c30 at0009 = ╱31╱1╱ // 0xc25 @0x9
0x0c1c…0c30 at000a = ╱33╱3╱ // 0xc26 @0xa
0x0c1c…0c30 at000b = ╱ed╱(╱ // 0xc27 @0xb
0x0c1c…0c30 at000c = ╱35╱5╱ // 0xc28 @0xc
0x0c1c…0c30 at000d = ╱fe0000a003╱ // 0xc29 @0xd
0x0c1c…0c30 at0012 = ╱ee╱)╱ // 0xc2e @0x12
0x0c1c…0c30 at0013 = EOL // 0xc2f @0x13
0x0c1c…0c30 }
0x0c30…0c71 99c8 0980 PRINT USING "Antal entrepriseposteringer:###### Max:######":T30,MEPOST
0x0c30…0c71 LineComalBin {
0x0c30…0c71 ptr = 0x99c8 // 0xc30 @0x0
0x0c30…0c71 lno = 0x03d4 // 0xc32 @0x2
0x0c30…0c71 at0004 = ╱92╱ PRINT ╱ // 0xc34 @0x4
0x0c30…0c71 at0005 = ╱b9╱ USING ╱ // 0xc35 @0x5
0x0c30…0c71 at0006 = ╱22╱"╱ // 0xc36 @0x6
0x0c30…0c71 at0007 = ╱41╱A╱ // 0xc37 @0x7
0x0c30…0c71 at0008 = ╱6e╱n╱ // 0xc38 @0x8
0x0c30…0c71 at0009 = ╱74╱t╱ // 0xc39 @0x9
0x0c30…0c71 at000a = ╱61╱a╱ // 0xc3a @0xa
0x0c30…0c71 at000b = ╱6c╱l╱ // 0xc3b @0xb
0x0c30…0c71 at000c = ╱20╱…╱ // 0xc3c @0xc
0x0c30…0c71 at000d = ╱65╱e╱ // 0xc3d @0xd
0x0c30…0c71 at000e = ╱6e╱n╱ // 0xc3e @0xe
0x0c30…0c71 at000f = ╱74╱t╱ // 0xc3f @0xf
0x0c30…0c71 at0010 = ╱72╱r╱ // 0xc40 @0x10
0x0c30…0c71 at0011 = ╱65╱e╱ // 0xc41 @0x11
0x0c30…0c71 at0012 = ╱70╱p╱ // 0xc42 @0x12
0x0c30…0c71 at0013 = ╱72╱r╱ // 0xc43 @0x13
0x0c30…0c71 at0014 = ╱69╱i╱ // 0xc44 @0x14
0x0c30…0c71 at0015 = ╱73╱s╱ // 0xc45 @0x15
0x0c30…0c71 at0016 = ╱65╱e╱ // 0xc46 @0x16
0x0c30…0c71 at0017 = ╱70╱p╱ // 0xc47 @0x17
0x0c30…0c71 at0018 = ╱6f╱o╱ // 0xc48 @0x18
0x0c30…0c71 at0019 = ╱73╱s╱ // 0xc49 @0x19
0x0c30…0c71 at001a = ╱74╱t╱ // 0xc4a @0x1a
0x0c30…0c71 at001b = ╱65╱e╱ // 0xc4b @0x1b
0x0c30…0c71 at001c = ╱72╱r╱ // 0xc4c @0x1c
0x0c30…0c71 at001d = ╱69╱i╱ // 0xc4d @0x1d
0x0c30…0c71 at001e = ╱6e╱n╱ // 0xc4e @0x1e
0x0c30…0c71 at001f = ╱67╱g╱ // 0xc4f @0x1f
0x0c30…0c71 at0020 = ╱65╱e╱ // 0xc50 @0x20
0x0c30…0c71 at0021 = ╱72╱r╱ // 0xc51 @0x21
0x0c30…0c71 at0022 = ╱3a╱:╱ // 0xc52 @0x22
0x0c30…0c71 at0023 = ╱23╱#╱ // 0xc53 @0x23
0x0c30…0c71 at0024 = ╱23╱#╱ // 0xc54 @0x24
0x0c30…0c71 at0025 = ╱23╱#╱ // 0xc55 @0x25
0x0c30…0c71 at0026 = ╱23╱#╱ // 0xc56 @0x26
0x0c30…0c71 at0027 = ╱23╱#╱ // 0xc57 @0x27
0x0c30…0c71 at0028 = ╱23╱#╱ // 0xc58 @0x28
0x0c30…0c71 at0029 = ╱20╱…╱ // 0xc59 @0x29
0x0c30…0c71 at002a = ╱4d╱M╱ // 0xc5a @0x2a
0x0c30…0c71 at002b = ╱61╱a╱ // 0xc5b @0x2b
0x0c30…0c71 at002c = ╱78╱x╱ // 0xc5c @0x2c
0x0c30…0c71 at002d = ╱3a╱:╱ // 0xc5d @0x2d
0x0c30…0c71 at002e = ╱23╱#╱ // 0xc5e @0x2e
0x0c30…0c71 at002f = ╱23╱#╱ // 0xc5f @0x2f
0x0c30…0c71 at0030 = ╱23╱#╱ // 0xc60 @0x30
0x0c30…0c71 at0031 = ╱23╱#╱ // 0xc61 @0x31
0x0c30…0c71 at0032 = ╱23╱#╱ // 0xc62 @0x32
0x0c30…0c71 at0033 = ╱23╱#╱ // 0xc63 @0x33
0x0c30…0c71 at0034 = ╱22╱"╱ // 0xc64 @0x34
0x0c30…0c71 at0035 = ╱f0╱:╱ // 0xc65 @0x35
0x0c30…0c71 at0036 = ╱54╱T╱ // 0xc66 @0x36
0x0c30…0c71 at0037 = ╱33╱3╱ // 0xc67 @0x37
0x0c30…0c71 at0038 = ╱30╱0╱ // 0xc68 @0x38
0x0c30…0c71 at0039 = ╱ec╱,╱ // 0xc69 @0x39
0x0c30…0c71 at003a = ╱4d╱M╱ // 0xc6a @0x3a
0x0c30…0c71 at003b = ╱45╱E╱ // 0xc6b @0x3b
0x0c30…0c71 at003c = ╱50╱P╱ // 0xc6c @0x3c
0x0c30…0c71 at003d = ╱4f╱O╱ // 0xc6d @0x3d
0x0c30…0c71 at003e = ╱53╱S╱ // 0xc6e @0x3e
0x0c30…0c71 at003f = ╱54╱T╱ // 0xc6f @0x3f
0x0c30…0c71 at0040 = EOL // 0xc70 @0x40
0x0c30…0c71 }
0x0c71…0c8e 99e5 0990 EXEC FSYSUD(K1$,T11,T12,T13)
0x0c71…0c8e LineComalBin {
0x0c71…0c8e ptr = 0x99e5 // 0xc71 @0x0
0x0c71…0c8e lno = 0x03de // 0xc73 @0x2
0x0c71…0c8e at0004 = ╱9d╱ EXEC ╱ // 0xc75 @0x4
0x0c71…0c8e at0005 = ╱46╱F╱ // 0xc76 @0x5
0x0c71…0c8e at0006 = ╱53╱S╱ // 0xc77 @0x6
0x0c71…0c8e at0007 = ╱59╱Y╱ // 0xc78 @0x7
0x0c71…0c8e at0008 = ╱53╱S╱ // 0xc79 @0x8
0x0c71…0c8e at0009 = ╱55╱U╱ // 0xc7a @0x9
0x0c71…0c8e at000a = ╱44╱D╱ // 0xc7b @0xa
0x0c71…0c8e at000b = ╱ed╱(╱ // 0xc7c @0xb
0x0c71…0c8e at000c = ╱4b╱K╱ // 0xc7d @0xc
0x0c71…0c8e at000d = ╱31╱1╱ // 0xc7e @0xd
0x0c71…0c8e at000e = ╱ef╱$╱ // 0xc7f @0xe
0x0c71…0c8e at000f = ╱ec╱,╱ // 0xc80 @0xf
0x0c71…0c8e at0010 = ╱54╱T╱ // 0xc81 @0x10
0x0c71…0c8e at0011 = ╱31╱1╱ // 0xc82 @0x11
0x0c71…0c8e at0012 = ╱31╱1╱ // 0xc83 @0x12
0x0c71…0c8e at0013 = ╱ec╱,╱ // 0xc84 @0x13
0x0c71…0c8e at0014 = ╱54╱T╱ // 0xc85 @0x14
0x0c71…0c8e at0015 = ╱31╱1╱ // 0xc86 @0x15
0x0c71…0c8e at0016 = ╱32╱2╱ // 0xc87 @0x16
0x0c71…0c8e at0017 = ╱ec╱,╱ // 0xc88 @0x17
0x0c71…0c8e at0018 = ╱54╱T╱ // 0xc89 @0x18
0x0c71…0c8e at0019 = ╱31╱1╱ // 0xc8a @0x19
0x0c71…0c8e at001a = ╱33╱3╱ // 0xc8b @0x1a
0x0c71…0c8e at001b = ╱ee╱)╱ // 0xc8c @0x1b
0x0c71…0c8e at001c = EOL // 0xc8d @0x1c
0x0c71…0c8e }
0x0c8e…0cb9 9a10 1000 EXEC TABINIT(K41$,K42$,MEPOST,HDTAB,UDTAB)
0x0c8e…0cb9 LineComalBin {
0x0c8e…0cb9 ptr = 0x9a10 // 0xc8e @0x0
0x0c8e…0cb9 lno = 0x03e8 // 0xc90 @0x2
0x0c8e…0cb9 at0004 = ╱9d╱ EXEC ╱ // 0xc92 @0x4
0x0c8e…0cb9 at0005 = ╱54╱T╱ // 0xc93 @0x5
0x0c8e…0cb9 at0006 = ╱41╱A╱ // 0xc94 @0x6
0x0c8e…0cb9 at0007 = ╱42╱B╱ // 0xc95 @0x7
0x0c8e…0cb9 at0008 = ╱49╱I╱ // 0xc96 @0x8
0x0c8e…0cb9 at0009 = ╱4e╱N╱ // 0xc97 @0x9
0x0c8e…0cb9 at000a = ╱49╱I╱ // 0xc98 @0xa
0x0c8e…0cb9 at000b = ╱54╱T╱ // 0xc99 @0xb
0x0c8e…0cb9 at000c = ╱ed╱(╱ // 0xc9a @0xc
0x0c8e…0cb9 at000d = ╱4b╱K╱ // 0xc9b @0xd
0x0c8e…0cb9 at000e = ╱34╱4╱ // 0xc9c @0xe
0x0c8e…0cb9 at000f = ╱31╱1╱ // 0xc9d @0xf
0x0c8e…0cb9 at0010 = ╱ef╱$╱ // 0xc9e @0x10
0x0c8e…0cb9 at0011 = ╱ec╱,╱ // 0xc9f @0x11
0x0c8e…0cb9 at0012 = ╱4b╱K╱ // 0xca0 @0x12
0x0c8e…0cb9 at0013 = ╱34╱4╱ // 0xca1 @0x13
0x0c8e…0cb9 at0014 = ╱32╱2╱ // 0xca2 @0x14
0x0c8e…0cb9 at0015 = ╱ef╱$╱ // 0xca3 @0x15
0x0c8e…0cb9 at0016 = ╱ec╱,╱ // 0xca4 @0x16
0x0c8e…0cb9 at0017 = ╱4d╱M╱ // 0xca5 @0x17
0x0c8e…0cb9 at0018 = ╱45╱E╱ // 0xca6 @0x18
0x0c8e…0cb9 at0019 = ╱50╱P╱ // 0xca7 @0x19
0x0c8e…0cb9 at001a = ╱4f╱O╱ // 0xca8 @0x1a
0x0c8e…0cb9 at001b = ╱53╱S╱ // 0xca9 @0x1b
0x0c8e…0cb9 at001c = ╱54╱T╱ // 0xcaa @0x1c
0x0c8e…0cb9 at001d = ╱ec╱,╱ // 0xcab @0x1d
0x0c8e…0cb9 at001e = ╱48╱H╱ // 0xcac @0x1e
0x0c8e…0cb9 at001f = ╱44╱D╱ // 0xcad @0x1f
0x0c8e…0cb9 at0020 = ╱54╱T╱ // 0xcae @0x20
0x0c8e…0cb9 at0021 = ╱41╱A╱ // 0xcaf @0x21
0x0c8e…0cb9 at0022 = ╱42╱B╱ // 0xcb0 @0x22
0x0c8e…0cb9 at0023 = ╱ec╱,╱ // 0xcb1 @0x23
0x0c8e…0cb9 at0024 = ╱55╱U╱ // 0xcb2 @0x24
0x0c8e…0cb9 at0025 = ╱44╱D╱ // 0xcb3 @0x25
0x0c8e…0cb9 at0026 = ╱54╱T╱ // 0xcb4 @0x26
0x0c8e…0cb9 at0027 = ╱41╱A╱ // 0xcb5 @0x27
0x0c8e…0cb9 at0028 = ╱42╱B╱ // 0xcb6 @0x28
0x0c8e…0cb9 at0029 = ╱ee╱)╱ // 0xcb7 @0x29
0x0c8e…0cb9 at002a = EOL // 0xcb8 @0x2a
0x0c8e…0cb9 }
0x0cb9…0cfd 9a54 1010 T11(V)=B;T11(4)=B;T11(G)=B;T12(E)=B;T12(G)=V;T13(4)=B
0x0cb9…0cfd LineComalBin {
0x0cb9…0cfd ptr = 0x9a54 // 0xcb9 @0x0
0x0cb9…0cfd lno = 0x03f2 // 0xcbb @0x2
0x0cb9…0cfd at0004 = ╱54╱T╱ // 0xcbd @0x4
0x0cb9…0cfd at0005 = ╱31╱1╱ // 0xcbe @0x5
0x0cb9…0cfd at0006 = ╱31╱1╱ // 0xcbf @0x6
0x0cb9…0cfd at0007 = ╱ed╱(╱ // 0xcc0 @0x7
0x0cb9…0cfd at0008 = ╱56╱V╱ // 0xcc1 @0x8
0x0cb9…0cfd at0009 = ╱ee╱)╱ // 0xcc2 @0x9
0x0cb9…0cfd at000a = ╱dc╱=╱ // 0xcc3 @0xa
0x0cb9…0cfd at000b = ╱42╱B╱ // 0xcc4 @0xb
0x0cb9…0cfd at000c = ╱eb╱;╱ // 0xcc5 @0xc
0x0cb9…0cfd at000d = ╱54╱T╱ // 0xcc6 @0xd
0x0cb9…0cfd at000e = ╱31╱1╱ // 0xcc7 @0xe
0x0cb9…0cfd at000f = ╱31╱1╱ // 0xcc8 @0xf
0x0cb9…0cfd at0010 = ╱ed╱(╱ // 0xcc9 @0x10
0x0cb9…0cfd at0011 = ╱34╱4╱ // 0xcca @0x11
0x0cb9…0cfd at0012 = ╱fe00008003╱ // 0xccb @0x12
0x0cb9…0cfd at0017 = ╱ee╱)╱ // 0xcd0 @0x17
0x0cb9…0cfd at0018 = ╱dc╱=╱ // 0xcd1 @0x18
0x0cb9…0cfd at0019 = ╱42╱B╱ // 0xcd2 @0x19
0x0cb9…0cfd at001a = ╱eb╱;╱ // 0xcd3 @0x1a
0x0cb9…0cfd at001b = ╱54╱T╱ // 0xcd4 @0x1b
0x0cb9…0cfd at001c = ╱31╱1╱ // 0xcd5 @0x1c
0x0cb9…0cfd at001d = ╱31╱1╱ // 0xcd6 @0x1d
0x0cb9…0cfd at001e = ╱ed╱(╱ // 0xcd7 @0x1e
0x0cb9…0cfd at001f = ╱47╱G╱ // 0xcd8 @0x1f
0x0cb9…0cfd at0020 = ╱ee╱)╱ // 0xcd9 @0x20
0x0cb9…0cfd at0021 = ╱dc╱=╱ // 0xcda @0x21
0x0cb9…0cfd at0022 = ╱42╱B╱ // 0xcdb @0x22
0x0cb9…0cfd at0023 = ╱eb╱;╱ // 0xcdc @0x23
0x0cb9…0cfd at0024 = ╱54╱T╱ // 0xcdd @0x24
0x0cb9…0cfd at0025 = ╱31╱1╱ // 0xcde @0x25
0x0cb9…0cfd at0026 = ╱32╱2╱ // 0xcdf @0x26
0x0cb9…0cfd at0027 = ╱ed╱(╱ // 0xce0 @0x27
0x0cb9…0cfd at0028 = ╱45╱E╱ // 0xce1 @0x28
0x0cb9…0cfd at0029 = ╱ee╱)╱ // 0xce2 @0x29
0x0cb9…0cfd at002a = ╱dc╱=╱ // 0xce3 @0x2a
0x0cb9…0cfd at002b = ╱42╱B╱ // 0xce4 @0x2b
0x0cb9…0cfd at002c = ╱eb╱;╱ // 0xce5 @0x2c
0x0cb9…0cfd at002d = ╱54╱T╱ // 0xce6 @0x2d
0x0cb9…0cfd at002e = ╱31╱1╱ // 0xce7 @0x2e
0x0cb9…0cfd at002f = ╱32╱2╱ // 0xce8 @0x2f
0x0cb9…0cfd at0030 = ╱ed╱(╱ // 0xce9 @0x30
0x0cb9…0cfd at0031 = ╱47╱G╱ // 0xcea @0x31
0x0cb9…0cfd at0032 = ╱ee╱)╱ // 0xceb @0x32
0x0cb9…0cfd at0033 = ╱dc╱=╱ // 0xcec @0x33
0x0cb9…0cfd at0034 = ╱56╱V╱ // 0xced @0x34
0x0cb9…0cfd at0035 = ╱eb╱;╱ // 0xcee @0x35
0x0cb9…0cfd at0036 = ╱54╱T╱ // 0xcef @0x36
0x0cb9…0cfd at0037 = ╱31╱1╱ // 0xcf0 @0x37
0x0cb9…0cfd at0038 = ╱33╱3╱ // 0xcf1 @0x38
0x0cb9…0cfd at0039 = ╱ed╱(╱ // 0xcf2 @0x39
0x0cb9…0cfd at003a = ╱34╱4╱ // 0xcf3 @0x3a
0x0cb9…0cfd at003b = ╱fe00008003╱ // 0xcf4 @0x3b
0x0cb9…0cfd at0040 = ╱ee╱)╱ // 0xcf9 @0x40
0x0cb9…0cfd at0041 = ╱dc╱=╱ // 0xcfa @0x41
0x0cb9…0cfd at0042 = ╱42╱B╱ // 0xcfb @0x42
0x0cb9…0cfd at0043 = EOL // 0xcfc @0x43
0x0cb9…0cfd }
0x0cfd…0d1a 9a71 1020 EXEC FSYSUD(K1$,T11,T12,T13)
0x0cfd…0d1a LineComalBin {
0x0cfd…0d1a ptr = 0x9a71 // 0xcfd @0x0
0x0cfd…0d1a lno = 0x03fc // 0xcff @0x2
0x0cfd…0d1a at0004 = ╱9d╱ EXEC ╱ // 0xd01 @0x4
0x0cfd…0d1a at0005 = ╱46╱F╱ // 0xd02 @0x5
0x0cfd…0d1a at0006 = ╱53╱S╱ // 0xd03 @0x6
0x0cfd…0d1a at0007 = ╱59╱Y╱ // 0xd04 @0x7
0x0cfd…0d1a at0008 = ╱53╱S╱ // 0xd05 @0x8
0x0cfd…0d1a at0009 = ╱55╱U╱ // 0xd06 @0x9
0x0cfd…0d1a at000a = ╱44╱D╱ // 0xd07 @0xa
0x0cfd…0d1a at000b = ╱ed╱(╱ // 0xd08 @0xb
0x0cfd…0d1a at000c = ╱4b╱K╱ // 0xd09 @0xc
0x0cfd…0d1a at000d = ╱31╱1╱ // 0xd0a @0xd
0x0cfd…0d1a at000e = ╱ef╱$╱ // 0xd0b @0xe
0x0cfd…0d1a at000f = ╱ec╱,╱ // 0xd0c @0xf
0x0cfd…0d1a at0010 = ╱54╱T╱ // 0xd0d @0x10
0x0cfd…0d1a at0011 = ╱31╱1╱ // 0xd0e @0x11
0x0cfd…0d1a at0012 = ╱31╱1╱ // 0xd0f @0x12
0x0cfd…0d1a at0013 = ╱ec╱,╱ // 0xd10 @0x13
0x0cfd…0d1a at0014 = ╱54╱T╱ // 0xd11 @0x14
0x0cfd…0d1a at0015 = ╱31╱1╱ // 0xd12 @0x15
0x0cfd…0d1a at0016 = ╱32╱2╱ // 0xd13 @0x16
0x0cfd…0d1a at0017 = ╱ec╱,╱ // 0xd14 @0x17
0x0cfd…0d1a at0018 = ╱54╱T╱ // 0xd15 @0x18
0x0cfd…0d1a at0019 = ╱31╱1╱ // 0xd16 @0x19
0x0cfd…0d1a at001a = ╱33╱3╱ // 0xd17 @0x1a
0x0cfd…0d1a at001b = ╱ee╱)╱ // 0xd18 @0x1b
0x0cfd…0d1a at001c = EOL // 0xd19 @0x1c
0x0cfd…0d1a }
0x0d1a…0d20 9a77 1030 CLEAR
0x0d1a…0d20 LineComalBin {
0x0d1a…0d20 ptr = 0x9a77 // 0xd1a @0x0
0x0d1a…0d20 lno = 0x0406 // 0xd1c @0x2
0x0d1a…0d20 at0004 = ╱a0╱ CLEAR ╱ // 0xd1e @0x4
0x0d1a…0d20 at0005 = EOL // 0xd1f @0x5
0x0d1a…0d20 }
0x0d20…0d35 9a8c 1080 CHAIN "P641210:ÅKOPI"
0x0d20…0d35 LineComalBin {
0x0d20…0d35 ptr = 0x9a8c // 0xd20 @0x0
0x0d20…0d35 lno = 0x0438 // 0xd22 @0x2
0x0d20…0d35 at0004 = ╱ac╱ CHAIN ╱ // 0xd24 @0x4
0x0d20…0d35 at0005 = ╱22╱"╱ // 0xd25 @0x5
0x0d20…0d35 at0006 = ╱50╱P╱ // 0xd26 @0x6
0x0d20…0d35 at0007 = ╱36╱6╱ // 0xd27 @0x7
0x0d20…0d35 at0008 = ╱34╱4╱ // 0xd28 @0x8
0x0d20…0d35 at0009 = ╱31╱1╱ // 0xd29 @0x9
0x0d20…0d35 at000a = ╱32╱2╱ // 0xd2a @0xa
0x0d20…0d35 at000b = ╱31╱1╱ // 0xd2b @0xb
0x0d20…0d35 at000c = ╱30╱0╱ // 0xd2c @0xc
0x0d20…0d35 at000d = ╱3a╱:╱ // 0xd2d @0xd
0x0d20…0d35 at000e = ╱5d╱Å╱ // 0xd2e @0xe
0x0d20…0d35 at000f = ╱4b╱K╱ // 0xd2f @0xf
0x0d20…0d35 at0010 = ╱4f╱O╱ // 0xd30 @0x10
0x0d20…0d35 at0011 = ╱50╱P╱ // 0xd31 @0x11
0x0d20…0d35 at0012 = ╱49╱I╱ // 0xd32 @0x12
0x0d20…0d35 at0013 = ╱22╱"╱ // 0xd33 @0x13
0x0d20…0d35 at0014 = EOL // 0xd34 @0x14
0x0d20…0d35 }
0x0d35…0d3b 9a92 1090 END
0x0d35…0d3b LineComalBin {
0x0d35…0d3b ptr = 0x9a92 // 0xd35 @0x0
0x0d35…0d3b lno = 0x0442 // 0xd37 @0x2
0x0d35…0d3b at0004 = ╱8c╱ END ╱ // 0xd39 @0x4
0x0d35…0d3b at0005 = EOL // 0xd3a @0x5
0x0d35…0d3b }
0x0d3b…0d52 9aa9 1100 PROC FEJL(NR1,NR2,NR3)
0x0d3b…0d52 LineComalBin {
0x0d3b…0d52 ptr = 0x9aa9 // 0xd3b @0x0
0x0d3b…0d52 lno = 0x044c // 0xd3d @0x2
0x0d3b…0d52 at0004 = ╱9e╱ PROC ╱ // 0xd3f @0x4
0x0d3b…0d52 at0005 = ╱46╱F╱ // 0xd40 @0x5
0x0d3b…0d52 at0006 = ╱45╱E╱ // 0xd41 @0x6
0x0d3b…0d52 at0007 = ╱4a╱J╱ // 0xd42 @0x7
0x0d3b…0d52 at0008 = ╱4c╱L╱ // 0xd43 @0x8
0x0d3b…0d52 at0009 = ╱ed╱(╱ // 0xd44 @0x9
0x0d3b…0d52 at000a = ╱4e╱N╱ // 0xd45 @0xa
0x0d3b…0d52 at000b = ╱52╱R╱ // 0xd46 @0xb
0x0d3b…0d52 at000c = ╱31╱1╱ // 0xd47 @0xc
0x0d3b…0d52 at000d = ╱ec╱,╱ // 0xd48 @0xd
0x0d3b…0d52 at000e = ╱4e╱N╱ // 0xd49 @0xe
0x0d3b…0d52 at000f = ╱52╱R╱ // 0xd4a @0xf
0x0d3b…0d52 at0010 = ╱32╱2╱ // 0xd4b @0x10
0x0d3b…0d52 at0011 = ╱ec╱,╱ // 0xd4c @0x11
0x0d3b…0d52 at0012 = ╱4e╱N╱ // 0xd4d @0x12
0x0d3b…0d52 at0013 = ╱52╱R╱ // 0xd4e @0x13
0x0d3b…0d52 at0014 = ╱33╱3╱ // 0xd4f @0x14
0x0d3b…0d52 at0015 = ╱ee╱)╱ // 0xd50 @0x15
0x0d3b…0d52 at0016 = EOL // 0xd51 @0x16
0x0d3b…0d52 }
0x0d52…0d62 9ab9 1110 IF STATUS(NR3$)<>B THEN
0x0d52…0d62 LineComalBin {
0x0d52…0d62 ptr = 0x9ab9 // 0xd52 @0x0
0x0d52…0d62 lno = 0x0456 // 0xd54 @0x2
0x0d52…0d62 at0004 = ╱9c╱ IF ╱ // 0xd56 @0x4
0x0d52…0d62 at0005 = ╱ce╱STATUS╱ // 0xd57 @0x5
0x0d52…0d62 at0006 = ╱ed╱(╱ // 0xd58 @0x6
0x0d52…0d62 at0007 = ╱4e╱N╱ // 0xd59 @0x7
0x0d52…0d62 at0008 = ╱52╱R╱ // 0xd5a @0x8
0x0d52…0d62 at0009 = ╱33╱3╱ // 0xd5b @0x9
0x0d52…0d62 at000a = ╱ef╱$╱ // 0xd5c @0xa
0x0d52…0d62 at000b = ╱ee╱)╱ // 0xd5d @0xb
0x0d52…0d62 at000c = ╱e1╱<>╱ // 0xd5e @0xc
0x0d52…0d62 at000d = ╱42╱B╱ // 0xd5f @0xd
0x0d52…0d62 at000e = ╱b6╱ THEN ╱ // 0xd60 @0xe
0x0d52…0d62 at000f = EOL // 0xd61 @0xf
0x0d52…0d62 }
0x0d62…0d7c 9ad3 1120 PRINT NR1,NR2,NR3$,STATUS(NR3$)
0x0d62…0d7c LineComalBin {
0x0d62…0d7c ptr = 0x9ad3 // 0xd62 @0x0
0x0d62…0d7c lno = 0x0460 // 0xd64 @0x2
0x0d62…0d7c at0004 = ╱92╱ PRINT ╱ // 0xd66 @0x4
0x0d62…0d7c at0005 = ╱4e╱N╱ // 0xd67 @0x5
0x0d62…0d7c at0006 = ╱52╱R╱ // 0xd68 @0x6
0x0d62…0d7c at0007 = ╱31╱1╱ // 0xd69 @0x7
0x0d62…0d7c at0008 = ╱ec╱,╱ // 0xd6a @0x8
0x0d62…0d7c at0009 = ╱4e╱N╱ // 0xd6b @0x9
0x0d62…0d7c at000a = ╱52╱R╱ // 0xd6c @0xa
0x0d62…0d7c at000b = ╱32╱2╱ // 0xd6d @0xb
0x0d62…0d7c at000c = ╱ec╱,╱ // 0xd6e @0xc
0x0d62…0d7c at000d = ╱4e╱N╱ // 0xd6f @0xd
0x0d62…0d7c at000e = ╱52╱R╱ // 0xd70 @0xe
0x0d62…0d7c at000f = ╱33╱3╱ // 0xd71 @0xf
0x0d62…0d7c at0010 = ╱ef╱$╱ // 0xd72 @0x10
0x0d62…0d7c at0011 = ╱ec╱,╱ // 0xd73 @0x11
0x0d62…0d7c at0012 = ╱ce╱STATUS╱ // 0xd74 @0x12
0x0d62…0d7c at0013 = ╱ed╱(╱ // 0xd75 @0x13
0x0d62…0d7c at0014 = ╱4e╱N╱ // 0xd76 @0x14
0x0d62…0d7c at0015 = ╱52╱R╱ // 0xd77 @0x15
0x0d62…0d7c at0016 = ╱33╱3╱ // 0xd78 @0x16
0x0d62…0d7c at0017 = ╱ef╱$╱ // 0xd79 @0x17
0x0d62…0d7c at0018 = ╱ee╱)╱ // 0xd7a @0x18
0x0d62…0d7c at0019 = EOL // 0xd7b @0x19
0x0d62…0d7c }
0x0d7c…0d82 9ad9 1130 STOP
0x0d7c…0d82 LineComalBin {
0x0d7c…0d82 ptr = 0x9ad9 // 0xd7c @0x0
0x0d7c…0d82 lno = 0x046a // 0xd7e @0x2
0x0d7c…0d82 at0004 = ╱8d╱ STOP ╱ // 0xd80 @0x4
0x0d7c…0d82 at0005 = EOL // 0xd81 @0x5
0x0d7c…0d82 }
0x0d82…0d88 9adf 1140 ENDIF
0x0d82…0d88 LineComalBin {
0x0d82…0d88 ptr = 0x9adf // 0xd82 @0x0
0x0d82…0d88 lno = 0x0474 // 0xd84 @0x2
0x0d82…0d88 at0004 = ╱9b╱ ENDIF ╱ // 0xd86 @0x4
0x0d82…0d88 at0005 = EOL // 0xd87 @0x5
0x0d82…0d88 }
0x0d88…0d8e 9ae5 1150 ENDPROC
0x0d88…0d8e LineComalBin {
0x0d88…0d8e ptr = 0x9ae5 // 0xd88 @0x0
0x0d88…0d8e lno = 0x047e // 0xd8a @0x2
0x0d88…0d8e at0004 = ╱9f╱ ENDPROC ╱ // 0xd8c @0x4
0x0d88…0d8e at0005 = EOL // 0xd8d @0x5
0x0d88…0d8e }
0x0d8e…0da0 9af7 1160 PROC FSORT(K,MID)
0x0d8e…0da0 LineComalBin {
0x0d8e…0da0 ptr = 0x9af7 // 0xd8e @0x0
0x0d8e…0da0 lno = 0x0488 // 0xd90 @0x2
0x0d8e…0da0 at0004 = ╱9e╱ PROC ╱ // 0xd92 @0x4
0x0d8e…0da0 at0005 = ╱46╱F╱ // 0xd93 @0x5
0x0d8e…0da0 at0006 = ╱53╱S╱ // 0xd94 @0x6
0x0d8e…0da0 at0007 = ╱4f╱O╱ // 0xd95 @0x7
0x0d8e…0da0 at0008 = ╱52╱R╱ // 0xd96 @0x8
0x0d8e…0da0 at0009 = ╱54╱T╱ // 0xd97 @0x9
0x0d8e…0da0 at000a = ╱ed╱(╱ // 0xd98 @0xa
0x0d8e…0da0 at000b = ╱4b╱K╱ // 0xd99 @0xb
0x0d8e…0da0 at000c = ╱ec╱,╱ // 0xd9a @0xc
0x0d8e…0da0 at000d = ╱4d╱M╱ // 0xd9b @0xd
0x0d8e…0da0 at000e = ╱49╱I╱ // 0xd9c @0xe
0x0d8e…0da0 at000f = ╱44╱D╱ // 0xd9d @0xf
0x0d8e…0da0 at0010 = ╱ee╱)╱ // 0xd9e @0x10
0x0d8e…0da0 at0011 = EOL // 0xd9f @0x11
0x0d8e…0da0 }
0x0da0…0daa 9b01 1170 OPEN K$,R
0x0da0…0daa LineComalBin {
0x0da0…0daa ptr = 0x9b01 // 0xda0 @0x0
0x0da0…0daa lno = 0x0492 // 0xda2 @0x2
0x0da0…0daa at0004 = ╱a7╱ OPEN ╱ // 0xda4 @0x4
0x0da0…0daa at0005 = ╱4b╱K╱ // 0xda5 @0x5
0x0da0…0daa at0006 = ╱ef╱$╱ // 0xda6 @0x6
0x0da0…0daa at0007 = ╱ec╱,╱ // 0xda7 @0x7
0x0da0…0daa at0008 = ╱52╱R╱ // 0xda8 @0x8
0x0da0…0daa at0009 = EOL // 0xda9 @0x9
0x0da0…0daa }
0x0daa…0dbc 9b13 1180 EXEC FEJL(G,E,K$)
0x0daa…0dbc LineComalBin {
0x0daa…0dbc ptr = 0x9b13 // 0xdaa @0x0
0x0daa…0dbc lno = 0x049c // 0xdac @0x2
0x0daa…0dbc at0004 = ╱9d╱ EXEC ╱ // 0xdae @0x4
0x0daa…0dbc at0005 = ╱46╱F╱ // 0xdaf @0x5
0x0daa…0dbc at0006 = ╱45╱E╱ // 0xdb0 @0x6
0x0daa…0dbc at0007 = ╱4a╱J╱ // 0xdb1 @0x7
0x0daa…0dbc at0008 = ╱4c╱L╱ // 0xdb2 @0x8
0x0daa…0dbc at0009 = ╱ed╱(╱ // 0xdb3 @0x9
0x0daa…0dbc at000a = ╱47╱G╱ // 0xdb4 @0xa
0x0daa…0dbc at000b = ╱ec╱,╱ // 0xdb5 @0xb
0x0daa…0dbc at000c = ╱45╱E╱ // 0xdb6 @0xc
0x0daa…0dbc at000d = ╱ec╱,╱ // 0xdb7 @0xd
0x0daa…0dbc at000e = ╱4b╱K╱ // 0xdb8 @0xe
0x0daa…0dbc at000f = ╱ef╱$╱ // 0xdb9 @0xf
0x0daa…0dbc at0010 = ╱ee╱)╱ // 0xdba @0x10
0x0daa…0dbc at0011 = EOL // 0xdbb @0x11
0x0daa…0dbc }
0x0dbc…0dc4 9b1b 1190 J=E
0x0dbc…0dc4 LineComalBin {
0x0dbc…0dc4 ptr = 0x9b1b // 0xdbc @0x0
0x0dbc…0dc4 lno = 0x04a6 // 0xdbe @0x2
0x0dbc…0dc4 at0004 = ╱4a╱J╱ // 0xdc0 @0x4
0x0dbc…0dc4 at0005 = ╱dc╱=╱ // 0xdc1 @0x5
0x0dbc…0dc4 at0006 = ╱45╱E╱ // 0xdc2 @0x6
0x0dbc…0dc4 at0007 = EOL // 0xdc3 @0x7
0x0dbc…0dc4 }
0x0dc4…0dd1 9b28 1200 FOR I=E TO MID
0x0dc4…0dd1 LineComalBin {
0x0dc4…0dd1 ptr = 0x9b28 // 0xdc4 @0x0
0x0dc4…0dd1 lno = 0x04b0 // 0xdc6 @0x2
0x0dc4…0dd1 at0004 = ╱83╱ FOR ╱ // 0xdc8 @0x4
0x0dc4…0dd1 at0005 = ╱49╱I╱ // 0xdc9 @0x5
0x0dc4…0dd1 at0006 = ╱dc╱=╱ // 0xdca @0x6
0x0dc4…0dd1 at0007 = ╱45╱E╱ // 0xdcb @0x7
0x0dc4…0dd1 at0008 = ╱b7╱ TO ╱ // 0xdcc @0x8
0x0dc4…0dd1 at0009 = ╱4d╱M╱ // 0xdcd @0x9
0x0dc4…0dd1 at000a = ╱49╱I╱ // 0xdce @0xa
0x0dc4…0dd1 at000b = ╱44╱D╱ // 0xdcf @0xb
0x0dc4…0dd1 at000c = EOL // 0xdd0 @0xc
0x0dc4…0dd1 }
0x0dd1…0e0e 9b65 1210 EXEC FGET2(K$,I,N(J),D(J),BI(J),TK$(J),BE$(J),TE$(J),ENT(J))
0x0dd1…0e0e LineComalBin {
0x0dd1…0e0e ptr = 0x9b65 // 0xdd1 @0x0
0x0dd1…0e0e lno = 0x04ba // 0xdd3 @0x2
0x0dd1…0e0e at0004 = ╱9d╱ EXEC ╱ // 0xdd5 @0x4
0x0dd1…0e0e at0005 = ╱46╱F╱ // 0xdd6 @0x5
0x0dd1…0e0e at0006 = ╱47╱G╱ // 0xdd7 @0x6
0x0dd1…0e0e at0007 = ╱45╱E╱ // 0xdd8 @0x7
0x0dd1…0e0e at0008 = ╱54╱T╱ // 0xdd9 @0x8
0x0dd1…0e0e at0009 = ╱32╱2╱ // 0xdda @0x9
0x0dd1…0e0e at000a = ╱ed╱(╱ // 0xddb @0xa
0x0dd1…0e0e at000b = ╱4b╱K╱ // 0xddc @0xb
0x0dd1…0e0e at000c = ╱ef╱$╱ // 0xddd @0xc
0x0dd1…0e0e at000d = ╱ec╱,╱ // 0xdde @0xd
0x0dd1…0e0e at000e = ╱49╱I╱ // 0xddf @0xe
0x0dd1…0e0e at000f = ╱ec╱,╱ // 0xde0 @0xf
0x0dd1…0e0e at0010 = ╱4e╱N╱ // 0xde1 @0x10
0x0dd1…0e0e at0011 = ╱ed╱(╱ // 0xde2 @0x11
0x0dd1…0e0e at0012 = ╱4a╱J╱ // 0xde3 @0x12
0x0dd1…0e0e at0013 = ╱ee╱)╱ // 0xde4 @0x13
0x0dd1…0e0e at0014 = ╱ec╱,╱ // 0xde5 @0x14
0x0dd1…0e0e at0015 = ╱44╱D╱ // 0xde6 @0x15
0x0dd1…0e0e at0016 = ╱ed╱(╱ // 0xde7 @0x16
0x0dd1…0e0e at0017 = ╱4a╱J╱ // 0xde8 @0x17
0x0dd1…0e0e at0018 = ╱ee╱)╱ // 0xde9 @0x18
0x0dd1…0e0e at0019 = ╱ec╱,╱ // 0xdea @0x19
0x0dd1…0e0e at001a = ╱42╱B╱ // 0xdeb @0x1a
0x0dd1…0e0e at001b = ╱49╱I╱ // 0xdec @0x1b
0x0dd1…0e0e at001c = ╱ed╱(╱ // 0xded @0x1c
0x0dd1…0e0e at001d = ╱4a╱J╱ // 0xdee @0x1d
0x0dd1…0e0e at001e = ╱ee╱)╱ // 0xdef @0x1e
0x0dd1…0e0e at001f = ╱ec╱,╱ // 0xdf0 @0x1f
0x0dd1…0e0e at0020 = ╱54╱T╱ // 0xdf1 @0x20
0x0dd1…0e0e at0021 = ╱4b╱K╱ // 0xdf2 @0x21
0x0dd1…0e0e at0022 = ╱ef╱$╱ // 0xdf3 @0x22
0x0dd1…0e0e at0023 = ╱ed╱(╱ // 0xdf4 @0x23
0x0dd1…0e0e at0024 = ╱4a╱J╱ // 0xdf5 @0x24
0x0dd1…0e0e at0025 = ╱ee╱)╱ // 0xdf6 @0x25
0x0dd1…0e0e at0026 = ╱ec╱,╱ // 0xdf7 @0x26
0x0dd1…0e0e at0027 = ╱42╱B╱ // 0xdf8 @0x27
0x0dd1…0e0e at0028 = ╱45╱E╱ // 0xdf9 @0x28
0x0dd1…0e0e at0029 = ╱ef╱$╱ // 0xdfa @0x29
0x0dd1…0e0e at002a = ╱ed╱(╱ // 0xdfb @0x2a
0x0dd1…0e0e at002b = ╱4a╱J╱ // 0xdfc @0x2b
0x0dd1…0e0e at002c = ╱ee╱)╱ // 0xdfd @0x2c
0x0dd1…0e0e at002d = ╱ec╱,╱ // 0xdfe @0x2d
0x0dd1…0e0e at002e = ╱54╱T╱ // 0xdff @0x2e
0x0dd1…0e0e at002f = ╱45╱E╱ // 0xe00 @0x2f
0x0dd1…0e0e at0030 = ╱ef╱$╱ // 0xe01 @0x30
0x0dd1…0e0e at0031 = ╱ed╱(╱ // 0xe02 @0x31
0x0dd1…0e0e at0032 = ╱4a╱J╱ // 0xe03 @0x32
0x0dd1…0e0e at0033 = ╱ee╱)╱ // 0xe04 @0x33
0x0dd1…0e0e at0034 = ╱ec╱,╱ // 0xe05 @0x34
0x0dd1…0e0e at0035 = ╱45╱E╱ // 0xe06 @0x35
0x0dd1…0e0e at0036 = ╱4e╱N╱ // 0xe07 @0x36
0x0dd1…0e0e at0037 = ╱54╱T╱ // 0xe08 @0x37
0x0dd1…0e0e at0038 = ╱ed╱(╱ // 0xe09 @0x38
0x0dd1…0e0e at0039 = ╱4a╱J╱ // 0xe0a @0x39
0x0dd1…0e0e at003a = ╱ee╱)╱ // 0xe0b @0x3a
0x0dd1…0e0e at003b = ╱ee╱)╱ // 0xe0c @0x3b
0x0dd1…0e0e at003c = EOL // 0xe0d @0x3c
0x0dd1…0e0e }
0x0e0e…0e18 9b6f 1220 J=J+E
0x0e0e…0e18 LineComalBin {
0x0e0e…0e18 ptr = 0x9b6f // 0xe0e @0x0
0x0e0e…0e18 lno = 0x04c4 // 0xe10 @0x2
0x0e0e…0e18 at0004 = ╱4a╱J╱ // 0xe12 @0x4
0x0e0e…0e18 at0005 = ╱dc╱=╱ // 0xe13 @0x5
0x0e0e…0e18 at0006 = ╱4a╱J╱ // 0xe14 @0x6
0x0e0e…0e18 at0007 = ╱e2╱+╱ // 0xe15 @0x7
0x0e0e…0e18 at0008 = ╱45╱E╱ // 0xe16 @0x8
0x0e0e…0e18 at0009 = EOL // 0xe17 @0x9
0x0e0e…0e18 }
0x0e18…0e1f 9b76 1230 NEXT I
0x0e18…0e1f LineComalBin {
0x0e18…0e1f ptr = 0x9b76 // 0xe18 @0x0
0x0e18…0e1f lno = 0x04ce // 0xe1a @0x2
0x0e18…0e1f at0004 = ╱84╱ NEXT ╱ // 0xe1c @0x4
0x0e18…0e1f at0005 = ╱49╱I╱ // 0xe1d @0x5
0x0e18…0e1f at0006 = EOL // 0xe1e @0x6
0x0e18…0e1f }
0x0e1f…0e2c 9b83 1240 FOR I=E TO J-E
0x0e1f…0e2c LineComalBin {
0x0e1f…0e2c ptr = 0x9b83 // 0xe1f @0x0
0x0e1f…0e2c lno = 0x04d8 // 0xe21 @0x2
0x0e1f…0e2c at0004 = ╱83╱ FOR ╱ // 0xe23 @0x4
0x0e1f…0e2c at0005 = ╱49╱I╱ // 0xe24 @0x5
0x0e1f…0e2c at0006 = ╱dc╱=╱ // 0xe25 @0x6
0x0e1f…0e2c at0007 = ╱45╱E╱ // 0xe26 @0x7
0x0e1f…0e2c at0008 = ╱b7╱ TO ╱ // 0xe27 @0x8
0x0e1f…0e2c at0009 = ╱4a╱J╱ // 0xe28 @0x9
0x0e1f…0e2c at000a = ╱e3╱-╱ // 0xe29 @0xa
0x0e1f…0e2c at000b = ╱45╱E╱ // 0xe2a @0xb
0x0e1f…0e2c at000c = EOL // 0xe2b @0xc
0x0e1f…0e2c }
0x0e2c…0e39 9b90 1250 PEG(I)=I
0x0e2c…0e39 LineComalBin {
0x0e2c…0e39 ptr = 0x9b90 // 0xe2c @0x0
0x0e2c…0e39 lno = 0x04e2 // 0xe2e @0x2
0x0e2c…0e39 at0004 = ╱50╱P╱ // 0xe30 @0x4
0x0e2c…0e39 at0005 = ╱45╱E╱ // 0xe31 @0x5
0x0e2c…0e39 at0006 = ╱47╱G╱ // 0xe32 @0x6
0x0e2c…0e39 at0007 = ╱ed╱(╱ // 0xe33 @0x7
0x0e2c…0e39 at0008 = ╱49╱I╱ // 0xe34 @0x8
0x0e2c…0e39 at0009 = ╱ee╱)╱ // 0xe35 @0x9
0x0e2c…0e39 at000a = ╱dc╱=╱ // 0xe36 @0xa
0x0e2c…0e39 at000b = ╱49╱I╱ // 0xe37 @0xb
0x0e2c…0e39 at000c = EOL // 0xe38 @0xc
0x0e2c…0e39 }
0x0e39…0e40 9b97 1260 NEXT I
0x0e39…0e40 LineComalBin {
0x0e39…0e40 ptr = 0x9b97 // 0xe39 @0x0
0x0e39…0e40 lno = 0x04ec // 0xe3b @0x2
0x0e39…0e40 at0004 = ╱84╱ NEXT ╱ // 0xe3d @0x4
0x0e39…0e40 at0005 = ╱49╱I╱ // 0xe3e @0x5
0x0e39…0e40 at0006 = EOL // 0xe3f @0x6
0x0e39…0e40 }
0x0e40…0e4d 9ba4 1270 FOR I=E TO J-E
0x0e40…0e4d LineComalBin {
0x0e40…0e4d ptr = 0x9ba4 // 0xe40 @0x0
0x0e40…0e4d lno = 0x04f6 // 0xe42 @0x2
0x0e40…0e4d at0004 = ╱83╱ FOR ╱ // 0xe44 @0x4
0x0e40…0e4d at0005 = ╱49╱I╱ // 0xe45 @0x5
0x0e40…0e4d at0006 = ╱dc╱=╱ // 0xe46 @0x6
0x0e40…0e4d at0007 = ╱45╱E╱ // 0xe47 @0x7
0x0e40…0e4d at0008 = ╱b7╱ TO ╱ // 0xe48 @0x8
0x0e40…0e4d at0009 = ╱4a╱J╱ // 0xe49 @0x9
0x0e40…0e4d at000a = ╱e3╱-╱ // 0xe4a @0xa
0x0e40…0e4d at000b = ╱45╱E╱ // 0xe4b @0xb
0x0e40…0e4d at000c = EOL // 0xe4c @0xc
0x0e40…0e4d }
0x0e4d…0e57 9bae 1280 MIN=I
0x0e4d…0e57 LineComalBin {
0x0e4d…0e57 ptr = 0x9bae // 0xe4d @0x0
0x0e4d…0e57 lno = 0x0500 // 0xe4f @0x2
0x0e4d…0e57 at0004 = ╱4d╱M╱ // 0xe51 @0x4
0x0e4d…0e57 at0005 = ╱49╱I╱ // 0xe52 @0x5
0x0e4d…0e57 at0006 = ╱4e╱N╱ // 0xe53 @0x6
0x0e4d…0e57 at0007 = ╱dc╱=╱ // 0xe54 @0x7
0x0e4d…0e57 at0008 = ╱49╱I╱ // 0xe55 @0x8
0x0e4d…0e57 at0009 = EOL // 0xe56 @0x9
0x0e4d…0e57 }
0x0e57…0e66 9bbd 1290 FOR H=I+E TO J-E
0x0e57…0e66 LineComalBin {
0x0e57…0e66 ptr = 0x9bbd // 0xe57 @0x0
0x0e57…0e66 lno = 0x050a // 0xe59 @0x2
0x0e57…0e66 at0004 = ╱83╱ FOR ╱ // 0xe5b @0x4
0x0e57…0e66 at0005 = ╱48╱H╱ // 0xe5c @0x5
0x0e57…0e66 at0006 = ╱dc╱=╱ // 0xe5d @0x6
0x0e57…0e66 at0007 = ╱49╱I╱ // 0xe5e @0x7
0x0e57…0e66 at0008 = ╱e2╱+╱ // 0xe5f @0x8
0x0e57…0e66 at0009 = ╱45╱E╱ // 0xe60 @0x9
0x0e57…0e66 at000a = ╱b7╱ TO ╱ // 0xe61 @0xa
0x0e57…0e66 at000b = ╱4a╱J╱ // 0xe62 @0xb
0x0e57…0e66 at000c = ╱e3╱-╱ // 0xe63 @0xc
0x0e57…0e66 at000d = ╱45╱E╱ // 0xe64 @0xd
0x0e57…0e66 at000e = EOL // 0xe65 @0xe
0x0e57…0e66 }
0x0e66…0e82 9bd9 1300 IF N(PEG(H))<N(PEG(MIN)) THEN
0x0e66…0e82 LineComalBin {
0x0e66…0e82 ptr = 0x9bd9 // 0xe66 @0x0
0x0e66…0e82 lno = 0x0514 // 0xe68 @0x2
0x0e66…0e82 at0004 = ╱9c╱ IF ╱ // 0xe6a @0x4
0x0e66…0e82 at0005 = ╱4e╱N╱ // 0xe6b @0x5
0x0e66…0e82 at0006 = ╱ed╱(╱ // 0xe6c @0x6
0x0e66…0e82 at0007 = ╱50╱P╱ // 0xe6d @0x7
0x0e66…0e82 at0008 = ╱45╱E╱ // 0xe6e @0x8
0x0e66…0e82 at0009 = ╱47╱G╱ // 0xe6f @0x9
0x0e66…0e82 at000a = ╱ed╱(╱ // 0xe70 @0xa
0x0e66…0e82 at000b = ╱48╱H╱ // 0xe71 @0xb
0x0e66…0e82 at000c = ╱ee╱)╱ // 0xe72 @0xc
0x0e66…0e82 at000d = ╱ee╱)╱ // 0xe73 @0xd
0x0e66…0e82 at000e = ╱dd╱<╱ // 0xe74 @0xe
0x0e66…0e82 at000f = ╱4e╱N╱ // 0xe75 @0xf
0x0e66…0e82 at0010 = ╱ed╱(╱ // 0xe76 @0x10
0x0e66…0e82 at0011 = ╱50╱P╱ // 0xe77 @0x11
0x0e66…0e82 at0012 = ╱45╱E╱ // 0xe78 @0x12
0x0e66…0e82 at0013 = ╱47╱G╱ // 0xe79 @0x13
0x0e66…0e82 at0014 = ╱ed╱(╱ // 0xe7a @0x14
0x0e66…0e82 at0015 = ╱4d╱M╱ // 0xe7b @0x15
0x0e66…0e82 at0016 = ╱49╱I╱ // 0xe7c @0x16
0x0e66…0e82 at0017 = ╱4e╱N╱ // 0xe7d @0x17
0x0e66…0e82 at0018 = ╱ee╱)╱ // 0xe7e @0x18
0x0e66…0e82 at0019 = ╱ee╱)╱ // 0xe7f @0x19
0x0e66…0e82 at001a = ╱b6╱ THEN ╱ // 0xe80 @0x1a
0x0e66…0e82 at001b = EOL // 0xe81 @0x1b
0x0e66…0e82 }
0x0e82…0e8c 9be3 1310 MIN=H
0x0e82…0e8c LineComalBin {
0x0e82…0e8c ptr = 0x9be3 // 0xe82 @0x0
0x0e82…0e8c lno = 0x051e // 0xe84 @0x2
0x0e82…0e8c at0004 = ╱4d╱M╱ // 0xe86 @0x4
0x0e82…0e8c at0005 = ╱49╱I╱ // 0xe87 @0x5
0x0e82…0e8c at0006 = ╱4e╱N╱ // 0xe88 @0x6
0x0e82…0e8c at0007 = ╱dc╱=╱ // 0xe89 @0x7
0x0e82…0e8c at0008 = ╱48╱H╱ // 0xe8a @0x8
0x0e82…0e8c at0009 = EOL // 0xe8b @0x9
0x0e82…0e8c }
0x0e8c…0e92 9be9 1320 ELSE
0x0e8c…0e92 LineComalBin {
0x0e8c…0e92 ptr = 0x9be9 // 0xe8c @0x0
0x0e8c…0e92 lno = 0x0528 // 0xe8e @0x2
0x0e8c…0e92 at0004 = ╱9a╱ ELSE ╱ // 0xe90 @0x4
0x0e8c…0e92 at0005 = EOL // 0xe91 @0x5
0x0e8c…0e92 }
0x0e92…0eae 9c05 1330 IF N(PEG(H))=N(PEG(MIN)) THEN
0x0e92…0eae LineComalBin {
0x0e92…0eae ptr = 0x9c05 // 0xe92 @0x0
0x0e92…0eae lno = 0x0532 // 0xe94 @0x2
0x0e92…0eae at0004 = ╱9c╱ IF ╱ // 0xe96 @0x4
0x0e92…0eae at0005 = ╱4e╱N╱ // 0xe97 @0x5
0x0e92…0eae at0006 = ╱ed╱(╱ // 0xe98 @0x6
0x0e92…0eae at0007 = ╱50╱P╱ // 0xe99 @0x7
0x0e92…0eae at0008 = ╱45╱E╱ // 0xe9a @0x8
0x0e92…0eae at0009 = ╱47╱G╱ // 0xe9b @0x9
0x0e92…0eae at000a = ╱ed╱(╱ // 0xe9c @0xa
0x0e92…0eae at000b = ╱48╱H╱ // 0xe9d @0xb
0x0e92…0eae at000c = ╱ee╱)╱ // 0xe9e @0xc
0x0e92…0eae at000d = ╱ee╱)╱ // 0xe9f @0xd
0x0e92…0eae at000e = ╱dc╱=╱ // 0xea0 @0xe
0x0e92…0eae at000f = ╱4e╱N╱ // 0xea1 @0xf
0x0e92…0eae at0010 = ╱ed╱(╱ // 0xea2 @0x10
0x0e92…0eae at0011 = ╱50╱P╱ // 0xea3 @0x11
0x0e92…0eae at0012 = ╱45╱E╱ // 0xea4 @0x12
0x0e92…0eae at0013 = ╱47╱G╱ // 0xea5 @0x13
0x0e92…0eae at0014 = ╱ed╱(╱ // 0xea6 @0x14
0x0e92…0eae at0015 = ╱4d╱M╱ // 0xea7 @0x15
0x0e92…0eae at0016 = ╱49╱I╱ // 0xea8 @0x16
0x0e92…0eae at0017 = ╱4e╱N╱ // 0xea9 @0x17
0x0e92…0eae at0018 = ╱ee╱)╱ // 0xeaa @0x18
0x0e92…0eae at0019 = ╱ee╱)╱ // 0xeab @0x19
0x0e92…0eae at001a = ╱b6╱ THEN ╱ // 0xeac @0x1a
0x0e92…0eae at001b = EOL // 0xead @0x1b
0x0e92…0eae }
0x0eae…0ecf 9c26 1340 IF D(PEG(H))<D(PEG(MIN)) THEN MIN=H
0x0eae…0ecf LineComalBin {
0x0eae…0ecf ptr = 0x9c26 // 0xeae @0x0
0x0eae…0ecf lno = 0x053c // 0xeb0 @0x2
0x0eae…0ecf at0004 = ╱82╱ IF ╱ // 0xeb2 @0x4
0x0eae…0ecf at0005 = ╱44╱D╱ // 0xeb3 @0x5
0x0eae…0ecf at0006 = ╱ed╱(╱ // 0xeb4 @0x6
0x0eae…0ecf at0007 = ╱50╱P╱ // 0xeb5 @0x7
0x0eae…0ecf at0008 = ╱45╱E╱ // 0xeb6 @0x8
0x0eae…0ecf at0009 = ╱47╱G╱ // 0xeb7 @0x9
0x0eae…0ecf at000a = ╱ed╱(╱ // 0xeb8 @0xa
0x0eae…0ecf at000b = ╱48╱H╱ // 0xeb9 @0xb
0x0eae…0ecf at000c = ╱ee╱)╱ // 0xeba @0xc
0x0eae…0ecf at000d = ╱ee╱)╱ // 0xebb @0xd
0x0eae…0ecf at000e = ╱dd╱<╱ // 0xebc @0xe
0x0eae…0ecf at000f = ╱44╱D╱ // 0xebd @0xf
0x0eae…0ecf at0010 = ╱ed╱(╱ // 0xebe @0x10
0x0eae…0ecf at0011 = ╱50╱P╱ // 0xebf @0x11
0x0eae…0ecf at0012 = ╱45╱E╱ // 0xec0 @0x12
0x0eae…0ecf at0013 = ╱47╱G╱ // 0xec1 @0x13
0x0eae…0ecf at0014 = ╱ed╱(╱ // 0xec2 @0x14
0x0eae…0ecf at0015 = ╱4d╱M╱ // 0xec3 @0x15
0x0eae…0ecf at0016 = ╱49╱I╱ // 0xec4 @0x16
0x0eae…0ecf at0017 = ╱4e╱N╱ // 0xec5 @0x17
0x0eae…0ecf at0018 = ╱ee╱)╱ // 0xec6 @0x18
0x0eae…0ecf at0019 = ╱ee╱)╱ // 0xec7 @0x19
0x0eae…0ecf at001a = ╱b6╱ THEN ╱ // 0xec8 @0x1a
0x0eae…0ecf at001b = ╱4d╱M╱ // 0xec9 @0x1b
0x0eae…0ecf at001c = ╱49╱I╱ // 0xeca @0x1c
0x0eae…0ecf at001d = ╱4e╱N╱ // 0xecb @0x1d
0x0eae…0ecf at001e = ╱dc╱=╱ // 0xecc @0x1e
0x0eae…0ecf at001f = ╱48╱H╱ // 0xecd @0x1f
0x0eae…0ecf at0020 = EOL // 0xece @0x20
0x0eae…0ecf }
0x0ecf…0ed5 9c2c 1350 ENDIF
0x0ecf…0ed5 LineComalBin {
0x0ecf…0ed5 ptr = 0x9c2c // 0xecf @0x0
0x0ecf…0ed5 lno = 0x0546 // 0xed1 @0x2
0x0ecf…0ed5 at0004 = ╱9b╱ ENDIF ╱ // 0xed3 @0x4
0x0ecf…0ed5 at0005 = EOL // 0xed4 @0x5
0x0ecf…0ed5 }
0x0ed5…0edb 9c32 1360 ENDIF
0x0ed5…0edb LineComalBin {
0x0ed5…0edb ptr = 0x9c32 // 0xed5 @0x0
0x0ed5…0edb lno = 0x0550 // 0xed7 @0x2
0x0ed5…0edb at0004 = ╱9b╱ ENDIF ╱ // 0xed9 @0x4
0x0ed5…0edb at0005 = EOL // 0xeda @0x5
0x0ed5…0edb }
0x0edb…0ee2 9c39 1370 NEXT H
0x0edb…0ee2 LineComalBin {
0x0edb…0ee2 ptr = 0x9c39 // 0xedb @0x0
0x0edb…0ee2 lno = 0x055a // 0xedd @0x2
0x0edb…0ee2 at0004 = ╱84╱ NEXT ╱ // 0xedf @0x4
0x0edb…0ee2 at0005 = ╱48╱H╱ // 0xee0 @0x5
0x0edb…0ee2 at0006 = EOL // 0xee1 @0x6
0x0edb…0ee2 }
0x0ee2…0ef0 9c47 1380 MP=PEG(I)
0x0ee2…0ef0 LineComalBin {
0x0ee2…0ef0 ptr = 0x9c47 // 0xee2 @0x0
0x0ee2…0ef0 lno = 0x0564 // 0xee4 @0x2
0x0ee2…0ef0 at0004 = ╱4d╱M╱ // 0xee6 @0x4
0x0ee2…0ef0 at0005 = ╱50╱P╱ // 0xee7 @0x5
0x0ee2…0ef0 at0006 = ╱dc╱=╱ // 0xee8 @0x6
0x0ee2…0ef0 at0007 = ╱50╱P╱ // 0xee9 @0x7
0x0ee2…0ef0 at0008 = ╱45╱E╱ // 0xeea @0x8
0x0ee2…0ef0 at0009 = ╱47╱G╱ // 0xeeb @0x9
0x0ee2…0ef0 at000a = ╱ed╱(╱ // 0xeec @0xa
0x0ee2…0ef0 at000b = ╱49╱I╱ // 0xeed @0xb
0x0ee2…0ef0 at000c = ╱ee╱)╱ // 0xeee @0xc
0x0ee2…0ef0 at000d = EOL // 0xeef @0xd
0x0ee2…0ef0 }
0x0ef0…0f04 9c5b 1390 PEG(I)=PEG(MIN)
0x0ef0…0f04 LineComalBin {
0x0ef0…0f04 ptr = 0x9c5b // 0xef0 @0x0
0x0ef0…0f04 lno = 0x056e // 0xef2 @0x2
0x0ef0…0f04 at0004 = ╱50╱P╱ // 0xef4 @0x4
0x0ef0…0f04 at0005 = ╱45╱E╱ // 0xef5 @0x5
0x0ef0…0f04 at0006 = ╱47╱G╱ // 0xef6 @0x6
0x0ef0…0f04 at0007 = ╱ed╱(╱ // 0xef7 @0x7
0x0ef0…0f04 at0008 = ╱49╱I╱ // 0xef8 @0x8
0x0ef0…0f04 at0009 = ╱ee╱)╱ // 0xef9 @0x9
0x0ef0…0f04 at000a = ╱dc╱=╱ // 0xefa @0xa
0x0ef0…0f04 at000b = ╱50╱P╱ // 0xefb @0xb
0x0ef0…0f04 at000c = ╱45╱E╱ // 0xefc @0xc
0x0ef0…0f04 at000d = ╱47╱G╱ // 0xefd @0xd
0x0ef0…0f04 at000e = ╱ed╱(╱ // 0xefe @0xe
0x0ef0…0f04 at000f = ╱4d╱M╱ // 0xeff @0xf
0x0ef0…0f04 at0010 = ╱49╱I╱ // 0xf00 @0x10
0x0ef0…0f04 at0011 = ╱4e╱N╱ // 0xf01 @0x11
0x0ef0…0f04 at0012 = ╱ee╱)╱ // 0xf02 @0x12
0x0ef0…0f04 at0013 = EOL // 0xf03 @0x13
0x0ef0…0f04 }
0x0f04…0f14 9c6b 1400 PEG(MIN)=MP
0x0f04…0f14 LineComalBin {
0x0f04…0f14 ptr = 0x9c6b // 0xf04 @0x0
0x0f04…0f14 lno = 0x0578 // 0xf06 @0x2
0x0f04…0f14 at0004 = ╱50╱P╱ // 0xf08 @0x4
0x0f04…0f14 at0005 = ╱45╱E╱ // 0xf09 @0x5
0x0f04…0f14 at0006 = ╱47╱G╱ // 0xf0a @0x6
0x0f04…0f14 at0007 = ╱ed╱(╱ // 0xf0b @0x7
0x0f04…0f14 at0008 = ╱4d╱M╱ // 0xf0c @0x8
0x0f04…0f14 at0009 = ╱49╱I╱ // 0xf0d @0x9
0x0f04…0f14 at000a = ╱4e╱N╱ // 0xf0e @0xa
0x0f04…0f14 at000b = ╱ee╱)╱ // 0xf0f @0xb
0x0f04…0f14 at000c = ╱dc╱=╱ // 0xf10 @0xc
0x0f04…0f14 at000d = ╱4d╱M╱ // 0xf11 @0xd
0x0f04…0f14 at000e = ╱50╱P╱ // 0xf12 @0xe
0x0f04…0f14 at000f = EOL // 0xf13 @0xf
0x0f04…0f14 }
0x0f14…0f1b 9c72 1410 NEXT I
0x0f14…0f1b LineComalBin {
0x0f14…0f1b ptr = 0x9c72 // 0xf14 @0x0
0x0f14…0f1b lno = 0x0582 // 0xf16 @0x2
0x0f14…0f1b at0004 = ╱84╱ NEXT ╱ // 0xf18 @0x4
0x0f14…0f1b at0005 = ╱49╱I╱ // 0xf19 @0x5
0x0f14…0f1b at0006 = EOL // 0xf1a @0x6
0x0f14…0f1b }
0x0f1b…0f23 9c7a 1420 CLOSE K$
0x0f1b…0f23 LineComalBin {
0x0f1b…0f23 ptr = 0x9c7a // 0xf1b @0x0
0x0f1b…0f23 lno = 0x058c // 0xf1d @0x2
0x0f1b…0f23 at0004 = ╱a8╱ CLOSE ╱ // 0xf1f @0x4
0x0f1b…0f23 at0005 = ╱4b╱K╱ // 0xf20 @0x5
0x0f1b…0f23 at0006 = ╱ef╱$╱ // 0xf21 @0x6
0x0f1b…0f23 at0007 = EOL // 0xf22 @0x7
0x0f1b…0f23 }
0x0f23…0f3a 9c91 1430 EXEC FEJL(G,4,K$)
0x0f23…0f3a LineComalBin {
0x0f23…0f3a ptr = 0x9c91 // 0xf23 @0x0
0x0f23…0f3a lno = 0x0596 // 0xf25 @0x2
0x0f23…0f3a at0004 = ╱9d╱ EXEC ╱ // 0xf27 @0x4
0x0f23…0f3a at0005 = ╱46╱F╱ // 0xf28 @0x5
0x0f23…0f3a at0006 = ╱45╱E╱ // 0xf29 @0x6
0x0f23…0f3a at0007 = ╱4a╱J╱ // 0xf2a @0x7
0x0f23…0f3a at0008 = ╱4c╱L╱ // 0xf2b @0x8
0x0f23…0f3a at0009 = ╱ed╱(╱ // 0xf2c @0x9
0x0f23…0f3a at000a = ╱47╱G╱ // 0xf2d @0xa
0x0f23…0f3a at000b = ╱ec╱,╱ // 0xf2e @0xb
0x0f23…0f3a at000c = ╱34╱4╱ // 0xf2f @0xc
0x0f23…0f3a at000d = ╱fe00008003╱ // 0xf30 @0xd
0x0f23…0f3a at0012 = ╱ec╱,╱ // 0xf35 @0x12
0x0f23…0f3a at0013 = ╱4b╱K╱ // 0xf36 @0x13
0x0f23…0f3a at0014 = ╱ef╱$╱ // 0xf37 @0x14
0x0f23…0f3a at0015 = ╱ee╱)╱ // 0xf38 @0x15
0x0f23…0f3a at0016 = EOL // 0xf39 @0x16
0x0f23…0f3a }
0x0f3a…0f40 9c97 1440 ENDPROC
0x0f3a…0f40 LineComalBin {
0x0f3a…0f40 ptr = 0x9c97 // 0xf3a @0x0
0x0f3a…0f40 lno = 0x05a0 // 0xf3c @0x2
0x0f3a…0f40 at0004 = ╱9f╱ ENDPROC ╱ // 0xf3e @0x4
0x0f3a…0f40 at0005 = EOL // 0xf3f @0x5
0x0f3a…0f40 }
0x0f40…0f5a 9cb1 1450 PROC FSYSIN(K11,T1,T2,T5)
0x0f40…0f5a LineComalBin {
0x0f40…0f5a ptr = 0x9cb1 // 0xf40 @0x0
0x0f40…0f5a lno = 0x05aa // 0xf42 @0x2
0x0f40…0f5a at0004 = ╱9e╱ PROC ╱ // 0xf44 @0x4
0x0f40…0f5a at0005 = ╱46╱F╱ // 0xf45 @0x5
0x0f40…0f5a at0006 = ╱53╱S╱ // 0xf46 @0x6
0x0f40…0f5a at0007 = ╱59╱Y╱ // 0xf47 @0x7
0x0f40…0f5a at0008 = ╱53╱S╱ // 0xf48 @0x8
0x0f40…0f5a at0009 = ╱49╱I╱ // 0xf49 @0x9
0x0f40…0f5a at000a = ╱4e╱N╱ // 0xf4a @0xa
0x0f40…0f5a at000b = ╱ed╱(╱ // 0xf4b @0xb
0x0f40…0f5a at000c = ╱4b╱K╱ // 0xf4c @0xc
0x0f40…0f5a at000d = ╱31╱1╱ // 0xf4d @0xd
0x0f40…0f5a at000e = ╱31╱1╱ // 0xf4e @0xe
0x0f40…0f5a at000f = ╱ec╱,╱ // 0xf4f @0xf
0x0f40…0f5a at0010 = ╱54╱T╱ // 0xf50 @0x10
0x0f40…0f5a at0011 = ╱31╱1╱ // 0xf51 @0x11
0x0f40…0f5a at0012 = ╱ec╱,╱ // 0xf52 @0x12
0x0f40…0f5a at0013 = ╱54╱T╱ // 0xf53 @0x13
0x0f40…0f5a at0014 = ╱32╱2╱ // 0xf54 @0x14
0x0f40…0f5a at0015 = ╱ec╱,╱ // 0xf55 @0x15
0x0f40…0f5a at0016 = ╱54╱T╱ // 0xf56 @0x16
0x0f40…0f5a at0017 = ╱35╱5╱ // 0xf57 @0x17
0x0f40…0f5a at0018 = ╱ee╱)╱ // 0xf58 @0x18
0x0f40…0f5a at0019 = EOL // 0xf59 @0x19
0x0f40…0f5a }
0x0f5a…0f66 9cbd 1460 OPEN K11$,R
0x0f5a…0f66 LineComalBin {
0x0f5a…0f66 ptr = 0x9cbd // 0xf5a @0x0
0x0f5a…0f66 lno = 0x05b4 // 0xf5c @0x2
0x0f5a…0f66 at0004 = ╱a7╱ OPEN ╱ // 0xf5e @0x4
0x0f5a…0f66 at0005 = ╱4b╱K╱ // 0xf5f @0x5
0x0f5a…0f66 at0006 = ╱31╱1╱ // 0xf60 @0x6
0x0f5a…0f66 at0007 = ╱31╱1╱ // 0xf61 @0x7
0x0f5a…0f66 at0008 = ╱ef╱$╱ // 0xf62 @0x8
0x0f5a…0f66 at0009 = ╱ec╱,╱ // 0xf63 @0x9
0x0f5a…0f66 at000a = ╱52╱R╱ // 0xf64 @0xa
0x0f5a…0f66 at000b = EOL // 0xf65 @0xb
0x0f5a…0f66 }
0x0f66…0f7f 9cd6 1470 EXEC FEJL(5,E,K11$)
0x0f66…0f7f LineComalBin {
0x0f66…0f7f ptr = 0x9cd6 // 0xf66 @0x0
0x0f66…0f7f lno = 0x05be // 0xf68 @0x2
0x0f66…0f7f at0004 = ╱9d╱ EXEC ╱ // 0xf6a @0x4
0x0f66…0f7f at0005 = ╱46╱F╱ // 0xf6b @0x5
0x0f66…0f7f at0006 = ╱45╱E╱ // 0xf6c @0x6
0x0f66…0f7f at0007 = ╱4a╱J╱ // 0xf6d @0x7
0x0f66…0f7f at0008 = ╱4c╱L╱ // 0xf6e @0x8
0x0f66…0f7f at0009 = ╱ed╱(╱ // 0xf6f @0x9
0x0f66…0f7f at000a = ╱35╱5╱ // 0xf70 @0xa
0x0f66…0f7f at000b = ╱fe0000a003╱ // 0xf71 @0xb
0x0f66…0f7f at0010 = ╱ec╱,╱ // 0xf76 @0x10
0x0f66…0f7f at0011 = ╱45╱E╱ // 0xf77 @0x11
0x0f66…0f7f at0012 = ╱ec╱,╱ // 0xf78 @0x12
0x0f66…0f7f at0013 = ╱4b╱K╱ // 0xf79 @0x13
0x0f66…0f7f at0014 = ╱31╱1╱ // 0xf7a @0x14
0x0f66…0f7f at0015 = ╱31╱1╱ // 0xf7b @0x15
0x0f66…0f7f at0016 = ╱ef╱$╱ // 0xf7c @0x16
0x0f66…0f7f at0017 = ╱ee╱)╱ // 0xf7d @0x17
0x0f66…0f7f at0018 = EOL // 0xf7e @0x18
0x0f66…0f7f }
0x0f7f…0fe0 9d37 1480 GET K11$,13:T1(E),T1(G),T1(V),T1(4),T1(5),T1(6),T1(7),T1(8),T1(W)
0x0f7f…0fe0 LineComalBin {
0x0f7f…0fe0 ptr = 0x9d37 // 0xf7f @0x0
0x0f7f…0fe0 lno = 0x05c8 // 0xf81 @0x2
0x0f7f…0fe0 at0004 = ╱a9╱ GET ╱ // 0xf83 @0x4
0x0f7f…0fe0 at0005 = ╱4b╱K╱ // 0xf84 @0x5
0x0f7f…0fe0 at0006 = ╱31╱1╱ // 0xf85 @0x6
0x0f7f…0fe0 at0007 = ╱31╱1╱ // 0xf86 @0x7
0x0f7f…0fe0 at0008 = ╱ef╱$╱ // 0xf87 @0x8
0x0f7f…0fe0 at0009 = ╱ec╱,╱ // 0xf88 @0x9
0x0f7f…0fe0 at000a = ╱31╱1╱ // 0xf89 @0xa
0x0f7f…0fe0 at000b = ╱33╱3╱ // 0xf8a @0xb
0x0f7f…0fe0 at000c = ╱fe0000d004╱ // 0xf8b @0xc
0x0f7f…0fe0 at0011 = ╱f0╱:╱ // 0xf90 @0x11
0x0f7f…0fe0 at0012 = ╱54╱T╱ // 0xf91 @0x12
0x0f7f…0fe0 at0013 = ╱31╱1╱ // 0xf92 @0x13
0x0f7f…0fe0 at0014 = ╱ed╱(╱ // 0xf93 @0x14
0x0f7f…0fe0 at0015 = ╱45╱E╱ // 0xf94 @0x15
0x0f7f…0fe0 at0016 = ╱ee╱)╱ // 0xf95 @0x16
0x0f7f…0fe0 at0017 = ╱ec╱,╱ // 0xf96 @0x17
0x0f7f…0fe0 at0018 = ╱54╱T╱ // 0xf97 @0x18
0x0f7f…0fe0 at0019 = ╱31╱1╱ // 0xf98 @0x19
0x0f7f…0fe0 at001a = ╱ed╱(╱ // 0xf99 @0x1a
0x0f7f…0fe0 at001b = ╱47╱G╱ // 0xf9a @0x1b
0x0f7f…0fe0 at001c = ╱ee╱)╱ // 0xf9b @0x1c
0x0f7f…0fe0 at001d = ╱ec╱,╱ // 0xf9c @0x1d
0x0f7f…0fe0 at001e = ╱54╱T╱ // 0xf9d @0x1e
0x0f7f…0fe0 at001f = ╱31╱1╱ // 0xf9e @0x1f
0x0f7f…0fe0 at0020 = ╱ed╱(╱ // 0xf9f @0x20
0x0f7f…0fe0 at0021 = ╱56╱V╱ // 0xfa0 @0x21
0x0f7f…0fe0 at0022 = ╱ee╱)╱ // 0xfa1 @0x22
0x0f7f…0fe0 at0023 = ╱ec╱,╱ // 0xfa2 @0x23
0x0f7f…0fe0 at0024 = ╱54╱T╱ // 0xfa3 @0x24
0x0f7f…0fe0 at0025 = ╱31╱1╱ // 0xfa4 @0x25
0x0f7f…0fe0 at0026 = ╱ed╱(╱ // 0xfa5 @0x26
0x0f7f…0fe0 at0027 = ╱34╱4╱ // 0xfa6 @0x27
0x0f7f…0fe0 at0028 = ╱fe00008003╱ // 0xfa7 @0x28
0x0f7f…0fe0 at002d = ╱ee╱)╱ // 0xfac @0x2d
0x0f7f…0fe0 at002e = ╱ec╱,╱ // 0xfad @0x2e
0x0f7f…0fe0 at002f = ╱54╱T╱ // 0xfae @0x2f
0x0f7f…0fe0 at0030 = ╱31╱1╱ // 0xfaf @0x30
0x0f7f…0fe0 at0031 = ╱ed╱(╱ // 0xfb0 @0x31
0x0f7f…0fe0 at0032 = ╱35╱5╱ // 0xfb1 @0x32
0x0f7f…0fe0 at0033 = ╱fe0000a003╱ // 0xfb2 @0x33
0x0f7f…0fe0 at0038 = ╱ee╱)╱ // 0xfb7 @0x38
0x0f7f…0fe0 at0039 = ╱ec╱,╱ // 0xfb8 @0x39
0x0f7f…0fe0 at003a = ╱54╱T╱ // 0xfb9 @0x3a
0x0f7f…0fe0 at003b = ╱31╱1╱ // 0xfba @0x3b
0x0f7f…0fe0 at003c = ╱ed╱(╱ // 0xfbb @0x3c
0x0f7f…0fe0 at003d = ╱36╱6╱ // 0xfbc @0x3d
0x0f7f…0fe0 at003e = ╱fe0000c003╱ // 0xfbd @0x3e
0x0f7f…0fe0 at0043 = ╱ee╱)╱ // 0xfc2 @0x43
0x0f7f…0fe0 at0044 = ╱ec╱,╱ // 0xfc3 @0x44
0x0f7f…0fe0 at0045 = ╱54╱T╱ // 0xfc4 @0x45
0x0f7f…0fe0 at0046 = ╱31╱1╱ // 0xfc5 @0x46
0x0f7f…0fe0 at0047 = ╱ed╱(╱ // 0xfc6 @0x47
0x0f7f…0fe0 at0048 = ╱37╱7╱ // 0xfc7 @0x48
0x0f7f…0fe0 at0049 = ╱fe0000e003╱ // 0xfc8 @0x49
0x0f7f…0fe0 at004e = ╱ee╱)╱ // 0xfcd @0x4e
0x0f7f…0fe0 at004f = ╱ec╱,╱ // 0xfce @0x4f
0x0f7f…0fe0 at0050 = ╱54╱T╱ // 0xfcf @0x50
0x0f7f…0fe0 at0051 = ╱31╱1╱ // 0xfd0 @0x51
0x0f7f…0fe0 at0052 = ╱ed╱(╱ // 0xfd1 @0x52
0x0f7f…0fe0 at0053 = ╱38╱8╱ // 0xfd2 @0x53
0x0f7f…0fe0 at0054 = ╱fe00008004╱ // 0xfd3 @0x54
0x0f7f…0fe0 at0059 = ╱ee╱)╱ // 0xfd8 @0x59
0x0f7f…0fe0 at005a = ╱ec╱,╱ // 0xfd9 @0x5a
0x0f7f…0fe0 at005b = ╱54╱T╱ // 0xfda @0x5b
0x0f7f…0fe0 at005c = ╱31╱1╱ // 0xfdb @0x5c
0x0f7f…0fe0 at005d = ╱ed╱(╱ // 0xfdc @0x5d
0x0f7f…0fe0 at005e = ╱57╱W╱ // 0xfdd @0x5e
0x0f7f…0fe0 at005f = ╱ee╱)╱ // 0xfde @0x5f
0x0f7f…0fe0 at0060 = EOL // 0xfdf @0x60
0x0f7f…0fe0 }
0x0fe0…0ff9 9d50 1490 EXEC FEJL(5,G,K11$)
0x0fe0…0ff9 LineComalBin {
0x0fe0…0ff9 ptr = 0x9d50 // 0xfe0 @0x0
0x0fe0…0ff9 lno = 0x05d2 // 0xfe2 @0x2
0x0fe0…0ff9 at0004 = ╱9d╱ EXEC ╱ // 0xfe4 @0x4
0x0fe0…0ff9 at0005 = ╱46╱F╱ // 0xfe5 @0x5
0x0fe0…0ff9 at0006 = ╱45╱E╱ // 0xfe6 @0x6
0x0fe0…0ff9 at0007 = ╱4a╱J╱ // 0xfe7 @0x7
0x0fe0…0ff9 at0008 = ╱4c╱L╱ // 0xfe8 @0x8
0x0fe0…0ff9 at0009 = ╱ed╱(╱ // 0xfe9 @0x9
0x0fe0…0ff9 at000a = ╱35╱5╱ // 0xfea @0xa
0x0fe0…0ff9 at000b = ╱fe0000a003╱ // 0xfeb @0xb
0x0fe0…0ff9 at0010 = ╱ec╱,╱ // 0xff0 @0x10
0x0fe0…0ff9 at0011 = ╱47╱G╱ // 0xff1 @0x11
0x0fe0…0ff9 at0012 = ╱ec╱,╱ // 0xff2 @0x12
0x0fe0…0ff9 at0013 = ╱4b╱K╱ // 0xff3 @0x13
0x0fe0…0ff9 at0014 = ╱31╱1╱ // 0xff4 @0x14
0x0fe0…0ff9 at0015 = ╱31╱1╱ // 0xff5 @0x15
0x0fe0…0ff9 at0016 = ╱ef╱$╱ // 0xff6 @0x16
0x0fe0…0ff9 at0017 = ╱ee╱)╱ // 0xff7 @0x17
0x0fe0…0ff9 at0018 = EOL // 0xff8 @0x18
0x0fe0…0ff9 }
0x0ff9…105a 9db1 1500 GET K11$,17:T2(E),T2(G),T2(V),T2(4),T2(5),T2(6),T2(7),T2(8),T2(W)
0x0ff9…105a LineComalBin {
0x0ff9…105a ptr = 0x9db1 // 0xff9 @0x0
0x0ff9…105a lno = 0x05dc // 0xffb @0x2
0x0ff9…105a at0004 = ╱a9╱ GET ╱ // 0xffd @0x4
0x0ff9…105a at0005 = ╱4b╱K╱ // 0xffe @0x5
0x0ff9…105a at0006 = ╱31╱1╱ // 0xfff @0x6
0x0ff9…105a at0007 = ╱31╱1╱ // 0x1000 @0x7
0x0ff9…105a at0008 = ╱ef╱$╱ // 0x1001 @0x8
0x0ff9…105a at0009 = ╱ec╱,╱ // 0x1002 @0x9
0x0ff9…105a at000a = ╱31╱1╱ // 0x1003 @0xa
0x0ff9…105a at000b = ╱37╱7╱ // 0x1004 @0xb
0x0ff9…105a at000c = ╱fe00008805╱ // 0x1005 @0xc
0x0ff9…105a at0011 = ╱f0╱:╱ // 0x100a @0x11
0x0ff9…105a at0012 = ╱54╱T╱ // 0x100b @0x12
0x0ff9…105a at0013 = ╱32╱2╱ // 0x100c @0x13
0x0ff9…105a at0014 = ╱ed╱(╱ // 0x100d @0x14
0x0ff9…105a at0015 = ╱45╱E╱ // 0x100e @0x15
0x0ff9…105a at0016 = ╱ee╱)╱ // 0x100f @0x16
0x0ff9…105a at0017 = ╱ec╱,╱ // 0x1010 @0x17
0x0ff9…105a at0018 = ╱54╱T╱ // 0x1011 @0x18
0x0ff9…105a at0019 = ╱32╱2╱ // 0x1012 @0x19
0x0ff9…105a at001a = ╱ed╱(╱ // 0x1013 @0x1a
0x0ff9…105a at001b = ╱47╱G╱ // 0x1014 @0x1b
0x0ff9…105a at001c = ╱ee╱)╱ // 0x1015 @0x1c
0x0ff9…105a at001d = ╱ec╱,╱ // 0x1016 @0x1d
0x0ff9…105a at001e = ╱54╱T╱ // 0x1017 @0x1e
0x0ff9…105a at001f = ╱32╱2╱ // 0x1018 @0x1f
0x0ff9…105a at0020 = ╱ed╱(╱ // 0x1019 @0x20
0x0ff9…105a at0021 = ╱56╱V╱ // 0x101a @0x21
0x0ff9…105a at0022 = ╱ee╱)╱ // 0x101b @0x22
0x0ff9…105a at0023 = ╱ec╱,╱ // 0x101c @0x23
0x0ff9…105a at0024 = ╱54╱T╱ // 0x101d @0x24
0x0ff9…105a at0025 = ╱32╱2╱ // 0x101e @0x25
0x0ff9…105a at0026 = ╱ed╱(╱ // 0x101f @0x26
0x0ff9…105a at0027 = ╱34╱4╱ // 0x1020 @0x27
0x0ff9…105a at0028 = ╱fe00008003╱ // 0x1021 @0x28
0x0ff9…105a at002d = ╱ee╱)╱ // 0x1026 @0x2d
0x0ff9…105a at002e = ╱ec╱,╱ // 0x1027 @0x2e
0x0ff9…105a at002f = ╱54╱T╱ // 0x1028 @0x2f
0x0ff9…105a at0030 = ╱32╱2╱ // 0x1029 @0x30
0x0ff9…105a at0031 = ╱ed╱(╱ // 0x102a @0x31
0x0ff9…105a at0032 = ╱35╱5╱ // 0x102b @0x32
0x0ff9…105a at0033 = ╱fe0000a003╱ // 0x102c @0x33
0x0ff9…105a at0038 = ╱ee╱)╱ // 0x1031 @0x38
0x0ff9…105a at0039 = ╱ec╱,╱ // 0x1032 @0x39
0x0ff9…105a at003a = ╱54╱T╱ // 0x1033 @0x3a
0x0ff9…105a at003b = ╱32╱2╱ // 0x1034 @0x3b
0x0ff9…105a at003c = ╱ed╱(╱ // 0x1035 @0x3c
0x0ff9…105a at003d = ╱36╱6╱ // 0x1036 @0x3d
0x0ff9…105a at003e = ╱fe0000c003╱ // 0x1037 @0x3e
0x0ff9…105a at0043 = ╱ee╱)╱ // 0x103c @0x43
0x0ff9…105a at0044 = ╱ec╱,╱ // 0x103d @0x44
0x0ff9…105a at0045 = ╱54╱T╱ // 0x103e @0x45
0x0ff9…105a at0046 = ╱32╱2╱ // 0x103f @0x46
0x0ff9…105a at0047 = ╱ed╱(╱ // 0x1040 @0x47
0x0ff9…105a at0048 = ╱37╱7╱ // 0x1041 @0x48
0x0ff9…105a at0049 = ╱fe0000e003╱ // 0x1042 @0x49
0x0ff9…105a at004e = ╱ee╱)╱ // 0x1047 @0x4e
0x0ff9…105a at004f = ╱ec╱,╱ // 0x1048 @0x4f
0x0ff9…105a at0050 = ╱54╱T╱ // 0x1049 @0x50
0x0ff9…105a at0051 = ╱32╱2╱ // 0x104a @0x51
0x0ff9…105a at0052 = ╱ed╱(╱ // 0x104b @0x52
0x0ff9…105a at0053 = ╱38╱8╱ // 0x104c @0x53
0x0ff9…105a at0054 = ╱fe00008004╱ // 0x104d @0x54
0x0ff9…105a at0059 = ╱ee╱)╱ // 0x1052 @0x59
0x0ff9…105a at005a = ╱ec╱,╱ // 0x1053 @0x5a
0x0ff9…105a at005b = ╱54╱T╱ // 0x1054 @0x5b
0x0ff9…105a at005c = ╱32╱2╱ // 0x1055 @0x5c
0x0ff9…105a at005d = ╱ed╱(╱ // 0x1056 @0x5d
0x0ff9…105a at005e = ╱57╱W╱ // 0x1057 @0x5e
0x0ff9…105a at005f = ╱ee╱)╱ // 0x1058 @0x5f
0x0ff9…105a at0060 = EOL // 0x1059 @0x60
0x0ff9…105a }
0x105a…1073 9dca 1510 EXEC FEJL(5,V,K11$)
0x105a…1073 LineComalBin {
0x105a…1073 ptr = 0x9dca // 0x105a @0x0
0x105a…1073 lno = 0x05e6 // 0x105c @0x2
0x105a…1073 at0004 = ╱9d╱ EXEC ╱ // 0x105e @0x4
0x105a…1073 at0005 = ╱46╱F╱ // 0x105f @0x5
0x105a…1073 at0006 = ╱45╱E╱ // 0x1060 @0x6
0x105a…1073 at0007 = ╱4a╱J╱ // 0x1061 @0x7
0x105a…1073 at0008 = ╱4c╱L╱ // 0x1062 @0x8
0x105a…1073 at0009 = ╱ed╱(╱ // 0x1063 @0x9
0x105a…1073 at000a = ╱35╱5╱ // 0x1064 @0xa
0x105a…1073 at000b = ╱fe0000a003╱ // 0x1065 @0xb
0x105a…1073 at0010 = ╱ec╱,╱ // 0x106a @0x10
0x105a…1073 at0011 = ╱56╱V╱ // 0x106b @0x11
0x105a…1073 at0012 = ╱ec╱,╱ // 0x106c @0x12
0x105a…1073 at0013 = ╱4b╱K╱ // 0x106d @0x13
0x105a…1073 at0014 = ╱31╱1╱ // 0x106e @0x14
0x105a…1073 at0015 = ╱31╱1╱ // 0x106f @0x15
0x105a…1073 at0016 = ╱ef╱$╱ // 0x1070 @0x16
0x105a…1073 at0017 = ╱ee╱)╱ // 0x1071 @0x17
0x105a…1073 at0018 = EOL // 0x1072 @0x18
0x105a…1073 }
0x1073…10d4 9e2b 1512 GET K11$,21:T5(E),T5(G),T5(V),T5(4),T5(5),T5(6),T5(7),T5(8),T5(W)
0x1073…10d4 LineComalBin {
0x1073…10d4 ptr = 0x9e2b // 0x1073 @0x0
0x1073…10d4 lno = 0x05e8 // 0x1075 @0x2
0x1073…10d4 at0004 = ╱a9╱ GET ╱ // 0x1077 @0x4
0x1073…10d4 at0005 = ╱4b╱K╱ // 0x1078 @0x5
0x1073…10d4 at0006 = ╱31╱1╱ // 0x1079 @0x6
0x1073…10d4 at0007 = ╱31╱1╱ // 0x107a @0x7
0x1073…10d4 at0008 = ╱ef╱$╱ // 0x107b @0x8
0x1073…10d4 at0009 = ╱ec╱,╱ // 0x107c @0x9
0x1073…10d4 at000a = ╱32╱2╱ // 0x107d @0xa
0x1073…10d4 at000b = ╱31╱1╱ // 0x107e @0xb
0x1073…10d4 at000c = ╱fe0000a805╱ // 0x107f @0xc
0x1073…10d4 at0011 = ╱f0╱:╱ // 0x1084 @0x11
0x1073…10d4 at0012 = ╱54╱T╱ // 0x1085 @0x12
0x1073…10d4 at0013 = ╱35╱5╱ // 0x1086 @0x13
0x1073…10d4 at0014 = ╱ed╱(╱ // 0x1087 @0x14
0x1073…10d4 at0015 = ╱45╱E╱ // 0x1088 @0x15
0x1073…10d4 at0016 = ╱ee╱)╱ // 0x1089 @0x16
0x1073…10d4 at0017 = ╱ec╱,╱ // 0x108a @0x17
0x1073…10d4 at0018 = ╱54╱T╱ // 0x108b @0x18
0x1073…10d4 at0019 = ╱35╱5╱ // 0x108c @0x19
0x1073…10d4 at001a = ╱ed╱(╱ // 0x108d @0x1a
0x1073…10d4 at001b = ╱47╱G╱ // 0x108e @0x1b
0x1073…10d4 at001c = ╱ee╱)╱ // 0x108f @0x1c
0x1073…10d4 at001d = ╱ec╱,╱ // 0x1090 @0x1d
0x1073…10d4 at001e = ╱54╱T╱ // 0x1091 @0x1e
0x1073…10d4 at001f = ╱35╱5╱ // 0x1092 @0x1f
0x1073…10d4 at0020 = ╱ed╱(╱ // 0x1093 @0x20
0x1073…10d4 at0021 = ╱56╱V╱ // 0x1094 @0x21
0x1073…10d4 at0022 = ╱ee╱)╱ // 0x1095 @0x22
0x1073…10d4 at0023 = ╱ec╱,╱ // 0x1096 @0x23
0x1073…10d4 at0024 = ╱54╱T╱ // 0x1097 @0x24
0x1073…10d4 at0025 = ╱35╱5╱ // 0x1098 @0x25
0x1073…10d4 at0026 = ╱ed╱(╱ // 0x1099 @0x26
0x1073…10d4 at0027 = ╱34╱4╱ // 0x109a @0x27
0x1073…10d4 at0028 = ╱fe00008003╱ // 0x109b @0x28
0x1073…10d4 at002d = ╱ee╱)╱ // 0x10a0 @0x2d
0x1073…10d4 at002e = ╱ec╱,╱ // 0x10a1 @0x2e
0x1073…10d4 at002f = ╱54╱T╱ // 0x10a2 @0x2f
0x1073…10d4 at0030 = ╱35╱5╱ // 0x10a3 @0x30
0x1073…10d4 at0031 = ╱ed╱(╱ // 0x10a4 @0x31
0x1073…10d4 at0032 = ╱35╱5╱ // 0x10a5 @0x32
0x1073…10d4 at0033 = ╱fe0000a003╱ // 0x10a6 @0x33
0x1073…10d4 at0038 = ╱ee╱)╱ // 0x10ab @0x38
0x1073…10d4 at0039 = ╱ec╱,╱ // 0x10ac @0x39
0x1073…10d4 at003a = ╱54╱T╱ // 0x10ad @0x3a
0x1073…10d4 at003b = ╱35╱5╱ // 0x10ae @0x3b
0x1073…10d4 at003c = ╱ed╱(╱ // 0x10af @0x3c
0x1073…10d4 at003d = ╱36╱6╱ // 0x10b0 @0x3d
0x1073…10d4 at003e = ╱fe0000c003╱ // 0x10b1 @0x3e
0x1073…10d4 at0043 = ╱ee╱)╱ // 0x10b6 @0x43
0x1073…10d4 at0044 = ╱ec╱,╱ // 0x10b7 @0x44
0x1073…10d4 at0045 = ╱54╱T╱ // 0x10b8 @0x45
0x1073…10d4 at0046 = ╱35╱5╱ // 0x10b9 @0x46
0x1073…10d4 at0047 = ╱ed╱(╱ // 0x10ba @0x47
0x1073…10d4 at0048 = ╱37╱7╱ // 0x10bb @0x48
0x1073…10d4 at0049 = ╱fe0000e003╱ // 0x10bc @0x49
0x1073…10d4 at004e = ╱ee╱)╱ // 0x10c1 @0x4e
0x1073…10d4 at004f = ╱ec╱,╱ // 0x10c2 @0x4f
0x1073…10d4 at0050 = ╱54╱T╱ // 0x10c3 @0x50
0x1073…10d4 at0051 = ╱35╱5╱ // 0x10c4 @0x51
0x1073…10d4 at0052 = ╱ed╱(╱ // 0x10c5 @0x52
0x1073…10d4 at0053 = ╱38╱8╱ // 0x10c6 @0x53
0x1073…10d4 at0054 = ╱fe00008004╱ // 0x10c7 @0x54
0x1073…10d4 at0059 = ╱ee╱)╱ // 0x10cc @0x59
0x1073…10d4 at005a = ╱ec╱,╱ // 0x10cd @0x5a
0x1073…10d4 at005b = ╱54╱T╱ // 0x10ce @0x5b
0x1073…10d4 at005c = ╱35╱5╱ // 0x10cf @0x5c
0x1073…10d4 at005d = ╱ed╱(╱ // 0x10d0 @0x5d
0x1073…10d4 at005e = ╱57╱W╱ // 0x10d1 @0x5e
0x1073…10d4 at005f = ╱ee╱)╱ // 0x10d2 @0x5f
0x1073…10d4 at0060 = EOL // 0x10d3 @0x60
0x1073…10d4 }
0x10d4…10f4 9e4b 1514 EXEC FEJL(20,30,K11$)
0x10d4…10f4 LineComalBin {
0x10d4…10f4 ptr = 0x9e4b // 0x10d4 @0x0
0x10d4…10f4 lno = 0x05ea // 0x10d6 @0x2
0x10d4…10f4 at0004 = ╱9d╱ EXEC ╱ // 0x10d8 @0x4
0x10d4…10f4 at0005 = ╱46╱F╱ // 0x10d9 @0x5
0x10d4…10f4 at0006 = ╱45╱E╱ // 0x10da @0x6
0x10d4…10f4 at0007 = ╱4a╱J╱ // 0x10db @0x7
0x10d4…10f4 at0008 = ╱4c╱L╱ // 0x10dc @0x8
0x10d4…10f4 at0009 = ╱ed╱(╱ // 0x10dd @0x9
0x10d4…10f4 at000a = ╱32╱2╱ // 0x10de @0xa
0x10d4…10f4 at000b = ╱30╱0╱ // 0x10df @0xb
0x10d4…10f4 at000c = ╱fe0000a005╱ // 0x10e0 @0xc
0x10d4…10f4 at0011 = ╱ec╱,╱ // 0x10e5 @0x11
0x10d4…10f4 at0012 = ╱33╱3╱ // 0x10e6 @0x12
0x10d4…10f4 at0013 = ╱30╱0╱ // 0x10e7 @0x13
0x10d4…10f4 at0014 = ╱fe0000f005╱ // 0x10e8 @0x14
0x10d4…10f4 at0019 = ╱ec╱,╱ // 0x10ed @0x19
0x10d4…10f4 at001a = ╱4b╱K╱ // 0x10ee @0x1a
0x10d4…10f4 at001b = ╱31╱1╱ // 0x10ef @0x1b
0x10d4…10f4 at001c = ╱31╱1╱ // 0x10f0 @0x1c
0x10d4…10f4 at001d = ╱ef╱$╱ // 0x10f1 @0x1d
0x10d4…10f4 at001e = ╱ee╱)╱ // 0x10f2 @0x1e
0x10d4…10f4 at001f = EOL // 0x10f3 @0x1f
0x10d4…10f4 }
0x10f4…10fe 9e55 1520 CLOSE K11$
0x10f4…10fe LineComalBin {
0x10f4…10fe ptr = 0x9e55 // 0x10f4 @0x0
0x10f4…10fe lno = 0x05f0 // 0x10f6 @0x2
0x10f4…10fe at0004 = ╱a8╱ CLOSE ╱ // 0x10f8 @0x4
0x10f4…10fe at0005 = ╱4b╱K╱ // 0x10f9 @0x5
0x10f4…10fe at0006 = ╱31╱1╱ // 0x10fa @0x6
0x10f4…10fe at0007 = ╱31╱1╱ // 0x10fb @0x7
0x10f4…10fe at0008 = ╱ef╱$╱ // 0x10fc @0x8
0x10f4…10fe at0009 = EOL // 0x10fd @0x9
0x10f4…10fe }
0x10fe…111c 9e73 1530 EXEC FEJL(5,4,K11$)
0x10fe…111c LineComalBin {
0x10fe…111c ptr = 0x9e73 // 0x10fe @0x0
0x10fe…111c lno = 0x05fa // 0x1100 @0x2
0x10fe…111c at0004 = ╱9d╱ EXEC ╱ // 0x1102 @0x4
0x10fe…111c at0005 = ╱46╱F╱ // 0x1103 @0x5
0x10fe…111c at0006 = ╱45╱E╱ // 0x1104 @0x6
0x10fe…111c at0007 = ╱4a╱J╱ // 0x1105 @0x7
0x10fe…111c at0008 = ╱4c╱L╱ // 0x1106 @0x8
0x10fe…111c at0009 = ╱ed╱(╱ // 0x1107 @0x9
0x10fe…111c at000a = ╱35╱5╱ // 0x1108 @0xa
0x10fe…111c at000b = ╱fe0000a003╱ // 0x1109 @0xb
0x10fe…111c at0010 = ╱ec╱,╱ // 0x110e @0x10
0x10fe…111c at0011 = ╱34╱4╱ // 0x110f @0x11
0x10fe…111c at0012 = ╱fe00008003╱ // 0x1110 @0x12
0x10fe…111c at0017 = ╱ec╱,╱ // 0x1115 @0x17
0x10fe…111c at0018 = ╱4b╱K╱ // 0x1116 @0x18
0x10fe…111c at0019 = ╱31╱1╱ // 0x1117 @0x19
0x10fe…111c at001a = ╱31╱1╱ // 0x1118 @0x1a
0x10fe…111c at001b = ╱ef╱$╱ // 0x1119 @0x1b
0x10fe…111c at001c = ╱ee╱)╱ // 0x111a @0x1c
0x10fe…111c at001d = EOL // 0x111b @0x1d
0x10fe…111c }
0x111c…1122 9e79 1540 ENDPROC
0x111c…1122 LineComalBin {
0x111c…1122 ptr = 0x9e79 // 0x111c @0x0
0x111c…1122 lno = 0x0604 // 0x111e @0x2
0x111c…1122 at0004 = ╱9f╱ ENDPROC ╱ // 0x1120 @0x4
0x111c…1122 at0005 = EOL // 0x1121 @0x5
0x111c…1122 }
0x1122…113c 9e93 1550 PROC FSYSUD(K12,T3,T4,T6)
0x1122…113c LineComalBin {
0x1122…113c ptr = 0x9e93 // 0x1122 @0x0
0x1122…113c lno = 0x060e // 0x1124 @0x2
0x1122…113c at0004 = ╱9e╱ PROC ╱ // 0x1126 @0x4
0x1122…113c at0005 = ╱46╱F╱ // 0x1127 @0x5
0x1122…113c at0006 = ╱53╱S╱ // 0x1128 @0x6
0x1122…113c at0007 = ╱59╱Y╱ // 0x1129 @0x7
0x1122…113c at0008 = ╱53╱S╱ // 0x112a @0x8
0x1122…113c at0009 = ╱55╱U╱ // 0x112b @0x9
0x1122…113c at000a = ╱44╱D╱ // 0x112c @0xa
0x1122…113c at000b = ╱ed╱(╱ // 0x112d @0xb
0x1122…113c at000c = ╱4b╱K╱ // 0x112e @0xc
0x1122…113c at000d = ╱31╱1╱ // 0x112f @0xd
0x1122…113c at000e = ╱32╱2╱ // 0x1130 @0xe
0x1122…113c at000f = ╱ec╱,╱ // 0x1131 @0xf
0x1122…113c at0010 = ╱54╱T╱ // 0x1132 @0x10
0x1122…113c at0011 = ╱33╱3╱ // 0x1133 @0x11
0x1122…113c at0012 = ╱ec╱,╱ // 0x1134 @0x12
0x1122…113c at0013 = ╱54╱T╱ // 0x1135 @0x13
0x1122…113c at0014 = ╱34╱4╱ // 0x1136 @0x14
0x1122…113c at0015 = ╱ec╱,╱ // 0x1137 @0x15
0x1122…113c at0016 = ╱54╱T╱ // 0x1138 @0x16
0x1122…113c at0017 = ╱36╱6╱ // 0x1139 @0x17
0x1122…113c at0018 = ╱ee╱)╱ // 0x113a @0x18
0x1122…113c at0019 = EOL // 0x113b @0x19
0x1122…113c }
0x113c…1148 9e9f 1560 OPEN K12$,W
0x113c…1148 LineComalBin {
0x113c…1148 ptr = 0x9e9f // 0x113c @0x0
0x113c…1148 lno = 0x0618 // 0x113e @0x2
0x113c…1148 at0004 = ╱a7╱ OPEN ╱ // 0x1140 @0x4
0x113c…1148 at0005 = ╱4b╱K╱ // 0x1141 @0x5
0x113c…1148 at0006 = ╱31╱1╱ // 0x1142 @0x6
0x113c…1148 at0007 = ╱32╱2╱ // 0x1143 @0x7
0x113c…1148 at0008 = ╱ef╱$╱ // 0x1144 @0x8
0x113c…1148 at0009 = ╱ec╱,╱ // 0x1145 @0x9
0x113c…1148 at000a = ╱57╱W╱ // 0x1146 @0xa
0x113c…1148 at000b = EOL // 0x1147 @0xb
0x113c…1148 }
0x1148…1161 9eb8 1570 EXEC FEJL(6,E,K12$)
0x1148…1161 LineComalBin {
0x1148…1161 ptr = 0x9eb8 // 0x1148 @0x0
0x1148…1161 lno = 0x0622 // 0x114a @0x2
0x1148…1161 at0004 = ╱9d╱ EXEC ╱ // 0x114c @0x4
0x1148…1161 at0005 = ╱46╱F╱ // 0x114d @0x5
0x1148…1161 at0006 = ╱45╱E╱ // 0x114e @0x6
0x1148…1161 at0007 = ╱4a╱J╱ // 0x114f @0x7
0x1148…1161 at0008 = ╱4c╱L╱ // 0x1150 @0x8
0x1148…1161 at0009 = ╱ed╱(╱ // 0x1151 @0x9
0x1148…1161 at000a = ╱36╱6╱ // 0x1152 @0xa
0x1148…1161 at000b = ╱fe0000c003╱ // 0x1153 @0xb
0x1148…1161 at0010 = ╱ec╱,╱ // 0x1158 @0x10
0x1148…1161 at0011 = ╱45╱E╱ // 0x1159 @0x11
0x1148…1161 at0012 = ╱ec╱,╱ // 0x115a @0x12
0x1148…1161 at0013 = ╱4b╱K╱ // 0x115b @0x13
0x1148…1161 at0014 = ╱31╱1╱ // 0x115c @0x14
0x1148…1161 at0015 = ╱32╱2╱ // 0x115d @0x15
0x1148…1161 at0016 = ╱ef╱$╱ // 0x115e @0x16
0x1148…1161 at0017 = ╱ee╱)╱ // 0x115f @0x17
0x1148…1161 at0018 = EOL // 0x1160 @0x18
0x1148…1161 }
0x1161…11c2 9f19 1580 PUT K12$,13:T3(E),T3(G),T3(V),T3(4),T3(5),T3(6),T3(7),T3(8),T3(W)
0x1161…11c2 LineComalBin {
0x1161…11c2 ptr = 0x9f19 // 0x1161 @0x0
0x1161…11c2 lno = 0x062c // 0x1163 @0x2
0x1161…11c2 at0004 = ╱aa╱ PUT ╱ // 0x1165 @0x4
0x1161…11c2 at0005 = ╱4b╱K╱ // 0x1166 @0x5
0x1161…11c2 at0006 = ╱31╱1╱ // 0x1167 @0x6
0x1161…11c2 at0007 = ╱32╱2╱ // 0x1168 @0x7
0x1161…11c2 at0008 = ╱ef╱$╱ // 0x1169 @0x8
0x1161…11c2 at0009 = ╱ec╱,╱ // 0x116a @0x9
0x1161…11c2 at000a = ╱31╱1╱ // 0x116b @0xa
0x1161…11c2 at000b = ╱33╱3╱ // 0x116c @0xb
0x1161…11c2 at000c = ╱fe0000d004╱ // 0x116d @0xc
0x1161…11c2 at0011 = ╱f0╱:╱ // 0x1172 @0x11
0x1161…11c2 at0012 = ╱54╱T╱ // 0x1173 @0x12
0x1161…11c2 at0013 = ╱33╱3╱ // 0x1174 @0x13
0x1161…11c2 at0014 = ╱ed╱(╱ // 0x1175 @0x14
0x1161…11c2 at0015 = ╱45╱E╱ // 0x1176 @0x15
0x1161…11c2 at0016 = ╱ee╱)╱ // 0x1177 @0x16
0x1161…11c2 at0017 = ╱ec╱,╱ // 0x1178 @0x17
0x1161…11c2 at0018 = ╱54╱T╱ // 0x1179 @0x18
0x1161…11c2 at0019 = ╱33╱3╱ // 0x117a @0x19
0x1161…11c2 at001a = ╱ed╱(╱ // 0x117b @0x1a
0x1161…11c2 at001b = ╱47╱G╱ // 0x117c @0x1b
0x1161…11c2 at001c = ╱ee╱)╱ // 0x117d @0x1c
0x1161…11c2 at001d = ╱ec╱,╱ // 0x117e @0x1d
0x1161…11c2 at001e = ╱54╱T╱ // 0x117f @0x1e
0x1161…11c2 at001f = ╱33╱3╱ // 0x1180 @0x1f
0x1161…11c2 at0020 = ╱ed╱(╱ // 0x1181 @0x20
0x1161…11c2 at0021 = ╱56╱V╱ // 0x1182 @0x21
0x1161…11c2 at0022 = ╱ee╱)╱ // 0x1183 @0x22
0x1161…11c2 at0023 = ╱ec╱,╱ // 0x1184 @0x23
0x1161…11c2 at0024 = ╱54╱T╱ // 0x1185 @0x24
0x1161…11c2 at0025 = ╱33╱3╱ // 0x1186 @0x25
0x1161…11c2 at0026 = ╱ed╱(╱ // 0x1187 @0x26
0x1161…11c2 at0027 = ╱34╱4╱ // 0x1188 @0x27
0x1161…11c2 at0028 = ╱fe00008003╱ // 0x1189 @0x28
0x1161…11c2 at002d = ╱ee╱)╱ // 0x118e @0x2d
0x1161…11c2 at002e = ╱ec╱,╱ // 0x118f @0x2e
0x1161…11c2 at002f = ╱54╱T╱ // 0x1190 @0x2f
0x1161…11c2 at0030 = ╱33╱3╱ // 0x1191 @0x30
0x1161…11c2 at0031 = ╱ed╱(╱ // 0x1192 @0x31
0x1161…11c2 at0032 = ╱35╱5╱ // 0x1193 @0x32
0x1161…11c2 at0033 = ╱fe0000a003╱ // 0x1194 @0x33
0x1161…11c2 at0038 = ╱ee╱)╱ // 0x1199 @0x38
0x1161…11c2 at0039 = ╱ec╱,╱ // 0x119a @0x39
0x1161…11c2 at003a = ╱54╱T╱ // 0x119b @0x3a
0x1161…11c2 at003b = ╱33╱3╱ // 0x119c @0x3b
0x1161…11c2 at003c = ╱ed╱(╱ // 0x119d @0x3c
0x1161…11c2 at003d = ╱36╱6╱ // 0x119e @0x3d
0x1161…11c2 at003e = ╱fe0000c003╱ // 0x119f @0x3e
0x1161…11c2 at0043 = ╱ee╱)╱ // 0x11a4 @0x43
0x1161…11c2 at0044 = ╱ec╱,╱ // 0x11a5 @0x44
0x1161…11c2 at0045 = ╱54╱T╱ // 0x11a6 @0x45
0x1161…11c2 at0046 = ╱33╱3╱ // 0x11a7 @0x46
0x1161…11c2 at0047 = ╱ed╱(╱ // 0x11a8 @0x47
0x1161…11c2 at0048 = ╱37╱7╱ // 0x11a9 @0x48
0x1161…11c2 at0049 = ╱fe0000e003╱ // 0x11aa @0x49
0x1161…11c2 at004e = ╱ee╱)╱ // 0x11af @0x4e
0x1161…11c2 at004f = ╱ec╱,╱ // 0x11b0 @0x4f
0x1161…11c2 at0050 = ╱54╱T╱ // 0x11b1 @0x50
0x1161…11c2 at0051 = ╱33╱3╱ // 0x11b2 @0x51
0x1161…11c2 at0052 = ╱ed╱(╱ // 0x11b3 @0x52
0x1161…11c2 at0053 = ╱38╱8╱ // 0x11b4 @0x53
0x1161…11c2 at0054 = ╱fe00008004╱ // 0x11b5 @0x54
0x1161…11c2 at0059 = ╱ee╱)╱ // 0x11ba @0x59
0x1161…11c2 at005a = ╱ec╱,╱ // 0x11bb @0x5a
0x1161…11c2 at005b = ╱54╱T╱ // 0x11bc @0x5b
0x1161…11c2 at005c = ╱33╱3╱ // 0x11bd @0x5c
0x1161…11c2 at005d = ╱ed╱(╱ // 0x11be @0x5d
0x1161…11c2 at005e = ╱57╱W╱ // 0x11bf @0x5e
0x1161…11c2 at005f = ╱ee╱)╱ // 0x11c0 @0x5f
0x1161…11c2 at0060 = EOL // 0x11c1 @0x60
0x1161…11c2 }
0x11c2…11db 9f32 1590 EXEC FEJL(6,G,K12$)
0x11c2…11db LineComalBin {
0x11c2…11db ptr = 0x9f32 // 0x11c2 @0x0
0x11c2…11db lno = 0x0636 // 0x11c4 @0x2
0x11c2…11db at0004 = ╱9d╱ EXEC ╱ // 0x11c6 @0x4
0x11c2…11db at0005 = ╱46╱F╱ // 0x11c7 @0x5
0x11c2…11db at0006 = ╱45╱E╱ // 0x11c8 @0x6
0x11c2…11db at0007 = ╱4a╱J╱ // 0x11c9 @0x7
0x11c2…11db at0008 = ╱4c╱L╱ // 0x11ca @0x8
0x11c2…11db at0009 = ╱ed╱(╱ // 0x11cb @0x9
0x11c2…11db at000a = ╱36╱6╱ // 0x11cc @0xa
0x11c2…11db at000b = ╱fe0000c003╱ // 0x11cd @0xb
0x11c2…11db at0010 = ╱ec╱,╱ // 0x11d2 @0x10
0x11c2…11db at0011 = ╱47╱G╱ // 0x11d3 @0x11
0x11c2…11db at0012 = ╱ec╱,╱ // 0x11d4 @0x12
0x11c2…11db at0013 = ╱4b╱K╱ // 0x11d5 @0x13
0x11c2…11db at0014 = ╱31╱1╱ // 0x11d6 @0x14
0x11c2…11db at0015 = ╱32╱2╱ // 0x11d7 @0x15
0x11c2…11db at0016 = ╱ef╱$╱ // 0x11d8 @0x16
0x11c2…11db at0017 = ╱ee╱)╱ // 0x11d9 @0x17
0x11c2…11db at0018 = EOL // 0x11da @0x18
0x11c2…11db }
0x11db…123c 9f93 1600 PUT K12$,17:T4(E),T4(G),T4(V),T4(4),T4(5),T4(6),T4(7),T4(8),T4(W)
0x11db…123c LineComalBin {
0x11db…123c ptr = 0x9f93 // 0x11db @0x0
0x11db…123c lno = 0x0640 // 0x11dd @0x2
0x11db…123c at0004 = ╱aa╱ PUT ╱ // 0x11df @0x4
0x11db…123c at0005 = ╱4b╱K╱ // 0x11e0 @0x5
0x11db…123c at0006 = ╱31╱1╱ // 0x11e1 @0x6
0x11db…123c at0007 = ╱32╱2╱ // 0x11e2 @0x7
0x11db…123c at0008 = ╱ef╱$╱ // 0x11e3 @0x8
0x11db…123c at0009 = ╱ec╱,╱ // 0x11e4 @0x9
0x11db…123c at000a = ╱31╱1╱ // 0x11e5 @0xa
0x11db…123c at000b = ╱37╱7╱ // 0x11e6 @0xb
0x11db…123c at000c = ╱fe00008805╱ // 0x11e7 @0xc
0x11db…123c at0011 = ╱f0╱:╱ // 0x11ec @0x11
0x11db…123c at0012 = ╱54╱T╱ // 0x11ed @0x12
0x11db…123c at0013 = ╱34╱4╱ // 0x11ee @0x13
0x11db…123c at0014 = ╱ed╱(╱ // 0x11ef @0x14
0x11db…123c at0015 = ╱45╱E╱ // 0x11f0 @0x15
0x11db…123c at0016 = ╱ee╱)╱ // 0x11f1 @0x16
0x11db…123c at0017 = ╱ec╱,╱ // 0x11f2 @0x17
0x11db…123c at0018 = ╱54╱T╱ // 0x11f3 @0x18
0x11db…123c at0019 = ╱34╱4╱ // 0x11f4 @0x19
0x11db…123c at001a = ╱ed╱(╱ // 0x11f5 @0x1a
0x11db…123c at001b = ╱47╱G╱ // 0x11f6 @0x1b
0x11db…123c at001c = ╱ee╱)╱ // 0x11f7 @0x1c
0x11db…123c at001d = ╱ec╱,╱ // 0x11f8 @0x1d
0x11db…123c at001e = ╱54╱T╱ // 0x11f9 @0x1e
0x11db…123c at001f = ╱34╱4╱ // 0x11fa @0x1f
0x11db…123c at0020 = ╱ed╱(╱ // 0x11fb @0x20
0x11db…123c at0021 = ╱56╱V╱ // 0x11fc @0x21
0x11db…123c at0022 = ╱ee╱)╱ // 0x11fd @0x22
0x11db…123c at0023 = ╱ec╱,╱ // 0x11fe @0x23
0x11db…123c at0024 = ╱54╱T╱ // 0x11ff @0x24
0x11db…123c at0025 = ╱34╱4╱ // 0x1200 @0x25
0x11db…123c at0026 = ╱ed╱(╱ // 0x1201 @0x26
0x11db…123c at0027 = ╱34╱4╱ // 0x1202 @0x27
0x11db…123c at0028 = ╱fe00008003╱ // 0x1203 @0x28
0x11db…123c at002d = ╱ee╱)╱ // 0x1208 @0x2d
0x11db…123c at002e = ╱ec╱,╱ // 0x1209 @0x2e
0x11db…123c at002f = ╱54╱T╱ // 0x120a @0x2f
0x11db…123c at0030 = ╱34╱4╱ // 0x120b @0x30
0x11db…123c at0031 = ╱ed╱(╱ // 0x120c @0x31
0x11db…123c at0032 = ╱35╱5╱ // 0x120d @0x32
0x11db…123c at0033 = ╱fe0000a003╱ // 0x120e @0x33
0x11db…123c at0038 = ╱ee╱)╱ // 0x1213 @0x38
0x11db…123c at0039 = ╱ec╱,╱ // 0x1214 @0x39
0x11db…123c at003a = ╱54╱T╱ // 0x1215 @0x3a
0x11db…123c at003b = ╱34╱4╱ // 0x1216 @0x3b
0x11db…123c at003c = ╱ed╱(╱ // 0x1217 @0x3c
0x11db…123c at003d = ╱36╱6╱ // 0x1218 @0x3d
0x11db…123c at003e = ╱fe0000c003╱ // 0x1219 @0x3e
0x11db…123c at0043 = ╱ee╱)╱ // 0x121e @0x43
0x11db…123c at0044 = ╱ec╱,╱ // 0x121f @0x44
0x11db…123c at0045 = ╱54╱T╱ // 0x1220 @0x45
0x11db…123c at0046 = ╱34╱4╱ // 0x1221 @0x46
0x11db…123c at0047 = ╱ed╱(╱ // 0x1222 @0x47
0x11db…123c at0048 = ╱37╱7╱ // 0x1223 @0x48
0x11db…123c at0049 = ╱fe0000e003╱ // 0x1224 @0x49
0x11db…123c at004e = ╱ee╱)╱ // 0x1229 @0x4e
0x11db…123c at004f = ╱ec╱,╱ // 0x122a @0x4f
0x11db…123c at0050 = ╱54╱T╱ // 0x122b @0x50
0x11db…123c at0051 = ╱34╱4╱ // 0x122c @0x51
0x11db…123c at0052 = ╱ed╱(╱ // 0x122d @0x52
0x11db…123c at0053 = ╱38╱8╱ // 0x122e @0x53
0x11db…123c at0054 = ╱fe00008004╱ // 0x122f @0x54
0x11db…123c at0059 = ╱ee╱)╱ // 0x1234 @0x59
0x11db…123c at005a = ╱ec╱,╱ // 0x1235 @0x5a
0x11db…123c at005b = ╱54╱T╱ // 0x1236 @0x5b
0x11db…123c at005c = ╱34╱4╱ // 0x1237 @0x5c
0x11db…123c at005d = ╱ed╱(╱ // 0x1238 @0x5d
0x11db…123c at005e = ╱57╱W╱ // 0x1239 @0x5e
0x11db…123c at005f = ╱ee╱)╱ // 0x123a @0x5f
0x11db…123c at0060 = EOL // 0x123b @0x60
0x11db…123c }
0x123c…1255 9fac 1610 EXEC FEJL(6,V,K12$)
0x123c…1255 LineComalBin {
0x123c…1255 ptr = 0x9fac // 0x123c @0x0
0x123c…1255 lno = 0x064a // 0x123e @0x2
0x123c…1255 at0004 = ╱9d╱ EXEC ╱ // 0x1240 @0x4
0x123c…1255 at0005 = ╱46╱F╱ // 0x1241 @0x5
0x123c…1255 at0006 = ╱45╱E╱ // 0x1242 @0x6
0x123c…1255 at0007 = ╱4a╱J╱ // 0x1243 @0x7
0x123c…1255 at0008 = ╱4c╱L╱ // 0x1244 @0x8
0x123c…1255 at0009 = ╱ed╱(╱ // 0x1245 @0x9
0x123c…1255 at000a = ╱36╱6╱ // 0x1246 @0xa
0x123c…1255 at000b = ╱fe0000c003╱ // 0x1247 @0xb
0x123c…1255 at0010 = ╱ec╱,╱ // 0x124c @0x10
0x123c…1255 at0011 = ╱56╱V╱ // 0x124d @0x11
0x123c…1255 at0012 = ╱ec╱,╱ // 0x124e @0x12
0x123c…1255 at0013 = ╱4b╱K╱ // 0x124f @0x13
0x123c…1255 at0014 = ╱31╱1╱ // 0x1250 @0x14
0x123c…1255 at0015 = ╱32╱2╱ // 0x1251 @0x15
0x123c…1255 at0016 = ╱ef╱$╱ // 0x1252 @0x16
0x123c…1255 at0017 = ╱ee╱)╱ // 0x1253 @0x17
0x123c…1255 at0018 = EOL // 0x1254 @0x18
0x123c…1255 }
0x1255…12b6 a00d 1612 PUT K12$,21:T6(E),T6(G),T6(V),T6(4),T6(5),T6(6),T6(7),T6(8),T6(W)
0x1255…12b6 LineComalBin {
0x1255…12b6 ptr = 0xa00d // 0x1255 @0x0
0x1255…12b6 lno = 0x064c // 0x1257 @0x2
0x1255…12b6 at0004 = ╱aa╱ PUT ╱ // 0x1259 @0x4
0x1255…12b6 at0005 = ╱4b╱K╱ // 0x125a @0x5
0x1255…12b6 at0006 = ╱31╱1╱ // 0x125b @0x6
0x1255…12b6 at0007 = ╱32╱2╱ // 0x125c @0x7
0x1255…12b6 at0008 = ╱ef╱$╱ // 0x125d @0x8
0x1255…12b6 at0009 = ╱ec╱,╱ // 0x125e @0x9
0x1255…12b6 at000a = ╱32╱2╱ // 0x125f @0xa
0x1255…12b6 at000b = ╱31╱1╱ // 0x1260 @0xb
0x1255…12b6 at000c = ╱fe0000a805╱ // 0x1261 @0xc
0x1255…12b6 at0011 = ╱f0╱:╱ // 0x1266 @0x11
0x1255…12b6 at0012 = ╱54╱T╱ // 0x1267 @0x12
0x1255…12b6 at0013 = ╱36╱6╱ // 0x1268 @0x13
0x1255…12b6 at0014 = ╱ed╱(╱ // 0x1269 @0x14
0x1255…12b6 at0015 = ╱45╱E╱ // 0x126a @0x15
0x1255…12b6 at0016 = ╱ee╱)╱ // 0x126b @0x16
0x1255…12b6 at0017 = ╱ec╱,╱ // 0x126c @0x17
0x1255…12b6 at0018 = ╱54╱T╱ // 0x126d @0x18
0x1255…12b6 at0019 = ╱36╱6╱ // 0x126e @0x19
0x1255…12b6 at001a = ╱ed╱(╱ // 0x126f @0x1a
0x1255…12b6 at001b = ╱47╱G╱ // 0x1270 @0x1b
0x1255…12b6 at001c = ╱ee╱)╱ // 0x1271 @0x1c
0x1255…12b6 at001d = ╱ec╱,╱ // 0x1272 @0x1d
0x1255…12b6 at001e = ╱54╱T╱ // 0x1273 @0x1e
0x1255…12b6 at001f = ╱36╱6╱ // 0x1274 @0x1f
0x1255…12b6 at0020 = ╱ed╱(╱ // 0x1275 @0x20
0x1255…12b6 at0021 = ╱56╱V╱ // 0x1276 @0x21
0x1255…12b6 at0022 = ╱ee╱)╱ // 0x1277 @0x22
0x1255…12b6 at0023 = ╱ec╱,╱ // 0x1278 @0x23
0x1255…12b6 at0024 = ╱54╱T╱ // 0x1279 @0x24
0x1255…12b6 at0025 = ╱36╱6╱ // 0x127a @0x25
0x1255…12b6 at0026 = ╱ed╱(╱ // 0x127b @0x26
0x1255…12b6 at0027 = ╱34╱4╱ // 0x127c @0x27
0x1255…12b6 at0028 = ╱fe00008003╱ // 0x127d @0x28
0x1255…12b6 at002d = ╱ee╱)╱ // 0x1282 @0x2d
0x1255…12b6 at002e = ╱ec╱,╱ // 0x1283 @0x2e
0x1255…12b6 at002f = ╱54╱T╱ // 0x1284 @0x2f
0x1255…12b6 at0030 = ╱36╱6╱ // 0x1285 @0x30
0x1255…12b6 at0031 = ╱ed╱(╱ // 0x1286 @0x31
0x1255…12b6 at0032 = ╱35╱5╱ // 0x1287 @0x32
0x1255…12b6 at0033 = ╱fe0000a003╱ // 0x1288 @0x33
0x1255…12b6 at0038 = ╱ee╱)╱ // 0x128d @0x38
0x1255…12b6 at0039 = ╱ec╱,╱ // 0x128e @0x39
0x1255…12b6 at003a = ╱54╱T╱ // 0x128f @0x3a
0x1255…12b6 at003b = ╱36╱6╱ // 0x1290 @0x3b
0x1255…12b6 at003c = ╱ed╱(╱ // 0x1291 @0x3c
0x1255…12b6 at003d = ╱36╱6╱ // 0x1292 @0x3d
0x1255…12b6 at003e = ╱fe0000c003╱ // 0x1293 @0x3e
0x1255…12b6 at0043 = ╱ee╱)╱ // 0x1298 @0x43
0x1255…12b6 at0044 = ╱ec╱,╱ // 0x1299 @0x44
0x1255…12b6 at0045 = ╱54╱T╱ // 0x129a @0x45
0x1255…12b6 at0046 = ╱36╱6╱ // 0x129b @0x46
0x1255…12b6 at0047 = ╱ed╱(╱ // 0x129c @0x47
0x1255…12b6 at0048 = ╱37╱7╱ // 0x129d @0x48
0x1255…12b6 at0049 = ╱fe0000e003╱ // 0x129e @0x49
0x1255…12b6 at004e = ╱ee╱)╱ // 0x12a3 @0x4e
0x1255…12b6 at004f = ╱ec╱,╱ // 0x12a4 @0x4f
0x1255…12b6 at0050 = ╱54╱T╱ // 0x12a5 @0x50
0x1255…12b6 at0051 = ╱36╱6╱ // 0x12a6 @0x51
0x1255…12b6 at0052 = ╱ed╱(╱ // 0x12a7 @0x52
0x1255…12b6 at0053 = ╱38╱8╱ // 0x12a8 @0x53
0x1255…12b6 at0054 = ╱fe00008004╱ // 0x12a9 @0x54
0x1255…12b6 at0059 = ╱ee╱)╱ // 0x12ae @0x59
0x1255…12b6 at005a = ╱ec╱,╱ // 0x12af @0x5a
0x1255…12b6 at005b = ╱54╱T╱ // 0x12b0 @0x5b
0x1255…12b6 at005c = ╱36╱6╱ // 0x12b1 @0x5c
0x1255…12b6 at005d = ╱ed╱(╱ // 0x12b2 @0x5d
0x1255…12b6 at005e = ╱57╱W╱ // 0x12b3 @0x5e
0x1255…12b6 at005f = ╱ee╱)╱ // 0x12b4 @0x5f
0x1255…12b6 at0060 = EOL // 0x12b5 @0x60
0x1255…12b6 }
0x12b6…12d6 a02d 1614 EXEC FEJL(20,31,K12$)
0x12b6…12d6 LineComalBin {
0x12b6…12d6 ptr = 0xa02d // 0x12b6 @0x0
0x12b6…12d6 lno = 0x064e // 0x12b8 @0x2
0x12b6…12d6 at0004 = ╱9d╱ EXEC ╱ // 0x12ba @0x4
0x12b6…12d6 at0005 = ╱46╱F╱ // 0x12bb @0x5
0x12b6…12d6 at0006 = ╱45╱E╱ // 0x12bc @0x6
0x12b6…12d6 at0007 = ╱4a╱J╱ // 0x12bd @0x7
0x12b6…12d6 at0008 = ╱4c╱L╱ // 0x12be @0x8
0x12b6…12d6 at0009 = ╱ed╱(╱ // 0x12bf @0x9
0x12b6…12d6 at000a = ╱32╱2╱ // 0x12c0 @0xa
0x12b6…12d6 at000b = ╱30╱0╱ // 0x12c1 @0xb
0x12b6…12d6 at000c = ╱fe0000a005╱ // 0x12c2 @0xc
0x12b6…12d6 at0011 = ╱ec╱,╱ // 0x12c7 @0x11
0x12b6…12d6 at0012 = ╱33╱3╱ // 0x12c8 @0x12
0x12b6…12d6 at0013 = ╱31╱1╱ // 0x12c9 @0x13
0x12b6…12d6 at0014 = ╱fe0000f805╱ // 0x12ca @0x14
0x12b6…12d6 at0019 = ╱ec╱,╱ // 0x12cf @0x19
0x12b6…12d6 at001a = ╱4b╱K╱ // 0x12d0 @0x1a
0x12b6…12d6 at001b = ╱31╱1╱ // 0x12d1 @0x1b
0x12b6…12d6 at001c = ╱32╱2╱ // 0x12d2 @0x1c
0x12b6…12d6 at001d = ╱ef╱$╱ // 0x12d3 @0x1d
0x12b6…12d6 at001e = ╱ee╱)╱ // 0x12d4 @0x1e
0x12b6…12d6 at001f = EOL // 0x12d5 @0x1f
0x12b6…12d6 }
0x12d6…12e0 a037 1620 CLOSE K12$
0x12d6…12e0 LineComalBin {
0x12d6…12e0 ptr = 0xa037 // 0x12d6 @0x0
0x12d6…12e0 lno = 0x0654 // 0x12d8 @0x2
0x12d6…12e0 at0004 = ╱a8╱ CLOSE ╱ // 0x12da @0x4
0x12d6…12e0 at0005 = ╱4b╱K╱ // 0x12db @0x5
0x12d6…12e0 at0006 = ╱31╱1╱ // 0x12dc @0x6
0x12d6…12e0 at0007 = ╱32╱2╱ // 0x12dd @0x7
0x12d6…12e0 at0008 = ╱ef╱$╱ // 0x12de @0x8
0x12d6…12e0 at0009 = EOL // 0x12df @0x9
0x12d6…12e0 }
0x12e0…12fe a055 1630 EXEC FEJL(6,4,K12$)
0x12e0…12fe LineComalBin {
0x12e0…12fe ptr = 0xa055 // 0x12e0 @0x0
0x12e0…12fe lno = 0x065e // 0x12e2 @0x2
0x12e0…12fe at0004 = ╱9d╱ EXEC ╱ // 0x12e4 @0x4
0x12e0…12fe at0005 = ╱46╱F╱ // 0x12e5 @0x5
0x12e0…12fe at0006 = ╱45╱E╱ // 0x12e6 @0x6
0x12e0…12fe at0007 = ╱4a╱J╱ // 0x12e7 @0x7
0x12e0…12fe at0008 = ╱4c╱L╱ // 0x12e8 @0x8
0x12e0…12fe at0009 = ╱ed╱(╱ // 0x12e9 @0x9
0x12e0…12fe at000a = ╱36╱6╱ // 0x12ea @0xa
0x12e0…12fe at000b = ╱fe0000c003╱ // 0x12eb @0xb
0x12e0…12fe at0010 = ╱ec╱,╱ // 0x12f0 @0x10
0x12e0…12fe at0011 = ╱34╱4╱ // 0x12f1 @0x11
0x12e0…12fe at0012 = ╱fe00008003╱ // 0x12f2 @0x12
0x12e0…12fe at0017 = ╱ec╱,╱ // 0x12f7 @0x17
0x12e0…12fe at0018 = ╱4b╱K╱ // 0x12f8 @0x18
0x12e0…12fe at0019 = ╱31╱1╱ // 0x12f9 @0x19
0x12e0…12fe at001a = ╱32╱2╱ // 0x12fa @0x1a
0x12e0…12fe at001b = ╱ef╱$╱ // 0x12fb @0x1b
0x12e0…12fe at001c = ╱ee╱)╱ // 0x12fc @0x1c
0x12e0…12fe at001d = EOL // 0x12fd @0x1d
0x12e0…12fe }
0x12fe…1304 a05b 1640 ENDPROC
0x12fe…1304 LineComalBin {
0x12fe…1304 ptr = 0xa05b // 0x12fe @0x0
0x12fe…1304 lno = 0x0668 // 0x1300 @0x2
0x12fe…1304 at0004 = ╱9f╱ ENDPROC ╱ // 0x1302 @0x4
0x12fe…1304 at0005 = EOL // 0x1303 @0x5
0x12fe…1304 }
0x1304…1332 a089 1650 PROC FGET2(K15,I3,N3,D3,BI3,TK3,BE3,TE3,ENT3)
0x1304…1332 LineComalBin {
0x1304…1332 ptr = 0xa089 // 0x1304 @0x0
0x1304…1332 lno = 0x0672 // 0x1306 @0x2
0x1304…1332 at0004 = ╱9e╱ PROC ╱ // 0x1308 @0x4
0x1304…1332 at0005 = ╱46╱F╱ // 0x1309 @0x5
0x1304…1332 at0006 = ╱47╱G╱ // 0x130a @0x6
0x1304…1332 at0007 = ╱45╱E╱ // 0x130b @0x7
0x1304…1332 at0008 = ╱54╱T╱ // 0x130c @0x8
0x1304…1332 at0009 = ╱32╱2╱ // 0x130d @0x9
0x1304…1332 at000a = ╱ed╱(╱ // 0x130e @0xa
0x1304…1332 at000b = ╱4b╱K╱ // 0x130f @0xb
0x1304…1332 at000c = ╱31╱1╱ // 0x1310 @0xc
0x1304…1332 at000d = ╱35╱5╱ // 0x1311 @0xd
0x1304…1332 at000e = ╱ec╱,╱ // 0x1312 @0xe
0x1304…1332 at000f = ╱49╱I╱ // 0x1313 @0xf
0x1304…1332 at0010 = ╱33╱3╱ // 0x1314 @0x10
0x1304…1332 at0011 = ╱ec╱,╱ // 0x1315 @0x11
0x1304…1332 at0012 = ╱4e╱N╱ // 0x1316 @0x12
0x1304…1332 at0013 = ╱33╱3╱ // 0x1317 @0x13
0x1304…1332 at0014 = ╱ec╱,╱ // 0x1318 @0x14
0x1304…1332 at0015 = ╱44╱D╱ // 0x1319 @0x15
0x1304…1332 at0016 = ╱33╱3╱ // 0x131a @0x16
0x1304…1332 at0017 = ╱ec╱,╱ // 0x131b @0x17
0x1304…1332 at0018 = ╱42╱B╱ // 0x131c @0x18
0x1304…1332 at0019 = ╱49╱I╱ // 0x131d @0x19
0x1304…1332 at001a = ╱33╱3╱ // 0x131e @0x1a
0x1304…1332 at001b = ╱ec╱,╱ // 0x131f @0x1b
0x1304…1332 at001c = ╱54╱T╱ // 0x1320 @0x1c
0x1304…1332 at001d = ╱4b╱K╱ // 0x1321 @0x1d
0x1304…1332 at001e = ╱33╱3╱ // 0x1322 @0x1e
0x1304…1332 at001f = ╱ec╱,╱ // 0x1323 @0x1f
0x1304…1332 at0020 = ╱42╱B╱ // 0x1324 @0x20
0x1304…1332 at0021 = ╱45╱E╱ // 0x1325 @0x21
0x1304…1332 at0022 = ╱33╱3╱ // 0x1326 @0x22
0x1304…1332 at0023 = ╱ec╱,╱ // 0x1327 @0x23
0x1304…1332 at0024 = ╱54╱T╱ // 0x1328 @0x24
0x1304…1332 at0025 = ╱45╱E╱ // 0x1329 @0x25
0x1304…1332 at0026 = ╱33╱3╱ // 0x132a @0x26
0x1304…1332 at0027 = ╱ec╱,╱ // 0x132b @0x27
0x1304…1332 at0028 = ╱45╱E╱ // 0x132c @0x28
0x1304…1332 at0029 = ╱4e╱N╱ // 0x132d @0x29
0x1304…1332 at002a = ╱54╱T╱ // 0x132e @0x2a
0x1304…1332 at002b = ╱33╱3╱ // 0x132f @0x2b
0x1304…1332 at002c = ╱ee╱)╱ // 0x1330 @0x2c
0x1304…1332 at002d = EOL // 0x1331 @0x2d
0x1304…1332 }
0x1332…1358 a0af 1660 GET K15$,I3:N3,D3,BI3,TK3$,BE3$,ENT3
0x1332…1358 LineComalBin {
0x1332…1358 ptr = 0xa0af // 0x1332 @0x0
0x1332…1358 lno = 0x067c // 0x1334 @0x2
0x1332…1358 at0004 = ╱a9╱ GET ╱ // 0x1336 @0x4
0x1332…1358 at0005 = ╱4b╱K╱ // 0x1337 @0x5
0x1332…1358 at0006 = ╱31╱1╱ // 0x1338 @0x6
0x1332…1358 at0007 = ╱35╱5╱ // 0x1339 @0x7
0x1332…1358 at0008 = ╱ef╱$╱ // 0x133a @0x8
0x1332…1358 at0009 = ╱ec╱,╱ // 0x133b @0x9
0x1332…1358 at000a = ╱49╱I╱ // 0x133c @0xa
0x1332…1358 at000b = ╱33╱3╱ // 0x133d @0xb
0x1332…1358 at000c = ╱f0╱:╱ // 0x133e @0xc
0x1332…1358 at000d = ╱4e╱N╱ // 0x133f @0xd
0x1332…1358 at000e = ╱33╱3╱ // 0x1340 @0xe
0x1332…1358 at000f = ╱ec╱,╱ // 0x1341 @0xf
0x1332…1358 at0010 = ╱44╱D╱ // 0x1342 @0x10
0x1332…1358 at0011 = ╱33╱3╱ // 0x1343 @0x11
0x1332…1358 at0012 = ╱ec╱,╱ // 0x1344 @0x12
0x1332…1358 at0013 = ╱42╱B╱ // 0x1345 @0x13
0x1332…1358 at0014 = ╱49╱I╱ // 0x1346 @0x14
0x1332…1358 at0015 = ╱33╱3╱ // 0x1347 @0x15
0x1332…1358 at0016 = ╱ec╱,╱ // 0x1348 @0x16
0x1332…1358 at0017 = ╱54╱T╱ // 0x1349 @0x17
0x1332…1358 at0018 = ╱4b╱K╱ // 0x134a @0x18
0x1332…1358 at0019 = ╱33╱3╱ // 0x134b @0x19
0x1332…1358 at001a = ╱ef╱$╱ // 0x134c @0x1a
0x1332…1358 at001b = ╱ec╱,╱ // 0x134d @0x1b
0x1332…1358 at001c = ╱42╱B╱ // 0x134e @0x1c
0x1332…1358 at001d = ╱45╱E╱ // 0x134f @0x1d
0x1332…1358 at001e = ╱33╱3╱ // 0x1350 @0x1e
0x1332…1358 at001f = ╱ef╱$╱ // 0x1351 @0x1f
0x1332…1358 at0020 = ╱ec╱,╱ // 0x1352 @0x20
0x1332…1358 at0021 = ╱45╱E╱ // 0x1353 @0x21
0x1332…1358 at0022 = ╱4e╱N╱ // 0x1354 @0x22
0x1332…1358 at0023 = ╱54╱T╱ // 0x1355 @0x23
0x1332…1358 at0024 = ╱33╱3╱ // 0x1356 @0x24
0x1332…1358 at0025 = EOL // 0x1357 @0x25
0x1332…1358 }
0x1358…136c a0c3 1670 EXEC FEJL(W,E,K15$)
0x1358…136c LineComalBin {
0x1358…136c ptr = 0xa0c3 // 0x1358 @0x0
0x1358…136c lno = 0x0686 // 0x135a @0x2
0x1358…136c at0004 = ╱9d╱ EXEC ╱ // 0x135c @0x4
0x1358…136c at0005 = ╱46╱F╱ // 0x135d @0x5
0x1358…136c at0006 = ╱45╱E╱ // 0x135e @0x6
0x1358…136c at0007 = ╱4a╱J╱ // 0x135f @0x7
0x1358…136c at0008 = ╱4c╱L╱ // 0x1360 @0x8
0x1358…136c at0009 = ╱ed╱(╱ // 0x1361 @0x9
0x1358…136c at000a = ╱57╱W╱ // 0x1362 @0xa
0x1358…136c at000b = ╱ec╱,╱ // 0x1363 @0xb
0x1358…136c at000c = ╱45╱E╱ // 0x1364 @0xc
0x1358…136c at000d = ╱ec╱,╱ // 0x1365 @0xd
0x1358…136c at000e = ╱4b╱K╱ // 0x1366 @0xe
0x1358…136c at000f = ╱31╱1╱ // 0x1367 @0xf
0x1358…136c at0010 = ╱35╱5╱ // 0x1368 @0x10
0x1358…136c at0011 = ╱ef╱$╱ // 0x1369 @0x11
0x1358…136c at0012 = ╱ee╱)╱ // 0x136a @0x12
0x1358…136c at0013 = EOL // 0x136b @0x13
0x1358…136c }
0x136c…139c a0f3 1680 IF ORD(TK3$)-48>W AND ORD(TK3$)-48<20 THEN
0x136c…139c LineComalBin {
0x136c…139c ptr = 0xa0f3 // 0x136c @0x0
0x136c…139c lno = 0x0690 // 0x136e @0x2
0x136c…139c at0004 = ╱9c╱ IF ╱ // 0x1370 @0x4
0x136c…139c at0005 = ╱cd╱ORD╱ // 0x1371 @0x5
0x136c…139c at0006 = ╱ed╱(╱ // 0x1372 @0x6
0x136c…139c at0007 = ╱54╱T╱ // 0x1373 @0x7
0x136c…139c at0008 = ╱4b╱K╱ // 0x1374 @0x8
0x136c…139c at0009 = ╱33╱3╱ // 0x1375 @0x9
0x136c…139c at000a = ╱ef╱$╱ // 0x1376 @0xa
0x136c…139c at000b = ╱ee╱)╱ // 0x1377 @0xb
0x136c…139c at000c = ╱e3╱-╱ // 0x1378 @0xc
0x136c…139c at000d = ╱34╱4╱ // 0x1379 @0xd
0x136c…139c at000e = ╱38╱8╱ // 0x137a @0xe
0x136c…139c at000f = ╱fe0000c006╱ // 0x137b @0xf
0x136c…139c at0014 = ╱de╱>╱ // 0x1380 @0x14
0x136c…139c at0015 = ╱57╱W╱ // 0x1381 @0x15
0x136c…139c at0016 = ╱da╱ AND ╱ // 0x1382 @0x16
0x136c…139c at0017 = ╱cd╱ORD╱ // 0x1383 @0x17
0x136c…139c at0018 = ╱ed╱(╱ // 0x1384 @0x18
0x136c…139c at0019 = ╱54╱T╱ // 0x1385 @0x19
0x136c…139c at001a = ╱4b╱K╱ // 0x1386 @0x1a
0x136c…139c at001b = ╱33╱3╱ // 0x1387 @0x1b
0x136c…139c at001c = ╱ef╱$╱ // 0x1388 @0x1c
0x136c…139c at001d = ╱ee╱)╱ // 0x1389 @0x1d
0x136c…139c at001e = ╱e3╱-╱ // 0x138a @0x1e
0x136c…139c at001f = ╱34╱4╱ // 0x138b @0x1f
0x136c…139c at0020 = ╱38╱8╱ // 0x138c @0x20
0x136c…139c at0021 = ╱fe0000c006╱ // 0x138d @0x21
0x136c…139c at0026 = ╱dd╱<╱ // 0x1392 @0x26
0x136c…139c at0027 = ╱32╱2╱ // 0x1393 @0x27
0x136c…139c at0028 = ╱30╱0╱ // 0x1394 @0x28
0x136c…139c at0029 = ╱fe0000a005╱ // 0x1395 @0x29
0x136c…139c at002e = ╱b6╱ THEN ╱ // 0x139a @0x2e
0x136c…139c at002f = EOL // 0x139b @0x2f
0x136c…139c }
0x139c…13a8 a0ff 1690 I3=I3+E
0x139c…13a8 LineComalBin {
0x139c…13a8 ptr = 0xa0ff // 0x139c @0x0
0x139c…13a8 lno = 0x069a // 0x139e @0x2
0x139c…13a8 at0004 = ╱49╱I╱ // 0x13a0 @0x4
0x139c…13a8 at0005 = ╱33╱3╱ // 0x13a1 @0x5
0x139c…13a8 at0006 = ╱dc╱=╱ // 0x13a2 @0x6
0x139c…13a8 at0007 = ╱49╱I╱ // 0x13a3 @0x7
0x139c…13a8 at0008 = ╱33╱3╱ // 0x13a4 @0x8
0x139c…13a8 at0009 = ╱e2╱+╱ // 0x13a5 @0x9
0x139c…13a8 at000a = ╱45╱E╱ // 0x13a6 @0xa
0x139c…13a8 at000b = EOL // 0x13a7 @0xb
0x139c…13a8 }
0x13a8…13bd a114 1700 GET K15$,I3:N3,TE3$
0x13a8…13bd LineComalBin {
0x13a8…13bd ptr = 0xa114 // 0x13a8 @0x0
0x13a8…13bd lno = 0x06a4 // 0x13aa @0x2
0x13a8…13bd at0004 = ╱a9╱ GET ╱ // 0x13ac @0x4
0x13a8…13bd at0005 = ╱4b╱K╱ // 0x13ad @0x5
0x13a8…13bd at0006 = ╱31╱1╱ // 0x13ae @0x6
0x13a8…13bd at0007 = ╱35╱5╱ // 0x13af @0x7
0x13a8…13bd at0008 = ╱ef╱$╱ // 0x13b0 @0x8
0x13a8…13bd at0009 = ╱ec╱,╱ // 0x13b1 @0x9
0x13a8…13bd at000a = ╱49╱I╱ // 0x13b2 @0xa
0x13a8…13bd at000b = ╱33╱3╱ // 0x13b3 @0xb
0x13a8…13bd at000c = ╱f0╱:╱ // 0x13b4 @0xc
0x13a8…13bd at000d = ╱4e╱N╱ // 0x13b5 @0xd
0x13a8…13bd at000e = ╱33╱3╱ // 0x13b6 @0xe
0x13a8…13bd at000f = ╱ec╱,╱ // 0x13b7 @0xf
0x13a8…13bd at0010 = ╱54╱T╱ // 0x13b8 @0x10
0x13a8…13bd at0011 = ╱45╱E╱ // 0x13b9 @0x11
0x13a8…13bd at0012 = ╱33╱3╱ // 0x13ba @0x12
0x13a8…13bd at0013 = ╱ef╱$╱ // 0x13bb @0x13
0x13a8…13bd at0014 = EOL // 0x13bc @0x14
0x13a8…13bd }
0x13bd…13d1 a128 1710 EXEC FEJL(W,G,K15$)
0x13bd…13d1 LineComalBin {
0x13bd…13d1 ptr = 0xa128 // 0x13bd @0x0
0x13bd…13d1 lno = 0x06ae // 0x13bf @0x2
0x13bd…13d1 at0004 = ╱9d╱ EXEC ╱ // 0x13c1 @0x4
0x13bd…13d1 at0005 = ╱46╱F╱ // 0x13c2 @0x5
0x13bd…13d1 at0006 = ╱45╱E╱ // 0x13c3 @0x6
0x13bd…13d1 at0007 = ╱4a╱J╱ // 0x13c4 @0x7
0x13bd…13d1 at0008 = ╱4c╱L╱ // 0x13c5 @0x8
0x13bd…13d1 at0009 = ╱ed╱(╱ // 0x13c6 @0x9
0x13bd…13d1 at000a = ╱57╱W╱ // 0x13c7 @0xa
0x13bd…13d1 at000b = ╱ec╱,╱ // 0x13c8 @0xb
0x13bd…13d1 at000c = ╱47╱G╱ // 0x13c9 @0xc
0x13bd…13d1 at000d = ╱ec╱,╱ // 0x13ca @0xd
0x13bd…13d1 at000e = ╱4b╱K╱ // 0x13cb @0xe
0x13bd…13d1 at000f = ╱31╱1╱ // 0x13cc @0xf
0x13bd…13d1 at0010 = ╱35╱5╱ // 0x13cd @0x10
0x13bd…13d1 at0011 = ╱ef╱$╱ // 0x13ce @0x11
0x13bd…13d1 at0012 = ╱ee╱)╱ // 0x13cf @0x12
0x13bd…13d1 at0013 = EOL // 0x13d0 @0x13
0x13bd…13d1 }
0x13d1…13d7 a12e 1720 ELSE
0x13d1…13d7 LineComalBin {
0x13d1…13d7 ptr = 0xa12e // 0x13d1 @0x0
0x13d1…13d7 lno = 0x06b8 // 0x13d3 @0x2
0x13d1…13d7 at0004 = ╱9a╱ ELSE ╱ // 0x13d5 @0x4
0x13d1…13d7 at0005 = EOL // 0x13d6 @0x5
0x13d1…13d7 }
0x13d7…13e7 a13e 1730 TE3$=BLANK$
0x13d7…13e7 LineComalBin {
0x13d7…13e7 ptr = 0xa13e // 0x13d7 @0x0
0x13d7…13e7 lno = 0x06c2 // 0x13d9 @0x2
0x13d7…13e7 at0004 = ╱54╱T╱ // 0x13db @0x4
0x13d7…13e7 at0005 = ╱45╱E╱ // 0x13dc @0x5
0x13d7…13e7 at0006 = ╱33╱3╱ // 0x13dd @0x6
0x13d7…13e7 at0007 = ╱ef╱$╱ // 0x13de @0x7
0x13d7…13e7 at0008 = ╱dc╱=╱ // 0x13df @0x8
0x13d7…13e7 at0009 = ╱42╱B╱ // 0x13e0 @0x9
0x13d7…13e7 at000a = ╱4c╱L╱ // 0x13e1 @0xa
0x13d7…13e7 at000b = ╱41╱A╱ // 0x13e2 @0xb
0x13d7…13e7 at000c = ╱4e╱N╱ // 0x13e3 @0xc
0x13d7…13e7 at000d = ╱4b╱K╱ // 0x13e4 @0xd
0x13d7…13e7 at000e = ╱ef╱$╱ // 0x13e5 @0xe
0x13d7…13e7 at000f = EOL // 0x13e6 @0xf
0x13d7…13e7 }
0x13e7…13ed a144 1740 ENDIF
0x13e7…13ed LineComalBin {
0x13e7…13ed ptr = 0xa144 // 0x13e7 @0x0
0x13e7…13ed lno = 0x06cc // 0x13e9 @0x2
0x13e7…13ed at0004 = ╱9b╱ ENDIF ╱ // 0x13eb @0x4
0x13e7…13ed at0005 = EOL // 0x13ec @0x5
0x13e7…13ed }
0x13ed…13f3 a14a 1750 ENDPROC
0x13ed…13f3 LineComalBin {
0x13ed…13f3 ptr = 0xa14a // 0x13ed @0x0
0x13ed…13f3 lno = 0x06d6 // 0x13ef @0x2
0x13ed…13f3 at0004 = ╱9f╱ ENDPROC ╱ // 0x13f1 @0x4
0x13ed…13f3 at0005 = EOL // 0x13f2 @0x5
0x13ed…13f3 }
0x13f3…1421 a178 1760 PROC FPUT2(K16,I4,N4,D4,BI4,TK4,BE4,TE4,ENT4)
0x13f3…1421 LineComalBin {
0x13f3…1421 ptr = 0xa178 // 0x13f3 @0x0
0x13f3…1421 lno = 0x06e0 // 0x13f5 @0x2
0x13f3…1421 at0004 = ╱9e╱ PROC ╱ // 0x13f7 @0x4
0x13f3…1421 at0005 = ╱46╱F╱ // 0x13f8 @0x5
0x13f3…1421 at0006 = ╱50╱P╱ // 0x13f9 @0x6
0x13f3…1421 at0007 = ╱55╱U╱ // 0x13fa @0x7
0x13f3…1421 at0008 = ╱54╱T╱ // 0x13fb @0x8
0x13f3…1421 at0009 = ╱32╱2╱ // 0x13fc @0x9
0x13f3…1421 at000a = ╱ed╱(╱ // 0x13fd @0xa
0x13f3…1421 at000b = ╱4b╱K╱ // 0x13fe @0xb
0x13f3…1421 at000c = ╱31╱1╱ // 0x13ff @0xc
0x13f3…1421 at000d = ╱36╱6╱ // 0x1400 @0xd
0x13f3…1421 at000e = ╱ec╱,╱ // 0x1401 @0xe
0x13f3…1421 at000f = ╱49╱I╱ // 0x1402 @0xf
0x13f3…1421 at0010 = ╱34╱4╱ // 0x1403 @0x10
0x13f3…1421 at0011 = ╱ec╱,╱ // 0x1404 @0x11
0x13f3…1421 at0012 = ╱4e╱N╱ // 0x1405 @0x12
0x13f3…1421 at0013 = ╱34╱4╱ // 0x1406 @0x13
0x13f3…1421 at0014 = ╱ec╱,╱ // 0x1407 @0x14
0x13f3…1421 at0015 = ╱44╱D╱ // 0x1408 @0x15
0x13f3…1421 at0016 = ╱34╱4╱ // 0x1409 @0x16
0x13f3…1421 at0017 = ╱ec╱,╱ // 0x140a @0x17
0x13f3…1421 at0018 = ╱42╱B╱ // 0x140b @0x18
0x13f3…1421 at0019 = ╱49╱I╱ // 0x140c @0x19
0x13f3…1421 at001a = ╱34╱4╱ // 0x140d @0x1a
0x13f3…1421 at001b = ╱ec╱,╱ // 0x140e @0x1b
0x13f3…1421 at001c = ╱54╱T╱ // 0x140f @0x1c
0x13f3…1421 at001d = ╱4b╱K╱ // 0x1410 @0x1d
0x13f3…1421 at001e = ╱34╱4╱ // 0x1411 @0x1e
0x13f3…1421 at001f = ╱ec╱,╱ // 0x1412 @0x1f
0x13f3…1421 at0020 = ╱42╱B╱ // 0x1413 @0x20
0x13f3…1421 at0021 = ╱45╱E╱ // 0x1414 @0x21
0x13f3…1421 at0022 = ╱34╱4╱ // 0x1415 @0x22
0x13f3…1421 at0023 = ╱ec╱,╱ // 0x1416 @0x23
0x13f3…1421 at0024 = ╱54╱T╱ // 0x1417 @0x24
0x13f3…1421 at0025 = ╱45╱E╱ // 0x1418 @0x25
0x13f3…1421 at0026 = ╱34╱4╱ // 0x1419 @0x26
0x13f3…1421 at0027 = ╱ec╱,╱ // 0x141a @0x27
0x13f3…1421 at0028 = ╱45╱E╱ // 0x141b @0x28
0x13f3…1421 at0029 = ╱4e╱N╱ // 0x141c @0x29
0x13f3…1421 at002a = ╱54╱T╱ // 0x141d @0x2a
0x13f3…1421 at002b = ╱34╱4╱ // 0x141e @0x2b
0x13f3…1421 at002c = ╱ee╱)╱ // 0x141f @0x2c
0x13f3…1421 at002d = EOL // 0x1420 @0x2d
0x13f3…1421 }
0x1421…1447 a19e 1770 PUT K16$,I4:N4,D4,BI4,TK4$,BE4$,ENT4
0x1421…1447 LineComalBin {
0x1421…1447 ptr = 0xa19e // 0x1421 @0x0
0x1421…1447 lno = 0x06ea // 0x1423 @0x2
0x1421…1447 at0004 = ╱aa╱ PUT ╱ // 0x1425 @0x4
0x1421…1447 at0005 = ╱4b╱K╱ // 0x1426 @0x5
0x1421…1447 at0006 = ╱31╱1╱ // 0x1427 @0x6
0x1421…1447 at0007 = ╱36╱6╱ // 0x1428 @0x7
0x1421…1447 at0008 = ╱ef╱$╱ // 0x1429 @0x8
0x1421…1447 at0009 = ╱ec╱,╱ // 0x142a @0x9
0x1421…1447 at000a = ╱49╱I╱ // 0x142b @0xa
0x1421…1447 at000b = ╱34╱4╱ // 0x142c @0xb
0x1421…1447 at000c = ╱f0╱:╱ // 0x142d @0xc
0x1421…1447 at000d = ╱4e╱N╱ // 0x142e @0xd
0x1421…1447 at000e = ╱34╱4╱ // 0x142f @0xe
0x1421…1447 at000f = ╱ec╱,╱ // 0x1430 @0xf
0x1421…1447 at0010 = ╱44╱D╱ // 0x1431 @0x10
0x1421…1447 at0011 = ╱34╱4╱ // 0x1432 @0x11
0x1421…1447 at0012 = ╱ec╱,╱ // 0x1433 @0x12
0x1421…1447 at0013 = ╱42╱B╱ // 0x1434 @0x13
0x1421…1447 at0014 = ╱49╱I╱ // 0x1435 @0x14
0x1421…1447 at0015 = ╱34╱4╱ // 0x1436 @0x15
0x1421…1447 at0016 = ╱ec╱,╱ // 0x1437 @0x16
0x1421…1447 at0017 = ╱54╱T╱ // 0x1438 @0x17
0x1421…1447 at0018 = ╱4b╱K╱ // 0x1439 @0x18
0x1421…1447 at0019 = ╱34╱4╱ // 0x143a @0x19
0x1421…1447 at001a = ╱ef╱$╱ // 0x143b @0x1a
0x1421…1447 at001b = ╱ec╱,╱ // 0x143c @0x1b
0x1421…1447 at001c = ╱42╱B╱ // 0x143d @0x1c
0x1421…1447 at001d = ╱45╱E╱ // 0x143e @0x1d
0x1421…1447 at001e = ╱34╱4╱ // 0x143f @0x1e
0x1421…1447 at001f = ╱ef╱$╱ // 0x1440 @0x1f
0x1421…1447 at0020 = ╱ec╱,╱ // 0x1441 @0x20
0x1421…1447 at0021 = ╱45╱E╱ // 0x1442 @0x21
0x1421…1447 at0022 = ╱4e╱N╱ // 0x1443 @0x22
0x1421…1447 at0023 = ╱54╱T╱ // 0x1444 @0x23
0x1421…1447 at0024 = ╱34╱4╱ // 0x1445 @0x24
0x1421…1447 at0025 = EOL // 0x1446 @0x25
0x1421…1447 }
0x1447…1461 a1b8 1780 EXEC FEJL(10,E,K16$)
0x1447…1461 LineComalBin {
0x1447…1461 ptr = 0xa1b8 // 0x1447 @0x0
0x1447…1461 lno = 0x06f4 // 0x1449 @0x2
0x1447…1461 at0004 = ╱9d╱ EXEC ╱ // 0x144b @0x4
0x1447…1461 at0005 = ╱46╱F╱ // 0x144c @0x5
0x1447…1461 at0006 = ╱45╱E╱ // 0x144d @0x6
0x1447…1461 at0007 = ╱4a╱J╱ // 0x144e @0x7
0x1447…1461 at0008 = ╱4c╱L╱ // 0x144f @0x8
0x1447…1461 at0009 = ╱ed╱(╱ // 0x1450 @0x9
0x1447…1461 at000a = ╱31╱1╱ // 0x1451 @0xa
0x1447…1461 at000b = ╱30╱0╱ // 0x1452 @0xb
0x1447…1461 at000c = ╱fe0000a004╱ // 0x1453 @0xc
0x1447…1461 at0011 = ╱ec╱,╱ // 0x1458 @0x11
0x1447…1461 at0012 = ╱45╱E╱ // 0x1459 @0x12
0x1447…1461 at0013 = ╱ec╱,╱ // 0x145a @0x13
0x1447…1461 at0014 = ╱4b╱K╱ // 0x145b @0x14
0x1447…1461 at0015 = ╱31╱1╱ // 0x145c @0x15
0x1447…1461 at0016 = ╱36╱6╱ // 0x145d @0x16
0x1447…1461 at0017 = ╱ef╱$╱ // 0x145e @0x17
0x1447…1461 at0018 = ╱ee╱)╱ // 0x145f @0x18
0x1447…1461 at0019 = EOL // 0x1460 @0x19
0x1447…1461 }
0x1461…1491 a1e8 1790 IF ORD(TK4$)-48>W AND ORD(TK4$)-48<20 THEN
0x1461…1491 LineComalBin {
0x1461…1491 ptr = 0xa1e8 // 0x1461 @0x0
0x1461…1491 lno = 0x06fe // 0x1463 @0x2
0x1461…1491 at0004 = ╱9c╱ IF ╱ // 0x1465 @0x4
0x1461…1491 at0005 = ╱cd╱ORD╱ // 0x1466 @0x5
0x1461…1491 at0006 = ╱ed╱(╱ // 0x1467 @0x6
0x1461…1491 at0007 = ╱54╱T╱ // 0x1468 @0x7
0x1461…1491 at0008 = ╱4b╱K╱ // 0x1469 @0x8
0x1461…1491 at0009 = ╱34╱4╱ // 0x146a @0x9
0x1461…1491 at000a = ╱ef╱$╱ // 0x146b @0xa
0x1461…1491 at000b = ╱ee╱)╱ // 0x146c @0xb
0x1461…1491 at000c = ╱e3╱-╱ // 0x146d @0xc
0x1461…1491 at000d = ╱34╱4╱ // 0x146e @0xd
0x1461…1491 at000e = ╱38╱8╱ // 0x146f @0xe
0x1461…1491 at000f = ╱fe0000c006╱ // 0x1470 @0xf
0x1461…1491 at0014 = ╱de╱>╱ // 0x1475 @0x14
0x1461…1491 at0015 = ╱57╱W╱ // 0x1476 @0x15
0x1461…1491 at0016 = ╱da╱ AND ╱ // 0x1477 @0x16
0x1461…1491 at0017 = ╱cd╱ORD╱ // 0x1478 @0x17
0x1461…1491 at0018 = ╱ed╱(╱ // 0x1479 @0x18
0x1461…1491 at0019 = ╱54╱T╱ // 0x147a @0x19
0x1461…1491 at001a = ╱4b╱K╱ // 0x147b @0x1a
0x1461…1491 at001b = ╱34╱4╱ // 0x147c @0x1b
0x1461…1491 at001c = ╱ef╱$╱ // 0x147d @0x1c
0x1461…1491 at001d = ╱ee╱)╱ // 0x147e @0x1d
0x1461…1491 at001e = ╱e3╱-╱ // 0x147f @0x1e
0x1461…1491 at001f = ╱34╱4╱ // 0x1480 @0x1f
0x1461…1491 at0020 = ╱38╱8╱ // 0x1481 @0x20
0x1461…1491 at0021 = ╱fe0000c006╱ // 0x1482 @0x21
0x1461…1491 at0026 = ╱dd╱<╱ // 0x1487 @0x26
0x1461…1491 at0027 = ╱32╱2╱ // 0x1488 @0x27
0x1461…1491 at0028 = ╱30╱0╱ // 0x1489 @0x28
0x1461…1491 at0029 = ╱fe0000a005╱ // 0x148a @0x29
0x1461…1491 at002e = ╱b6╱ THEN ╱ // 0x148f @0x2e
0x1461…1491 at002f = EOL // 0x1490 @0x2f
0x1461…1491 }
0x1491…149d a1f4 1800 I4=I4+E
0x1491…149d LineComalBin {
0x1491…149d ptr = 0xa1f4 // 0x1491 @0x0
0x1491…149d lno = 0x0708 // 0x1493 @0x2
0x1491…149d at0004 = ╱49╱I╱ // 0x1495 @0x4
0x1491…149d at0005 = ╱34╱4╱ // 0x1496 @0x5
0x1491…149d at0006 = ╱dc╱=╱ // 0x1497 @0x6
0x1491…149d at0007 = ╱49╱I╱ // 0x1498 @0x7
0x1491…149d at0008 = ╱34╱4╱ // 0x1499 @0x8
0x1491…149d at0009 = ╱e2╱+╱ // 0x149a @0x9
0x1491…149d at000a = ╱45╱E╱ // 0x149b @0xa
0x1491…149d at000b = EOL // 0x149c @0xb
0x1491…149d }
0x149d…14b2 a209 1810 PUT K16$,I4:N4,TE4$
0x149d…14b2 LineComalBin {
0x149d…14b2 ptr = 0xa209 // 0x149d @0x0
0x149d…14b2 lno = 0x0712 // 0x149f @0x2
0x149d…14b2 at0004 = ╱aa╱ PUT ╱ // 0x14a1 @0x4
0x149d…14b2 at0005 = ╱4b╱K╱ // 0x14a2 @0x5
0x149d…14b2 at0006 = ╱31╱1╱ // 0x14a3 @0x6
0x149d…14b2 at0007 = ╱36╱6╱ // 0x14a4 @0x7
0x149d…14b2 at0008 = ╱ef╱$╱ // 0x14a5 @0x8
0x149d…14b2 at0009 = ╱ec╱,╱ // 0x14a6 @0x9
0x149d…14b2 at000a = ╱49╱I╱ // 0x14a7 @0xa
0x149d…14b2 at000b = ╱34╱4╱ // 0x14a8 @0xb
0x149d…14b2 at000c = ╱f0╱:╱ // 0x14a9 @0xc
0x149d…14b2 at000d = ╱4e╱N╱ // 0x14aa @0xd
0x149d…14b2 at000e = ╱34╱4╱ // 0x14ab @0xe
0x149d…14b2 at000f = ╱ec╱,╱ // 0x14ac @0xf
0x149d…14b2 at0010 = ╱54╱T╱ // 0x14ad @0x10
0x149d…14b2 at0011 = ╱45╱E╱ // 0x14ae @0x11
0x149d…14b2 at0012 = ╱34╱4╱ // 0x14af @0x12
0x149d…14b2 at0013 = ╱ef╱$╱ // 0x14b0 @0x13
0x149d…14b2 at0014 = EOL // 0x14b1 @0x14
0x149d…14b2 }
0x14b2…14cc a223 1820 EXEC FEJL(10,G,K16$)
0x14b2…14cc LineComalBin {
0x14b2…14cc ptr = 0xa223 // 0x14b2 @0x0
0x14b2…14cc lno = 0x071c // 0x14b4 @0x2
0x14b2…14cc at0004 = ╱9d╱ EXEC ╱ // 0x14b6 @0x4
0x14b2…14cc at0005 = ╱46╱F╱ // 0x14b7 @0x5
0x14b2…14cc at0006 = ╱45╱E╱ // 0x14b8 @0x6
0x14b2…14cc at0007 = ╱4a╱J╱ // 0x14b9 @0x7
0x14b2…14cc at0008 = ╱4c╱L╱ // 0x14ba @0x8
0x14b2…14cc at0009 = ╱ed╱(╱ // 0x14bb @0x9
0x14b2…14cc at000a = ╱31╱1╱ // 0x14bc @0xa
0x14b2…14cc at000b = ╱30╱0╱ // 0x14bd @0xb
0x14b2…14cc at000c = ╱fe0000a004╱ // 0x14be @0xc
0x14b2…14cc at0011 = ╱ec╱,╱ // 0x14c3 @0x11
0x14b2…14cc at0012 = ╱47╱G╱ // 0x14c4 @0x12
0x14b2…14cc at0013 = ╱ec╱,╱ // 0x14c5 @0x13
0x14b2…14cc at0014 = ╱4b╱K╱ // 0x14c6 @0x14
0x14b2…14cc at0015 = ╱31╱1╱ // 0x14c7 @0x15
0x14b2…14cc at0016 = ╱36╱6╱ // 0x14c8 @0x16
0x14b2…14cc at0017 = ╱ef╱$╱ // 0x14c9 @0x17
0x14b2…14cc at0018 = ╱ee╱)╱ // 0x14ca @0x18
0x14b2…14cc at0019 = EOL // 0x14cb @0x19
0x14b2…14cc }
0x14cc…14d2 a229 1830 ENDIF
0x14cc…14d2 LineComalBin {
0x14cc…14d2 ptr = 0xa229 // 0x14cc @0x0
0x14cc…14d2 lno = 0x0726 // 0x14ce @0x2
0x14cc…14d2 at0004 = ╱9b╱ ENDIF ╱ // 0x14d0 @0x4
0x14cc…14d2 at0005 = EOL // 0x14d1 @0x5
0x14cc…14d2 }
0x14d2…14d8 a22f 1840 ENDPROC
0x14d2…14d8 LineComalBin {
0x14d2…14d8 ptr = 0xa22f // 0x14d2 @0x0
0x14d2…14d8 lno = 0x0730 // 0x14d4 @0x2
0x14d2…14d8 at0004 = ╱9f╱ ENDPROC ╱ // 0x14d6 @0x4
0x14d2…14d8 at0005 = EOL // 0x14d7 @0x5
0x14d2…14d8 }
0x14d8…14fb a252 1850 PROC FFLET(K17,K18,DPM2,DPO2,DPO3)
0x14d8…14fb LineComalBin {
0x14d8…14fb ptr = 0xa252 // 0x14d8 @0x0
0x14d8…14fb lno = 0x073a // 0x14da @0x2
0x14d8…14fb at0004 = ╱9e╱ PROC ╱ // 0x14dc @0x4
0x14d8…14fb at0005 = ╱46╱F╱ // 0x14dd @0x5
0x14d8…14fb at0006 = ╱46╱F╱ // 0x14de @0x6
0x14d8…14fb at0007 = ╱4c╱L╱ // 0x14df @0x7
0x14d8…14fb at0008 = ╱45╱E╱ // 0x14e0 @0x8
0x14d8…14fb at0009 = ╱54╱T╱ // 0x14e1 @0x9
0x14d8…14fb at000a = ╱ed╱(╱ // 0x14e2 @0xa
0x14d8…14fb at000b = ╱4b╱K╱ // 0x14e3 @0xb
0x14d8…14fb at000c = ╱31╱1╱ // 0x14e4 @0xc
0x14d8…14fb at000d = ╱37╱7╱ // 0x14e5 @0xd
0x14d8…14fb at000e = ╱ec╱,╱ // 0x14e6 @0xe
0x14d8…14fb at000f = ╱4b╱K╱ // 0x14e7 @0xf
0x14d8…14fb at0010 = ╱31╱1╱ // 0x14e8 @0x10
0x14d8…14fb at0011 = ╱38╱8╱ // 0x14e9 @0x11
0x14d8…14fb at0012 = ╱ec╱,╱ // 0x14ea @0x12
0x14d8…14fb at0013 = ╱44╱D╱ // 0x14eb @0x13
0x14d8…14fb at0014 = ╱50╱P╱ // 0x14ec @0x14
0x14d8…14fb at0015 = ╱4d╱M╱ // 0x14ed @0x15
0x14d8…14fb at0016 = ╱32╱2╱ // 0x14ee @0x16
0x14d8…14fb at0017 = ╱ec╱,╱ // 0x14ef @0x17
0x14d8…14fb at0018 = ╱44╱D╱ // 0x14f0 @0x18
0x14d8…14fb at0019 = ╱50╱P╱ // 0x14f1 @0x19
0x14d8…14fb at001a = ╱4f╱O╱ // 0x14f2 @0x1a
0x14d8…14fb at001b = ╱32╱2╱ // 0x14f3 @0x1b
0x14d8…14fb at001c = ╱ec╱,╱ // 0x14f4 @0x1c
0x14d8…14fb at001d = ╱44╱D╱ // 0x14f5 @0x1d
0x14d8…14fb at001e = ╱50╱P╱ // 0x14f6 @0x1e
0x14d8…14fb at001f = ╱4f╱O╱ // 0x14f7 @0x1f
0x14d8…14fb at0020 = ╱33╱3╱ // 0x14f8 @0x20
0x14d8…14fb at0021 = ╱ee╱)╱ // 0x14f9 @0x21
0x14d8…14fb at0022 = EOL // 0x14fa @0x22
0x14d8…14fb }
0x14fb…1507 a25e 1860 OPEN K17$,R
0x14fb…1507 LineComalBin {
0x14fb…1507 ptr = 0xa25e // 0x14fb @0x0
0x14fb…1507 lno = 0x0744 // 0x14fd @0x2
0x14fb…1507 at0004 = ╱a7╱ OPEN ╱ // 0x14ff @0x4
0x14fb…1507 at0005 = ╱4b╱K╱ // 0x1500 @0x5
0x14fb…1507 at0006 = ╱31╱1╱ // 0x1501 @0x6
0x14fb…1507 at0007 = ╱37╱7╱ // 0x1502 @0x7
0x14fb…1507 at0008 = ╱ef╱$╱ // 0x1503 @0x8
0x14fb…1507 at0009 = ╱ec╱,╱ // 0x1504 @0x9
0x14fb…1507 at000a = ╱52╱R╱ // 0x1505 @0xa
0x14fb…1507 at000b = EOL // 0x1506 @0xb
0x14fb…1507 }
0x1507…1521 a278 1870 EXEC FEJL(11,E,K17$)
0x1507…1521 LineComalBin {
0x1507…1521 ptr = 0xa278 // 0x1507 @0x0
0x1507…1521 lno = 0x074e // 0x1509 @0x2
0x1507…1521 at0004 = ╱9d╱ EXEC ╱ // 0x150b @0x4
0x1507…1521 at0005 = ╱46╱F╱ // 0x150c @0x5
0x1507…1521 at0006 = ╱45╱E╱ // 0x150d @0x6
0x1507…1521 at0007 = ╱4a╱J╱ // 0x150e @0x7
0x1507…1521 at0008 = ╱4c╱L╱ // 0x150f @0x8
0x1507…1521 at0009 = ╱ed╱(╱ // 0x1510 @0x9
0x1507…1521 at000a = ╱31╱1╱ // 0x1511 @0xa
0x1507…1521 at000b = ╱31╱1╱ // 0x1512 @0xb
0x1507…1521 at000c = ╱fe0000b004╱ // 0x1513 @0xc
0x1507…1521 at0011 = ╱ec╱,╱ // 0x1518 @0x11
0x1507…1521 at0012 = ╱45╱E╱ // 0x1519 @0x12
0x1507…1521 at0013 = ╱ec╱,╱ // 0x151a @0x13
0x1507…1521 at0014 = ╱4b╱K╱ // 0x151b @0x14
0x1507…1521 at0015 = ╱31╱1╱ // 0x151c @0x15
0x1507…1521 at0016 = ╱37╱7╱ // 0x151d @0x16
0x1507…1521 at0017 = ╱ef╱$╱ // 0x151e @0x17
0x1507…1521 at0018 = ╱ee╱)╱ // 0x151f @0x18
0x1507…1521 at0019 = EOL // 0x1520 @0x19
0x1507…1521 }
0x1521…152d a284 1880 OPEN K18$,W
0x1521…152d LineComalBin {
0x1521…152d ptr = 0xa284 // 0x1521 @0x0
0x1521…152d lno = 0x0758 // 0x1523 @0x2
0x1521…152d at0004 = ╱a7╱ OPEN ╱ // 0x1525 @0x4
0x1521…152d at0005 = ╱4b╱K╱ // 0x1526 @0x5
0x1521…152d at0006 = ╱31╱1╱ // 0x1527 @0x6
0x1521…152d at0007 = ╱38╱8╱ // 0x1528 @0x7
0x1521…152d at0008 = ╱ef╱$╱ // 0x1529 @0x8
0x1521…152d at0009 = ╱ec╱,╱ // 0x152a @0x9
0x1521…152d at000a = ╱57╱W╱ // 0x152b @0xa
0x1521…152d at000b = EOL // 0x152c @0xb
0x1521…152d }
0x152d…1547 a29e 1890 EXEC FEJL(11,G,K18$)
0x152d…1547 LineComalBin {
0x152d…1547 ptr = 0xa29e // 0x152d @0x0
0x152d…1547 lno = 0x0762 // 0x152f @0x2
0x152d…1547 at0004 = ╱9d╱ EXEC ╱ // 0x1531 @0x4
0x152d…1547 at0005 = ╱46╱F╱ // 0x1532 @0x5
0x152d…1547 at0006 = ╱45╱E╱ // 0x1533 @0x6
0x152d…1547 at0007 = ╱4a╱J╱ // 0x1534 @0x7
0x152d…1547 at0008 = ╱4c╱L╱ // 0x1535 @0x8
0x152d…1547 at0009 = ╱ed╱(╱ // 0x1536 @0x9
0x152d…1547 at000a = ╱31╱1╱ // 0x1537 @0xa
0x152d…1547 at000b = ╱31╱1╱ // 0x1538 @0xb
0x152d…1547 at000c = ╱fe0000b004╱ // 0x1539 @0xc
0x152d…1547 at0011 = ╱ec╱,╱ // 0x153e @0x11
0x152d…1547 at0012 = ╱47╱G╱ // 0x153f @0x12
0x152d…1547 at0013 = ╱ec╱,╱ // 0x1540 @0x13
0x152d…1547 at0014 = ╱4b╱K╱ // 0x1541 @0x14
0x152d…1547 at0015 = ╱31╱1╱ // 0x1542 @0x15
0x152d…1547 at0016 = ╱38╱8╱ // 0x1543 @0x16
0x152d…1547 at0017 = ╱ef╱$╱ // 0x1544 @0x17
0x152d…1547 at0018 = ╱ee╱)╱ // 0x1545 @0x18
0x152d…1547 at0019 = EOL // 0x1546 @0x19
0x152d…1547 }
0x1547…154f a2a6 1900 L=E
0x1547…154f LineComalBin {
0x1547…154f ptr = 0xa2a6 // 0x1547 @0x0
0x1547…154f lno = 0x076c // 0x1549 @0x2
0x1547…154f at0004 = ╱4c╱L╱ // 0x154b @0x4
0x1547…154f at0005 = ╱dc╱=╱ // 0x154c @0x5
0x1547…154f at0006 = ╱45╱E╱ // 0x154d @0x6
0x1547…154f at0007 = EOL // 0x154e @0x7
0x1547…154f }
0x154f…1557 a2ae 1910 M=E
0x154f…1557 LineComalBin {
0x154f…1557 ptr = 0xa2ae // 0x154f @0x0
0x154f…1557 lno = 0x0776 // 0x1551 @0x2
0x154f…1557 at0004 = ╱4d╱M╱ // 0x1553 @0x4
0x154f…1557 at0005 = ╱dc╱=╱ // 0x1554 @0x5
0x154f…1557 at0006 = ╱45╱E╱ // 0x1555 @0x6
0x154f…1557 at0007 = EOL // 0x1556 @0x7
0x154f…1557 }
0x1557…155f a2b6 1920 P=E
0x1557…155f LineComalBin {
0x1557…155f ptr = 0xa2b6 // 0x1557 @0x0
0x1557…155f lno = 0x0780 // 0x1559 @0x2
0x1557…155f at0004 = ╱50╱P╱ // 0x155b @0x4
0x1557…155f at0005 = ╱dc╱=╱ // 0x155c @0x5
0x1557…155f at0006 = ╱45╱E╱ // 0x155d @0x6
0x1557…155f at0007 = EOL // 0x155e @0x7
0x1557…155f }
0x155f…156a a2c1 1930 TEST=B
0x155f…156a LineComalBin {
0x155f…156a ptr = 0xa2c1 // 0x155f @0x0
0x155f…156a lno = 0x078a // 0x1561 @0x2
0x155f…156a at0004 = ╱54╱T╱ // 0x1563 @0x4
0x155f…156a at0005 = ╱45╱E╱ // 0x1564 @0x5
0x155f…156a at0006 = ╱53╱S╱ // 0x1565 @0x6
0x155f…156a at0007 = ╱54╱T╱ // 0x1566 @0x7
0x155f…156a at0008 = ╱dc╱=╱ // 0x1567 @0x8
0x155f…156a at0009 = ╱42╱B╱ // 0x1568 @0x9
0x155f…156a at000a = EOL // 0x1569 @0xa
0x155f…156a }
0x156a…157e a2d5 1940 IF DPM2<>B AND DPO2<>B THEN
0x156a…157e LineComalBin {
0x156a…157e ptr = 0xa2d5 // 0x156a @0x0
0x156a…157e lno = 0x0794 // 0x156c @0x2
0x156a…157e at0004 = ╱9c╱ IF ╱ // 0x156e @0x4
0x156a…157e at0005 = ╱44╱D╱ // 0x156f @0x5
0x156a…157e at0006 = ╱50╱P╱ // 0x1570 @0x6
0x156a…157e at0007 = ╱4d╱M╱ // 0x1571 @0x7
0x156a…157e at0008 = ╱32╱2╱ // 0x1572 @0x8
0x156a…157e at0009 = ╱e1╱<>╱ // 0x1573 @0x9
0x156a…157e at000a = ╱42╱B╱ // 0x1574 @0xa
0x156a…157e at000b = ╱da╱ AND ╱ // 0x1575 @0xb
0x156a…157e at000c = ╱44╱D╱ // 0x1576 @0xc
0x156a…157e at000d = ╱50╱P╱ // 0x1577 @0xd
0x156a…157e at000e = ╱4f╱O╱ // 0x1578 @0xe
0x156a…157e at000f = ╱32╱2╱ // 0x1579 @0xf
0x156a…157e at0010 = ╱e1╱<>╱ // 0x157a @0x10
0x156a…157e at0011 = ╱42╱B╱ // 0x157b @0x11
0x156a…157e at0012 = ╱b6╱ THEN ╱ // 0x157c @0x12
0x156a…157e at0013 = EOL // 0x157d @0x13
0x156a…157e }
0x157e…1584 a2db 1950 REPEAT
0x157e…1584 LineComalBin {
0x157e…1584 ptr = 0xa2db // 0x157e @0x0
0x157e…1584 lno = 0x079e // 0x1580 @0x2
0x157e…1584 at0004 = ╱97╱ REPEAT ╱ // 0x1582 @0x4
0x157e…1584 at0005 = EOL // 0x1583 @0x5
0x157e…1584 }
0x1584…1591 a2e8 1960 IF TEST=B THEN
0x1584…1591 LineComalBin {
0x1584…1591 ptr = 0xa2e8 // 0x1584 @0x0
0x1584…1591 lno = 0x07a8 // 0x1586 @0x2
0x1584…1591 at0004 = ╱9c╱ IF ╱ // 0x1588 @0x4
0x1584…1591 at0005 = ╱54╱T╱ // 0x1589 @0x5
0x1584…1591 at0006 = ╱45╱E╱ // 0x158a @0x6
0x1584…1591 at0007 = ╱53╱S╱ // 0x158b @0x7
0x1584…1591 at0008 = ╱54╱T╱ // 0x158c @0x8
0x1584…1591 at0009 = ╱dc╱=╱ // 0x158d @0x9
0x1584…1591 at000a = ╱42╱B╱ // 0x158e @0xa
0x1584…1591 at000b = ╱b6╱ THEN ╱ // 0x158f @0xb
0x1584…1591 at000c = EOL // 0x1590 @0xc
0x1584…1591 }
0x1591…15c2 a319 1970 EXEC FGET2(K17$,L,NO,DO,BIO,TKO$,BEO$,TEO$,ENTO)
0x1591…15c2 LineComalBin {
0x1591…15c2 ptr = 0xa319 // 0x1591 @0x0
0x1591…15c2 lno = 0x07b2 // 0x1593 @0x2
0x1591…15c2 at0004 = ╱9d╱ EXEC ╱ // 0x1595 @0x4
0x1591…15c2 at0005 = ╱46╱F╱ // 0x1596 @0x5
0x1591…15c2 at0006 = ╱47╱G╱ // 0x1597 @0x6
0x1591…15c2 at0007 = ╱45╱E╱ // 0x1598 @0x7
0x1591…15c2 at0008 = ╱54╱T╱ // 0x1599 @0x8
0x1591…15c2 at0009 = ╱32╱2╱ // 0x159a @0x9
0x1591…15c2 at000a = ╱ed╱(╱ // 0x159b @0xa
0x1591…15c2 at000b = ╱4b╱K╱ // 0x159c @0xb
0x1591…15c2 at000c = ╱31╱1╱ // 0x159d @0xc
0x1591…15c2 at000d = ╱37╱7╱ // 0x159e @0xd
0x1591…15c2 at000e = ╱ef╱$╱ // 0x159f @0xe
0x1591…15c2 at000f = ╱ec╱,╱ // 0x15a0 @0xf
0x1591…15c2 at0010 = ╱4c╱L╱ // 0x15a1 @0x10
0x1591…15c2 at0011 = ╱ec╱,╱ // 0x15a2 @0x11
0x1591…15c2 at0012 = ╱4e╱N╱ // 0x15a3 @0x12
0x1591…15c2 at0013 = ╱4f╱O╱ // 0x15a4 @0x13
0x1591…15c2 at0014 = ╱ec╱,╱ // 0x15a5 @0x14
0x1591…15c2 at0015 = ╱44╱D╱ // 0x15a6 @0x15
0x1591…15c2 at0016 = ╱4f╱O╱ // 0x15a7 @0x16
0x1591…15c2 at0017 = ╱ec╱,╱ // 0x15a8 @0x17
0x1591…15c2 at0018 = ╱42╱B╱ // 0x15a9 @0x18
0x1591…15c2 at0019 = ╱49╱I╱ // 0x15aa @0x19
0x1591…15c2 at001a = ╱4f╱O╱ // 0x15ab @0x1a
0x1591…15c2 at001b = ╱ec╱,╱ // 0x15ac @0x1b
0x1591…15c2 at001c = ╱54╱T╱ // 0x15ad @0x1c
0x1591…15c2 at001d = ╱4b╱K╱ // 0x15ae @0x1d
0x1591…15c2 at001e = ╱4f╱O╱ // 0x15af @0x1e
0x1591…15c2 at001f = ╱ef╱$╱ // 0x15b0 @0x1f
0x1591…15c2 at0020 = ╱ec╱,╱ // 0x15b1 @0x20
0x1591…15c2 at0021 = ╱42╱B╱ // 0x15b2 @0x21
0x1591…15c2 at0022 = ╱45╱E╱ // 0x15b3 @0x22
0x1591…15c2 at0023 = ╱4f╱O╱ // 0x15b4 @0x23
0x1591…15c2 at0024 = ╱ef╱$╱ // 0x15b5 @0x24
0x1591…15c2 at0025 = ╱ec╱,╱ // 0x15b6 @0x25
0x1591…15c2 at0026 = ╱54╱T╱ // 0x15b7 @0x26
0x1591…15c2 at0027 = ╱45╱E╱ // 0x15b8 @0x27
0x1591…15c2 at0028 = ╱4f╱O╱ // 0x15b9 @0x28
0x1591…15c2 at0029 = ╱ef╱$╱ // 0x15ba @0x29
0x1591…15c2 at002a = ╱ec╱,╱ // 0x15bb @0x2a
0x1591…15c2 at002b = ╱45╱E╱ // 0x15bc @0x2b
0x1591…15c2 at002c = ╱4e╱N╱ // 0x15bd @0x2c
0x1591…15c2 at002d = ╱54╱T╱ // 0x15be @0x2d
0x1591…15c2 at002e = ╱4f╱O╱ // 0x15bf @0x2e
0x1591…15c2 at002f = ╱ee╱)╱ // 0x15c0 @0x2f
0x1591…15c2 at0030 = EOL // 0x15c1 @0x30
0x1591…15c2 }
0x15c2…15cc a323 1980 L=L+E
0x15c2…15cc LineComalBin {
0x15c2…15cc ptr = 0xa323 // 0x15c2 @0x0
0x15c2…15cc lno = 0x07bc // 0x15c4 @0x2
0x15c2…15cc at0004 = ╱4c╱L╱ // 0x15c6 @0x4
0x15c2…15cc at0005 = ╱dc╱=╱ // 0x15c7 @0x5
0x15c2…15cc at0006 = ╱4c╱L╱ // 0x15c8 @0x6
0x15c2…15cc at0007 = ╱e2╱+╱ // 0x15c9 @0x7
0x15c2…15cc at0008 = ╱45╱E╱ // 0x15ca @0x8
0x15c2…15cc at0009 = EOL // 0x15cb @0x9
0x15c2…15cc }
0x15cc…15d7 a32e 1990 TEST=E
0x15cc…15d7 LineComalBin {
0x15cc…15d7 ptr = 0xa32e // 0x15cc @0x0
0x15cc…15d7 lno = 0x07c6 // 0x15ce @0x2
0x15cc…15d7 at0004 = ╱54╱T╱ // 0x15d0 @0x4
0x15cc…15d7 at0005 = ╱45╱E╱ // 0x15d1 @0x5
0x15cc…15d7 at0006 = ╱53╱S╱ // 0x15d2 @0x6
0x15cc…15d7 at0007 = ╱54╱T╱ // 0x15d3 @0x7
0x15cc…15d7 at0008 = ╱dc╱=╱ // 0x15d4 @0x8
0x15cc…15d7 at0009 = ╱45╱E╱ // 0x15d5 @0x9
0x15cc…15d7 at000a = EOL // 0x15d6 @0xa
0x15cc…15d7 }
0x15d7…15dd a334 2000 ENDIF
0x15d7…15dd LineComalBin {
0x15d7…15dd ptr = 0xa334 // 0x15d7 @0x0
0x15d7…15dd lno = 0x07d0 // 0x15d9 @0x2
0x15d7…15dd at0004 = ╱9b╱ ENDIF ╱ // 0x15db @0x4
0x15d7…15dd at0005 = EOL // 0x15dc @0x5
0x15d7…15dd }
0x15dd…15e7 a33e 2010 IF M<J THEN
0x15dd…15e7 LineComalBin {
0x15dd…15e7 ptr = 0xa33e // 0x15dd @0x0
0x15dd…15e7 lno = 0x07da // 0x15df @0x2
0x15dd…15e7 at0004 = ╱9c╱ IF ╱ // 0x15e1 @0x4
0x15dd…15e7 at0005 = ╱4d╱M╱ // 0x15e2 @0x5
0x15dd…15e7 at0006 = ╱dd╱<╱ // 0x15e3 @0x6
0x15dd…15e7 at0007 = ╱4a╱J╱ // 0x15e4 @0x7
0x15dd…15e7 at0008 = ╱b6╱ THEN ╱ // 0x15e5 @0x8
0x15dd…15e7 at0009 = EOL // 0x15e6 @0x9
0x15dd…15e7 }
0x15e7…15f4 a34b 2020 Q=PEG(M)
0x15e7…15f4 LineComalBin {
0x15e7…15f4 ptr = 0xa34b // 0x15e7 @0x0
0x15e7…15f4 lno = 0x07e4 // 0x15e9 @0x2
0x15e7…15f4 at0004 = ╱51╱Q╱ // 0x15eb @0x4
0x15e7…15f4 at0005 = ╱dc╱=╱ // 0x15ec @0x5
0x15e7…15f4 at0006 = ╱50╱P╱ // 0x15ed @0x6
0x15e7…15f4 at0007 = ╱45╱E╱ // 0x15ee @0x7
0x15e7…15f4 at0008 = ╱47╱G╱ // 0x15ef @0x8
0x15e7…15f4 at0009 = ╱ed╱(╱ // 0x15f0 @0x9
0x15e7…15f4 at000a = ╱4d╱M╱ // 0x15f1 @0xa
0x15e7…15f4 at000b = ╱ee╱)╱ // 0x15f2 @0xb
0x15e7…15f4 at000c = EOL // 0x15f3 @0xc
0x15e7…15f4 }
0x15f4…15fa a351 2030 ELSE
0x15f4…15fa LineComalBin {
0x15f4…15fa ptr = 0xa351 // 0x15f4 @0x0
0x15f4…15fa lno = 0x07ee // 0x15f6 @0x2
0x15f4…15fa at0004 = ╱9a╱ ELSE ╱ // 0x15f8 @0x4
0x15f4…15fa at0005 = EOL // 0x15f9 @0x5
0x15f4…15fa }
0x15fa…160f a366 2040 N(Q)=100000
0x15fa…160f LineComalBin {
0x15fa…160f ptr = 0xa366 // 0x15fa @0x0
0x15fa…160f lno = 0x07f8 // 0x15fc @0x2
0x15fa…160f at0004 = ╱4e╱N╱ // 0x15fe @0x4
0x15fa…160f at0005 = ╱ed╱(╱ // 0x15ff @0x5
0x15fa…160f at0006 = ╱51╱Q╱ // 0x1600 @0x6
0x15fa…160f at0007 = ╱ee╱)╱ // 0x1601 @0x7
0x15fa…160f at0008 = ╱dc╱=╱ // 0x1602 @0x8
0x15fa…160f at0009 = ╱31╱1╱ // 0x1603 @0x9
0x15fa…160f at000a = ╱30╱0╱ // 0x1604 @0xa
0x15fa…160f at000b = ╱30╱0╱ // 0x1605 @0xb
0x15fa…160f at000c = ╱30╱0╱ // 0x1606 @0xc
0x15fa…160f at000d = ╱30╱0╱ // 0x1607 @0xd
0x15fa…160f at000e = ╱30╱0╱ // 0x1608 @0xe
0x15fa…160f at000f = ╱fe0050c311╱ // 0x1609 @0xf
0x15fa…160f at0014 = EOL // 0x160e @0x14
0x15fa…160f }
0x160f…1615 a36c 2050 ENDIF
0x160f…1615 LineComalBin {
0x160f…1615 ptr = 0xa36c // 0x160f @0x0
0x160f…1615 lno = 0x0802 // 0x1611 @0x2
0x160f…1615 at0004 = ╱9b╱ ENDIF ╱ // 0x1613 @0x4
0x160f…1615 at0005 = EOL // 0x1614 @0x5
0x160f…1615 }
0x1615…1623 a37a 2060 IF N(Q)<NO THEN
0x1615…1623 LineComalBin {
0x1615…1623 ptr = 0xa37a // 0x1615 @0x0
0x1615…1623 lno = 0x080c // 0x1617 @0x2
0x1615…1623 at0004 = ╱9c╱ IF ╱ // 0x1619 @0x4
0x1615…1623 at0005 = ╱4e╱N╱ // 0x161a @0x5
0x1615…1623 at0006 = ╱ed╱(╱ // 0x161b @0x6
0x1615…1623 at0007 = ╱51╱Q╱ // 0x161c @0x7
0x1615…1623 at0008 = ╱ee╱)╱ // 0x161d @0x8
0x1615…1623 at0009 = ╱dd╱<╱ // 0x161e @0x9
0x1615…1623 at000a = ╱4e╱N╱ // 0x161f @0xa
0x1615…1623 at000b = ╱4f╱O╱ // 0x1620 @0xb
0x1615…1623 at000c = ╱b6╱ THEN ╱ // 0x1621 @0xc
0x1615…1623 at000d = EOL // 0x1622 @0xd
0x1615…1623 }
0x1623…1662 a3b9 2070 EXEC FPUT2(K18$,P,N(Q),D(Q),BI(Q),TK$(Q),BE$(Q),TE$(Q),ENT(Q))
0x1623…1662 LineComalBin {
0x1623…1662 ptr = 0xa3b9 // 0x1623 @0x0
0x1623…1662 lno = 0x0816 // 0x1625 @0x2
0x1623…1662 at0004 = ╱9d╱ EXEC ╱ // 0x1627 @0x4
0x1623…1662 at0005 = ╱46╱F╱ // 0x1628 @0x5
0x1623…1662 at0006 = ╱50╱P╱ // 0x1629 @0x6
0x1623…1662 at0007 = ╱55╱U╱ // 0x162a @0x7
0x1623…1662 at0008 = ╱54╱T╱ // 0x162b @0x8
0x1623…1662 at0009 = ╱32╱2╱ // 0x162c @0x9
0x1623…1662 at000a = ╱ed╱(╱ // 0x162d @0xa
0x1623…1662 at000b = ╱4b╱K╱ // 0x162e @0xb
0x1623…1662 at000c = ╱31╱1╱ // 0x162f @0xc
0x1623…1662 at000d = ╱38╱8╱ // 0x1630 @0xd
0x1623…1662 at000e = ╱ef╱$╱ // 0x1631 @0xe
0x1623…1662 at000f = ╱ec╱,╱ // 0x1632 @0xf
0x1623…1662 at0010 = ╱50╱P╱ // 0x1633 @0x10
0x1623…1662 at0011 = ╱ec╱,╱ // 0x1634 @0x11
0x1623…1662 at0012 = ╱4e╱N╱ // 0x1635 @0x12
0x1623…1662 at0013 = ╱ed╱(╱ // 0x1636 @0x13
0x1623…1662 at0014 = ╱51╱Q╱ // 0x1637 @0x14
0x1623…1662 at0015 = ╱ee╱)╱ // 0x1638 @0x15
0x1623…1662 at0016 = ╱ec╱,╱ // 0x1639 @0x16
0x1623…1662 at0017 = ╱44╱D╱ // 0x163a @0x17
0x1623…1662 at0018 = ╱ed╱(╱ // 0x163b @0x18
0x1623…1662 at0019 = ╱51╱Q╱ // 0x163c @0x19
0x1623…1662 at001a = ╱ee╱)╱ // 0x163d @0x1a
0x1623…1662 at001b = ╱ec╱,╱ // 0x163e @0x1b
0x1623…1662 at001c = ╱42╱B╱ // 0x163f @0x1c
0x1623…1662 at001d = ╱49╱I╱ // 0x1640 @0x1d
0x1623…1662 at001e = ╱ed╱(╱ // 0x1641 @0x1e
0x1623…1662 at001f = ╱51╱Q╱ // 0x1642 @0x1f
0x1623…1662 at0020 = ╱ee╱)╱ // 0x1643 @0x20
0x1623…1662 at0021 = ╱ec╱,╱ // 0x1644 @0x21
0x1623…1662 at0022 = ╱54╱T╱ // 0x1645 @0x22
0x1623…1662 at0023 = ╱4b╱K╱ // 0x1646 @0x23
0x1623…1662 at0024 = ╱ef╱$╱ // 0x1647 @0x24
0x1623…1662 at0025 = ╱ed╱(╱ // 0x1648 @0x25
0x1623…1662 at0026 = ╱51╱Q╱ // 0x1649 @0x26
0x1623…1662 at0027 = ╱ee╱)╱ // 0x164a @0x27
0x1623…1662 at0028 = ╱ec╱,╱ // 0x164b @0x28
0x1623…1662 at0029 = ╱42╱B╱ // 0x164c @0x29
0x1623…1662 at002a = ╱45╱E╱ // 0x164d @0x2a
0x1623…1662 at002b = ╱ef╱$╱ // 0x164e @0x2b
0x1623…1662 at002c = ╱ed╱(╱ // 0x164f @0x2c
0x1623…1662 at002d = ╱51╱Q╱ // 0x1650 @0x2d
0x1623…1662 at002e = ╱ee╱)╱ // 0x1651 @0x2e
0x1623…1662 at002f = ╱ec╱,╱ // 0x1652 @0x2f
0x1623…1662 at0030 = ╱54╱T╱ // 0x1653 @0x30
0x1623…1662 at0031 = ╱45╱E╱ // 0x1654 @0x31
0x1623…1662 at0032 = ╱ef╱$╱ // 0x1655 @0x32
0x1623…1662 at0033 = ╱ed╱(╱ // 0x1656 @0x33
0x1623…1662 at0034 = ╱51╱Q╱ // 0x1657 @0x34
0x1623…1662 at0035 = ╱ee╱)╱ // 0x1658 @0x35
0x1623…1662 at0036 = ╱ec╱,╱ // 0x1659 @0x36
0x1623…1662 at0037 = ╱45╱E╱ // 0x165a @0x37
0x1623…1662 at0038 = ╱4e╱N╱ // 0x165b @0x38
0x1623…1662 at0039 = ╱54╱T╱ // 0x165c @0x39
0x1623…1662 at003a = ╱ed╱(╱ // 0x165d @0x3a
0x1623…1662 at003b = ╱51╱Q╱ // 0x165e @0x3b
0x1623…1662 at003c = ╱ee╱)╱ // 0x165f @0x3c
0x1623…1662 at003d = ╱ee╱)╱ // 0x1660 @0x3d
0x1623…1662 at003e = EOL // 0x1661 @0x3e
0x1623…1662 }
0x1662…166c a3c3 2080 M=M+E
0x1662…166c LineComalBin {
0x1662…166c ptr = 0xa3c3 // 0x1662 @0x0
0x1662…166c lno = 0x0820 // 0x1664 @0x2
0x1662…166c at0004 = ╱4d╱M╱ // 0x1666 @0x4
0x1662…166c at0005 = ╱dc╱=╱ // 0x1667 @0x5
0x1662…166c at0006 = ╱4d╱M╱ // 0x1668 @0x6
0x1662…166c at0007 = ╱e2╱+╱ // 0x1669 @0x7
0x1662…166c at0008 = ╱45╱E╱ // 0x166a @0x8
0x1662…166c at0009 = EOL // 0x166b @0x9
0x1662…166c }
0x166c…1672 a3c9 2090 ELSE
0x166c…1672 LineComalBin {
0x166c…1672 ptr = 0xa3c9 // 0x166c @0x0
0x166c…1672 lno = 0x082a // 0x166e @0x2
0x166c…1672 at0004 = ╱9a╱ ELSE ╱ // 0x1670 @0x4
0x166c…1672 at0005 = EOL // 0x1671 @0x5
0x166c…1672 }
0x1672…1688 a3df 2100 IF N(Q)=NO AND D(Q)<DO THEN
0x1672…1688 LineComalBin {
0x1672…1688 ptr = 0xa3df // 0x1672 @0x0
0x1672…1688 lno = 0x0834 // 0x1674 @0x2
0x1672…1688 at0004 = ╱9c╱ IF ╱ // 0x1676 @0x4
0x1672…1688 at0005 = ╱4e╱N╱ // 0x1677 @0x5
0x1672…1688 at0006 = ╱ed╱(╱ // 0x1678 @0x6
0x1672…1688 at0007 = ╱51╱Q╱ // 0x1679 @0x7
0x1672…1688 at0008 = ╱ee╱)╱ // 0x167a @0x8
0x1672…1688 at0009 = ╱dc╱=╱ // 0x167b @0x9
0x1672…1688 at000a = ╱4e╱N╱ // 0x167c @0xa
0x1672…1688 at000b = ╱4f╱O╱ // 0x167d @0xb
0x1672…1688 at000c = ╱da╱ AND ╱ // 0x167e @0xc
0x1672…1688 at000d = ╱44╱D╱ // 0x167f @0xd
0x1672…1688 at000e = ╱ed╱(╱ // 0x1680 @0xe
0x1672…1688 at000f = ╱51╱Q╱ // 0x1681 @0xf
0x1672…1688 at0010 = ╱ee╱)╱ // 0x1682 @0x10
0x1672…1688 at0011 = ╱dd╱<╱ // 0x1683 @0x11
0x1672…1688 at0012 = ╱44╱D╱ // 0x1684 @0x12
0x1672…1688 at0013 = ╱4f╱O╱ // 0x1685 @0x13
0x1672…1688 at0014 = ╱b6╱ THEN ╱ // 0x1686 @0x14
0x1672…1688 at0015 = EOL // 0x1687 @0x15
0x1672…1688 }
0x1688…16c7 a41e 2110 EXEC FPUT2(K18$,P,N(Q),D(Q),BI(Q),TK$(Q),BE$(Q),TE$(Q),ENT(Q))
0x1688…16c7 LineComalBin {
0x1688…16c7 ptr = 0xa41e // 0x1688 @0x0
0x1688…16c7 lno = 0x083e // 0x168a @0x2
0x1688…16c7 at0004 = ╱9d╱ EXEC ╱ // 0x168c @0x4
0x1688…16c7 at0005 = ╱46╱F╱ // 0x168d @0x5
0x1688…16c7 at0006 = ╱50╱P╱ // 0x168e @0x6
0x1688…16c7 at0007 = ╱55╱U╱ // 0x168f @0x7
0x1688…16c7 at0008 = ╱54╱T╱ // 0x1690 @0x8
0x1688…16c7 at0009 = ╱32╱2╱ // 0x1691 @0x9
0x1688…16c7 at000a = ╱ed╱(╱ // 0x1692 @0xa
0x1688…16c7 at000b = ╱4b╱K╱ // 0x1693 @0xb
0x1688…16c7 at000c = ╱31╱1╱ // 0x1694 @0xc
0x1688…16c7 at000d = ╱38╱8╱ // 0x1695 @0xd
0x1688…16c7 at000e = ╱ef╱$╱ // 0x1696 @0xe
0x1688…16c7 at000f = ╱ec╱,╱ // 0x1697 @0xf
0x1688…16c7 at0010 = ╱50╱P╱ // 0x1698 @0x10
0x1688…16c7 at0011 = ╱ec╱,╱ // 0x1699 @0x11
0x1688…16c7 at0012 = ╱4e╱N╱ // 0x169a @0x12
0x1688…16c7 at0013 = ╱ed╱(╱ // 0x169b @0x13
0x1688…16c7 at0014 = ╱51╱Q╱ // 0x169c @0x14
0x1688…16c7 at0015 = ╱ee╱)╱ // 0x169d @0x15
0x1688…16c7 at0016 = ╱ec╱,╱ // 0x169e @0x16
0x1688…16c7 at0017 = ╱44╱D╱ // 0x169f @0x17
0x1688…16c7 at0018 = ╱ed╱(╱ // 0x16a0 @0x18
0x1688…16c7 at0019 = ╱51╱Q╱ // 0x16a1 @0x19
0x1688…16c7 at001a = ╱ee╱)╱ // 0x16a2 @0x1a
0x1688…16c7 at001b = ╱ec╱,╱ // 0x16a3 @0x1b
0x1688…16c7 at001c = ╱42╱B╱ // 0x16a4 @0x1c
0x1688…16c7 at001d = ╱49╱I╱ // 0x16a5 @0x1d
0x1688…16c7 at001e = ╱ed╱(╱ // 0x16a6 @0x1e
0x1688…16c7 at001f = ╱51╱Q╱ // 0x16a7 @0x1f
0x1688…16c7 at0020 = ╱ee╱)╱ // 0x16a8 @0x20
0x1688…16c7 at0021 = ╱ec╱,╱ // 0x16a9 @0x21
0x1688…16c7 at0022 = ╱54╱T╱ // 0x16aa @0x22
0x1688…16c7 at0023 = ╱4b╱K╱ // 0x16ab @0x23
0x1688…16c7 at0024 = ╱ef╱$╱ // 0x16ac @0x24
0x1688…16c7 at0025 = ╱ed╱(╱ // 0x16ad @0x25
0x1688…16c7 at0026 = ╱51╱Q╱ // 0x16ae @0x26
0x1688…16c7 at0027 = ╱ee╱)╱ // 0x16af @0x27
0x1688…16c7 at0028 = ╱ec╱,╱ // 0x16b0 @0x28
0x1688…16c7 at0029 = ╱42╱B╱ // 0x16b1 @0x29
0x1688…16c7 at002a = ╱45╱E╱ // 0x16b2 @0x2a
0x1688…16c7 at002b = ╱ef╱$╱ // 0x16b3 @0x2b
0x1688…16c7 at002c = ╱ed╱(╱ // 0x16b4 @0x2c
0x1688…16c7 at002d = ╱51╱Q╱ // 0x16b5 @0x2d
0x1688…16c7 at002e = ╱ee╱)╱ // 0x16b6 @0x2e
0x1688…16c7 at002f = ╱ec╱,╱ // 0x16b7 @0x2f
0x1688…16c7 at0030 = ╱54╱T╱ // 0x16b8 @0x30
0x1688…16c7 at0031 = ╱45╱E╱ // 0x16b9 @0x31
0x1688…16c7 at0032 = ╱ef╱$╱ // 0x16ba @0x32
0x1688…16c7 at0033 = ╱ed╱(╱ // 0x16bb @0x33
0x1688…16c7 at0034 = ╱51╱Q╱ // 0x16bc @0x34
0x1688…16c7 at0035 = ╱ee╱)╱ // 0x16bd @0x35
0x1688…16c7 at0036 = ╱ec╱,╱ // 0x16be @0x36
0x1688…16c7 at0037 = ╱45╱E╱ // 0x16bf @0x37
0x1688…16c7 at0038 = ╱4e╱N╱ // 0x16c0 @0x38
0x1688…16c7 at0039 = ╱54╱T╱ // 0x16c1 @0x39
0x1688…16c7 at003a = ╱ed╱(╱ // 0x16c2 @0x3a
0x1688…16c7 at003b = ╱51╱Q╱ // 0x16c3 @0x3b
0x1688…16c7 at003c = ╱ee╱)╱ // 0x16c4 @0x3c
0x1688…16c7 at003d = ╱ee╱)╱ // 0x16c5 @0x3d
0x1688…16c7 at003e = EOL // 0x16c6 @0x3e
0x1688…16c7 }
0x16c7…16d1 a428 2120 M=M+E
0x16c7…16d1 LineComalBin {
0x16c7…16d1 ptr = 0xa428 // 0x16c7 @0x0
0x16c7…16d1 lno = 0x0848 // 0x16c9 @0x2
0x16c7…16d1 at0004 = ╱4d╱M╱ // 0x16cb @0x4
0x16c7…16d1 at0005 = ╱dc╱=╱ // 0x16cc @0x5
0x16c7…16d1 at0006 = ╱4d╱M╱ // 0x16cd @0x6
0x16c7…16d1 at0007 = ╱e2╱+╱ // 0x16ce @0x7
0x16c7…16d1 at0008 = ╱45╱E╱ // 0x16cf @0x8
0x16c7…16d1 at0009 = EOL // 0x16d0 @0x9
0x16c7…16d1 }
0x16d1…16d7 a42e 2130 ELSE
0x16d1…16d7 LineComalBin {
0x16d1…16d7 ptr = 0xa42e // 0x16d1 @0x0
0x16d1…16d7 lno = 0x0852 // 0x16d3 @0x2
0x16d1…16d7 at0004 = ╱9a╱ ELSE ╱ // 0x16d5 @0x4
0x16d1…16d7 at0005 = EOL // 0x16d6 @0x5
0x16d1…16d7 }
0x16d7…1708 a45f 2140 EXEC FPUT2(K18$,P,NO,DO,BIO,TKO$,BEO$,TEO$,ENTO)
0x16d7…1708 LineComalBin {
0x16d7…1708 ptr = 0xa45f // 0x16d7 @0x0
0x16d7…1708 lno = 0x085c // 0x16d9 @0x2
0x16d7…1708 at0004 = ╱9d╱ EXEC ╱ // 0x16db @0x4
0x16d7…1708 at0005 = ╱46╱F╱ // 0x16dc @0x5
0x16d7…1708 at0006 = ╱50╱P╱ // 0x16dd @0x6
0x16d7…1708 at0007 = ╱55╱U╱ // 0x16de @0x7
0x16d7…1708 at0008 = ╱54╱T╱ // 0x16df @0x8
0x16d7…1708 at0009 = ╱32╱2╱ // 0x16e0 @0x9
0x16d7…1708 at000a = ╱ed╱(╱ // 0x16e1 @0xa
0x16d7…1708 at000b = ╱4b╱K╱ // 0x16e2 @0xb
0x16d7…1708 at000c = ╱31╱1╱ // 0x16e3 @0xc
0x16d7…1708 at000d = ╱38╱8╱ // 0x16e4 @0xd
0x16d7…1708 at000e = ╱ef╱$╱ // 0x16e5 @0xe
0x16d7…1708 at000f = ╱ec╱,╱ // 0x16e6 @0xf
0x16d7…1708 at0010 = ╱50╱P╱ // 0x16e7 @0x10
0x16d7…1708 at0011 = ╱ec╱,╱ // 0x16e8 @0x11
0x16d7…1708 at0012 = ╱4e╱N╱ // 0x16e9 @0x12
0x16d7…1708 at0013 = ╱4f╱O╱ // 0x16ea @0x13
0x16d7…1708 at0014 = ╱ec╱,╱ // 0x16eb @0x14
0x16d7…1708 at0015 = ╱44╱D╱ // 0x16ec @0x15
0x16d7…1708 at0016 = ╱4f╱O╱ // 0x16ed @0x16
0x16d7…1708 at0017 = ╱ec╱,╱ // 0x16ee @0x17
0x16d7…1708 at0018 = ╱42╱B╱ // 0x16ef @0x18
0x16d7…1708 at0019 = ╱49╱I╱ // 0x16f0 @0x19
0x16d7…1708 at001a = ╱4f╱O╱ // 0x16f1 @0x1a
0x16d7…1708 at001b = ╱ec╱,╱ // 0x16f2 @0x1b
0x16d7…1708 at001c = ╱54╱T╱ // 0x16f3 @0x1c
0x16d7…1708 at001d = ╱4b╱K╱ // 0x16f4 @0x1d
0x16d7…1708 at001e = ╱4f╱O╱ // 0x16f5 @0x1e
0x16d7…1708 at001f = ╱ef╱$╱ // 0x16f6 @0x1f
0x16d7…1708 at0020 = ╱ec╱,╱ // 0x16f7 @0x20
0x16d7…1708 at0021 = ╱42╱B╱ // 0x16f8 @0x21
0x16d7…1708 at0022 = ╱45╱E╱ // 0x16f9 @0x22
0x16d7…1708 at0023 = ╱4f╱O╱ // 0x16fa @0x23
0x16d7…1708 at0024 = ╱ef╱$╱ // 0x16fb @0x24
0x16d7…1708 at0025 = ╱ec╱,╱ // 0x16fc @0x25
0x16d7…1708 at0026 = ╱54╱T╱ // 0x16fd @0x26
0x16d7…1708 at0027 = ╱45╱E╱ // 0x16fe @0x27
0x16d7…1708 at0028 = ╱4f╱O╱ // 0x16ff @0x28
0x16d7…1708 at0029 = ╱ef╱$╱ // 0x1700 @0x29
0x16d7…1708 at002a = ╱ec╱,╱ // 0x1701 @0x2a
0x16d7…1708 at002b = ╱45╱E╱ // 0x1702 @0x2b
0x16d7…1708 at002c = ╱4e╱N╱ // 0x1703 @0x2c
0x16d7…1708 at002d = ╱54╱T╱ // 0x1704 @0x2d
0x16d7…1708 at002e = ╱4f╱O╱ // 0x1705 @0x2e
0x16d7…1708 at002f = ╱ee╱)╱ // 0x1706 @0x2f
0x16d7…1708 at0030 = EOL // 0x1707 @0x30
0x16d7…1708 }
0x1708…1713 a46a 2150 TEST=B
0x1708…1713 LineComalBin {
0x1708…1713 ptr = 0xa46a // 0x1708 @0x0
0x1708…1713 lno = 0x0866 // 0x170a @0x2
0x1708…1713 at0004 = ╱54╱T╱ // 0x170c @0x4
0x1708…1713 at0005 = ╱45╱E╱ // 0x170d @0x5
0x1708…1713 at0006 = ╱53╱S╱ // 0x170e @0x6
0x1708…1713 at0007 = ╱54╱T╱ // 0x170f @0x7
0x1708…1713 at0008 = ╱dc╱=╱ // 0x1710 @0x8
0x1708…1713 at0009 = ╱42╱B╱ // 0x1711 @0x9
0x1708…1713 at000a = EOL // 0x1712 @0xa
0x1708…1713 }
0x1713…1719 a470 2160 ENDIF
0x1713…1719 LineComalBin {
0x1713…1719 ptr = 0xa470 // 0x1713 @0x0
0x1713…1719 lno = 0x0870 // 0x1715 @0x2
0x1713…1719 at0004 = ╱9b╱ ENDIF ╱ // 0x1717 @0x4
0x1713…1719 at0005 = EOL // 0x1718 @0x5
0x1713…1719 }
0x1719…171f a476 2170 ENDIF
0x1719…171f LineComalBin {
0x1719…171f ptr = 0xa476 // 0x1719 @0x0
0x1719…171f lno = 0x087a // 0x171b @0x2
0x1719…171f at0004 = ╱9b╱ ENDIF ╱ // 0x171d @0x4
0x1719…171f at0005 = EOL // 0x171e @0x5
0x1719…171f }
0x171f…1729 a480 2180 P=P+E
0x171f…1729 LineComalBin {
0x171f…1729 ptr = 0xa480 // 0x171f @0x0
0x171f…1729 lno = 0x0884 // 0x1721 @0x2
0x171f…1729 at0004 = ╱50╱P╱ // 0x1723 @0x4
0x171f…1729 at0005 = ╱dc╱=╱ // 0x1724 @0x5
0x171f…1729 at0006 = ╱50╱P╱ // 0x1725 @0x6
0x171f…1729 at0007 = ╱e2╱+╱ // 0x1726 @0x7
0x171f…1729 at0008 = ╱45╱E╱ // 0x1727 @0x8
0x171f…1729 at0009 = EOL // 0x1728 @0x9
0x171f…1729 }
0x1729…1744 (77,) a49b 2190 UNTIL (DPO2=L-E OR M=J) AND TEST=B
0x1729…1744 LineComalBin {
0x1729…1744 ptr = 0xa49b // 0x1729 @0x0
0x1729…1744 lno = 0x088e // 0x172b @0x2
0x1729…1744 at0004 = ╱98╱ UNTIL ╱ // 0x172d @0x4
0x1729…1744 at0005 = ╱ed╱(╱ // 0x172e @0x5
0x1729…1744 at0006 = ╱44╱D╱ // 0x172f @0x6
0x1729…1744 at0007 = ╱50╱P╱ // 0x1730 @0x7
0x1729…1744 at0008 = ╱4f╱O╱ // 0x1731 @0x8
0x1729…1744 at0009 = ╱32╱2╱ // 0x1732 @0x9
0x1729…1744 at000a = ╱dc╱=╱ // 0x1733 @0xa
0x1729…1744 at000b = ╱4c╱L╱ // 0x1734 @0xb
0x1729…1744 at000c = ╱e3╱-╱ // 0x1735 @0xc
0x1729…1744 at000d = ╱45╱E╱ // 0x1736 @0xd
0x1729…1744 at000e = ╱db╱ OR ╱ // 0x1737 @0xe
0x1729…1744 at000f = ╱4d╱M╱ // 0x1738 @0xf
0x1729…1744 at0010 = ╱dc╱=╱ // 0x1739 @0x10
0x1729…1744 at0011 = ╱4a╱J╱ // 0x173a @0x11
0x1729…1744 at0012 = ╱ee╱)╱ // 0x173b @0x12
0x1729…1744 at0013 = ╱da╱ AND ╱ // 0x173c @0x13
0x1729…1744 at0014 = ╱54╱T╱ // 0x173d @0x14
0x1729…1744 at0015 = ╱45╱E╱ // 0x173e @0x15
0x1729…1744 at0016 = ╱53╱S╱ // 0x173f @0x16
0x1729…1744 at0017 = ╱54╱T╱ // 0x1740 @0x17
0x1729…1744 at0018 = ╱dc╱=╱ // 0x1741 @0x18
0x1729…1744 at0019 = ╱42╱B╱ // 0x1742 @0x19
0x1729…1744 at001a = EOL // 0x1743 @0x1a
0x1729…1744 }
0x1744…1753 a4aa 2200 IF DPO2=L-E THEN
0x1744…1753 LineComalBin {
0x1744…1753 ptr = 0xa4aa // 0x1744 @0x0
0x1744…1753 lno = 0x0898 // 0x1746 @0x2
0x1744…1753 at0004 = ╱9c╱ IF ╱ // 0x1748 @0x4
0x1744…1753 at0005 = ╱44╱D╱ // 0x1749 @0x5
0x1744…1753 at0006 = ╱50╱P╱ // 0x174a @0x6
0x1744…1753 at0007 = ╱4f╱O╱ // 0x174b @0x7
0x1744…1753 at0008 = ╱32╱2╱ // 0x174c @0x8
0x1744…1753 at0009 = ╱dc╱=╱ // 0x174d @0x9
0x1744…1753 at000a = ╱4c╱L╱ // 0x174e @0xa
0x1744…1753 at000b = ╱e3╱-╱ // 0x174f @0xb
0x1744…1753 at000c = ╱45╱E╱ // 0x1750 @0xc
0x1744…1753 at000d = ╱b6╱ THEN ╱ // 0x1751 @0xd
0x1744…1753 at000e = EOL // 0x1752 @0xe
0x1744…1753 }
0x1753…175e a4b5 2210 STYR=E
0x1753…175e LineComalBin {
0x1753…175e ptr = 0xa4b5 // 0x1753 @0x0
0x1753…175e lno = 0x08a2 // 0x1755 @0x2
0x1753…175e at0004 = ╱53╱S╱ // 0x1757 @0x4
0x1753…175e at0005 = ╱54╱T╱ // 0x1758 @0x5
0x1753…175e at0006 = ╱59╱Y╱ // 0x1759 @0x6
0x1753…175e at0007 = ╱52╱R╱ // 0x175a @0x7
0x1753…175e at0008 = ╱dc╱=╱ // 0x175b @0x8
0x1753…175e at0009 = ╱45╱E╱ // 0x175c @0x9
0x1753…175e at000a = EOL // 0x175d @0xa
0x1753…175e }
0x175e…1764 a4bb 2220 ELSE
0x175e…1764 LineComalBin {
0x175e…1764 ptr = 0xa4bb // 0x175e @0x0
0x175e…1764 lno = 0x08ac // 0x1760 @0x2
0x175e…1764 at0004 = ╱9a╱ ELSE ╱ // 0x1762 @0x4
0x175e…1764 at0005 = EOL // 0x1763 @0x5
0x175e…1764 }
0x1764…176f a4c6 2230 STYR=B
0x1764…176f LineComalBin {
0x1764…176f ptr = 0xa4c6 // 0x1764 @0x0
0x1764…176f lno = 0x08b6 // 0x1766 @0x2
0x1764…176f at0004 = ╱53╱S╱ // 0x1768 @0x4
0x1764…176f at0005 = ╱54╱T╱ // 0x1769 @0x5
0x1764…176f at0006 = ╱59╱Y╱ // 0x176a @0x6
0x1764…176f at0007 = ╱52╱R╱ // 0x176b @0x7
0x1764…176f at0008 = ╱dc╱=╱ // 0x176c @0x8
0x1764…176f at0009 = ╱42╱B╱ // 0x176d @0x9
0x1764…176f at000a = EOL // 0x176e @0xa
0x1764…176f }
0x176f…1775 a4cc 2240 ENDIF
0x176f…1775 LineComalBin {
0x176f…1775 ptr = 0xa4cc // 0x176f @0x0
0x176f…1775 lno = 0x08c0 // 0x1771 @0x2
0x176f…1775 at0004 = ╱9b╱ ENDIF ╱ // 0x1773 @0x4
0x176f…1775 at0005 = EOL // 0x1774 @0x5
0x176f…1775 }
0x1775…177b a4d2 2250 ELSE
0x1775…177b LineComalBin {
0x1775…177b ptr = 0xa4d2 // 0x1775 @0x0
0x1775…177b lno = 0x08ca // 0x1777 @0x2
0x1775…177b at0004 = ╱9a╱ ELSE ╱ // 0x1779 @0x4
0x1775…177b at0005 = EOL // 0x177a @0x5
0x1775…177b }
0x177b…1788 a4df 2260 IF DPM2=B THEN
0x177b…1788 LineComalBin {
0x177b…1788 ptr = 0xa4df // 0x177b @0x0
0x177b…1788 lno = 0x08d4 // 0x177d @0x2
0x177b…1788 at0004 = ╱9c╱ IF ╱ // 0x177f @0x4
0x177b…1788 at0005 = ╱44╱D╱ // 0x1780 @0x5
0x177b…1788 at0006 = ╱50╱P╱ // 0x1781 @0x6
0x177b…1788 at0007 = ╱4d╱M╱ // 0x1782 @0x7
0x177b…1788 at0008 = ╱32╱2╱ // 0x1783 @0x8
0x177b…1788 at0009 = ╱dc╱=╱ // 0x1784 @0x9
0x177b…1788 at000a = ╱42╱B╱ // 0x1785 @0xa
0x177b…1788 at000b = ╱b6╱ THEN ╱ // 0x1786 @0xb
0x177b…1788 at000c = EOL // 0x1787 @0xc
0x177b…1788 }
0x1788…1793 a4ea 2270 STYR=B
0x1788…1793 LineComalBin {
0x1788…1793 ptr = 0xa4ea // 0x1788 @0x0
0x1788…1793 lno = 0x08de // 0x178a @0x2
0x1788…1793 at0004 = ╱53╱S╱ // 0x178c @0x4
0x1788…1793 at0005 = ╱54╱T╱ // 0x178d @0x5
0x1788…1793 at0006 = ╱59╱Y╱ // 0x178e @0x6
0x1788…1793 at0007 = ╱52╱R╱ // 0x178f @0x7
0x1788…1793 at0008 = ╱dc╱=╱ // 0x1790 @0x8
0x1788…1793 at0009 = ╱42╱B╱ // 0x1791 @0x9
0x1788…1793 at000a = EOL // 0x1792 @0xa
0x1788…1793 }
0x1793…1799 a4f0 2280 ELSE
0x1793…1799 LineComalBin {
0x1793…1799 ptr = 0xa4f0 // 0x1793 @0x0
0x1793…1799 lno = 0x08e8 // 0x1795 @0x2
0x1793…1799 at0004 = ╱9a╱ ELSE ╱ // 0x1797 @0x4
0x1793…1799 at0005 = EOL // 0x1798 @0x5
0x1793…1799 }
0x1799…17a4 a4fb 2290 STYR=E
0x1799…17a4 LineComalBin {
0x1799…17a4 ptr = 0xa4fb // 0x1799 @0x0
0x1799…17a4 lno = 0x08f2 // 0x179b @0x2
0x1799…17a4 at0004 = ╱53╱S╱ // 0x179d @0x4
0x1799…17a4 at0005 = ╱54╱T╱ // 0x179e @0x5
0x1799…17a4 at0006 = ╱59╱Y╱ // 0x179f @0x6
0x1799…17a4 at0007 = ╱52╱R╱ // 0x17a0 @0x7
0x1799…17a4 at0008 = ╱dc╱=╱ // 0x17a1 @0x8
0x1799…17a4 at0009 = ╱45╱E╱ // 0x17a2 @0x9
0x1799…17a4 at000a = EOL // 0x17a3 @0xa
0x1799…17a4 }
0x17a4…17aa a501 2300 ENDIF
0x17a4…17aa LineComalBin {
0x17a4…17aa ptr = 0xa501 // 0x17a4 @0x0
0x17a4…17aa lno = 0x08fc // 0x17a6 @0x2
0x17a4…17aa at0004 = ╱9b╱ ENDIF ╱ // 0x17a8 @0x4
0x17a4…17aa at0005 = EOL // 0x17a9 @0x5
0x17a4…17aa }
0x17aa…17b0 a507 2310 ENDIF
0x17aa…17b0 LineComalBin {
0x17aa…17b0 ptr = 0xa507 // 0x17aa @0x0
0x17aa…17b0 lno = 0x0906 // 0x17ac @0x2
0x17aa…17b0 at0004 = ╱9b╱ ENDIF ╱ // 0x17ae @0x4
0x17aa…17b0 at0005 = EOL // 0x17af @0x5
0x17aa…17b0 }
0x17b0…17bd a514 2320 IF STYR=E THEN
0x17b0…17bd LineComalBin {
0x17b0…17bd ptr = 0xa514 // 0x17b0 @0x0
0x17b0…17bd lno = 0x0910 // 0x17b2 @0x2
0x17b0…17bd at0004 = ╱9c╱ IF ╱ // 0x17b4 @0x4
0x17b0…17bd at0005 = ╱53╱S╱ // 0x17b5 @0x5
0x17b0…17bd at0006 = ╱54╱T╱ // 0x17b6 @0x6
0x17b0…17bd at0007 = ╱59╱Y╱ // 0x17b7 @0x7
0x17b0…17bd at0008 = ╱52╱R╱ // 0x17b8 @0x8
0x17b0…17bd at0009 = ╱dc╱=╱ // 0x17b9 @0x9
0x17b0…17bd at000a = ╱45╱E╱ // 0x17ba @0xa
0x17b0…17bd at000b = ╱b6╱ THEN ╱ // 0x17bb @0xb
0x17b0…17bd at000c = EOL // 0x17bc @0xc
0x17b0…17bd }
0x17bd…17ca a521 2330 FOR I=M TO J-E
0x17bd…17ca LineComalBin {
0x17bd…17ca ptr = 0xa521 // 0x17bd @0x0
0x17bd…17ca lno = 0x091a // 0x17bf @0x2
0x17bd…17ca at0004 = ╱83╱ FOR ╱ // 0x17c1 @0x4
0x17bd…17ca at0005 = ╱49╱I╱ // 0x17c2 @0x5
0x17bd…17ca at0006 = ╱dc╱=╱ // 0x17c3 @0x6
0x17bd…17ca at0007 = ╱4d╱M╱ // 0x17c4 @0x7
0x17bd…17ca at0008 = ╱b7╱ TO ╱ // 0x17c5 @0x8
0x17bd…17ca at0009 = ╱4a╱J╱ // 0x17c6 @0x9
0x17bd…17ca at000a = ╱e3╱-╱ // 0x17c7 @0xa
0x17bd…17ca at000b = ╱45╱E╱ // 0x17c8 @0xb
0x17bd…17ca at000c = EOL // 0x17c9 @0xc
0x17bd…17ca }
0x17ca…17d7 a52e 2340 Q=PEG(I)
0x17ca…17d7 LineComalBin {
0x17ca…17d7 ptr = 0xa52e // 0x17ca @0x0
0x17ca…17d7 lno = 0x0924 // 0x17cc @0x2
0x17ca…17d7 at0004 = ╱51╱Q╱ // 0x17ce @0x4
0x17ca…17d7 at0005 = ╱dc╱=╱ // 0x17cf @0x5
0x17ca…17d7 at0006 = ╱50╱P╱ // 0x17d0 @0x6
0x17ca…17d7 at0007 = ╱45╱E╱ // 0x17d1 @0x7
0x17ca…17d7 at0008 = ╱47╱G╱ // 0x17d2 @0x8
0x17ca…17d7 at0009 = ╱ed╱(╱ // 0x17d3 @0x9
0x17ca…17d7 at000a = ╱49╱I╱ // 0x17d4 @0xa
0x17ca…17d7 at000b = ╱ee╱)╱ // 0x17d5 @0xb
0x17ca…17d7 at000c = EOL // 0x17d6 @0xc
0x17ca…17d7 }
0x17d7…1816 a56d 2350 EXEC FPUT2(K18$,P,N(Q),D(Q),BI(Q),TK$(Q),BE$(Q),TE$(Q),ENT(Q))
0x17d7…1816 LineComalBin {
0x17d7…1816 ptr = 0xa56d // 0x17d7 @0x0
0x17d7…1816 lno = 0x092e // 0x17d9 @0x2
0x17d7…1816 at0004 = ╱9d╱ EXEC ╱ // 0x17db @0x4
0x17d7…1816 at0005 = ╱46╱F╱ // 0x17dc @0x5
0x17d7…1816 at0006 = ╱50╱P╱ // 0x17dd @0x6
0x17d7…1816 at0007 = ╱55╱U╱ // 0x17de @0x7
0x17d7…1816 at0008 = ╱54╱T╱ // 0x17df @0x8
0x17d7…1816 at0009 = ╱32╱2╱ // 0x17e0 @0x9
0x17d7…1816 at000a = ╱ed╱(╱ // 0x17e1 @0xa
0x17d7…1816 at000b = ╱4b╱K╱ // 0x17e2 @0xb
0x17d7…1816 at000c = ╱31╱1╱ // 0x17e3 @0xc
0x17d7…1816 at000d = ╱38╱8╱ // 0x17e4 @0xd
0x17d7…1816 at000e = ╱ef╱$╱ // 0x17e5 @0xe
0x17d7…1816 at000f = ╱ec╱,╱ // 0x17e6 @0xf
0x17d7…1816 at0010 = ╱50╱P╱ // 0x17e7 @0x10
0x17d7…1816 at0011 = ╱ec╱,╱ // 0x17e8 @0x11
0x17d7…1816 at0012 = ╱4e╱N╱ // 0x17e9 @0x12
0x17d7…1816 at0013 = ╱ed╱(╱ // 0x17ea @0x13
0x17d7…1816 at0014 = ╱51╱Q╱ // 0x17eb @0x14
0x17d7…1816 at0015 = ╱ee╱)╱ // 0x17ec @0x15
0x17d7…1816 at0016 = ╱ec╱,╱ // 0x17ed @0x16
0x17d7…1816 at0017 = ╱44╱D╱ // 0x17ee @0x17
0x17d7…1816 at0018 = ╱ed╱(╱ // 0x17ef @0x18
0x17d7…1816 at0019 = ╱51╱Q╱ // 0x17f0 @0x19
0x17d7…1816 at001a = ╱ee╱)╱ // 0x17f1 @0x1a
0x17d7…1816 at001b = ╱ec╱,╱ // 0x17f2 @0x1b
0x17d7…1816 at001c = ╱42╱B╱ // 0x17f3 @0x1c
0x17d7…1816 at001d = ╱49╱I╱ // 0x17f4 @0x1d
0x17d7…1816 at001e = ╱ed╱(╱ // 0x17f5 @0x1e
0x17d7…1816 at001f = ╱51╱Q╱ // 0x17f6 @0x1f
0x17d7…1816 at0020 = ╱ee╱)╱ // 0x17f7 @0x20
0x17d7…1816 at0021 = ╱ec╱,╱ // 0x17f8 @0x21
0x17d7…1816 at0022 = ╱54╱T╱ // 0x17f9 @0x22
0x17d7…1816 at0023 = ╱4b╱K╱ // 0x17fa @0x23
0x17d7…1816 at0024 = ╱ef╱$╱ // 0x17fb @0x24
0x17d7…1816 at0025 = ╱ed╱(╱ // 0x17fc @0x25
0x17d7…1816 at0026 = ╱51╱Q╱ // 0x17fd @0x26
0x17d7…1816 at0027 = ╱ee╱)╱ // 0x17fe @0x27
0x17d7…1816 at0028 = ╱ec╱,╱ // 0x17ff @0x28
0x17d7…1816 at0029 = ╱42╱B╱ // 0x1800 @0x29
0x17d7…1816 at002a = ╱45╱E╱ // 0x1801 @0x2a
0x17d7…1816 at002b = ╱ef╱$╱ // 0x1802 @0x2b
0x17d7…1816 at002c = ╱ed╱(╱ // 0x1803 @0x2c
0x17d7…1816 at002d = ╱51╱Q╱ // 0x1804 @0x2d
0x17d7…1816 at002e = ╱ee╱)╱ // 0x1805 @0x2e
0x17d7…1816 at002f = ╱ec╱,╱ // 0x1806 @0x2f
0x17d7…1816 at0030 = ╱54╱T╱ // 0x1807 @0x30
0x17d7…1816 at0031 = ╱45╱E╱ // 0x1808 @0x31
0x17d7…1816 at0032 = ╱ef╱$╱ // 0x1809 @0x32
0x17d7…1816 at0033 = ╱ed╱(╱ // 0x180a @0x33
0x17d7…1816 at0034 = ╱51╱Q╱ // 0x180b @0x34
0x17d7…1816 at0035 = ╱ee╱)╱ // 0x180c @0x35
0x17d7…1816 at0036 = ╱ec╱,╱ // 0x180d @0x36
0x17d7…1816 at0037 = ╱45╱E╱ // 0x180e @0x37
0x17d7…1816 at0038 = ╱4e╱N╱ // 0x180f @0x38
0x17d7…1816 at0039 = ╱54╱T╱ // 0x1810 @0x39
0x17d7…1816 at003a = ╱ed╱(╱ // 0x1811 @0x3a
0x17d7…1816 at003b = ╱51╱Q╱ // 0x1812 @0x3b
0x17d7…1816 at003c = ╱ee╱)╱ // 0x1813 @0x3c
0x17d7…1816 at003d = ╱ee╱)╱ // 0x1814 @0x3d
0x17d7…1816 at003e = EOL // 0x1815 @0x3e
0x17d7…1816 }
0x1816…1820 a577 2360 P=P+E
0x1816…1820 LineComalBin {
0x1816…1820 ptr = 0xa577 // 0x1816 @0x0
0x1816…1820 lno = 0x0938 // 0x1818 @0x2
0x1816…1820 at0004 = ╱50╱P╱ // 0x181a @0x4
0x1816…1820 at0005 = ╱dc╱=╱ // 0x181b @0x5
0x1816…1820 at0006 = ╱50╱P╱ // 0x181c @0x6
0x1816…1820 at0007 = ╱e2╱+╱ // 0x181d @0x7
0x1816…1820 at0008 = ╱45╱E╱ // 0x181e @0x8
0x1816…1820 at0009 = EOL // 0x181f @0x9
0x1816…1820 }
0x1820…1827 a57e 2370 NEXT I
0x1820…1827 LineComalBin {
0x1820…1827 ptr = 0xa57e // 0x1820 @0x0
0x1820…1827 lno = 0x0942 // 0x1822 @0x2
0x1820…1827 at0004 = ╱84╱ NEXT ╱ // 0x1824 @0x4
0x1820…1827 at0005 = ╱49╱I╱ // 0x1825 @0x5
0x1820…1827 at0006 = EOL // 0x1826 @0x6
0x1820…1827 }
0x1827…182d a584 2380 ELSE
0x1827…182d LineComalBin {
0x1827…182d ptr = 0xa584 // 0x1827 @0x0
0x1827…182d lno = 0x094c // 0x1829 @0x2
0x1827…182d at0004 = ╱9a╱ ELSE ╱ // 0x182b @0x4
0x1827…182d at0005 = EOL // 0x182c @0x5
0x1827…182d }
0x182d…183b a592 2390 FOR I=L TO DPO2
0x182d…183b LineComalBin {
0x182d…183b ptr = 0xa592 // 0x182d @0x0
0x182d…183b lno = 0x0956 // 0x182f @0x2
0x182d…183b at0004 = ╱83╱ FOR ╱ // 0x1831 @0x4
0x182d…183b at0005 = ╱49╱I╱ // 0x1832 @0x5
0x182d…183b at0006 = ╱dc╱=╱ // 0x1833 @0x6
0x182d…183b at0007 = ╱4c╱L╱ // 0x1834 @0x7
0x182d…183b at0008 = ╱b7╱ TO ╱ // 0x1835 @0x8
0x182d…183b at0009 = ╱44╱D╱ // 0x1836 @0x9
0x182d…183b at000a = ╱50╱P╱ // 0x1837 @0xa
0x182d…183b at000b = ╱4f╱O╱ // 0x1838 @0xb
0x182d…183b at000c = ╱32╱2╱ // 0x1839 @0xc
0x182d…183b at000d = EOL // 0x183a @0xd
0x182d…183b }
0x183b…186c a5c3 2400 EXEC FGET2(K17$,I,NO,DO,BIO,TKO$,BEO$,TEO$,ENTO)
0x183b…186c LineComalBin {
0x183b…186c ptr = 0xa5c3 // 0x183b @0x0
0x183b…186c lno = 0x0960 // 0x183d @0x2
0x183b…186c at0004 = ╱9d╱ EXEC ╱ // 0x183f @0x4
0x183b…186c at0005 = ╱46╱F╱ // 0x1840 @0x5
0x183b…186c at0006 = ╱47╱G╱ // 0x1841 @0x6
0x183b…186c at0007 = ╱45╱E╱ // 0x1842 @0x7
0x183b…186c at0008 = ╱54╱T╱ // 0x1843 @0x8
0x183b…186c at0009 = ╱32╱2╱ // 0x1844 @0x9
0x183b…186c at000a = ╱ed╱(╱ // 0x1845 @0xa
0x183b…186c at000b = ╱4b╱K╱ // 0x1846 @0xb
0x183b…186c at000c = ╱31╱1╱ // 0x1847 @0xc
0x183b…186c at000d = ╱37╱7╱ // 0x1848 @0xd
0x183b…186c at000e = ╱ef╱$╱ // 0x1849 @0xe
0x183b…186c at000f = ╱ec╱,╱ // 0x184a @0xf
0x183b…186c at0010 = ╱49╱I╱ // 0x184b @0x10
0x183b…186c at0011 = ╱ec╱,╱ // 0x184c @0x11
0x183b…186c at0012 = ╱4e╱N╱ // 0x184d @0x12
0x183b…186c at0013 = ╱4f╱O╱ // 0x184e @0x13
0x183b…186c at0014 = ╱ec╱,╱ // 0x184f @0x14
0x183b…186c at0015 = ╱44╱D╱ // 0x1850 @0x15
0x183b…186c at0016 = ╱4f╱O╱ // 0x1851 @0x16
0x183b…186c at0017 = ╱ec╱,╱ // 0x1852 @0x17
0x183b…186c at0018 = ╱42╱B╱ // 0x1853 @0x18
0x183b…186c at0019 = ╱49╱I╱ // 0x1854 @0x19
0x183b…186c at001a = ╱4f╱O╱ // 0x1855 @0x1a
0x183b…186c at001b = ╱ec╱,╱ // 0x1856 @0x1b
0x183b…186c at001c = ╱54╱T╱ // 0x1857 @0x1c
0x183b…186c at001d = ╱4b╱K╱ // 0x1858 @0x1d
0x183b…186c at001e = ╱4f╱O╱ // 0x1859 @0x1e
0x183b…186c at001f = ╱ef╱$╱ // 0x185a @0x1f
0x183b…186c at0020 = ╱ec╱,╱ // 0x185b @0x20
0x183b…186c at0021 = ╱42╱B╱ // 0x185c @0x21
0x183b…186c at0022 = ╱45╱E╱ // 0x185d @0x22
0x183b…186c at0023 = ╱4f╱O╱ // 0x185e @0x23
0x183b…186c at0024 = ╱ef╱$╱ // 0x185f @0x24
0x183b…186c at0025 = ╱ec╱,╱ // 0x1860 @0x25
0x183b…186c at0026 = ╱54╱T╱ // 0x1861 @0x26
0x183b…186c at0027 = ╱45╱E╱ // 0x1862 @0x27
0x183b…186c at0028 = ╱4f╱O╱ // 0x1863 @0x28
0x183b…186c at0029 = ╱ef╱$╱ // 0x1864 @0x29
0x183b…186c at002a = ╱ec╱,╱ // 0x1865 @0x2a
0x183b…186c at002b = ╱45╱E╱ // 0x1866 @0x2b
0x183b…186c at002c = ╱4e╱N╱ // 0x1867 @0x2c
0x183b…186c at002d = ╱54╱T╱ // 0x1868 @0x2d
0x183b…186c at002e = ╱4f╱O╱ // 0x1869 @0x2e
0x183b…186c at002f = ╱ee╱)╱ // 0x186a @0x2f
0x183b…186c at0030 = EOL // 0x186b @0x30
0x183b…186c }
0x186c…189d a5f4 2410 EXEC FPUT2(K18$,P,NO,DO,BIO,TKO$,BEO$,TEO$,ENTO)
0x186c…189d LineComalBin {
0x186c…189d ptr = 0xa5f4 // 0x186c @0x0
0x186c…189d lno = 0x096a // 0x186e @0x2
0x186c…189d at0004 = ╱9d╱ EXEC ╱ // 0x1870 @0x4
0x186c…189d at0005 = ╱46╱F╱ // 0x1871 @0x5
0x186c…189d at0006 = ╱50╱P╱ // 0x1872 @0x6
0x186c…189d at0007 = ╱55╱U╱ // 0x1873 @0x7
0x186c…189d at0008 = ╱54╱T╱ // 0x1874 @0x8
0x186c…189d at0009 = ╱32╱2╱ // 0x1875 @0x9
0x186c…189d at000a = ╱ed╱(╱ // 0x1876 @0xa
0x186c…189d at000b = ╱4b╱K╱ // 0x1877 @0xb
0x186c…189d at000c = ╱31╱1╱ // 0x1878 @0xc
0x186c…189d at000d = ╱38╱8╱ // 0x1879 @0xd
0x186c…189d at000e = ╱ef╱$╱ // 0x187a @0xe
0x186c…189d at000f = ╱ec╱,╱ // 0x187b @0xf
0x186c…189d at0010 = ╱50╱P╱ // 0x187c @0x10
0x186c…189d at0011 = ╱ec╱,╱ // 0x187d @0x11
0x186c…189d at0012 = ╱4e╱N╱ // 0x187e @0x12
0x186c…189d at0013 = ╱4f╱O╱ // 0x187f @0x13
0x186c…189d at0014 = ╱ec╱,╱ // 0x1880 @0x14
0x186c…189d at0015 = ╱44╱D╱ // 0x1881 @0x15
0x186c…189d at0016 = ╱4f╱O╱ // 0x1882 @0x16
0x186c…189d at0017 = ╱ec╱,╱ // 0x1883 @0x17
0x186c…189d at0018 = ╱42╱B╱ // 0x1884 @0x18
0x186c…189d at0019 = ╱49╱I╱ // 0x1885 @0x19
0x186c…189d at001a = ╱4f╱O╱ // 0x1886 @0x1a
0x186c…189d at001b = ╱ec╱,╱ // 0x1887 @0x1b
0x186c…189d at001c = ╱54╱T╱ // 0x1888 @0x1c
0x186c…189d at001d = ╱4b╱K╱ // 0x1889 @0x1d
0x186c…189d at001e = ╱4f╱O╱ // 0x188a @0x1e
0x186c…189d at001f = ╱ef╱$╱ // 0x188b @0x1f
0x186c…189d at0020 = ╱ec╱,╱ // 0x188c @0x20
0x186c…189d at0021 = ╱42╱B╱ // 0x188d @0x21
0x186c…189d at0022 = ╱45╱E╱ // 0x188e @0x22
0x186c…189d at0023 = ╱4f╱O╱ // 0x188f @0x23
0x186c…189d at0024 = ╱ef╱$╱ // 0x1890 @0x24
0x186c…189d at0025 = ╱ec╱,╱ // 0x1891 @0x25
0x186c…189d at0026 = ╱54╱T╱ // 0x1892 @0x26
0x186c…189d at0027 = ╱45╱E╱ // 0x1893 @0x27
0x186c…189d at0028 = ╱4f╱O╱ // 0x1894 @0x28
0x186c…189d at0029 = ╱ef╱$╱ // 0x1895 @0x29
0x186c…189d at002a = ╱ec╱,╱ // 0x1896 @0x2a
0x186c…189d at002b = ╱45╱E╱ // 0x1897 @0x2b
0x186c…189d at002c = ╱4e╱N╱ // 0x1898 @0x2c
0x186c…189d at002d = ╱54╱T╱ // 0x1899 @0x2d
0x186c…189d at002e = ╱4f╱O╱ // 0x189a @0x2e
0x186c…189d at002f = ╱ee╱)╱ // 0x189b @0x2f
0x186c…189d at0030 = EOL // 0x189c @0x30
0x186c…189d }
0x189d…18a7 a5fe 2420 P=P+E
0x189d…18a7 LineComalBin {
0x189d…18a7 ptr = 0xa5fe // 0x189d @0x0
0x189d…18a7 lno = 0x0974 // 0x189f @0x2
0x189d…18a7 at0004 = ╱50╱P╱ // 0x18a1 @0x4
0x189d…18a7 at0005 = ╱dc╱=╱ // 0x18a2 @0x5
0x189d…18a7 at0006 = ╱50╱P╱ // 0x18a3 @0x6
0x189d…18a7 at0007 = ╱e2╱+╱ // 0x18a4 @0x7
0x189d…18a7 at0008 = ╱45╱E╱ // 0x18a5 @0x8
0x189d…18a7 at0009 = EOL // 0x18a6 @0x9
0x189d…18a7 }
0x18a7…18ae a605 2430 NEXT I
0x18a7…18ae LineComalBin {
0x18a7…18ae ptr = 0xa605 // 0x18a7 @0x0
0x18a7…18ae lno = 0x097e // 0x18a9 @0x2
0x18a7…18ae at0004 = ╱84╱ NEXT ╱ // 0x18ab @0x4
0x18a7…18ae at0005 = ╱49╱I╱ // 0x18ac @0x5
0x18a7…18ae at0006 = EOL // 0x18ad @0x6
0x18a7…18ae }
0x18ae…18b4 a60b 2440 ENDIF
0x18ae…18b4 LineComalBin {
0x18ae…18b4 ptr = 0xa60b // 0x18ae @0x0
0x18ae…18b4 lno = 0x0988 // 0x18b0 @0x2
0x18ae…18b4 at0004 = ╱9b╱ ENDIF ╱ // 0x18b2 @0x4
0x18ae…18b4 at0005 = EOL // 0x18b3 @0x5
0x18ae…18b4 }
0x18b4…18c1 a618 2450 DPO3=P-E
0x18b4…18c1 LineComalBin {
0x18b4…18c1 ptr = 0xa618 // 0x18b4 @0x0
0x18b4…18c1 lno = 0x0992 // 0x18b6 @0x2
0x18b4…18c1 at0004 = ╱44╱D╱ // 0x18b8 @0x4
0x18b4…18c1 at0005 = ╱50╱P╱ // 0x18b9 @0x5
0x18b4…18c1 at0006 = ╱4f╱O╱ // 0x18ba @0x6
0x18b4…18c1 at0007 = ╱33╱3╱ // 0x18bb @0x7
0x18b4…18c1 at0008 = ╱dc╱=╱ // 0x18bc @0x8
0x18b4…18c1 at0009 = ╱50╱P╱ // 0x18bd @0x9
0x18b4…18c1 at000a = ╱e3╱-╱ // 0x18be @0xa
0x18b4…18c1 at000b = ╱45╱E╱ // 0x18bf @0xb
0x18b4…18c1 at000c = EOL // 0x18c0 @0xc
0x18b4…18c1 }
0x18c1…18cb a622 2460 CLOSE K17$
0x18c1…18cb LineComalBin {
0x18c1…18cb ptr = 0xa622 // 0x18c1 @0x0
0x18c1…18cb lno = 0x099c // 0x18c3 @0x2
0x18c1…18cb at0004 = ╱a8╱ CLOSE ╱ // 0x18c5 @0x4
0x18c1…18cb at0005 = ╱4b╱K╱ // 0x18c6 @0x5
0x18c1…18cb at0006 = ╱31╱1╱ // 0x18c7 @0x6
0x18c1…18cb at0007 = ╱37╱7╱ // 0x18c8 @0x7
0x18c1…18cb at0008 = ╱ef╱$╱ // 0x18c9 @0x8
0x18c1…18cb at0009 = EOL // 0x18ca @0x9
0x18c1…18cb }
0x18cb…18e5 a63c 2470 EXEC FEJL(11,V,K17$)
0x18cb…18e5 LineComalBin {
0x18cb…18e5 ptr = 0xa63c // 0x18cb @0x0
0x18cb…18e5 lno = 0x09a6 // 0x18cd @0x2
0x18cb…18e5 at0004 = ╱9d╱ EXEC ╱ // 0x18cf @0x4
0x18cb…18e5 at0005 = ╱46╱F╱ // 0x18d0 @0x5
0x18cb…18e5 at0006 = ╱45╱E╱ // 0x18d1 @0x6
0x18cb…18e5 at0007 = ╱4a╱J╱ // 0x18d2 @0x7
0x18cb…18e5 at0008 = ╱4c╱L╱ // 0x18d3 @0x8
0x18cb…18e5 at0009 = ╱ed╱(╱ // 0x18d4 @0x9
0x18cb…18e5 at000a = ╱31╱1╱ // 0x18d5 @0xa
0x18cb…18e5 at000b = ╱31╱1╱ // 0x18d6 @0xb
0x18cb…18e5 at000c = ╱fe0000b004╱ // 0x18d7 @0xc
0x18cb…18e5 at0011 = ╱ec╱,╱ // 0x18dc @0x11
0x18cb…18e5 at0012 = ╱56╱V╱ // 0x18dd @0x12
0x18cb…18e5 at0013 = ╱ec╱,╱ // 0x18de @0x13
0x18cb…18e5 at0014 = ╱4b╱K╱ // 0x18df @0x14
0x18cb…18e5 at0015 = ╱31╱1╱ // 0x18e0 @0x15
0x18cb…18e5 at0016 = ╱37╱7╱ // 0x18e1 @0x16
0x18cb…18e5 at0017 = ╱ef╱$╱ // 0x18e2 @0x17
0x18cb…18e5 at0018 = ╱ee╱)╱ // 0x18e3 @0x18
0x18cb…18e5 at0019 = EOL // 0x18e4 @0x19
0x18cb…18e5 }
0x18e5…18ef a646 2480 CLOSE K18$
0x18e5…18ef LineComalBin {
0x18e5…18ef ptr = 0xa646 // 0x18e5 @0x0
0x18e5…18ef lno = 0x09b0 // 0x18e7 @0x2
0x18e5…18ef at0004 = ╱a8╱ CLOSE ╱ // 0x18e9 @0x4
0x18e5…18ef at0005 = ╱4b╱K╱ // 0x18ea @0x5
0x18e5…18ef at0006 = ╱31╱1╱ // 0x18eb @0x6
0x18e5…18ef at0007 = ╱38╱8╱ // 0x18ec @0x7
0x18e5…18ef at0008 = ╱ef╱$╱ // 0x18ed @0x8
0x18e5…18ef at0009 = EOL // 0x18ee @0x9
0x18e5…18ef }
0x18ef…190e a665 2490 EXEC FEJL(11,4,K18$)
0x18ef…190e LineComalBin {
0x18ef…190e ptr = 0xa665 // 0x18ef @0x0
0x18ef…190e lno = 0x09ba // 0x18f1 @0x2
0x18ef…190e at0004 = ╱9d╱ EXEC ╱ // 0x18f3 @0x4
0x18ef…190e at0005 = ╱46╱F╱ // 0x18f4 @0x5
0x18ef…190e at0006 = ╱45╱E╱ // 0x18f5 @0x6
0x18ef…190e at0007 = ╱4a╱J╱ // 0x18f6 @0x7
0x18ef…190e at0008 = ╱4c╱L╱ // 0x18f7 @0x8
0x18ef…190e at0009 = ╱ed╱(╱ // 0x18f8 @0x9
0x18ef…190e at000a = ╱31╱1╱ // 0x18f9 @0xa
0x18ef…190e at000b = ╱31╱1╱ // 0x18fa @0xb
0x18ef…190e at000c = ╱fe0000b004╱ // 0x18fb @0xc
0x18ef…190e at0011 = ╱ec╱,╱ // 0x1900 @0x11
0x18ef…190e at0012 = ╱34╱4╱ // 0x1901 @0x12
0x18ef…190e at0013 = ╱fe00008003╱ // 0x1902 @0x13
0x18ef…190e at0018 = ╱ec╱,╱ // 0x1907 @0x18
0x18ef…190e at0019 = ╱4b╱K╱ // 0x1908 @0x19
0x18ef…190e at001a = ╱31╱1╱ // 0x1909 @0x1a
0x18ef…190e at001b = ╱38╱8╱ // 0x190a @0x1b
0x18ef…190e at001c = ╱ef╱$╱ // 0x190b @0x1c
0x18ef…190e at001d = ╱ee╱)╱ // 0x190c @0x1d
0x18ef…190e at001e = EOL // 0x190d @0x1e
0x18ef…190e }
0x190e…1914 a66b 2500 ENDPROC
0x190e…1914 LineComalBin {
0x190e…1914 ptr = 0xa66b // 0x190e @0x0
0x190e…1914 lno = 0x09c4 // 0x1910 @0x2
0x190e…1914 at0004 = ╱9f╱ ENDPROC ╱ // 0x1912 @0x4
0x190e…1914 at0005 = EOL // 0x1913 @0x5
0x190e…1914 }
0x1914…1942 a699 2510 PROC TABINIT(K31,K32,MPOSTANTAL3,HTAB2,UTAB2)
0x1914…1942 LineComalBin {
0x1914…1942 ptr = 0xa699 // 0x1914 @0x0
0x1914…1942 lno = 0x09ce // 0x1916 @0x2
0x1914…1942 at0004 = ╱9e╱ PROC ╱ // 0x1918 @0x4
0x1914…1942 at0005 = ╱54╱T╱ // 0x1919 @0x5
0x1914…1942 at0006 = ╱41╱A╱ // 0x191a @0x6
0x1914…1942 at0007 = ╱42╱B╱ // 0x191b @0x7
0x1914…1942 at0008 = ╱49╱I╱ // 0x191c @0x8
0x1914…1942 at0009 = ╱4e╱N╱ // 0x191d @0x9
0x1914…1942 at000a = ╱49╱I╱ // 0x191e @0xa
0x1914…1942 at000b = ╱54╱T╱ // 0x191f @0xb
0x1914…1942 at000c = ╱ed╱(╱ // 0x1920 @0xc
0x1914…1942 at000d = ╱4b╱K╱ // 0x1921 @0xd
0x1914…1942 at000e = ╱33╱3╱ // 0x1922 @0xe
0x1914…1942 at000f = ╱31╱1╱ // 0x1923 @0xf
0x1914…1942 at0010 = ╱ec╱,╱ // 0x1924 @0x10
0x1914…1942 at0011 = ╱4b╱K╱ // 0x1925 @0x11
0x1914…1942 at0012 = ╱33╱3╱ // 0x1926 @0x12
0x1914…1942 at0013 = ╱32╱2╱ // 0x1927 @0x13
0x1914…1942 at0014 = ╱ec╱,╱ // 0x1928 @0x14
0x1914…1942 at0015 = ╱4d╱M╱ // 0x1929 @0x15
0x1914…1942 at0016 = ╱50╱P╱ // 0x192a @0x16
0x1914…1942 at0017 = ╱4f╱O╱ // 0x192b @0x17
0x1914…1942 at0018 = ╱53╱S╱ // 0x192c @0x18
0x1914…1942 at0019 = ╱54╱T╱ // 0x192d @0x19
0x1914…1942 at001a = ╱41╱A╱ // 0x192e @0x1a
0x1914…1942 at001b = ╱4e╱N╱ // 0x192f @0x1b
0x1914…1942 at001c = ╱54╱T╱ // 0x1930 @0x1c
0x1914…1942 at001d = ╱41╱A╱ // 0x1931 @0x1d
0x1914…1942 at001e = ╱4c╱L╱ // 0x1932 @0x1e
0x1914…1942 at001f = ╱33╱3╱ // 0x1933 @0x1f
0x1914…1942 at0020 = ╱ec╱,╱ // 0x1934 @0x20
0x1914…1942 at0021 = ╱48╱H╱ // 0x1935 @0x21
0x1914…1942 at0022 = ╱54╱T╱ // 0x1936 @0x22
0x1914…1942 at0023 = ╱41╱A╱ // 0x1937 @0x23
0x1914…1942 at0024 = ╱42╱B╱ // 0x1938 @0x24
0x1914…1942 at0025 = ╱32╱2╱ // 0x1939 @0x25
0x1914…1942 at0026 = ╱ec╱,╱ // 0x193a @0x26
0x1914…1942 at0027 = ╱55╱U╱ // 0x193b @0x27
0x1914…1942 at0028 = ╱54╱T╱ // 0x193c @0x28
0x1914…1942 at0029 = ╱41╱A╱ // 0x193d @0x29
0x1914…1942 at002a = ╱42╱B╱ // 0x193e @0x2a
0x1914…1942 at002b = ╱32╱2╱ // 0x193f @0x2b
0x1914…1942 at002c = ╱ee╱)╱ // 0x1940 @0x2c
0x1914…1942 at002d = EOL // 0x1941 @0x2d
0x1914…1942 }
0x1942…194e a6a5 2520 OPEN K31$,R
0x1942…194e LineComalBin {
0x1942…194e ptr = 0xa6a5 // 0x1942 @0x0
0x1942…194e lno = 0x09d8 // 0x1944 @0x2
0x1942…194e at0004 = ╱a7╱ OPEN ╱ // 0x1946 @0x4
0x1942…194e at0005 = ╱4b╱K╱ // 0x1947 @0x5
0x1942…194e at0006 = ╱33╱3╱ // 0x1948 @0x6
0x1942…194e at0007 = ╱31╱1╱ // 0x1949 @0x7
0x1942…194e at0008 = ╱ef╱$╱ // 0x194a @0x8
0x1942…194e at0009 = ╱ec╱,╱ // 0x194b @0x9
0x1942…194e at000a = ╱52╱R╱ // 0x194c @0xa
0x1942…194e at000b = EOL // 0x194d @0xb
0x1942…194e }
0x194e…1968 a6bf 2530 EXEC FEJL(15,E,K31$)
0x194e…1968 LineComalBin {
0x194e…1968 ptr = 0xa6bf // 0x194e @0x0
0x194e…1968 lno = 0x09e2 // 0x1950 @0x2
0x194e…1968 at0004 = ╱9d╱ EXEC ╱ // 0x1952 @0x4
0x194e…1968 at0005 = ╱46╱F╱ // 0x1953 @0x5
0x194e…1968 at0006 = ╱45╱E╱ // 0x1954 @0x6
0x194e…1968 at0007 = ╱4a╱J╱ // 0x1955 @0x7
0x194e…1968 at0008 = ╱4c╱L╱ // 0x1956 @0x8
0x194e…1968 at0009 = ╱ed╱(╱ // 0x1957 @0x9
0x194e…1968 at000a = ╱31╱1╱ // 0x1958 @0xa
0x194e…1968 at000b = ╱35╱5╱ // 0x1959 @0xb
0x194e…1968 at000c = ╱fe0000f004╱ // 0x195a @0xc
0x194e…1968 at0011 = ╱ec╱,╱ // 0x195f @0x11
0x194e…1968 at0012 = ╱45╱E╱ // 0x1960 @0x12
0x194e…1968 at0013 = ╱ec╱,╱ // 0x1961 @0x13
0x194e…1968 at0014 = ╱4b╱K╱ // 0x1962 @0x14
0x194e…1968 at0015 = ╱33╱3╱ // 0x1963 @0x15
0x194e…1968 at0016 = ╱31╱1╱ // 0x1964 @0x16
0x194e…1968 at0017 = ╱ef╱$╱ // 0x1965 @0x17
0x194e…1968 at0018 = ╱ee╱)╱ // 0x1966 @0x18
0x194e…1968 at0019 = EOL // 0x1967 @0x19
0x194e…1968 }
0x1968…1974 a6cb 2540 OPEN K32$,W
0x1968…1974 LineComalBin {
0x1968…1974 ptr = 0xa6cb // 0x1968 @0x0
0x1968…1974 lno = 0x09ec // 0x196a @0x2
0x1968…1974 at0004 = ╱a7╱ OPEN ╱ // 0x196c @0x4
0x1968…1974 at0005 = ╱4b╱K╱ // 0x196d @0x5
0x1968…1974 at0006 = ╱33╱3╱ // 0x196e @0x6
0x1968…1974 at0007 = ╱32╱2╱ // 0x196f @0x7
0x1968…1974 at0008 = ╱ef╱$╱ // 0x1970 @0x8
0x1968…1974 at0009 = ╱ec╱,╱ // 0x1971 @0x9
0x1968…1974 at000a = ╱57╱W╱ // 0x1972 @0xa
0x1968…1974 at000b = EOL // 0x1973 @0xb
0x1968…1974 }
0x1974…198e a6e5 2550 EXEC FEJL(15,G,K32$)
0x1974…198e LineComalBin {
0x1974…198e ptr = 0xa6e5 // 0x1974 @0x0
0x1974…198e lno = 0x09f6 // 0x1976 @0x2
0x1974…198e at0004 = ╱9d╱ EXEC ╱ // 0x1978 @0x4
0x1974…198e at0005 = ╱46╱F╱ // 0x1979 @0x5
0x1974…198e at0006 = ╱45╱E╱ // 0x197a @0x6
0x1974…198e at0007 = ╱4a╱J╱ // 0x197b @0x7
0x1974…198e at0008 = ╱4c╱L╱ // 0x197c @0x8
0x1974…198e at0009 = ╱ed╱(╱ // 0x197d @0x9
0x1974…198e at000a = ╱31╱1╱ // 0x197e @0xa
0x1974…198e at000b = ╱35╱5╱ // 0x197f @0xb
0x1974…198e at000c = ╱fe0000f004╱ // 0x1980 @0xc
0x1974…198e at0011 = ╱ec╱,╱ // 0x1985 @0x11
0x1974…198e at0012 = ╱47╱G╱ // 0x1986 @0x12
0x1974…198e at0013 = ╱ec╱,╱ // 0x1987 @0x13
0x1974…198e at0014 = ╱4b╱K╱ // 0x1988 @0x14
0x1974…198e at0015 = ╱33╱3╱ // 0x1989 @0x15
0x1974…198e at0016 = ╱32╱2╱ // 0x198a @0x16
0x1974…198e at0017 = ╱ef╱$╱ // 0x198b @0x17
0x1974…198e at0018 = ╱ee╱)╱ // 0x198c @0x18
0x1974…198e at0019 = EOL // 0x198d @0x19
0x1974…198e }
0x198e…1996 a6ed 2560 H=E
0x198e…1996 LineComalBin {
0x198e…1996 ptr = 0xa6ed // 0x198e @0x0
0x198e…1996 lno = 0x0a00 // 0x1990 @0x2
0x198e…1996 at0004 = ╱48╱H╱ // 0x1992 @0x4
0x198e…1996 at0005 = ╱dc╱=╱ // 0x1993 @0x5
0x198e…1996 at0006 = ╱45╱E╱ // 0x1994 @0x6
0x198e…1996 at0007 = EOL // 0x1995 @0x7
0x198e…1996 }
0x1996…19b3 a70a 2570 FOR I=E TO MPOSTANTAL3 DIV 40
0x1996…19b3 LineComalBin {
0x1996…19b3 ptr = 0xa70a // 0x1996 @0x0
0x1996…19b3 lno = 0x0a0a // 0x1998 @0x2
0x1996…19b3 at0004 = ╱83╱ FOR ╱ // 0x199a @0x4
0x1996…19b3 at0005 = ╱49╱I╱ // 0x199b @0x5
0x1996…19b3 at0006 = ╱dc╱=╱ // 0x199c @0x6
0x1996…19b3 at0007 = ╱45╱E╱ // 0x199d @0x7
0x1996…19b3 at0008 = ╱b7╱ TO ╱ // 0x199e @0x8
0x1996…19b3 at0009 = ╱4d╱M╱ // 0x199f @0x9
0x1996…19b3 at000a = ╱50╱P╱ // 0x19a0 @0xa
0x1996…19b3 at000b = ╱4f╱O╱ // 0x19a1 @0xb
0x1996…19b3 at000c = ╱53╱S╱ // 0x19a2 @0xc
0x1996…19b3 at000d = ╱54╱T╱ // 0x19a3 @0xd
0x1996…19b3 at000e = ╱41╱A╱ // 0x19a4 @0xe
0x1996…19b3 at000f = ╱4e╱N╱ // 0x19a5 @0xf
0x1996…19b3 at0010 = ╱54╱T╱ // 0x19a6 @0x10
0x1996…19b3 at0011 = ╱41╱A╱ // 0x19a7 @0x11
0x1996…19b3 at0012 = ╱4c╱L╱ // 0x19a8 @0x12
0x1996…19b3 at0013 = ╱33╱3╱ // 0x19a9 @0x13
0x1996…19b3 at0014 = ╱e7╱ DIV ╱ // 0x19aa @0x14
0x1996…19b3 at0015 = ╱34╱4╱ // 0x19ab @0x15
0x1996…19b3 at0016 = ╱30╱0╱ // 0x19ac @0x16
0x1996…19b3 at0017 = ╱fe0000a006╱ // 0x19ad @0x17
0x1996…19b3 at001c = EOL // 0x19b2 @0x1c
0x1996…19b3 }
0x19b3…19c4 a71b 2580 GET K31$,H:KONR
0x19b3…19c4 LineComalBin {
0x19b3…19c4 ptr = 0xa71b // 0x19b3 @0x0
0x19b3…19c4 lno = 0x0a14 // 0x19b5 @0x2
0x19b3…19c4 at0004 = ╱a9╱ GET ╱ // 0x19b7 @0x4
0x19b3…19c4 at0005 = ╱4b╱K╱ // 0x19b8 @0x5
0x19b3…19c4 at0006 = ╱33╱3╱ // 0x19b9 @0x6
0x19b3…19c4 at0007 = ╱31╱1╱ // 0x19ba @0x7
0x19b3…19c4 at0008 = ╱ef╱$╱ // 0x19bb @0x8
0x19b3…19c4 at0009 = ╱ec╱,╱ // 0x19bc @0x9
0x19b3…19c4 at000a = ╱48╱H╱ // 0x19bd @0xa
0x19b3…19c4 at000b = ╱f0╱:╱ // 0x19be @0xb
0x19b3…19c4 at000c = ╱4b╱K╱ // 0x19bf @0xc
0x19b3…19c4 at000d = ╱4f╱O╱ // 0x19c0 @0xd
0x19b3…19c4 at000e = ╱4e╱N╱ // 0x19c1 @0xe
0x19b3…19c4 at000f = ╱52╱R╱ // 0x19c2 @0xf
0x19b3…19c4 at0010 = EOL // 0x19c3 @0x10
0x19b3…19c4 }
0x19c4…19de a735 2590 EXEC FEJL(15,V,K31$)
0x19c4…19de LineComalBin {
0x19c4…19de ptr = 0xa735 // 0x19c4 @0x0
0x19c4…19de lno = 0x0a1e // 0x19c6 @0x2
0x19c4…19de at0004 = ╱9d╱ EXEC ╱ // 0x19c8 @0x4
0x19c4…19de at0005 = ╱46╱F╱ // 0x19c9 @0x5
0x19c4…19de at0006 = ╱45╱E╱ // 0x19ca @0x6
0x19c4…19de at0007 = ╱4a╱J╱ // 0x19cb @0x7
0x19c4…19de at0008 = ╱4c╱L╱ // 0x19cc @0x8
0x19c4…19de at0009 = ╱ed╱(╱ // 0x19cd @0x9
0x19c4…19de at000a = ╱31╱1╱ // 0x19ce @0xa
0x19c4…19de at000b = ╱35╱5╱ // 0x19cf @0xb
0x19c4…19de at000c = ╱fe0000f004╱ // 0x19d0 @0xc
0x19c4…19de at0011 = ╱ec╱,╱ // 0x19d5 @0x11
0x19c4…19de at0012 = ╱56╱V╱ // 0x19d6 @0x12
0x19c4…19de at0013 = ╱ec╱,╱ // 0x19d7 @0x13
0x19c4…19de at0014 = ╱4b╱K╱ // 0x19d8 @0x14
0x19c4…19de at0015 = ╱33╱3╱ // 0x19d9 @0x15
0x19c4…19de at0016 = ╱31╱1╱ // 0x19da @0x16
0x19c4…19de at0017 = ╱ef╱$╱ // 0x19db @0x17
0x19c4…19de at0018 = ╱ee╱)╱ // 0x19dc @0x18
0x19c4…19de at0019 = EOL // 0x19dd @0x19
0x19c4…19de }
0x19de…19f2 (86,) a749 2600 HTAB2(I,E)=KONR
0x19de…19f2 LineComalBin {
0x19de…19f2 ptr = 0xa749 // 0x19de @0x0
0x19de…19f2 lno = 0x0a28 // 0x19e0 @0x2
0x19de…19f2 at0004 = ╱48╱H╱ // 0x19e2 @0x4
0x19de…19f2 at0005 = ╱54╱T╱ // 0x19e3 @0x5
0x19de…19f2 at0006 = ╱41╱A╱ // 0x19e4 @0x6
0x19de…19f2 at0007 = ╱42╱B╱ // 0x19e5 @0x7
0x19de…19f2 at0008 = ╱32╱2╱ // 0x19e6 @0x8
0x19de…19f2 at0009 = ╱ed╱(╱ // 0x19e7 @0x9
0x19de…19f2 at000a = ╱49╱I╱ // 0x19e8 @0xa
0x19de…19f2 at000b = ╱ec╱,╱ // 0x19e9 @0xb
0x19de…19f2 at000c = ╱45╱E╱ // 0x19ea @0xc
0x19de…19f2 at000d = ╱ee╱)╱ // 0x19eb @0xd
0x19de…19f2 at000e = ╱dc╱=╱ // 0x19ec @0xe
0x19de…19f2 at000f = ╱4b╱K╱ // 0x19ed @0xf
0x19de…19f2 at0010 = ╱4f╱O╱ // 0x19ee @0x10
0x19de…19f2 at0011 = ╱4e╱N╱ // 0x19ef @0x11
0x19de…19f2 at0012 = ╱52╱R╱ // 0x19f0 @0x12
0x19de…19f2 at0013 = EOL // 0x19f1 @0x13
0x19de…19f2 }
0x19f2…1a02 a759 2610 FOR J=E TO 4
0x19f2…1a02 LineComalBin {
0x19f2…1a02 ptr = 0xa759 // 0x19f2 @0x0
0x19f2…1a02 lno = 0x0a32 // 0x19f4 @0x2
0x19f2…1a02 at0004 = ╱83╱ FOR ╱ // 0x19f6 @0x4
0x19f2…1a02 at0005 = ╱4a╱J╱ // 0x19f7 @0x5
0x19f2…1a02 at0006 = ╱dc╱=╱ // 0x19f8 @0x6
0x19f2…1a02 at0007 = ╱45╱E╱ // 0x19f9 @0x7
0x19f2…1a02 at0008 = ╱b7╱ TO ╱ // 0x19fa @0x8
0x19f2…1a02 at0009 = ╱34╱4╱ // 0x19fb @0x9
0x19f2…1a02 at000a = ╱fe00008003╱ // 0x19fc @0xa
0x19f2…1a02 at000f = EOL // 0x1a01 @0xf
0x19f2…1a02 }
0x1a02…1a13 a76a 2620 GET K31$,H:KONR
0x1a02…1a13 LineComalBin {
0x1a02…1a13 ptr = 0xa76a // 0x1a02 @0x0
0x1a02…1a13 lno = 0x0a3c // 0x1a04 @0x2
0x1a02…1a13 at0004 = ╱a9╱ GET ╱ // 0x1a06 @0x4
0x1a02…1a13 at0005 = ╱4b╱K╱ // 0x1a07 @0x5
0x1a02…1a13 at0006 = ╱33╱3╱ // 0x1a08 @0x6
0x1a02…1a13 at0007 = ╱31╱1╱ // 0x1a09 @0x7
0x1a02…1a13 at0008 = ╱ef╱$╱ // 0x1a0a @0x8
0x1a02…1a13 at0009 = ╱ec╱,╱ // 0x1a0b @0x9
0x1a02…1a13 at000a = ╱48╱H╱ // 0x1a0c @0xa
0x1a02…1a13 at000b = ╱f0╱:╱ // 0x1a0d @0xb
0x1a02…1a13 at000c = ╱4b╱K╱ // 0x1a0e @0xc
0x1a02…1a13 at000d = ╱4f╱O╱ // 0x1a0f @0xd
0x1a02…1a13 at000e = ╱4e╱N╱ // 0x1a10 @0xe
0x1a02…1a13 at000f = ╱52╱R╱ // 0x1a11 @0xf
0x1a02…1a13 at0010 = EOL // 0x1a12 @0x10
0x1a02…1a13 }
0x1a13…1a32 a789 2630 EXEC FEJL(15,4,K31$)
0x1a13…1a32 LineComalBin {
0x1a13…1a32 ptr = 0xa789 // 0x1a13 @0x0
0x1a13…1a32 lno = 0x0a46 // 0x1a15 @0x2
0x1a13…1a32 at0004 = ╱9d╱ EXEC ╱ // 0x1a17 @0x4
0x1a13…1a32 at0005 = ╱46╱F╱ // 0x1a18 @0x5
0x1a13…1a32 at0006 = ╱45╱E╱ // 0x1a19 @0x6
0x1a13…1a32 at0007 = ╱4a╱J╱ // 0x1a1a @0x7
0x1a13…1a32 at0008 = ╱4c╱L╱ // 0x1a1b @0x8
0x1a13…1a32 at0009 = ╱ed╱(╱ // 0x1a1c @0x9
0x1a13…1a32 at000a = ╱31╱1╱ // 0x1a1d @0xa
0x1a13…1a32 at000b = ╱35╱5╱ // 0x1a1e @0xb
0x1a13…1a32 at000c = ╱fe0000f004╱ // 0x1a1f @0xc
0x1a13…1a32 at0011 = ╱ec╱,╱ // 0x1a24 @0x11
0x1a13…1a32 at0012 = ╱34╱4╱ // 0x1a25 @0x12
0x1a13…1a32 at0013 = ╱fe00008003╱ // 0x1a26 @0x13
0x1a13…1a32 at0018 = ╱ec╱,╱ // 0x1a2b @0x18
0x1a13…1a32 at0019 = ╱4b╱K╱ // 0x1a2c @0x19
0x1a13…1a32 at001a = ╱33╱3╱ // 0x1a2d @0x1a
0x1a13…1a32 at001b = ╱31╱1╱ // 0x1a2e @0x1b
0x1a13…1a32 at001c = ╱ef╱$╱ // 0x1a2f @0x1c
0x1a13…1a32 at001d = ╱ee╱)╱ // 0x1a30 @0x1d
0x1a13…1a32 at001e = EOL // 0x1a31 @0x1e
0x1a13…1a32 }
0x1a32…1a46 a79d 2640 UTAB2(J,E)=KONR
0x1a32…1a46 LineComalBin {
0x1a32…1a46 ptr = 0xa79d // 0x1a32 @0x0
0x1a32…1a46 lno = 0x0a50 // 0x1a34 @0x2
0x1a32…1a46 at0004 = ╱55╱U╱ // 0x1a36 @0x4
0x1a32…1a46 at0005 = ╱54╱T╱ // 0x1a37 @0x5
0x1a32…1a46 at0006 = ╱41╱A╱ // 0x1a38 @0x6
0x1a32…1a46 at0007 = ╱42╱B╱ // 0x1a39 @0x7
0x1a32…1a46 at0008 = ╱32╱2╱ // 0x1a3a @0x8
0x1a32…1a46 at0009 = ╱ed╱(╱ // 0x1a3b @0x9
0x1a32…1a46 at000a = ╱4a╱J╱ // 0x1a3c @0xa
0x1a32…1a46 at000b = ╱ec╱,╱ // 0x1a3d @0xb
0x1a32…1a46 at000c = ╱45╱E╱ // 0x1a3e @0xc
0x1a32…1a46 at000d = ╱ee╱)╱ // 0x1a3f @0xd
0x1a32…1a46 at000e = ╱dc╱=╱ // 0x1a40 @0xe
0x1a32…1a46 at000f = ╱4b╱K╱ // 0x1a41 @0xf
0x1a32…1a46 at0010 = ╱4f╱O╱ // 0x1a42 @0x10
0x1a32…1a46 at0011 = ╱4e╱N╱ // 0x1a43 @0x11
0x1a32…1a46 at0012 = ╱52╱R╱ // 0x1a44 @0x12
0x1a32…1a46 at0013 = EOL // 0x1a45 @0x13
0x1a32…1a46 }
0x1a46…1a50 a7a7 2650 H=H+W
0x1a46…1a50 LineComalBin {
0x1a46…1a50 ptr = 0xa7a7 // 0x1a46 @0x0
0x1a46…1a50 lno = 0x0a5a // 0x1a48 @0x2
0x1a46…1a50 at0004 = ╱48╱H╱ // 0x1a4a @0x4
0x1a46…1a50 at0005 = ╱dc╱=╱ // 0x1a4b @0x5
0x1a46…1a50 at0006 = ╱48╱H╱ // 0x1a4c @0x6
0x1a46…1a50 at0007 = ╱e2╱+╱ // 0x1a4d @0x7
0x1a46…1a50 at0008 = ╱57╱W╱ // 0x1a4e @0x8
0x1a46…1a50 at0009 = EOL // 0x1a4f @0x9
0x1a46…1a50 }
0x1a50…1a61 a7b8 2660 GET K31$,H:KONR
0x1a50…1a61 LineComalBin {
0x1a50…1a61 ptr = 0xa7b8 // 0x1a50 @0x0
0x1a50…1a61 lno = 0x0a64 // 0x1a52 @0x2
0x1a50…1a61 at0004 = ╱a9╱ GET ╱ // 0x1a54 @0x4
0x1a50…1a61 at0005 = ╱4b╱K╱ // 0x1a55 @0x5
0x1a50…1a61 at0006 = ╱33╱3╱ // 0x1a56 @0x6
0x1a50…1a61 at0007 = ╱31╱1╱ // 0x1a57 @0x7
0x1a50…1a61 at0008 = ╱ef╱$╱ // 0x1a58 @0x8
0x1a50…1a61 at0009 = ╱ec╱,╱ // 0x1a59 @0x9
0x1a50…1a61 at000a = ╱48╱H╱ // 0x1a5a @0xa
0x1a50…1a61 at000b = ╱f0╱:╱ // 0x1a5b @0xb
0x1a50…1a61 at000c = ╱4b╱K╱ // 0x1a5c @0xc
0x1a50…1a61 at000d = ╱4f╱O╱ // 0x1a5d @0xd
0x1a50…1a61 at000e = ╱4e╱N╱ // 0x1a5e @0xe
0x1a50…1a61 at000f = ╱52╱R╱ // 0x1a5f @0xf
0x1a50…1a61 at0010 = EOL // 0x1a60 @0x10
0x1a50…1a61 }
0x1a61…1a80 a7d7 2670 EXEC FEJL(15,5,K31$)
0x1a61…1a80 LineComalBin {
0x1a61…1a80 ptr = 0xa7d7 // 0x1a61 @0x0
0x1a61…1a80 lno = 0x0a6e // 0x1a63 @0x2
0x1a61…1a80 at0004 = ╱9d╱ EXEC ╱ // 0x1a65 @0x4
0x1a61…1a80 at0005 = ╱46╱F╱ // 0x1a66 @0x5
0x1a61…1a80 at0006 = ╱45╱E╱ // 0x1a67 @0x6
0x1a61…1a80 at0007 = ╱4a╱J╱ // 0x1a68 @0x7
0x1a61…1a80 at0008 = ╱4c╱L╱ // 0x1a69 @0x8
0x1a61…1a80 at0009 = ╱ed╱(╱ // 0x1a6a @0x9
0x1a61…1a80 at000a = ╱31╱1╱ // 0x1a6b @0xa
0x1a61…1a80 at000b = ╱35╱5╱ // 0x1a6c @0xb
0x1a61…1a80 at000c = ╱fe0000f004╱ // 0x1a6d @0xc
0x1a61…1a80 at0011 = ╱ec╱,╱ // 0x1a72 @0x11
0x1a61…1a80 at0012 = ╱35╱5╱ // 0x1a73 @0x12
0x1a61…1a80 at0013 = ╱fe0000a003╱ // 0x1a74 @0x13
0x1a61…1a80 at0018 = ╱ec╱,╱ // 0x1a79 @0x18
0x1a61…1a80 at0019 = ╱4b╱K╱ // 0x1a7a @0x19
0x1a61…1a80 at001a = ╱33╱3╱ // 0x1a7b @0x1a
0x1a61…1a80 at001b = ╱31╱1╱ // 0x1a7c @0x1b
0x1a61…1a80 at001c = ╱ef╱$╱ // 0x1a7d @0x1c
0x1a61…1a80 at001d = ╱ee╱)╱ // 0x1a7e @0x1d
0x1a61…1a80 at001e = EOL // 0x1a7f @0x1e
0x1a61…1a80 }
0x1a80…1a94 a7eb 2680 UTAB2(J,G)=KONR
0x1a80…1a94 LineComalBin {
0x1a80…1a94 ptr = 0xa7eb // 0x1a80 @0x0
0x1a80…1a94 lno = 0x0a78 // 0x1a82 @0x2
0x1a80…1a94 at0004 = ╱55╱U╱ // 0x1a84 @0x4
0x1a80…1a94 at0005 = ╱54╱T╱ // 0x1a85 @0x5
0x1a80…1a94 at0006 = ╱41╱A╱ // 0x1a86 @0x6
0x1a80…1a94 at0007 = ╱42╱B╱ // 0x1a87 @0x7
0x1a80…1a94 at0008 = ╱32╱2╱ // 0x1a88 @0x8
0x1a80…1a94 at0009 = ╱ed╱(╱ // 0x1a89 @0x9
0x1a80…1a94 at000a = ╱4a╱J╱ // 0x1a8a @0xa
0x1a80…1a94 at000b = ╱ec╱,╱ // 0x1a8b @0xb
0x1a80…1a94 at000c = ╱47╱G╱ // 0x1a8c @0xc
0x1a80…1a94 at000d = ╱ee╱)╱ // 0x1a8d @0xd
0x1a80…1a94 at000e = ╱dc╱=╱ // 0x1a8e @0xe
0x1a80…1a94 at000f = ╱4b╱K╱ // 0x1a8f @0xf
0x1a80…1a94 at0010 = ╱4f╱O╱ // 0x1a90 @0x10
0x1a80…1a94 at0011 = ╱4e╱N╱ // 0x1a91 @0x11
0x1a80…1a94 at0012 = ╱52╱R╱ // 0x1a92 @0x12
0x1a80…1a94 at0013 = EOL // 0x1a93 @0x13
0x1a80…1a94 }
0x1a94…1a9e a7f5 2690 H=H+E
0x1a94…1a9e LineComalBin {
0x1a94…1a9e ptr = 0xa7f5 // 0x1a94 @0x0
0x1a94…1a9e lno = 0x0a82 // 0x1a96 @0x2
0x1a94…1a9e at0004 = ╱48╱H╱ // 0x1a98 @0x4
0x1a94…1a9e at0005 = ╱dc╱=╱ // 0x1a99 @0x5
0x1a94…1a9e at0006 = ╱48╱H╱ // 0x1a9a @0x6
0x1a94…1a9e at0007 = ╱e2╱+╱ // 0x1a9b @0x7
0x1a94…1a9e at0008 = ╱45╱E╱ // 0x1a9c @0x8
0x1a94…1a9e at0009 = EOL // 0x1a9d @0x9
0x1a94…1a9e }
0x1a9e…1aa5 a7fc 2700 NEXT J
0x1a9e…1aa5 LineComalBin {
0x1a9e…1aa5 ptr = 0xa7fc // 0x1a9e @0x0
0x1a9e…1aa5 lno = 0x0a8c // 0x1aa0 @0x2
0x1a9e…1aa5 at0004 = ╱84╱ NEXT ╱ // 0x1aa2 @0x4
0x1a9e…1aa5 at0005 = ╱4a╱J╱ // 0x1aa3 @0x5
0x1a9e…1aa5 at0006 = EOL // 0x1aa4 @0x6
0x1a9e…1aa5 }
0x1aa5…1ab9 a810 2710 HTAB2(I,G)=KONR
0x1aa5…1ab9 LineComalBin {
0x1aa5…1ab9 ptr = 0xa810 // 0x1aa5 @0x0
0x1aa5…1ab9 lno = 0x0a96 // 0x1aa7 @0x2
0x1aa5…1ab9 at0004 = ╱48╱H╱ // 0x1aa9 @0x4
0x1aa5…1ab9 at0005 = ╱54╱T╱ // 0x1aaa @0x5
0x1aa5…1ab9 at0006 = ╱41╱A╱ // 0x1aab @0x6
0x1aa5…1ab9 at0007 = ╱42╱B╱ // 0x1aac @0x7
0x1aa5…1ab9 at0008 = ╱32╱2╱ // 0x1aad @0x8
0x1aa5…1ab9 at0009 = ╱ed╱(╱ // 0x1aae @0x9
0x1aa5…1ab9 at000a = ╱49╱I╱ // 0x1aaf @0xa
0x1aa5…1ab9 at000b = ╱ec╱,╱ // 0x1ab0 @0xb
0x1aa5…1ab9 at000c = ╱47╱G╱ // 0x1ab1 @0xc
0x1aa5…1ab9 at000d = ╱ee╱)╱ // 0x1ab2 @0xd
0x1aa5…1ab9 at000e = ╱dc╱=╱ // 0x1ab3 @0xe
0x1aa5…1ab9 at000f = ╱4b╱K╱ // 0x1ab4 @0xf
0x1aa5…1ab9 at0010 = ╱4f╱O╱ // 0x1ab5 @0x10
0x1aa5…1ab9 at0011 = ╱4e╱N╱ // 0x1ab6 @0x11
0x1aa5…1ab9 at0012 = ╱52╱R╱ // 0x1ab7 @0x12
0x1aa5…1ab9 at0013 = EOL // 0x1ab8 @0x13
0x1aa5…1ab9 }
0x1ab9…1ade a835 2720 EXEC UNDUD(K32$,I,UTAB2,MPOSTANTAL3)
0x1ab9…1ade LineComalBin {
0x1ab9…1ade ptr = 0xa835 // 0x1ab9 @0x0
0x1ab9…1ade lno = 0x0aa0 // 0x1abb @0x2
0x1ab9…1ade at0004 = ╱9d╱ EXEC ╱ // 0x1abd @0x4
0x1ab9…1ade at0005 = ╱55╱U╱ // 0x1abe @0x5
0x1ab9…1ade at0006 = ╱4e╱N╱ // 0x1abf @0x6
0x1ab9…1ade at0007 = ╱44╱D╱ // 0x1ac0 @0x7
0x1ab9…1ade at0008 = ╱55╱U╱ // 0x1ac1 @0x8
0x1ab9…1ade at0009 = ╱44╱D╱ // 0x1ac2 @0x9
0x1ab9…1ade at000a = ╱ed╱(╱ // 0x1ac3 @0xa
0x1ab9…1ade at000b = ╱4b╱K╱ // 0x1ac4 @0xb
0x1ab9…1ade at000c = ╱33╱3╱ // 0x1ac5 @0xc
0x1ab9…1ade at000d = ╱32╱2╱ // 0x1ac6 @0xd
0x1ab9…1ade at000e = ╱ef╱$╱ // 0x1ac7 @0xe
0x1ab9…1ade at000f = ╱ec╱,╱ // 0x1ac8 @0xf
0x1ab9…1ade at0010 = ╱49╱I╱ // 0x1ac9 @0x10
0x1ab9…1ade at0011 = ╱ec╱,╱ // 0x1aca @0x11
0x1ab9…1ade at0012 = ╱55╱U╱ // 0x1acb @0x12
0x1ab9…1ade at0013 = ╱54╱T╱ // 0x1acc @0x13
0x1ab9…1ade at0014 = ╱41╱A╱ // 0x1acd @0x14
0x1ab9…1ade at0015 = ╱42╱B╱ // 0x1ace @0x15
0x1ab9…1ade at0016 = ╱32╱2╱ // 0x1acf @0x16
0x1ab9…1ade at0017 = ╱ec╱,╱ // 0x1ad0 @0x17
0x1ab9…1ade at0018 = ╱4d╱M╱ // 0x1ad1 @0x18
0x1ab9…1ade at0019 = ╱50╱P╱ // 0x1ad2 @0x19
0x1ab9…1ade at001a = ╱4f╱O╱ // 0x1ad3 @0x1a
0x1ab9…1ade at001b = ╱53╱S╱ // 0x1ad4 @0x1b
0x1ab9…1ade at001c = ╱54╱T╱ // 0x1ad5 @0x1c
0x1ab9…1ade at001d = ╱41╱A╱ // 0x1ad6 @0x1d
0x1ab9…1ade at001e = ╱4e╱N╱ // 0x1ad7 @0x1e
0x1ab9…1ade at001f = ╱54╱T╱ // 0x1ad8 @0x1f
0x1ab9…1ade at0020 = ╱41╱A╱ // 0x1ad9 @0x20
0x1ab9…1ade at0021 = ╱4c╱L╱ // 0x1ada @0x21
0x1ab9…1ade at0022 = ╱33╱3╱ // 0x1adb @0x22
0x1ab9…1ade at0023 = ╱ee╱)╱ // 0x1adc @0x23
0x1ab9…1ade at0024 = EOL // 0x1add @0x24
0x1ab9…1ade }
0x1ade…1ae5 a83c 2730 NEXT I
0x1ade…1ae5 LineComalBin {
0x1ade…1ae5 ptr = 0xa83c // 0x1ade @0x0
0x1ade…1ae5 lno = 0x0aaa // 0x1ae0 @0x2
0x1ade…1ae5 at0004 = ╱84╱ NEXT ╱ // 0x1ae2 @0x4
0x1ade…1ae5 at0005 = ╱49╱I╱ // 0x1ae3 @0x5
0x1ade…1ae5 at0006 = EOL // 0x1ae4 @0x6
0x1ade…1ae5 }
0x1ae5…1b08 a85f 2740 EXEC HOVUD(K32$,MPOSTANTAL3,HTAB2)
0x1ae5…1b08 LineComalBin {
0x1ae5…1b08 ptr = 0xa85f // 0x1ae5 @0x0
0x1ae5…1b08 lno = 0x0ab4 // 0x1ae7 @0x2
0x1ae5…1b08 at0004 = ╱9d╱ EXEC ╱ // 0x1ae9 @0x4
0x1ae5…1b08 at0005 = ╱48╱H╱ // 0x1aea @0x5
0x1ae5…1b08 at0006 = ╱4f╱O╱ // 0x1aeb @0x6
0x1ae5…1b08 at0007 = ╱56╱V╱ // 0x1aec @0x7
0x1ae5…1b08 at0008 = ╱55╱U╱ // 0x1aed @0x8
0x1ae5…1b08 at0009 = ╱44╱D╱ // 0x1aee @0x9
0x1ae5…1b08 at000a = ╱ed╱(╱ // 0x1aef @0xa
0x1ae5…1b08 at000b = ╱4b╱K╱ // 0x1af0 @0xb
0x1ae5…1b08 at000c = ╱33╱3╱ // 0x1af1 @0xc
0x1ae5…1b08 at000d = ╱32╱2╱ // 0x1af2 @0xd
0x1ae5…1b08 at000e = ╱ef╱$╱ // 0x1af3 @0xe
0x1ae5…1b08 at000f = ╱ec╱,╱ // 0x1af4 @0xf
0x1ae5…1b08 at0010 = ╱4d╱M╱ // 0x1af5 @0x10
0x1ae5…1b08 at0011 = ╱50╱P╱ // 0x1af6 @0x11
0x1ae5…1b08 at0012 = ╱4f╱O╱ // 0x1af7 @0x12
0x1ae5…1b08 at0013 = ╱53╱S╱ // 0x1af8 @0x13
0x1ae5…1b08 at0014 = ╱54╱T╱ // 0x1af9 @0x14
0x1ae5…1b08 at0015 = ╱41╱A╱ // 0x1afa @0x15
0x1ae5…1b08 at0016 = ╱4e╱N╱ // 0x1afb @0x16
0x1ae5…1b08 at0017 = ╱54╱T╱ // 0x1afc @0x17
0x1ae5…1b08 at0018 = ╱41╱A╱ // 0x1afd @0x18
0x1ae5…1b08 at0019 = ╱4c╱L╱ // 0x1afe @0x19
0x1ae5…1b08 at001a = ╱33╱3╱ // 0x1aff @0x1a
0x1ae5…1b08 at001b = ╱ec╱,╱ // 0x1b00 @0x1b
0x1ae5…1b08 at001c = ╱48╱H╱ // 0x1b01 @0x1c
0x1ae5…1b08 at001d = ╱54╱T╱ // 0x1b02 @0x1d
0x1ae5…1b08 at001e = ╱41╱A╱ // 0x1b03 @0x1e
0x1ae5…1b08 at001f = ╱42╱B╱ // 0x1b04 @0x1f
0x1ae5…1b08 at0020 = ╱32╱2╱ // 0x1b05 @0x20
0x1ae5…1b08 at0021 = ╱ee╱)╱ // 0x1b06 @0x21
0x1ae5…1b08 at0022 = EOL // 0x1b07 @0x22
0x1ae5…1b08 }
0x1b08…1b12 a869 2750 CLOSE K31$
0x1b08…1b12 LineComalBin {
0x1b08…1b12 ptr = 0xa869 // 0x1b08 @0x0
0x1b08…1b12 lno = 0x0abe // 0x1b0a @0x2
0x1b08…1b12 at0004 = ╱a8╱ CLOSE ╱ // 0x1b0c @0x4
0x1b08…1b12 at0005 = ╱4b╱K╱ // 0x1b0d @0x5
0x1b08…1b12 at0006 = ╱33╱3╱ // 0x1b0e @0x6
0x1b08…1b12 at0007 = ╱31╱1╱ // 0x1b0f @0x7
0x1b08…1b12 at0008 = ╱ef╱$╱ // 0x1b10 @0x8
0x1b08…1b12 at0009 = EOL // 0x1b11 @0x9
0x1b08…1b12 }
0x1b12…1b31 (90,) a888 2760 EXEC FEJL(15,6,K31$)
0x1b12…1b31 LineComalBin {
0x1b12…1b31 ptr = 0xa888 // 0x1b12 @0x0
0x1b12…1b31 lno = 0x0ac8 // 0x1b14 @0x2
0x1b12…1b31 at0004 = ╱9d╱ EXEC ╱ // 0x1b16 @0x4
0x1b12…1b31 at0005 = ╱46╱F╱ // 0x1b17 @0x5
0x1b12…1b31 at0006 = ╱45╱E╱ // 0x1b18 @0x6
0x1b12…1b31 at0007 = ╱4a╱J╱ // 0x1b19 @0x7
0x1b12…1b31 at0008 = ╱4c╱L╱ // 0x1b1a @0x8
0x1b12…1b31 at0009 = ╱ed╱(╱ // 0x1b1b @0x9
0x1b12…1b31 at000a = ╱31╱1╱ // 0x1b1c @0xa
0x1b12…1b31 at000b = ╱35╱5╱ // 0x1b1d @0xb
0x1b12…1b31 at000c = ╱fe0000f004╱ // 0x1b1e @0xc
0x1b12…1b31 at0011 = ╱ec╱,╱ // 0x1b23 @0x11
0x1b12…1b31 at0012 = ╱36╱6╱ // 0x1b24 @0x12
0x1b12…1b31 at0013 = ╱fe0000c003╱ // 0x1b25 @0x13
0x1b12…1b31 at0018 = ╱ec╱,╱ // 0x1b2a @0x18
0x1b12…1b31 at0019 = ╱4b╱K╱ // 0x1b2b @0x19
0x1b12…1b31 at001a = ╱33╱3╱ // 0x1b2c @0x1a
0x1b12…1b31 at001b = ╱31╱1╱ // 0x1b2d @0x1b
0x1b12…1b31 at001c = ╱ef╱$╱ // 0x1b2e @0x1c
0x1b12…1b31 at001d = ╱ee╱)╱ // 0x1b2f @0x1d
0x1b12…1b31 at001e = EOL // 0x1b30 @0x1e
0x1b12…1b31 }
0x1b31…1b3b a892 2770 CLOSE K32$
0x1b31…1b3b LineComalBin {
0x1b31…1b3b ptr = 0xa892 // 0x1b31 @0x0
0x1b31…1b3b lno = 0x0ad2 // 0x1b33 @0x2
0x1b31…1b3b at0004 = ╱a8╱ CLOSE ╱ // 0x1b35 @0x4
0x1b31…1b3b at0005 = ╱4b╱K╱ // 0x1b36 @0x5
0x1b31…1b3b at0006 = ╱33╱3╱ // 0x1b37 @0x6
0x1b31…1b3b at0007 = ╱32╱2╱ // 0x1b38 @0x7
0x1b31…1b3b at0008 = ╱ef╱$╱ // 0x1b39 @0x8
0x1b31…1b3b at0009 = EOL // 0x1b3a @0x9
0x1b31…1b3b }
0x1b3b…1b5a a8b1 2780 EXEC FEJL(15,7,K32$)
0x1b3b…1b5a LineComalBin {
0x1b3b…1b5a ptr = 0xa8b1 // 0x1b3b @0x0
0x1b3b…1b5a lno = 0x0adc // 0x1b3d @0x2
0x1b3b…1b5a at0004 = ╱9d╱ EXEC ╱ // 0x1b3f @0x4
0x1b3b…1b5a at0005 = ╱46╱F╱ // 0x1b40 @0x5
0x1b3b…1b5a at0006 = ╱45╱E╱ // 0x1b41 @0x6
0x1b3b…1b5a at0007 = ╱4a╱J╱ // 0x1b42 @0x7
0x1b3b…1b5a at0008 = ╱4c╱L╱ // 0x1b43 @0x8
0x1b3b…1b5a at0009 = ╱ed╱(╱ // 0x1b44 @0x9
0x1b3b…1b5a at000a = ╱31╱1╱ // 0x1b45 @0xa
0x1b3b…1b5a at000b = ╱35╱5╱ // 0x1b46 @0xb
0x1b3b…1b5a at000c = ╱fe0000f004╱ // 0x1b47 @0xc
0x1b3b…1b5a at0011 = ╱ec╱,╱ // 0x1b4c @0x11
0x1b3b…1b5a at0012 = ╱37╱7╱ // 0x1b4d @0x12
0x1b3b…1b5a at0013 = ╱fe0000e003╱ // 0x1b4e @0x13
0x1b3b…1b5a at0018 = ╱ec╱,╱ // 0x1b53 @0x18
0x1b3b…1b5a at0019 = ╱4b╱K╱ // 0x1b54 @0x19
0x1b3b…1b5a at001a = ╱33╱3╱ // 0x1b55 @0x1a
0x1b3b…1b5a at001b = ╱32╱2╱ // 0x1b56 @0x1b
0x1b3b…1b5a at001c = ╱ef╱$╱ // 0x1b57 @0x1c
0x1b3b…1b5a at001d = ╱ee╱)╱ // 0x1b58 @0x1d
0x1b3b…1b5a at001e = EOL // 0x1b59 @0x1e
0x1b3b…1b5a }
0x1b5a…1b68 a8bf 2790 ENDPROC ;TABINIT
0x1b5a…1b68 LineComalBin {
0x1b5a…1b68 ptr = 0xa8bf // 0x1b5a @0x0
0x1b5a…1b68 lno = 0x0ae6 // 0x1b5c @0x2
0x1b5a…1b68 at0004 = ╱9f╱ ENDPROC ╱ // 0x1b5e @0x4
0x1b5a…1b68 at0005 = ╱eb╱;╱ // 0x1b5f @0x5
0x1b5a…1b68 at0006 = ╱54╱T╱ // 0x1b60 @0x6
0x1b5a…1b68 at0007 = ╱41╱A╱ // 0x1b61 @0x7
0x1b5a…1b68 at0008 = ╱42╱B╱ // 0x1b62 @0x8
0x1b5a…1b68 at0009 = ╱49╱I╱ // 0x1b63 @0x9
0x1b5a…1b68 at000a = ╱4e╱N╱ // 0x1b64 @0xa
0x1b5a…1b68 at000b = ╱49╱I╱ // 0x1b65 @0xb
0x1b5a…1b68 at000c = ╱54╱T╱ // 0x1b66 @0xc
0x1b5a…1b68 at000d = EOL // 0x1b67 @0xd
0x1b5a…1b68 }
0x1b68…1b85 a8dc 2800 PROC UNDUD(V3,U2,T,MPOSTANT)
0x1b68…1b85 LineComalBin {
0x1b68…1b85 ptr = 0xa8dc // 0x1b68 @0x0
0x1b68…1b85 lno = 0x0af0 // 0x1b6a @0x2
0x1b68…1b85 at0004 = ╱9e╱ PROC ╱ // 0x1b6c @0x4
0x1b68…1b85 at0005 = ╱55╱U╱ // 0x1b6d @0x5
0x1b68…1b85 at0006 = ╱4e╱N╱ // 0x1b6e @0x6
0x1b68…1b85 at0007 = ╱44╱D╱ // 0x1b6f @0x7
0x1b68…1b85 at0008 = ╱55╱U╱ // 0x1b70 @0x8
0x1b68…1b85 at0009 = ╱44╱D╱ // 0x1b71 @0x9
0x1b68…1b85 at000a = ╱ed╱(╱ // 0x1b72 @0xa
0x1b68…1b85 at000b = ╱56╱V╱ // 0x1b73 @0xb
0x1b68…1b85 at000c = ╱33╱3╱ // 0x1b74 @0xc
0x1b68…1b85 at000d = ╱ec╱,╱ // 0x1b75 @0xd
0x1b68…1b85 at000e = ╱55╱U╱ // 0x1b76 @0xe
0x1b68…1b85 at000f = ╱32╱2╱ // 0x1b77 @0xf
0x1b68…1b85 at0010 = ╱ec╱,╱ // 0x1b78 @0x10
0x1b68…1b85 at0011 = ╱54╱T╱ // 0x1b79 @0x11
0x1b68…1b85 at0012 = ╱ec╱,╱ // 0x1b7a @0x12
0x1b68…1b85 at0013 = ╱4d╱M╱ // 0x1b7b @0x13
0x1b68…1b85 at0014 = ╱50╱P╱ // 0x1b7c @0x14
0x1b68…1b85 at0015 = ╱4f╱O╱ // 0x1b7d @0x15
0x1b68…1b85 at0016 = ╱53╱S╱ // 0x1b7e @0x16
0x1b68…1b85 at0017 = ╱54╱T╱ // 0x1b7f @0x17
0x1b68…1b85 at0018 = ╱41╱A╱ // 0x1b80 @0x18
0x1b68…1b85 at0019 = ╱4e╱N╱ // 0x1b81 @0x19
0x1b68…1b85 at001a = ╱54╱T╱ // 0x1b82 @0x1a
0x1b68…1b85 at001b = ╱ee╱)╱ // 0x1b83 @0x1b
0x1b68…1b85 at001c = EOL // 0x1b84 @0x1c
0x1b68…1b85 }
0x1b85…1ba1 a8f8 2810 U3=U2+MPOSTANT DIV 160
0x1b85…1ba1 LineComalBin {
0x1b85…1ba1 ptr = 0xa8f8 // 0x1b85 @0x0
0x1b85…1ba1 lno = 0x0afa // 0x1b87 @0x2
0x1b85…1ba1 at0004 = ╱55╱U╱ // 0x1b89 @0x4
0x1b85…1ba1 at0005 = ╱33╱3╱ // 0x1b8a @0x5
0x1b85…1ba1 at0006 = ╱dc╱=╱ // 0x1b8b @0x6
0x1b85…1ba1 at0007 = ╱55╱U╱ // 0x1b8c @0x7
0x1b85…1ba1 at0008 = ╱32╱2╱ // 0x1b8d @0x8
0x1b85…1ba1 at0009 = ╱e2╱+╱ // 0x1b8e @0x9
0x1b85…1ba1 at000a = ╱4d╱M╱ // 0x1b8f @0xa
0x1b85…1ba1 at000b = ╱50╱P╱ // 0x1b90 @0xb
0x1b85…1ba1 at000c = ╱4f╱O╱ // 0x1b91 @0xc
0x1b85…1ba1 at000d = ╱53╱S╱ // 0x1b92 @0xd
0x1b85…1ba1 at000e = ╱54╱T╱ // 0x1b93 @0xe
0x1b85…1ba1 at000f = ╱41╱A╱ // 0x1b94 @0xf
0x1b85…1ba1 at0010 = ╱4e╱N╱ // 0x1b95 @0x10
0x1b85…1ba1 at0011 = ╱54╱T╱ // 0x1b96 @0x11
0x1b85…1ba1 at0012 = ╱e7╱ DIV ╱ // 0x1b97 @0x12
0x1b85…1ba1 at0013 = ╱31╱1╱ // 0x1b98 @0x13
0x1b85…1ba1 at0014 = ╱36╱6╱ // 0x1b99 @0x14
0x1b85…1ba1 at0015 = ╱30╱0╱ // 0x1b9a @0x15
0x1b85…1ba1 at0016 = ╱fe0000a008╱ // 0x1b9b @0x16
0x1b85…1ba1 at001b = EOL // 0x1ba0 @0x1b
0x1b85…1ba1 }
0x1ba1…1bef a946 2820 PUT V3$,U3:T(E,E),T(E,G),T(G,E),T(G,G),T(V,E),T(V,G),T(4,E),T(4,G)
0x1ba1…1bef LineComalBin {
0x1ba1…1bef ptr = 0xa946 // 0x1ba1 @0x0
0x1ba1…1bef lno = 0x0b04 // 0x1ba3 @0x2
0x1ba1…1bef at0004 = ╱aa╱ PUT ╱ // 0x1ba5 @0x4
0x1ba1…1bef at0005 = ╱56╱V╱ // 0x1ba6 @0x5
0x1ba1…1bef at0006 = ╱33╱3╱ // 0x1ba7 @0x6
0x1ba1…1bef at0007 = ╱ef╱$╱ // 0x1ba8 @0x7
0x1ba1…1bef at0008 = ╱ec╱,╱ // 0x1ba9 @0x8
0x1ba1…1bef at0009 = ╱55╱U╱ // 0x1baa @0x9
0x1ba1…1bef at000a = ╱33╱3╱ // 0x1bab @0xa
0x1ba1…1bef at000b = ╱f0╱:╱ // 0x1bac @0xb
0x1ba1…1bef at000c = ╱54╱T╱ // 0x1bad @0xc
0x1ba1…1bef at000d = ╱ed╱(╱ // 0x1bae @0xd
0x1ba1…1bef at000e = ╱45╱E╱ // 0x1baf @0xe
0x1ba1…1bef at000f = ╱ec╱,╱ // 0x1bb0 @0xf
0x1ba1…1bef at0010 = ╱45╱E╱ // 0x1bb1 @0x10
0x1ba1…1bef at0011 = ╱ee╱)╱ // 0x1bb2 @0x11
0x1ba1…1bef at0012 = ╱ec╱,╱ // 0x1bb3 @0x12
0x1ba1…1bef at0013 = ╱54╱T╱ // 0x1bb4 @0x13
0x1ba1…1bef at0014 = ╱ed╱(╱ // 0x1bb5 @0x14
0x1ba1…1bef at0015 = ╱45╱E╱ // 0x1bb6 @0x15
0x1ba1…1bef at0016 = ╱ec╱,╱ // 0x1bb7 @0x16
0x1ba1…1bef at0017 = ╱47╱G╱ // 0x1bb8 @0x17
0x1ba1…1bef at0018 = ╱ee╱)╱ // 0x1bb9 @0x18
0x1ba1…1bef at0019 = ╱ec╱,╱ // 0x1bba @0x19
0x1ba1…1bef at001a = ╱54╱T╱ // 0x1bbb @0x1a
0x1ba1…1bef at001b = ╱ed╱(╱ // 0x1bbc @0x1b
0x1ba1…1bef at001c = ╱47╱G╱ // 0x1bbd @0x1c
0x1ba1…1bef at001d = ╱ec╱,╱ // 0x1bbe @0x1d
0x1ba1…1bef at001e = ╱45╱E╱ // 0x1bbf @0x1e
0x1ba1…1bef at001f = ╱ee╱)╱ // 0x1bc0 @0x1f
0x1ba1…1bef at0020 = ╱ec╱,╱ // 0x1bc1 @0x20
0x1ba1…1bef at0021 = ╱54╱T╱ // 0x1bc2 @0x21
0x1ba1…1bef at0022 = ╱ed╱(╱ // 0x1bc3 @0x22
0x1ba1…1bef at0023 = ╱47╱G╱ // 0x1bc4 @0x23
0x1ba1…1bef at0024 = ╱ec╱,╱ // 0x1bc5 @0x24
0x1ba1…1bef at0025 = ╱47╱G╱ // 0x1bc6 @0x25
0x1ba1…1bef at0026 = ╱ee╱)╱ // 0x1bc7 @0x26
0x1ba1…1bef at0027 = ╱ec╱,╱ // 0x1bc8 @0x27
0x1ba1…1bef at0028 = ╱54╱T╱ // 0x1bc9 @0x28
0x1ba1…1bef at0029 = ╱ed╱(╱ // 0x1bca @0x29
0x1ba1…1bef at002a = ╱56╱V╱ // 0x1bcb @0x2a
0x1ba1…1bef at002b = ╱ec╱,╱ // 0x1bcc @0x2b
0x1ba1…1bef at002c = ╱45╱E╱ // 0x1bcd @0x2c
0x1ba1…1bef at002d = ╱ee╱)╱ // 0x1bce @0x2d
0x1ba1…1bef at002e = ╱ec╱,╱ // 0x1bcf @0x2e
0x1ba1…1bef at002f = ╱54╱T╱ // 0x1bd0 @0x2f
0x1ba1…1bef at0030 = ╱ed╱(╱ // 0x1bd1 @0x30
0x1ba1…1bef at0031 = ╱56╱V╱ // 0x1bd2 @0x31
0x1ba1…1bef at0032 = ╱ec╱,╱ // 0x1bd3 @0x32
0x1ba1…1bef at0033 = ╱47╱G╱ // 0x1bd4 @0x33
0x1ba1…1bef at0034 = ╱ee╱)╱ // 0x1bd5 @0x34
0x1ba1…1bef at0035 = ╱ec╱,╱ // 0x1bd6 @0x35
0x1ba1…1bef at0036 = ╱54╱T╱ // 0x1bd7 @0x36
0x1ba1…1bef at0037 = ╱ed╱(╱ // 0x1bd8 @0x37
0x1ba1…1bef at0038 = ╱34╱4╱ // 0x1bd9 @0x38
0x1ba1…1bef at0039 = ╱fe00008003╱ // 0x1bda @0x39
0x1ba1…1bef at003e = ╱ec╱,╱ // 0x1bdf @0x3e
0x1ba1…1bef at003f = ╱45╱E╱ // 0x1be0 @0x3f
0x1ba1…1bef at0040 = ╱ee╱)╱ // 0x1be1 @0x40
0x1ba1…1bef at0041 = ╱ec╱,╱ // 0x1be2 @0x41
0x1ba1…1bef at0042 = ╱54╱T╱ // 0x1be3 @0x42
0x1ba1…1bef at0043 = ╱ed╱(╱ // 0x1be4 @0x43
0x1ba1…1bef at0044 = ╱34╱4╱ // 0x1be5 @0x44
0x1ba1…1bef at0045 = ╱fe00008003╱ // 0x1be6 @0x45
0x1ba1…1bef at004a = ╱ec╱,╱ // 0x1beb @0x4a
0x1ba1…1bef at004b = ╱47╱G╱ // 0x1bec @0x4b
0x1ba1…1bef at004c = ╱ee╱)╱ // 0x1bed @0x4c
0x1ba1…1bef at004d = EOL // 0x1bee @0x4d
0x1ba1…1bef }
0x1bef…1c08 a95f 2830 EXEC FEJL(16,E,V3$)
0x1bef…1c08 LineComalBin {
0x1bef…1c08 ptr = 0xa95f // 0x1bef @0x0
0x1bef…1c08 lno = 0x0b0e // 0x1bf1 @0x2
0x1bef…1c08 at0004 = ╱9d╱ EXEC ╱ // 0x1bf3 @0x4
0x1bef…1c08 at0005 = ╱46╱F╱ // 0x1bf4 @0x5
0x1bef…1c08 at0006 = ╱45╱E╱ // 0x1bf5 @0x6
0x1bef…1c08 at0007 = ╱4a╱J╱ // 0x1bf6 @0x7
0x1bef…1c08 at0008 = ╱4c╱L╱ // 0x1bf7 @0x8
0x1bef…1c08 at0009 = ╱ed╱(╱ // 0x1bf8 @0x9
0x1bef…1c08 at000a = ╱31╱1╱ // 0x1bf9 @0xa
0x1bef…1c08 at000b = ╱36╱6╱ // 0x1bfa @0xb
0x1bef…1c08 at000c = ╱fe00008005╱ // 0x1bfb @0xc
0x1bef…1c08 at0011 = ╱ec╱,╱ // 0x1c00 @0x11
0x1bef…1c08 at0012 = ╱45╱E╱ // 0x1c01 @0x12
0x1bef…1c08 at0013 = ╱ec╱,╱ // 0x1c02 @0x13
0x1bef…1c08 at0014 = ╱56╱V╱ // 0x1c03 @0x14
0x1bef…1c08 at0015 = ╱33╱3╱ // 0x1c04 @0x15
0x1bef…1c08 at0016 = ╱ef╱$╱ // 0x1c05 @0x16
0x1bef…1c08 at0017 = ╱ee╱)╱ // 0x1c06 @0x17
0x1bef…1c08 at0018 = EOL // 0x1c07 @0x18
0x1bef…1c08 }
0x1c08…1c14 a96b 2840 ENDPROC ;UNDUD
0x1c08…1c14 LineComalBin {
0x1c08…1c14 ptr = 0xa96b // 0x1c08 @0x0
0x1c08…1c14 lno = 0x0b18 // 0x1c0a @0x2
0x1c08…1c14 at0004 = ╱9f╱ ENDPROC ╱ // 0x1c0c @0x4
0x1c08…1c14 at0005 = ╱eb╱;╱ // 0x1c0d @0x5
0x1c08…1c14 at0006 = ╱55╱U╱ // 0x1c0e @0x6
0x1c08…1c14 at0007 = ╱4e╱N╱ // 0x1c0f @0x7
0x1c08…1c14 at0008 = ╱44╱D╱ // 0x1c10 @0x8
0x1c08…1c14 at0009 = ╱55╱U╱ // 0x1c11 @0x9
0x1c08…1c14 at000a = ╱44╱D╱ // 0x1c12 @0xa
0x1c08…1c14 at000b = EOL // 0x1c13 @0xb
0x1c08…1c14 }
0x1c14…1c31 a988 2850 PROC HOVUD(V4,MPOSTANTAL4,S)
0x1c14…1c31 LineComalBin {
0x1c14…1c31 ptr = 0xa988 // 0x1c14 @0x0
0x1c14…1c31 lno = 0x0b22 // 0x1c16 @0x2
0x1c14…1c31 at0004 = ╱9e╱ PROC ╱ // 0x1c18 @0x4
0x1c14…1c31 at0005 = ╱48╱H╱ // 0x1c19 @0x5
0x1c14…1c31 at0006 = ╱4f╱O╱ // 0x1c1a @0x6
0x1c14…1c31 at0007 = ╱56╱V╱ // 0x1c1b @0x7
0x1c14…1c31 at0008 = ╱55╱U╱ // 0x1c1c @0x8
0x1c14…1c31 at0009 = ╱44╱D╱ // 0x1c1d @0x9
0x1c14…1c31 at000a = ╱ed╱(╱ // 0x1c1e @0xa
0x1c14…1c31 at000b = ╱56╱V╱ // 0x1c1f @0xb
0x1c14…1c31 at000c = ╱34╱4╱ // 0x1c20 @0xc
0x1c14…1c31 at000d = ╱ec╱,╱ // 0x1c21 @0xd
0x1c14…1c31 at000e = ╱4d╱M╱ // 0x1c22 @0xe
0x1c14…1c31 at000f = ╱50╱P╱ // 0x1c23 @0xf
0x1c14…1c31 at0010 = ╱4f╱O╱ // 0x1c24 @0x10
0x1c14…1c31 at0011 = ╱53╱S╱ // 0x1c25 @0x11
0x1c14…1c31 at0012 = ╱54╱T╱ // 0x1c26 @0x12
0x1c14…1c31 at0013 = ╱41╱A╱ // 0x1c27 @0x13
0x1c14…1c31 at0014 = ╱4e╱N╱ // 0x1c28 @0x14
0x1c14…1c31 at0015 = ╱54╱T╱ // 0x1c29 @0x15
0x1c14…1c31 at0016 = ╱41╱A╱ // 0x1c2a @0x16
0x1c14…1c31 at0017 = ╱4c╱L╱ // 0x1c2b @0x17
0x1c14…1c31 at0018 = ╱34╱4╱ // 0x1c2c @0x18
0x1c14…1c31 at0019 = ╱ec╱,╱ // 0x1c2d @0x19
0x1c14…1c31 at001a = ╱53╱S╱ // 0x1c2e @0x1a
0x1c14…1c31 at001b = ╱ee╱)╱ // 0x1c2f @0x1b
0x1c14…1c31 at001c = EOL // 0x1c30 @0x1c
0x1c14…1c31 }
0x1c31…1c4f a9a6 2860 FOR I=E TO MPOSTANTAL4 DIV 160
0x1c31…1c4f LineComalBin {
0x1c31…1c4f ptr = 0xa9a6 // 0x1c31 @0x0
0x1c31…1c4f lno = 0x0b2c // 0x1c33 @0x2
0x1c31…1c4f at0004 = ╱83╱ FOR ╱ // 0x1c35 @0x4
0x1c31…1c4f at0005 = ╱49╱I╱ // 0x1c36 @0x5
0x1c31…1c4f at0006 = ╱dc╱=╱ // 0x1c37 @0x6
0x1c31…1c4f at0007 = ╱45╱E╱ // 0x1c38 @0x7
0x1c31…1c4f at0008 = ╱b7╱ TO ╱ // 0x1c39 @0x8
0x1c31…1c4f at0009 = ╱4d╱M╱ // 0x1c3a @0x9
0x1c31…1c4f at000a = ╱50╱P╱ // 0x1c3b @0xa
0x1c31…1c4f at000b = ╱4f╱O╱ // 0x1c3c @0xb
0x1c31…1c4f at000c = ╱53╱S╱ // 0x1c3d @0xc
0x1c31…1c4f at000d = ╱54╱T╱ // 0x1c3e @0xd
0x1c31…1c4f at000e = ╱41╱A╱ // 0x1c3f @0xe
0x1c31…1c4f at000f = ╱4e╱N╱ // 0x1c40 @0xf
0x1c31…1c4f at0010 = ╱54╱T╱ // 0x1c41 @0x10
0x1c31…1c4f at0011 = ╱41╱A╱ // 0x1c42 @0x11
0x1c31…1c4f at0012 = ╱4c╱L╱ // 0x1c43 @0x12
0x1c31…1c4f at0013 = ╱34╱4╱ // 0x1c44 @0x13
0x1c31…1c4f at0014 = ╱e7╱ DIV ╱ // 0x1c45 @0x14
0x1c31…1c4f at0015 = ╱31╱1╱ // 0x1c46 @0x15
0x1c31…1c4f at0016 = ╱36╱6╱ // 0x1c47 @0x16
0x1c31…1c4f at0017 = ╱30╱0╱ // 0x1c48 @0x17
0x1c31…1c4f at0018 = ╱fe0000a008╱ // 0x1c49 @0x18
0x1c31…1c4f at001d = EOL // 0x1c4e @0x1d
0x1c31…1c4f }
0x1c4f…1c79 a9d0 2870 J=(I-E)*4+E;J1=J+E;J2=J+G;J3=J+V
0x1c4f…1c79 LineComalBin {
0x1c4f…1c79 ptr = 0xa9d0 // 0x1c4f @0x0
0x1c4f…1c79 lno = 0x0b36 // 0x1c51 @0x2
0x1c4f…1c79 at0004 = ╱4a╱J╱ // 0x1c53 @0x4
0x1c4f…1c79 at0005 = ╱dc╱=╱ // 0x1c54 @0x5
0x1c4f…1c79 at0006 = ╱ed╱(╱ // 0x1c55 @0x6
0x1c4f…1c79 at0007 = ╱49╱I╱ // 0x1c56 @0x7
0x1c4f…1c79 at0008 = ╱e3╱-╱ // 0x1c57 @0x8
0x1c4f…1c79 at0009 = ╱45╱E╱ // 0x1c58 @0x9
0x1c4f…1c79 at000a = ╱ee╱)╱ // 0x1c59 @0xa
0x1c4f…1c79 at000b = ╱e4╱*╱ // 0x1c5a @0xb
0x1c4f…1c79 at000c = ╱34╱4╱ // 0x1c5b @0xc
0x1c4f…1c79 at000d = ╱fe00008003╱ // 0x1c5c @0xd
0x1c4f…1c79 at0012 = ╱e2╱+╱ // 0x1c61 @0x12
0x1c4f…1c79 at0013 = ╱45╱E╱ // 0x1c62 @0x13
0x1c4f…1c79 at0014 = ╱eb╱;╱ // 0x1c63 @0x14
0x1c4f…1c79 at0015 = ╱4a╱J╱ // 0x1c64 @0x15
0x1c4f…1c79 at0016 = ╱31╱1╱ // 0x1c65 @0x16
0x1c4f…1c79 at0017 = ╱dc╱=╱ // 0x1c66 @0x17
0x1c4f…1c79 at0018 = ╱4a╱J╱ // 0x1c67 @0x18
0x1c4f…1c79 at0019 = ╱e2╱+╱ // 0x1c68 @0x19
0x1c4f…1c79 at001a = ╱45╱E╱ // 0x1c69 @0x1a
0x1c4f…1c79 at001b = ╱eb╱;╱ // 0x1c6a @0x1b
0x1c4f…1c79 at001c = ╱4a╱J╱ // 0x1c6b @0x1c
0x1c4f…1c79 at001d = ╱32╱2╱ // 0x1c6c @0x1d
0x1c4f…1c79 at001e = ╱dc╱=╱ // 0x1c6d @0x1e
0x1c4f…1c79 at001f = ╱4a╱J╱ // 0x1c6e @0x1f
0x1c4f…1c79 at0020 = ╱e2╱+╱ // 0x1c6f @0x20
0x1c4f…1c79 at0021 = ╱47╱G╱ // 0x1c70 @0x21
0x1c4f…1c79 at0022 = ╱eb╱;╱ // 0x1c71 @0x22
0x1c4f…1c79 at0023 = ╱4a╱J╱ // 0x1c72 @0x23
0x1c4f…1c79 at0024 = ╱33╱3╱ // 0x1c73 @0x24
0x1c4f…1c79 at0025 = ╱dc╱=╱ // 0x1c74 @0x25
0x1c4f…1c79 at0026 = ╱4a╱J╱ // 0x1c75 @0x26
0x1c4f…1c79 at0027 = ╱e2╱+╱ // 0x1c76 @0x27
0x1c4f…1c79 at0028 = ╱56╱V╱ // 0x1c77 @0x28
0x1c4f…1c79 at0029 = EOL // 0x1c78 @0x29
0x1c4f…1c79 }
0x1c79…1cc2 aa19 2880 PUT V4$,I:S(J,E),S(J,G),S(J1,E),S(J1,G),S(J2,E),S(J2,G),S(J3,E),S(J3,G)
0x1c79…1cc2 LineComalBin {
0x1c79…1cc2 ptr = 0xaa19 // 0x1c79 @0x0
0x1c79…1cc2 lno = 0x0b40 // 0x1c7b @0x2
0x1c79…1cc2 at0004 = ╱aa╱ PUT ╱ // 0x1c7d @0x4
0x1c79…1cc2 at0005 = ╱56╱V╱ // 0x1c7e @0x5
0x1c79…1cc2 at0006 = ╱34╱4╱ // 0x1c7f @0x6
0x1c79…1cc2 at0007 = ╱ef╱$╱ // 0x1c80 @0x7
0x1c79…1cc2 at0008 = ╱ec╱,╱ // 0x1c81 @0x8
0x1c79…1cc2 at0009 = ╱49╱I╱ // 0x1c82 @0x9
0x1c79…1cc2 at000a = ╱f0╱:╱ // 0x1c83 @0xa
0x1c79…1cc2 at000b = ╱53╱S╱ // 0x1c84 @0xb
0x1c79…1cc2 at000c = ╱ed╱(╱ // 0x1c85 @0xc
0x1c79…1cc2 at000d = ╱4a╱J╱ // 0x1c86 @0xd
0x1c79…1cc2 at000e = ╱ec╱,╱ // 0x1c87 @0xe
0x1c79…1cc2 at000f = ╱45╱E╱ // 0x1c88 @0xf
0x1c79…1cc2 at0010 = ╱ee╱)╱ // 0x1c89 @0x10
0x1c79…1cc2 at0011 = ╱ec╱,╱ // 0x1c8a @0x11
0x1c79…1cc2 at0012 = ╱53╱S╱ // 0x1c8b @0x12
0x1c79…1cc2 at0013 = ╱ed╱(╱ // 0x1c8c @0x13
0x1c79…1cc2 at0014 = ╱4a╱J╱ // 0x1c8d @0x14
0x1c79…1cc2 at0015 = ╱ec╱,╱ // 0x1c8e @0x15
0x1c79…1cc2 at0016 = ╱47╱G╱ // 0x1c8f @0x16
0x1c79…1cc2 at0017 = ╱ee╱)╱ // 0x1c90 @0x17
0x1c79…1cc2 at0018 = ╱ec╱,╱ // 0x1c91 @0x18
0x1c79…1cc2 at0019 = ╱53╱S╱ // 0x1c92 @0x19
0x1c79…1cc2 at001a = ╱ed╱(╱ // 0x1c93 @0x1a
0x1c79…1cc2 at001b = ╱4a╱J╱ // 0x1c94 @0x1b
0x1c79…1cc2 at001c = ╱31╱1╱ // 0x1c95 @0x1c
0x1c79…1cc2 at001d = ╱ec╱,╱ // 0x1c96 @0x1d
0x1c79…1cc2 at001e = ╱45╱E╱ // 0x1c97 @0x1e
0x1c79…1cc2 at001f = ╱ee╱)╱ // 0x1c98 @0x1f
0x1c79…1cc2 at0020 = ╱ec╱,╱ // 0x1c99 @0x20
0x1c79…1cc2 at0021 = ╱53╱S╱ // 0x1c9a @0x21
0x1c79…1cc2 at0022 = ╱ed╱(╱ // 0x1c9b @0x22
0x1c79…1cc2 at0023 = ╱4a╱J╱ // 0x1c9c @0x23
0x1c79…1cc2 at0024 = ╱31╱1╱ // 0x1c9d @0x24
0x1c79…1cc2 at0025 = ╱ec╱,╱ // 0x1c9e @0x25
0x1c79…1cc2 at0026 = ╱47╱G╱ // 0x1c9f @0x26
0x1c79…1cc2 at0027 = ╱ee╱)╱ // 0x1ca0 @0x27
0x1c79…1cc2 at0028 = ╱ec╱,╱ // 0x1ca1 @0x28
0x1c79…1cc2 at0029 = ╱53╱S╱ // 0x1ca2 @0x29
0x1c79…1cc2 at002a = ╱ed╱(╱ // 0x1ca3 @0x2a
0x1c79…1cc2 at002b = ╱4a╱J╱ // 0x1ca4 @0x2b
0x1c79…1cc2 at002c = ╱32╱2╱ // 0x1ca5 @0x2c
0x1c79…1cc2 at002d = ╱ec╱,╱ // 0x1ca6 @0x2d
0x1c79…1cc2 at002e = ╱45╱E╱ // 0x1ca7 @0x2e
0x1c79…1cc2 at002f = ╱ee╱)╱ // 0x1ca8 @0x2f
0x1c79…1cc2 at0030 = ╱ec╱,╱ // 0x1ca9 @0x30
0x1c79…1cc2 at0031 = ╱53╱S╱ // 0x1caa @0x31
0x1c79…1cc2 at0032 = ╱ed╱(╱ // 0x1cab @0x32
0x1c79…1cc2 at0033 = ╱4a╱J╱ // 0x1cac @0x33
0x1c79…1cc2 at0034 = ╱32╱2╱ // 0x1cad @0x34
0x1c79…1cc2 at0035 = ╱ec╱,╱ // 0x1cae @0x35
0x1c79…1cc2 at0036 = ╱47╱G╱ // 0x1caf @0x36
0x1c79…1cc2 at0037 = ╱ee╱)╱ // 0x1cb0 @0x37
0x1c79…1cc2 at0038 = ╱ec╱,╱ // 0x1cb1 @0x38
0x1c79…1cc2 at0039 = ╱53╱S╱ // 0x1cb2 @0x39
0x1c79…1cc2 at003a = ╱ed╱(╱ // 0x1cb3 @0x3a
0x1c79…1cc2 at003b = ╱4a╱J╱ // 0x1cb4 @0x3b
0x1c79…1cc2 at003c = ╱33╱3╱ // 0x1cb5 @0x3c
0x1c79…1cc2 at003d = ╱ec╱,╱ // 0x1cb6 @0x3d
0x1c79…1cc2 at003e = ╱45╱E╱ // 0x1cb7 @0x3e
0x1c79…1cc2 at003f = ╱ee╱)╱ // 0x1cb8 @0x3f
0x1c79…1cc2 at0040 = ╱ec╱,╱ // 0x1cb9 @0x40
0x1c79…1cc2 at0041 = ╱53╱S╱ // 0x1cba @0x41
0x1c79…1cc2 at0042 = ╱ed╱(╱ // 0x1cbb @0x42
0x1c79…1cc2 at0043 = ╱4a╱J╱ // 0x1cbc @0x43
0x1c79…1cc2 at0044 = ╱33╱3╱ // 0x1cbd @0x44
0x1c79…1cc2 at0045 = ╱ec╱,╱ // 0x1cbe @0x45
0x1c79…1cc2 at0046 = ╱47╱G╱ // 0x1cbf @0x46
0x1c79…1cc2 at0047 = ╱ee╱)╱ // 0x1cc0 @0x47
0x1c79…1cc2 at0048 = EOL // 0x1cc1 @0x48
0x1c79…1cc2 }
0x1cc2…1cdb aa32 2890 EXEC FEJL(17,G,V4$)
0x1cc2…1cdb LineComalBin {
0x1cc2…1cdb ptr = 0xaa32 // 0x1cc2 @0x0
0x1cc2…1cdb lno = 0x0b4a // 0x1cc4 @0x2
0x1cc2…1cdb at0004 = ╱9d╱ EXEC ╱ // 0x1cc6 @0x4
0x1cc2…1cdb at0005 = ╱46╱F╱ // 0x1cc7 @0x5
0x1cc2…1cdb at0006 = ╱45╱E╱ // 0x1cc8 @0x6
0x1cc2…1cdb at0007 = ╱4a╱J╱ // 0x1cc9 @0x7
0x1cc2…1cdb at0008 = ╱4c╱L╱ // 0x1cca @0x8
0x1cc2…1cdb at0009 = ╱ed╱(╱ // 0x1ccb @0x9
0x1cc2…1cdb at000a = ╱31╱1╱ // 0x1ccc @0xa
0x1cc2…1cdb at000b = ╱37╱7╱ // 0x1ccd @0xb
0x1cc2…1cdb at000c = ╱fe00008805╱ // 0x1cce @0xc
0x1cc2…1cdb at0011 = ╱ec╱,╱ // 0x1cd3 @0x11
0x1cc2…1cdb at0012 = ╱47╱G╱ // 0x1cd4 @0x12
0x1cc2…1cdb at0013 = ╱ec╱,╱ // 0x1cd5 @0x13
0x1cc2…1cdb at0014 = ╱56╱V╱ // 0x1cd6 @0x14
0x1cc2…1cdb at0015 = ╱34╱4╱ // 0x1cd7 @0x15
0x1cc2…1cdb at0016 = ╱ef╱$╱ // 0x1cd8 @0x16
0x1cc2…1cdb at0017 = ╱ee╱)╱ // 0x1cd9 @0x17
0x1cc2…1cdb at0018 = EOL // 0x1cda @0x18
0x1cc2…1cdb }
0x1cdb…1ce2 aa39 2900 NEXT I
0x1cdb…1ce2 LineComalBin {
0x1cdb…1ce2 ptr = 0xaa39 // 0x1cdb @0x0
0x1cdb…1ce2 lno = 0x0b54 // 0x1cdd @0x2
0x1cdb…1ce2 at0004 = ╱84╱ NEXT ╱ // 0x1cdf @0x4
0x1cdb…1ce2 at0005 = ╱49╱I╱ // 0x1ce0 @0x5
0x1cdb…1ce2 at0006 = EOL // 0x1ce1 @0x6
0x1cdb…1ce2 }
0x1ce2…1ce8 0000 2910 ENDPROC
0x1ce2…1ce8 LineComalBin {
0x1ce2…1ce8 ptr = 0x0000 // 0x1ce2 @0x0
0x1ce2…1ce8 lno = 0x0b5e // 0x1ce4 @0x2
0x1ce2…1ce8 at0004 = ╱9f╱ ENDPROC ╱ // 0x1ce6 @0x4
0x1ce2…1ce8 at0005 = EOL // 0x1ce7 @0x5
0x1ce2…1ce8 }
0x1ce8…1d00 62 8d 69 00 42 dc 30 fe 00 00 00 00 eb 45 dc 31 fe 00 00 80 01 eb 47 dc ┆b i B 0 E 1 G ┆
0x1d00…1d19 32 fe 00 00 80 02 eb 56 dc 33 fe 00 00 c0 02 eb 57 dc 39 fe 00 00 90 04 ff ┆2 V 3 W 9 ┆
0x1d19…1d1f (97,) 57 8d 57 8d 10 00 ┆W W ┆