|
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: 10853 (0x2a65)
Types: SPC/1-COMAL-BIN
Notes: Mikados_B
Names: »BKLFERIE.B«
└─⟦385f097a1⟧ Bits:30008988 SPC/1 COMAL programmer til bogføring
└─⟦this⟧ »BKLFERIE.B«
└─⟦ff7f7aeee⟧ Bits:30009007 NBT 15/3-84
└─⟦this⟧ »BKLFERIE.B«
0100 DIM A1(V),A2(V),A3(V),A4(V),A5(V),A6(G),A7$(8),A8$(8),A9$(E),B0$(E) 0120 DIM RES$(15),OP1$(12),OP2$(12),B1$(12),B2$(12),B3$(12),B4$(12),B5$(12) 0130 DIM B7(10),B8$(10,37),B9$(8,11),C0$(12),C1$(12),C2$(12),C3$(12) 0140 DIM C4$(12),C5$(45,11),C6$(55),C9$(16),D0$(16),D1$(71) 0150 DIM D2$(27),D3$(55),D4$(34),D5$(29),D6$(37),D7$(16),D8$(16),D9$(16) 0160 DIM E0$(16),E1$(16),E2$(16,12),E6(18),E7(18),E8(18),E9$(79),F0$(79) 0162 DIM F1$(12),DD$(6),PAGE$(19,68),ÅR$(G),KV$(E) 0170 B3$=" 0+";B5$=" 6,00+";B4$=" 100,00+" 0171 FOR I=E TO 16 0172 E2$(I)=B3$ 0173 NEXT I 0200 A6(E),A6(G),E3,E4,E5=B 0230 FOR I=E TO 79 0240 E9$=E9$+" " 0250 NEXT I 0251 FOR I=E TO 19 0253 PAGE$(I)=E9$(E,68) 0255 NEXT I 0260 E6(11),E6(14),E6(17)=27;E6(12),E6(15),E6(18)=34 0280 E8(4)=-4 0300 E6(4)=36;E6(5),E6(6)=39;E6(10),E6(13),E6(16)=23 0310 E7(4)=4;E7(5)=5;E7(6)=6 0320 E7(10),E7(11),E7(12)=12;E7(13),E7(14),E7(15)=13;E7(16),E7(17),E7(18)=14 0340 E8(11),E8(12),E8(14),E8(15),E8(17),E8(18)=6;E8(5),E8(6)=-E 0350 E8(10),E8(13),E8(16)=B 0370 PROC C(F2,F3,F4,F5) 0380 RES$=F5$;OP1$=F3$;OP2$=F4$;SI=B;FLAG=B;ART=F2-6*(F2>5) 0390 CALL "P641210:REGN" 0400 IF F2<6 AND FLAG THEN STOP 0430 F5$=RES$ 0440 ENDPROC 0441 PROC OPTÆL(F6,F7) 0442 F1$=F7$;C2$=C5$(F6) 0443 EXEC C(0,C2$,F1$,F1$) 0444 C5$(F6)=F1$(G:11) 0448 ENDPROC 0450 PROC UDTÆL 0460 J=W*(F8-E) 0470 FOR F9=E TO W 0480 FOR I=E TO 5 0490 C6$((I-E)*11+E:11)=C5$((F9-E)*5+I) 0500 NEXT I 0510 PUT D0$,J+F9:C6$ 0520 NEXT F9 0530 EXEC F(-F8,-F9,D0$) 0540 ENDPROC 0550 PROC INDTÆL 0560 J=W*(F8-E) 0570 FOR F9=E TO W 0580 GET D0$,J+F9:C6$ 0590 FOR I=E TO 5 0600 C5$((F9-E)*5+I)=C6$((I-E)*11+E:11) 0610 NEXT I 0620 NEXT F9 0630 EXEC F(F8,F9,D0$) 0640 ENDPROC 0641 PROC OP(F6,F7) 0642 F1$=F7$;C2$=E2$(F6) 0643 EXEC C(0,C2$,F1$,F1$) 0644 E2$(F6)=F1$ 0645 ENDPROC 0650 PROC DATOCHECK(G0,G1) 0660 G1=E 0670 G2=(ORD(G0$(E))-48)*10+ORD(G0$(G))-48 0680 G3=(ORD(G0$(V))-48)*10+ORD(G0$(4))-48 0690 G4=(ORD(G0$(5))-48)*10+ORD(G0$(6))-48 0700 IF G4<E OR G3<E OR G3>12 OR G4>31 THEN G1=B 0710 IF G1=B THEN EXIT 0720 CASE G3 OF 0730 WHEN 4,6,W,11 0740 IF G4>30 THEN G1=B 0750 WHEN G 0760 IF G4>29 THEN G1=B 0770 IF G4=29 AND G2 MOD 4<>B THEN G1=B 0780 ENDCASE 0790 ENDPROC 0800 PROC INLØNMOD(G5) 0810 GET C9$,G*G5-E:D1$ 0820 GET C9$,G*G5:D2$,G6,G7,G8,G9,H0,H1,H2,H3,H4,H5,H6 0830 EXEC F(1,G5,C9$) 0840 ENDPROC 0850 PROC UDLØNMOD(G5) 0860 PUT C9$,G*G5-E:D1$ 0870 PUT C9$,G*G5:D2$,G6,G7,G8,G9,H0,H1,H2,H3,H4,H5,H6 0880 EXEC F(2,G5,C9$) 0890 ENDPROC 0900 PROC CONV(H7,H8,H9) 0910 I0=H8;H7$="" 0930 REPEAT 0940 H7$=CHR((I0 MOD 10)+48)+H7$;H9=H9-E;I0=I0 DIV 10 0970 IF H9<B AND I0=B THEN H9=B 0980 UNTIL H9=B 0990 ENDPROC 1000 PROC CHECK(I1,I2) 1010 I2,I3=B 1030 IF LEN(I1$)>B THEN 1035 I4=E 1040 IF I1$(E)="-" THEN I4=-E;I2=E 1100 WHILE LEN(I1$)>I2 1110 I2=I2+E 1120 IF I1$(I2)<"0" OR I1$(I2)>"9" THEN I4=B;I2=LEN(I1$) 1160 I3=I3*10+ORD(I1$(I2))-48 1170 ENDWHILE 1175 I3=I3*I4;I2=I2*I4 1190 IF I2<B THEN I2=I2+E 1200 ENDIF 1210 ENDPROC 1211 PROC Ø 1212 REPEAT 1213 EXEC DATOCHECK(F0$,I) 1214 IF I=B THEN EXEC INLINE(I5) 1215 UNTIL I=E 1216 ENDPROC 1220 PROC INOPL(I5) 1230 EXEC INLINE(I5) 1240 CASE I5 OF 1460 WHEN 4 1470 REPEAT 1480 F0$=F0$+"+" 1490 EXEC C(6,F0$,B3$,F1$) 1500 IF FLAG<>B THEN EXEC INLINE(I5) 1510 UNTIL FLAG=B 1520 EXEC C(0,F0$,B3$,F1$) 1530 EXEC PERVERT(F1$,I7) 1540 WHEN 5 1550 WHILE F0$<"1" OR F0$>"7" 1560 EXEC INLINE(I5) 1570 ENDWHILE 1580 A9$=F0$ 1590 WHEN 6 1600 WHILE F0$<>"A" AND F0$<>"F" 1610 EXEC INLINE(I5) 1620 ENDWHILE 1630 B0$=F0$ 1660 WHEN 10,13,16 1670 A2(I5 DIV V-G)=I3 1680 IF I3<>B THEN 1690 E4=E 1700 ELSE 1710 I5=I5+G 1720 ENDIF 1730 WHEN 11,14,17 1740 EXEC Ø 1780 A4(I5 DIV 3-2)=I3 1790 WHEN 12,15,18 1800 EXEC Ø 1840 A5(I5 DIV 3-3)=I3 1870 ENDCASE 1880 ENDPROC 1890 PROC INDVIRK 1900 OPEN C9$,R 1910 EXEC F(0,0,C9$) 1920 GET C9$,E:D3$ 1930 GET C9$,G:D4$,I8,I9,J0 1940 ENDPROC 1950 PROC F(J1,J2,J3) 1960 IF STATUS(J3$)<>B THEN 1970 OUTPUT T 1980 PRINT "FIL-FEJL ";J3$;STATUS(J3$),J1;J2 1990 STOP 2000 ENDIF 2010 ENDPROC 2020 PROC INLINE(G5) 2030 REPEAT 2040 CURSOR E6(G5),E7(G5) 2050 INPUT "",F0$ 2060 IF E8(G5)<B THEN 2065 J4=B 2070 IF LEN(F0$)<=ABS(E8(G5)) THEN 2080 J4=E 2090 FOR I=LEN(F0$)+E TO ABS(E8(G5)) 2100 F0$(I)=" " 2110 NEXT I 2140 ENDIF 2150 ELSE 2160 EXEC CHECK(F0$,J4) 2170 IF E8(G5)>B AND E8(G5)<>J4 THEN J4=B 2180 ENDIF 2190 UNTIL J4<>B 2200 ENDPROC 2210 PROC SKRIVPICT 2220 CLEAR 2230 PRINT TAB(17);"Afregning" 2240 PRINT 2250 PRINT 2260 PRINT " Maksimum feriedage i året" 2270 PRINT " Lønperiodekode 1,2,3,4,5,6 eller 7" 2280 PRINT " Arbejdere(A) eller funktionærer(F)" 2290 PRINT 2300 PRINT 2310 ; 2320 PRINT 2330 PRINT " Feriepengeopgørelse: start-slutdag" 2340 PRINT " Feriekode 1/lønnr" 2350 PRINT " Feriekode 2/lønnr" 2360 PRINT " Feriekode 3/lønnr" 2420 ENDPROC 2600 PROC CONVDATE(I1,I2) 2610 K0=I2;I1$="" 2620 FOR I=6 TO E STEP -E 2625 I1$(I)=CHR(K0 MOD 10+48) 2633 K0=K0 DIV 10 2690 NEXT I 2700 ENDPROC 2710 PROC Æ(I1,I2) 2720 I1$=" 0+" 2730 IF I2<>B THEN 2740 I1$(W,10)=",0";I0=ABS(I2);K0=INT((I0-INT(I0))*100+0.50001) 2770 IF I2<B THEN I1$(12)="-" 2780 FOR I=11 TO E STEP -E 2790 IF I<>W THEN 2800 I1$(I)=CHR(K0 MOD 10+48) 2810 K0=K0 DIV 10 2820 IF K0=B AND I<10 THEN I=B 2830 ELSE 2840 K0=INT(I0) 2850 ENDIF 2860 NEXT I 2870 ENDIF 2880 ENDPROC 2890 PROC PERVERT(I1,I2) 2900 I2=B 2910 FOR I=E TO LEN(I1$)-E 2920 IF I1$(I)<>" " AND I1$(I)<>"," THEN I2=10*I2+ORD(I1$(I))-48 2930 NEXT I 2940 IF I1$(I)="-" THEN I2=-I2 2950 I2=I2/100 2960 ENDPROC 2970 PROC SKRIVBUND 2980 PAGE$(16,PS+5:7)=D3$(E,7) 2990 PAGE$(17,PS+5:25)=D3$(8,32) 3000 PAGE$(18,PS+5:23)=D3$(33,55) 3010 PAGE$(19,PS+5:19)=D4$(E,4)+" "+D4$(5,18) 3020 IF PS=E THEN 3030 PS=38 3040 ELSE 3050 EXEC SKRIVPAGE 3060 PS=E 3070 ENDIF 3080 ENDPROC 3085 TAP=W 3090 PROC SKRIVPAGE 3092 LINE=E 3094 PRINT 3096 EXEC SL 3098 EXEC SL 3100 EXEC SL 3102 PRINT 3104 EXEC SL 3106 EXEC SL 3108 EXEC SL 3110 EXEC SL 3112 PRINT 3114 EXEC SL 3116 EXEC SL 3118 PRINT 3120 EXEC SL 3122 PRINT 3124 EXEC SL 3126 PRINT 3128 EXEC SL 3130 PRINT 3132 EXEC SL 3134 PRINT 3136 EXEC SL 3138 PRINT 3140 EXEC SL 3142 PRINT 3144 EXEC SL 3146 EXEC SL 3148 EXEC SL 3150 EXEC SL 3152 PRINT 3154 ; 3156 ; 3158 ; 3160 FOR I=E TO 19 3162 PAGE$(I)=E9$(E,68) 3164 NEXT I 3166 ENDPROC 3170 PROC SL 3180 PRINT TAB(TAP);PAGE$(LINE) 3190 LINE=LINE+E 3200 ENDPROC 3240 PROC SKRIVHOVED 3250 PAGE$(E,PS+24:G)=ÅR$ 3255 PAGE$(G,PS+24:E)=KV$ 3260 EXEC CONV(C3$,G6,6) 3265 EXEC CONV(F1$,G7,4) 3270 C3$=C3$+F1$ 3275 PAGE$(V,PS+10:10)=C3$ 3280 EXEC CONV(C3$,F8,4) 3285 PAGE$(4,PS+5:4)=C3$ 3290 PAGE$(5,PS+5:25)=D1$(E,25) 3292 PAGE$(6,PS+5:23)=D1$(26,48) 3295 PAGE$(7,PS+5:19)=D2$(E,4)+" "+D2$(5,18) 3300 ENDPROC 3440 PROC NÆSTE 3450 REPEAT 3460 F8=F8+E 3470 H1=E 3480 IF F8<=I9 THEN 3490 EXEC INLØNMOD(F8) 3500 IF A9$<>D2$(21) THEN H1=B 3510 IF B0$="A" AND D2$(24,25)>"89" THEN H1=B 3520 IF B0$="F" AND D2$(24,25)<"90" THEN H1=B 3530 ENDIF 3540 UNTIL H1>B 3550 ENDPROC 3560 PROC BEREGNFERIE 3570 EXEC SKRIVHOVED 3580 EXEC INDTÆL 3585 K4=H1 3590 IF A4(K3)>H1 THEN K4=A4(K3) 3595 K5=H6 3640 IF A5(K3)<H6 OR H6=B THEN K5=A5(K3) 3690 K6=K5 MOD 100-K4 MOD 100 3700 K6=K6+30*(K5 DIV 100 MOD 100-K4 DIV 100 MOD 100) 3705 K7=INT(G*I7*K6/365+0.5)/G 3710 K6=K6+365*(K5 DIV 10000-K4 DIV 10000) 3720 IF A9$="1" THEN K7=B 3770 EXEC Æ(C3$,K7) 3800 C4$=C5$(29) 3810 EXEC C(0,C3$,C4$,F1$) 3820 C5$(29)=F1$(G:11) 3830 IF K3=V THEN 3840 EXEC Æ(C3$,I7) 3850 EXEC C(4,F1$,C3$,C4$) 3860 IF SI=G THEN F1$=C3$ 3870 ENDIF 3873 C4$=C5$(44) 3876 EXEC C(0,C4$,F1$,C4$) 3880 C5$(44)=C4$(G:11) 3890 IF K4<>A4(K3) OR K5<>A5(K3) THEN 3910 EXEC CONVDATE(C4$,K4) 3920 PAGE$(W,PS+5:6)=C4$ 3930 EXEC CONVDATE(C4$,K5) 3940 PAGE$(W,PS+14:6)=C4$ 3945 ELSE 3950 PAGE$(8,PS+22:G)="**" 3960 ENDIF 3990 IF C5$(16,11)="+" THEN C5$(16,11)=" " 4000 PAGE$(10,PS+20:11)=C5$(16) 4010 C5$(16)=B3$(G:11) 4025 EXEC OP(8,C5$(20)) 4030 PAGE$(11,PS+15:G)="16" 4040 PAGE$(11,PS+20:11)=C5$(20) 4055 EXEC OP(9,C5$(17)) 4060 PAGE$(12,PS+20:11)=C5$(17) 4070 IF PAGE$(12,PS+30)="+" THEN PAGE$(12,PS+30)=" " 4080 IF H0>B THEN 4090 EXEC Æ(C3$,H0) 4100 ELSE 4110 K8=INT(G9*12/365) 4120 EXEC Æ(C4$,K8) 4125 F1$=C5$(29) 4130 EXEC C(2,F1$,C4$,C3$) 4140 ENDIF 4150 B1$=C5$(20);C4$=C5$(17);C5$(20)=B3$(G:11);C5$(17)=B3$(G:11) 4160 C5$(29)=C5$(20) 4190 EXEC C(0,B1$,C4$,B1$) 4200 EXEC OPTÆL(34,B1$) 4250 PAGE$(13,PS+20:11)=B1$(G:11) 4260 EXEC C(4,B1$,C3$,C4$) 4280 PAGE$(14,PS:10)=C3$(V:10) 4285 IF PAGE$(14,PS+W)="+" THEN PAGE$(14,PS+W)=" " 4290 IF SI=G THEN 4300 EXEC C(1,B1$,C3$,C4$) 4310 H0=B 4320 EXEC Æ(C3$,G8) 4335 C3$(12)="-" 4340 EXEC C(2,C4$,C3$,B2$) 4350 EXEC C(3,B2$,B4$,B2$) 4355 B2$(10,11)="00" 4360 EXEC C(0,B1$,B2$,C0$) 4370 ELSE 4380 B2$=B3$ 4390 C0$=B1$ 4400 IF H0>B THEN 4410 EXEC C(1,C3$,B1$,C3$) 4420 EXEC PERVERT(C3$,H0) 4430 ENDIF 4440 ENDIF 4441 EXEC OPTÆL(40,B2$) 4442 EXEC OP(10,B2$) 4470 PAGE$(14,PS+20:11)=B2$(G:11) 4480 PAGE$(15,PS+20:11)=C0$(G:11) 4520 ENDPROC 4530 PROC BEREGNSH 4635 EXEC OP(11,C5$(23)) 4660 C3$=C5$(23);C5$(23)=B3$(G:11) 4670 C4$=" "+C5$(26) 4675 IF C4$(12)="+" THEN EXEC C(1,B3$,C4$,C4$) 4685 EXEC OP(12,C4$) 4710 C5$(26)=B3$(G:11) 4720 EXEC C(0,C3$,C4$,B1$) 4730 EXEC OPTÆL(34,B1$) 4780 EXEC Æ(C3$,G8) 4782 PAGE$(14,PS+10:5)=C3$(6:5) 4785 C3$(12)="-" 4790 IF B1$(12)="+" THEN 4810 EXEC C(2,C3$,B1$,C1$) 4820 EXEC C(3,C1$,B4$,C1$) 4830 C1$(10,11)="00" 4840 EXEC OPTÆL(40,C1$) 4860 ELSE 4880 C1$=B3$ 4890 ENDIF 4892 F1$=PAGE$(11,PS+20:11) 4894 EXEC C(0,F1$,B1$,F1$) 4896 IF F1$(12)="+" THEN F1$(12)=" " 4898 PAGE$(11,PS+20:11)=F1$(G:11) 4900 F1$=PAGE$(13,PS+20:11) 4902 EXEC C(0,F1$,B1$,F1$) 4904 IF F1$(12)="+" THEN F1$(12)=" " 4906 PAGE$(13,PS+20:11)=F1$(G:11) 4915 EXEC OP(13,C1$) 4920 F1$=PAGE$(14,PS+20:11) 4922 EXEC C(0,F1$,C1$,F1$) 4924 IF F1$(12)="+" THEN F1$(12)=" " 4926 PAGE$(14,PS+20:11)=F1$(G:11) 4950 EXEC C(0,C1$,B1$,C2$) 4960 F1$=PAGE$(15,PS+20:11) 4962 EXEC C(0,F1$,C2$,F1$) 4964 IF F1$(12)="+" THEN F1$(12)=" " 4966 PAGE$(15,PS+20:11)=F1$(G:11) 5000 ENDPROC 8181 D8$="P641220:" 8182 E1$="P641210:" 8190 C9$=D8$+"VIRKKART" 8200 EXEC INDVIRK 8210 CLOSE C9$ 8220 C9$=D8$+"LØNMODRG" 8230 OPEN C9$,W 8260 D0$=D8$+"TÆLLEREG" 8270 OPEN D0$,W 8291 D9$=E1$+"LØNJOUR" 8292 OPEN D9$,W 8300 EXEC SKRIVPICT 8310 FOR J=4 TO 18 8320 IF J=7 THEN J=10 8330 EXEC INOPL(J) 8340 NEXT J 8343 ÅR$=" " 8345 EDIT "Monter BKL's ferieopgørelser, RETURN",ÅR$ 8350 PS=E 8355 ÅR$="82" 8356 KV$="1" 8357 EDIT "År ",ÅR$ 8358 EDIT "Kvartal ",KV$ 8360 F8=B 8365 A7$="00-00-00" 8366 A8$=A7$ 8370 F0$=E9$ 8372 PUT D9$:A7$,A8$,A9$,B0$ 8380 OUTPUT P 8390 REPEAT 8400 EXEC NÆSTE 8410 L3,K9=B 8420 IF F8<=I9 THEN 8540 IF E4=E THEN 8550 K3=ORD(D2$(22))-48 8560 IF K3<4 THEN 8570 IF A2(K3)=F8 OR A2(K3)=-E THEN 8580 EXEC BEREGNFERIE 8585 EXEC BEREGNSH 8590 K9=E 8600 ENDIF 8610 ENDIF 8620 ENDIF 8815 IF K9>B THEN 8820 EXEC SKRIVBUND 8830 EXEC UDLØNMOD(F8) 8840 EXEC UDTÆL 8845 ENDIF 8850 ENDIF 8860 UNTIL F8=>I9 8862 PUT D9$:E2$(E),E2$(G),E2$(V),E2$(4),E2$(5),E2$(6) 8864 PUT D9$:E2$(7),E2$(8),E2$(W),E2$(10),E2$(11),E2$(12) 8866 PUT D9$:E2$(13),E2$(14),E2$(15),E2$(16) 8869 IF PS>E THEN EXEC SKRIVPAGE 8870 CLOSE 8875 OUTPUT T 8877 EDIT "Monter listepapir, RETURN",E9$ 8880 CHAIN "P641210:JOURNAL"
0x0000…004f (0,) 8da6 0100 DIM A1(V),A2(V),A3(V),A4(V),A5(V),A6(G),A7$(8),A8$(8),A9$(E),B0$(E)
0x0000…004f LineComalBin {
0x0000…004f ptr = 0x8da6 // 0x0 @0x0
0x0000…004f lno = 0x0064 // 0x2 @0x2
0x0000…004f at0004 = ╱87╱ DIM ╱ // 0x4 @0x4
0x0000…004f at0005 = ╱41╱A╱ // 0x5 @0x5
0x0000…004f at0006 = ╱31╱1╱ // 0x6 @0x6
0x0000…004f at0007 = ╱ed╱(╱ // 0x7 @0x7
0x0000…004f at0008 = ╱56╱V╱ // 0x8 @0x8
0x0000…004f at0009 = ╱ee╱)╱ // 0x9 @0x9
0x0000…004f at000a = ╱ec╱,╱ // 0xa @0xa
0x0000…004f at000b = ╱41╱A╱ // 0xb @0xb
0x0000…004f at000c = ╱32╱2╱ // 0xc @0xc
0x0000…004f at000d = ╱ed╱(╱ // 0xd @0xd
0x0000…004f at000e = ╱56╱V╱ // 0xe @0xe
0x0000…004f at000f = ╱ee╱)╱ // 0xf @0xf
0x0000…004f at0010 = ╱ec╱,╱ // 0x10 @0x10
0x0000…004f at0011 = ╱41╱A╱ // 0x11 @0x11
0x0000…004f at0012 = ╱33╱3╱ // 0x12 @0x12
0x0000…004f at0013 = ╱ed╱(╱ // 0x13 @0x13
0x0000…004f at0014 = ╱56╱V╱ // 0x14 @0x14
0x0000…004f at0015 = ╱ee╱)╱ // 0x15 @0x15
0x0000…004f at0016 = ╱ec╱,╱ // 0x16 @0x16
0x0000…004f at0017 = ╱41╱A╱ // 0x17 @0x17
0x0000…004f at0018 = ╱34╱4╱ // 0x18 @0x18
0x0000…004f at0019 = ╱ed╱(╱ // 0x19 @0x19
0x0000…004f at001a = ╱56╱V╱ // 0x1a @0x1a
0x0000…004f at001b = ╱ee╱)╱ // 0x1b @0x1b
0x0000…004f at001c = ╱ec╱,╱ // 0x1c @0x1c
0x0000…004f at001d = ╱41╱A╱ // 0x1d @0x1d
0x0000…004f at001e = ╱35╱5╱ // 0x1e @0x1e
0x0000…004f at001f = ╱ed╱(╱ // 0x1f @0x1f
0x0000…004f at0020 = ╱56╱V╱ // 0x20 @0x20
0x0000…004f at0021 = ╱ee╱)╱ // 0x21 @0x21
0x0000…004f at0022 = ╱ec╱,╱ // 0x22 @0x22
0x0000…004f at0023 = ╱41╱A╱ // 0x23 @0x23
0x0000…004f at0024 = ╱36╱6╱ // 0x24 @0x24
0x0000…004f at0025 = ╱ed╱(╱ // 0x25 @0x25
0x0000…004f at0026 = ╱47╱G╱ // 0x26 @0x26
0x0000…004f at0027 = ╱ee╱)╱ // 0x27 @0x27
0x0000…004f at0028 = ╱ec╱,╱ // 0x28 @0x28
0x0000…004f at0029 = ╱41╱A╱ // 0x29 @0x29
0x0000…004f at002a = ╱37╱7╱ // 0x2a @0x2a
0x0000…004f at002b = ╱ef╱$╱ // 0x2b @0x2b
0x0000…004f at002c = ╱ed╱(╱ // 0x2c @0x2c
0x0000…004f at002d = ╱38╱8╱ // 0x2d @0x2d
0x0000…004f at002e = ╱fe00008004╱ // 0x2e @0x2e
0x0000…004f at0033 = ╱ee╱)╱ // 0x33 @0x33
0x0000…004f at0034 = ╱ec╱,╱ // 0x34 @0x34
0x0000…004f at0035 = ╱41╱A╱ // 0x35 @0x35
0x0000…004f at0036 = ╱38╱8╱ // 0x36 @0x36
0x0000…004f at0037 = ╱ef╱$╱ // 0x37 @0x37
0x0000…004f at0038 = ╱ed╱(╱ // 0x38 @0x38
0x0000…004f at0039 = ╱38╱8╱ // 0x39 @0x39
0x0000…004f at003a = ╱fe00008004╱ // 0x3a @0x3a
0x0000…004f at003f = ╱ee╱)╱ // 0x3f @0x3f
0x0000…004f at0040 = ╱ec╱,╱ // 0x40 @0x40
0x0000…004f at0041 = ╱41╱A╱ // 0x41 @0x41
0x0000…004f at0042 = ╱39╱9╱ // 0x42 @0x42
0x0000…004f at0043 = ╱ef╱$╱ // 0x43 @0x43
0x0000…004f at0044 = ╱ed╱(╱ // 0x44 @0x44
0x0000…004f at0045 = ╱45╱E╱ // 0x45 @0x45
0x0000…004f at0046 = ╱ee╱)╱ // 0x46 @0x46
0x0000…004f at0047 = ╱ec╱,╱ // 0x47 @0x47
0x0000…004f at0048 = ╱42╱B╱ // 0x48 @0x48
0x0000…004f at0049 = ╱30╱0╱ // 0x49 @0x49
0x0000…004f at004a = ╱ef╱$╱ // 0x4a @0x4a
0x0000…004f at004b = ╱ed╱(╱ // 0x4b @0x4b
0x0000…004f at004c = ╱45╱E╱ // 0x4c @0x4c
0x0000…004f at004d = ╱ee╱)╱ // 0x4d @0x4d
0x0000…004f at004e = EOL // 0x4e @0x4e
0x0000…004f }
0x004f…00bf 8e16 0120 DIM RES$(15),OP1$(12),OP2$(12),B1$(12),B2$(12),B3$(12),B4$(12),B5$(12)
0x004f…00bf LineComalBin {
0x004f…00bf ptr = 0x8e16 // 0x4f @0x0
0x004f…00bf lno = 0x0078 // 0x51 @0x2
0x004f…00bf at0004 = ╱87╱ DIM ╱ // 0x53 @0x4
0x004f…00bf at0005 = ╱52╱R╱ // 0x54 @0x5
0x004f…00bf at0006 = ╱45╱E╱ // 0x55 @0x6
0x004f…00bf at0007 = ╱53╱S╱ // 0x56 @0x7
0x004f…00bf at0008 = ╱ef╱$╱ // 0x57 @0x8
0x004f…00bf at0009 = ╱ed╱(╱ // 0x58 @0x9
0x004f…00bf at000a = ╱31╱1╱ // 0x59 @0xa
0x004f…00bf at000b = ╱35╱5╱ // 0x5a @0xb
0x004f…00bf at000c = ╱fe0000f004╱ // 0x5b @0xc
0x004f…00bf at0011 = ╱ee╱)╱ // 0x60 @0x11
0x004f…00bf at0012 = ╱ec╱,╱ // 0x61 @0x12
0x004f…00bf at0013 = ╱4f╱O╱ // 0x62 @0x13
0x004f…00bf at0014 = ╱50╱P╱ // 0x63 @0x14
0x004f…00bf at0015 = ╱31╱1╱ // 0x64 @0x15
0x004f…00bf at0016 = ╱ef╱$╱ // 0x65 @0x16
0x004f…00bf at0017 = ╱ed╱(╱ // 0x66 @0x17
0x004f…00bf at0018 = ╱31╱1╱ // 0x67 @0x18
0x004f…00bf at0019 = ╱32╱2╱ // 0x68 @0x19
0x004f…00bf at001a = ╱fe0000c004╱ // 0x69 @0x1a
0x004f…00bf at001f = ╱ee╱)╱ // 0x6e @0x1f
0x004f…00bf at0020 = ╱ec╱,╱ // 0x6f @0x20
0x004f…00bf at0021 = ╱4f╱O╱ // 0x70 @0x21
0x004f…00bf at0022 = ╱50╱P╱ // 0x71 @0x22
0x004f…00bf at0023 = ╱32╱2╱ // 0x72 @0x23
0x004f…00bf at0024 = ╱ef╱$╱ // 0x73 @0x24
0x004f…00bf at0025 = ╱ed╱(╱ // 0x74 @0x25
0x004f…00bf at0026 = ╱31╱1╱ // 0x75 @0x26
0x004f…00bf at0027 = ╱32╱2╱ // 0x76 @0x27
0x004f…00bf at0028 = ╱fe0000c004╱ // 0x77 @0x28
0x004f…00bf at002d = ╱ee╱)╱ // 0x7c @0x2d
0x004f…00bf at002e = ╱ec╱,╱ // 0x7d @0x2e
0x004f…00bf at002f = ╱42╱B╱ // 0x7e @0x2f
0x004f…00bf at0030 = ╱31╱1╱ // 0x7f @0x30
0x004f…00bf at0031 = ╱ef╱$╱ // 0x80 @0x31
0x004f…00bf at0032 = ╱ed╱(╱ // 0x81 @0x32
0x004f…00bf at0033 = ╱31╱1╱ // 0x82 @0x33
0x004f…00bf at0034 = ╱32╱2╱ // 0x83 @0x34
0x004f…00bf at0035 = ╱fe0000c004╱ // 0x84 @0x35
0x004f…00bf at003a = ╱ee╱)╱ // 0x89 @0x3a
0x004f…00bf at003b = ╱ec╱,╱ // 0x8a @0x3b
0x004f…00bf at003c = ╱42╱B╱ // 0x8b @0x3c
0x004f…00bf at003d = ╱32╱2╱ // 0x8c @0x3d
0x004f…00bf at003e = ╱ef╱$╱ // 0x8d @0x3e
0x004f…00bf at003f = ╱ed╱(╱ // 0x8e @0x3f
0x004f…00bf at0040 = ╱31╱1╱ // 0x8f @0x40
0x004f…00bf at0041 = ╱32╱2╱ // 0x90 @0x41
0x004f…00bf at0042 = ╱fe0000c004╱ // 0x91 @0x42
0x004f…00bf at0047 = ╱ee╱)╱ // 0x96 @0x47
0x004f…00bf at0048 = ╱ec╱,╱ // 0x97 @0x48
0x004f…00bf at0049 = ╱42╱B╱ // 0x98 @0x49
0x004f…00bf at004a = ╱33╱3╱ // 0x99 @0x4a
0x004f…00bf at004b = ╱ef╱$╱ // 0x9a @0x4b
0x004f…00bf at004c = ╱ed╱(╱ // 0x9b @0x4c
0x004f…00bf at004d = ╱31╱1╱ // 0x9c @0x4d
0x004f…00bf at004e = ╱32╱2╱ // 0x9d @0x4e
0x004f…00bf at004f = ╱fe0000c004╱ // 0x9e @0x4f
0x004f…00bf at0054 = ╱ee╱)╱ // 0xa3 @0x54
0x004f…00bf at0055 = ╱ec╱,╱ // 0xa4 @0x55
0x004f…00bf at0056 = ╱42╱B╱ // 0xa5 @0x56
0x004f…00bf at0057 = ╱34╱4╱ // 0xa6 @0x57
0x004f…00bf at0058 = ╱ef╱$╱ // 0xa7 @0x58
0x004f…00bf at0059 = ╱ed╱(╱ // 0xa8 @0x59
0x004f…00bf at005a = ╱31╱1╱ // 0xa9 @0x5a
0x004f…00bf at005b = ╱32╱2╱ // 0xaa @0x5b
0x004f…00bf at005c = ╱fe0000c004╱ // 0xab @0x5c
0x004f…00bf at0061 = ╱ee╱)╱ // 0xb0 @0x61
0x004f…00bf at0062 = ╱ec╱,╱ // 0xb1 @0x62
0x004f…00bf at0063 = ╱42╱B╱ // 0xb2 @0x63
0x004f…00bf at0064 = ╱35╱5╱ // 0xb3 @0x64
0x004f…00bf at0065 = ╱ef╱$╱ // 0xb4 @0x65
0x004f…00bf at0066 = ╱ed╱(╱ // 0xb5 @0x66
0x004f…00bf at0067 = ╱31╱1╱ // 0xb6 @0x67
0x004f…00bf at0068 = ╱32╱2╱ // 0xb7 @0x68
0x004f…00bf at0069 = ╱fe0000c004╱ // 0xb8 @0x69
0x004f…00bf at006e = ╱ee╱)╱ // 0xbd @0x6e
0x004f…00bf at006f = EOL // 0xbe @0x6f
0x004f…00bf }
0x00bf…012d 8e84 0130 DIM B7(10),B8$(10,37),B9$(8,11),C0$(12),C1$(12),C2$(12),C3$(12)
0x00bf…012d LineComalBin {
0x00bf…012d ptr = 0x8e84 // 0xbf @0x0
0x00bf…012d lno = 0x0082 // 0xc1 @0x2
0x00bf…012d at0004 = ╱87╱ DIM ╱ // 0xc3 @0x4
0x00bf…012d at0005 = ╱42╱B╱ // 0xc4 @0x5
0x00bf…012d at0006 = ╱37╱7╱ // 0xc5 @0x6
0x00bf…012d at0007 = ╱ed╱(╱ // 0xc6 @0x7
0x00bf…012d at0008 = ╱31╱1╱ // 0xc7 @0x8
0x00bf…012d at0009 = ╱30╱0╱ // 0xc8 @0x9
0x00bf…012d at000a = ╱fe0000a004╱ // 0xc9 @0xa
0x00bf…012d at000f = ╱ee╱)╱ // 0xce @0xf
0x00bf…012d at0010 = ╱ec╱,╱ // 0xcf @0x10
0x00bf…012d at0011 = ╱42╱B╱ // 0xd0 @0x11
0x00bf…012d at0012 = ╱38╱8╱ // 0xd1 @0x12
0x00bf…012d at0013 = ╱ef╱$╱ // 0xd2 @0x13
0x00bf…012d at0014 = ╱ed╱(╱ // 0xd3 @0x14
0x00bf…012d at0015 = ╱31╱1╱ // 0xd4 @0x15
0x00bf…012d at0016 = ╱30╱0╱ // 0xd5 @0x16
0x00bf…012d at0017 = ╱fe0000a004╱ // 0xd6 @0x17
0x00bf…012d at001c = ╱ec╱,╱ // 0xdb @0x1c
0x00bf…012d at001d = ╱33╱3╱ // 0xdc @0x1d
0x00bf…012d at001e = ╱37╱7╱ // 0xdd @0x1e
0x00bf…012d at001f = ╱fe00009406╱ // 0xde @0x1f
0x00bf…012d at0024 = ╱ee╱)╱ // 0xe3 @0x24
0x00bf…012d at0025 = ╱ec╱,╱ // 0xe4 @0x25
0x00bf…012d at0026 = ╱42╱B╱ // 0xe5 @0x26
0x00bf…012d at0027 = ╱39╱9╱ // 0xe6 @0x27
0x00bf…012d at0028 = ╱ef╱$╱ // 0xe7 @0x28
0x00bf…012d at0029 = ╱ed╱(╱ // 0xe8 @0x29
0x00bf…012d at002a = ╱38╱8╱ // 0xe9 @0x2a
0x00bf…012d at002b = ╱fe00008004╱ // 0xea @0x2b
0x00bf…012d at0030 = ╱ec╱,╱ // 0xef @0x30
0x00bf…012d at0031 = ╱31╱1╱ // 0xf0 @0x31
0x00bf…012d at0032 = ╱31╱1╱ // 0xf1 @0x32
0x00bf…012d at0033 = ╱fe0000b004╱ // 0xf2 @0x33
0x00bf…012d at0038 = ╱ee╱)╱ // 0xf7 @0x38
0x00bf…012d at0039 = ╱ec╱,╱ // 0xf8 @0x39
0x00bf…012d at003a = ╱43╱C╱ // 0xf9 @0x3a
0x00bf…012d at003b = ╱30╱0╱ // 0xfa @0x3b
0x00bf…012d at003c = ╱ef╱$╱ // 0xfb @0x3c
0x00bf…012d at003d = ╱ed╱(╱ // 0xfc @0x3d
0x00bf…012d at003e = ╱31╱1╱ // 0xfd @0x3e
0x00bf…012d at003f = ╱32╱2╱ // 0xfe @0x3f
0x00bf…012d at0040 = ╱fe0000c004╱ // 0xff @0x40
0x00bf…012d at0045 = ╱ee╱)╱ // 0x104 @0x45
0x00bf…012d at0046 = ╱ec╱,╱ // 0x105 @0x46
0x00bf…012d at0047 = ╱43╱C╱ // 0x106 @0x47
0x00bf…012d at0048 = ╱31╱1╱ // 0x107 @0x48
0x00bf…012d at0049 = ╱ef╱$╱ // 0x108 @0x49
0x00bf…012d at004a = ╱ed╱(╱ // 0x109 @0x4a
0x00bf…012d at004b = ╱31╱1╱ // 0x10a @0x4b
0x00bf…012d at004c = ╱32╱2╱ // 0x10b @0x4c
0x00bf…012d at004d = ╱fe0000c004╱ // 0x10c @0x4d
0x00bf…012d at0052 = ╱ee╱)╱ // 0x111 @0x52
0x00bf…012d at0053 = ╱ec╱,╱ // 0x112 @0x53
0x00bf…012d at0054 = ╱43╱C╱ // 0x113 @0x54
0x00bf…012d at0055 = ╱32╱2╱ // 0x114 @0x55
0x00bf…012d at0056 = ╱ef╱$╱ // 0x115 @0x56
0x00bf…012d at0057 = ╱ed╱(╱ // 0x116 @0x57
0x00bf…012d at0058 = ╱31╱1╱ // 0x117 @0x58
0x00bf…012d at0059 = ╱32╱2╱ // 0x118 @0x59
0x00bf…012d at005a = ╱fe0000c004╱ // 0x119 @0x5a
0x00bf…012d at005f = ╱ee╱)╱ // 0x11e @0x5f
0x00bf…012d at0060 = ╱ec╱,╱ // 0x11f @0x60
0x00bf…012d at0061 = ╱43╱C╱ // 0x120 @0x61
0x00bf…012d at0062 = ╱33╱3╱ // 0x121 @0x62
0x00bf…012d at0063 = ╱ef╱$╱ // 0x122 @0x63
0x00bf…012d at0064 = ╱ed╱(╱ // 0x123 @0x64
0x00bf…012d at0065 = ╱31╱1╱ // 0x124 @0x65
0x00bf…012d at0066 = ╱32╱2╱ // 0x125 @0x66
0x00bf…012d at0067 = ╱fe0000c004╱ // 0x126 @0x67
0x00bf…012d at006c = ╱ee╱)╱ // 0x12b @0x6c
0x00bf…012d at006d = EOL // 0x12c @0x6d
0x00bf…012d }
0x012d…0188 8edf 0140 DIM C4$(12),C5$(45,11),C6$(55),C9$(16),D0$(16),D1$(71)
0x012d…0188 LineComalBin {
0x012d…0188 ptr = 0x8edf // 0x12d @0x0
0x012d…0188 lno = 0x008c // 0x12f @0x2
0x012d…0188 at0004 = ╱87╱ DIM ╱ // 0x131 @0x4
0x012d…0188 at0005 = ╱43╱C╱ // 0x132 @0x5
0x012d…0188 at0006 = ╱34╱4╱ // 0x133 @0x6
0x012d…0188 at0007 = ╱ef╱$╱ // 0x134 @0x7
0x012d…0188 at0008 = ╱ed╱(╱ // 0x135 @0x8
0x012d…0188 at0009 = ╱31╱1╱ // 0x136 @0x9
0x012d…0188 at000a = ╱32╱2╱ // 0x137 @0xa
0x012d…0188 at000b = ╱fe0000c004╱ // 0x138 @0xb
0x012d…0188 at0010 = ╱ee╱)╱ // 0x13d @0x10
0x012d…0188 at0011 = ╱ec╱,╱ // 0x13e @0x11
0x012d…0188 at0012 = ╱43╱C╱ // 0x13f @0x12
0x012d…0188 at0013 = ╱35╱5╱ // 0x140 @0x13
0x012d…0188 at0014 = ╱ef╱$╱ // 0x141 @0x14
0x012d…0188 at0015 = ╱ed╱(╱ // 0x142 @0x15
0x012d…0188 at0016 = ╱34╱4╱ // 0x143 @0x16
0x012d…0188 at0017 = ╱35╱5╱ // 0x144 @0x17
0x012d…0188 at0018 = ╱fe0000b406╱ // 0x145 @0x18
0x012d…0188 at001d = ╱ec╱,╱ // 0x14a @0x1d
0x012d…0188 at001e = ╱31╱1╱ // 0x14b @0x1e
0x012d…0188 at001f = ╱31╱1╱ // 0x14c @0x1f
0x012d…0188 at0020 = ╱fe0000b004╱ // 0x14d @0x20
0x012d…0188 at0025 = ╱ee╱)╱ // 0x152 @0x25
0x012d…0188 at0026 = ╱ec╱,╱ // 0x153 @0x26
0x012d…0188 at0027 = ╱43╱C╱ // 0x154 @0x27
0x012d…0188 at0028 = ╱36╱6╱ // 0x155 @0x28
0x012d…0188 at0029 = ╱ef╱$╱ // 0x156 @0x29
0x012d…0188 at002a = ╱ed╱(╱ // 0x157 @0x2a
0x012d…0188 at002b = ╱35╱5╱ // 0x158 @0x2b
0x012d…0188 at002c = ╱35╱5╱ // 0x159 @0x2c
0x012d…0188 at002d = ╱fe0000dc06╱ // 0x15a @0x2d
0x012d…0188 at0032 = ╱ee╱)╱ // 0x15f @0x32
0x012d…0188 at0033 = ╱ec╱,╱ // 0x160 @0x33
0x012d…0188 at0034 = ╱43╱C╱ // 0x161 @0x34
0x012d…0188 at0035 = ╱39╱9╱ // 0x162 @0x35
0x012d…0188 at0036 = ╱ef╱$╱ // 0x163 @0x36
0x012d…0188 at0037 = ╱ed╱(╱ // 0x164 @0x37
0x012d…0188 at0038 = ╱31╱1╱ // 0x165 @0x38
0x012d…0188 at0039 = ╱36╱6╱ // 0x166 @0x39
0x012d…0188 at003a = ╱fe00008005╱ // 0x167 @0x3a
0x012d…0188 at003f = ╱ee╱)╱ // 0x16c @0x3f
0x012d…0188 at0040 = ╱ec╱,╱ // 0x16d @0x40
0x012d…0188 at0041 = ╱44╱D╱ // 0x16e @0x41
0x012d…0188 at0042 = ╱30╱0╱ // 0x16f @0x42
0x012d…0188 at0043 = ╱ef╱$╱ // 0x170 @0x43
0x012d…0188 at0044 = ╱ed╱(╱ // 0x171 @0x44
0x012d…0188 at0045 = ╱31╱1╱ // 0x172 @0x45
0x012d…0188 at0046 = ╱36╱6╱ // 0x173 @0x46
0x012d…0188 at0047 = ╱fe00008005╱ // 0x174 @0x47
0x012d…0188 at004c = ╱ee╱)╱ // 0x179 @0x4c
0x012d…0188 at004d = ╱ec╱,╱ // 0x17a @0x4d
0x012d…0188 at004e = ╱44╱D╱ // 0x17b @0x4e
0x012d…0188 at004f = ╱31╱1╱ // 0x17c @0x4f
0x012d…0188 at0050 = ╱ef╱$╱ // 0x17d @0x50
0x012d…0188 at0051 = ╱ed╱(╱ // 0x17e @0x51
0x012d…0188 at0052 = ╱37╱7╱ // 0x17f @0x52
0x012d…0188 at0053 = ╱31╱1╱ // 0x180 @0x53
0x012d…0188 at0054 = ╱fe00008e07╱ // 0x181 @0x54
0x012d…0188 at0059 = ╱ee╱)╱ // 0x186 @0x59
0x012d…0188 at005a = EOL // 0x187 @0x5a
0x012d…0188 }
0x0188…01f5 8f4c 0150 DIM D2$(27),D3$(55),D4$(34),D5$(29),D6$(37),D7$(16),D8$(16),D9$(16)
0x0188…01f5 LineComalBin {
0x0188…01f5 ptr = 0x8f4c // 0x188 @0x0
0x0188…01f5 lno = 0x0096 // 0x18a @0x2
0x0188…01f5 at0004 = ╱87╱ DIM ╱ // 0x18c @0x4
0x0188…01f5 at0005 = ╱44╱D╱ // 0x18d @0x5
0x0188…01f5 at0006 = ╱32╱2╱ // 0x18e @0x6
0x0188…01f5 at0007 = ╱ef╱$╱ // 0x18f @0x7
0x0188…01f5 at0008 = ╱ed╱(╱ // 0x190 @0x8
0x0188…01f5 at0009 = ╱32╱2╱ // 0x191 @0x9
0x0188…01f5 at000a = ╱37╱7╱ // 0x192 @0xa
0x0188…01f5 at000b = ╱fe0000d805╱ // 0x193 @0xb
0x0188…01f5 at0010 = ╱ee╱)╱ // 0x198 @0x10
0x0188…01f5 at0011 = ╱ec╱,╱ // 0x199 @0x11
0x0188…01f5 at0012 = ╱44╱D╱ // 0x19a @0x12
0x0188…01f5 at0013 = ╱33╱3╱ // 0x19b @0x13
0x0188…01f5 at0014 = ╱ef╱$╱ // 0x19c @0x14
0x0188…01f5 at0015 = ╱ed╱(╱ // 0x19d @0x15
0x0188…01f5 at0016 = ╱35╱5╱ // 0x19e @0x16
0x0188…01f5 at0017 = ╱35╱5╱ // 0x19f @0x17
0x0188…01f5 at0018 = ╱fe0000dc06╱ // 0x1a0 @0x18
0x0188…01f5 at001d = ╱ee╱)╱ // 0x1a5 @0x1d
0x0188…01f5 at001e = ╱ec╱,╱ // 0x1a6 @0x1e
0x0188…01f5 at001f = ╱44╱D╱ // 0x1a7 @0x1f
0x0188…01f5 at0020 = ╱34╱4╱ // 0x1a8 @0x20
0x0188…01f5 at0021 = ╱ef╱$╱ // 0x1a9 @0x21
0x0188…01f5 at0022 = ╱ed╱(╱ // 0x1aa @0x22
0x0188…01f5 at0023 = ╱33╱3╱ // 0x1ab @0x23
0x0188…01f5 at0024 = ╱34╱4╱ // 0x1ac @0x24
0x0188…01f5 at0025 = ╱fe00008806╱ // 0x1ad @0x25
0x0188…01f5 at002a = ╱ee╱)╱ // 0x1b2 @0x2a
0x0188…01f5 at002b = ╱ec╱,╱ // 0x1b3 @0x2b
0x0188…01f5 at002c = ╱44╱D╱ // 0x1b4 @0x2c
0x0188…01f5 at002d = ╱35╱5╱ // 0x1b5 @0x2d
0x0188…01f5 at002e = ╱ef╱$╱ // 0x1b6 @0x2e
0x0188…01f5 at002f = ╱ed╱(╱ // 0x1b7 @0x2f
0x0188…01f5 at0030 = ╱32╱2╱ // 0x1b8 @0x30
0x0188…01f5 at0031 = ╱39╱9╱ // 0x1b9 @0x31
0x0188…01f5 at0032 = ╱fe0000e805╱ // 0x1ba @0x32
0x0188…01f5 at0037 = ╱ee╱)╱ // 0x1bf @0x37
0x0188…01f5 at0038 = ╱ec╱,╱ // 0x1c0 @0x38
0x0188…01f5 at0039 = ╱44╱D╱ // 0x1c1 @0x39
0x0188…01f5 at003a = ╱36╱6╱ // 0x1c2 @0x3a
0x0188…01f5 at003b = ╱ef╱$╱ // 0x1c3 @0x3b
0x0188…01f5 at003c = ╱ed╱(╱ // 0x1c4 @0x3c
0x0188…01f5 at003d = ╱33╱3╱ // 0x1c5 @0x3d
0x0188…01f5 at003e = ╱37╱7╱ // 0x1c6 @0x3e
0x0188…01f5 at003f = ╱fe00009406╱ // 0x1c7 @0x3f
0x0188…01f5 at0044 = ╱ee╱)╱ // 0x1cc @0x44
0x0188…01f5 at0045 = ╱ec╱,╱ // 0x1cd @0x45
0x0188…01f5 at0046 = ╱44╱D╱ // 0x1ce @0x46
0x0188…01f5 at0047 = ╱37╱7╱ // 0x1cf @0x47
0x0188…01f5 at0048 = ╱ef╱$╱ // 0x1d0 @0x48
0x0188…01f5 at0049 = ╱ed╱(╱ // 0x1d1 @0x49
0x0188…01f5 at004a = ╱31╱1╱ // 0x1d2 @0x4a
0x0188…01f5 at004b = ╱36╱6╱ // 0x1d3 @0x4b
0x0188…01f5 at004c = ╱fe00008005╱ // 0x1d4 @0x4c
0x0188…01f5 at0051 = ╱ee╱)╱ // 0x1d9 @0x51
0x0188…01f5 at0052 = ╱ec╱,╱ // 0x1da @0x52
0x0188…01f5 at0053 = ╱44╱D╱ // 0x1db @0x53
0x0188…01f5 at0054 = ╱38╱8╱ // 0x1dc @0x54
0x0188…01f5 at0055 = ╱ef╱$╱ // 0x1dd @0x55
0x0188…01f5 at0056 = ╱ed╱(╱ // 0x1de @0x56
0x0188…01f5 at0057 = ╱31╱1╱ // 0x1df @0x57
0x0188…01f5 at0058 = ╱36╱6╱ // 0x1e0 @0x58
0x0188…01f5 at0059 = ╱fe00008005╱ // 0x1e1 @0x59
0x0188…01f5 at005e = ╱ee╱)╱ // 0x1e6 @0x5e
0x0188…01f5 at005f = ╱ec╱,╱ // 0x1e7 @0x5f
0x0188…01f5 at0060 = ╱44╱D╱ // 0x1e8 @0x60
0x0188…01f5 at0061 = ╱39╱9╱ // 0x1e9 @0x61
0x0188…01f5 at0062 = ╱ef╱$╱ // 0x1ea @0x62
0x0188…01f5 at0063 = ╱ed╱(╱ // 0x1eb @0x63
0x0188…01f5 at0064 = ╱31╱1╱ // 0x1ec @0x64
0x0188…01f5 at0065 = ╱36╱6╱ // 0x1ed @0x65
0x0188…01f5 at0066 = ╱fe00008005╱ // 0x1ee @0x66
0x0188…01f5 at006b = ╱ee╱)╱ // 0x1f3 @0x6b
0x0188…01f5 at006c = EOL // 0x1f4 @0x6c
0x0188…01f5 }
0x01f5…0267 8fbe 0160 DIM E0$(16),E1$(16),E2$(16,12),E6(18),E7(18),E8(18),E9$(79),F0$(79)
0x01f5…0267 LineComalBin {
0x01f5…0267 ptr = 0x8fbe // 0x1f5 @0x0
0x01f5…0267 lno = 0x00a0 // 0x1f7 @0x2
0x01f5…0267 at0004 = ╱87╱ DIM ╱ // 0x1f9 @0x4
0x01f5…0267 at0005 = ╱45╱E╱ // 0x1fa @0x5
0x01f5…0267 at0006 = ╱30╱0╱ // 0x1fb @0x6
0x01f5…0267 at0007 = ╱ef╱$╱ // 0x1fc @0x7
0x01f5…0267 at0008 = ╱ed╱(╱ // 0x1fd @0x8
0x01f5…0267 at0009 = ╱31╱1╱ // 0x1fe @0x9
0x01f5…0267 at000a = ╱36╱6╱ // 0x1ff @0xa
0x01f5…0267 at000b = ╱fe00008005╱ // 0x200 @0xb
0x01f5…0267 at0010 = ╱ee╱)╱ // 0x205 @0x10
0x01f5…0267 at0011 = ╱ec╱,╱ // 0x206 @0x11
0x01f5…0267 at0012 = ╱45╱E╱ // 0x207 @0x12
0x01f5…0267 at0013 = ╱31╱1╱ // 0x208 @0x13
0x01f5…0267 at0014 = ╱ef╱$╱ // 0x209 @0x14
0x01f5…0267 at0015 = ╱ed╱(╱ // 0x20a @0x15
0x01f5…0267 at0016 = ╱31╱1╱ // 0x20b @0x16
0x01f5…0267 at0017 = ╱36╱6╱ // 0x20c @0x17
0x01f5…0267 at0018 = ╱fe00008005╱ // 0x20d @0x18
0x01f5…0267 at001d = ╱ee╱)╱ // 0x212 @0x1d
0x01f5…0267 at001e = ╱ec╱,╱ // 0x213 @0x1e
0x01f5…0267 at001f = ╱45╱E╱ // 0x214 @0x1f
0x01f5…0267 at0020 = ╱32╱2╱ // 0x215 @0x20
0x01f5…0267 at0021 = ╱ef╱$╱ // 0x216 @0x21
0x01f5…0267 at0022 = ╱ed╱(╱ // 0x217 @0x22
0x01f5…0267 at0023 = ╱31╱1╱ // 0x218 @0x23
0x01f5…0267 at0024 = ╱36╱6╱ // 0x219 @0x24
0x01f5…0267 at0025 = ╱fe00008005╱ // 0x21a @0x25
0x01f5…0267 at002a = ╱ec╱,╱ // 0x21f @0x2a
0x01f5…0267 at002b = ╱31╱1╱ // 0x220 @0x2b
0x01f5…0267 at002c = ╱32╱2╱ // 0x221 @0x2c
0x01f5…0267 at002d = ╱fe0000c004╱ // 0x222 @0x2d
0x01f5…0267 at0032 = ╱ee╱)╱ // 0x227 @0x32
0x01f5…0267 at0033 = ╱ec╱,╱ // 0x228 @0x33
0x01f5…0267 at0034 = ╱45╱E╱ // 0x229 @0x34
0x01f5…0267 at0035 = ╱36╱6╱ // 0x22a @0x35
0x01f5…0267 at0036 = ╱ed╱(╱ // 0x22b @0x36
0x01f5…0267 at0037 = ╱31╱1╱ // 0x22c @0x37
0x01f5…0267 at0038 = ╱38╱8╱ // 0x22d @0x38
0x01f5…0267 at0039 = ╱fe00009005╱ // 0x22e @0x39
0x01f5…0267 at003e = ╱ee╱)╱ // 0x233 @0x3e
0x01f5…0267 at003f = ╱ec╱,╱ // 0x234 @0x3f
0x01f5…0267 at0040 = ╱45╱E╱ // 0x235 @0x40
0x01f5…0267 at0041 = ╱37╱7╱ // 0x236 @0x41
0x01f5…0267 at0042 = ╱ed╱(╱ // 0x237 @0x42
0x01f5…0267 at0043 = ╱31╱1╱ // 0x238 @0x43
0x01f5…0267 at0044 = ╱38╱8╱ // 0x239 @0x44
0x01f5…0267 at0045 = ╱fe00009005╱ // 0x23a @0x45
0x01f5…0267 at004a = ╱ee╱)╱ // 0x23f @0x4a
0x01f5…0267 at004b = ╱ec╱,╱ // 0x240 @0x4b
0x01f5…0267 at004c = ╱45╱E╱ // 0x241 @0x4c
0x01f5…0267 at004d = ╱38╱8╱ // 0x242 @0x4d
0x01f5…0267 at004e = ╱ed╱(╱ // 0x243 @0x4e
0x01f5…0267 at004f = ╱31╱1╱ // 0x244 @0x4f
0x01f5…0267 at0050 = ╱38╱8╱ // 0x245 @0x50
0x01f5…0267 at0051 = ╱fe00009005╱ // 0x246 @0x51
0x01f5…0267 at0056 = ╱ee╱)╱ // 0x24b @0x56
0x01f5…0267 at0057 = ╱ec╱,╱ // 0x24c @0x57
0x01f5…0267 at0058 = ╱45╱E╱ // 0x24d @0x58
0x01f5…0267 at0059 = ╱39╱9╱ // 0x24e @0x59
0x01f5…0267 at005a = ╱ef╱$╱ // 0x24f @0x5a
0x01f5…0267 at005b = ╱ed╱(╱ // 0x250 @0x5b
0x01f5…0267 at005c = ╱37╱7╱ // 0x251 @0x5c
0x01f5…0267 at005d = ╱39╱9╱ // 0x252 @0x5d
0x01f5…0267 at005e = ╱fe00009e07╱ // 0x253 @0x5e
0x01f5…0267 at0063 = ╱ee╱)╱ // 0x258 @0x63
0x01f5…0267 at0064 = ╱ec╱,╱ // 0x259 @0x64
0x01f5…0267 at0065 = ╱46╱F╱ // 0x25a @0x65
0x01f5…0267 at0066 = ╱30╱0╱ // 0x25b @0x66
0x01f5…0267 at0067 = ╱ef╱$╱ // 0x25c @0x67
0x01f5…0267 at0068 = ╱ed╱(╱ // 0x25d @0x68
0x01f5…0267 at0069 = ╱37╱7╱ // 0x25e @0x69
0x01f5…0267 at006a = ╱39╱9╱ // 0x25f @0x6a
0x01f5…0267 at006b = ╱fe00009e07╱ // 0x260 @0x6b
0x01f5…0267 at0070 = ╱ee╱)╱ // 0x265 @0x70
0x01f5…0267 at0071 = EOL // 0x266 @0x71
0x01f5…0267 }
0x0267…02aa 9001 0162 DIM F1$(12),DD$(6),PAGE$(19,68),ÅR$(G),KV$(E)
0x0267…02aa LineComalBin {
0x0267…02aa ptr = 0x9001 // 0x267 @0x0
0x0267…02aa lno = 0x00a2 // 0x269 @0x2
0x0267…02aa at0004 = ╱87╱ DIM ╱ // 0x26b @0x4
0x0267…02aa at0005 = ╱46╱F╱ // 0x26c @0x5
0x0267…02aa at0006 = ╱31╱1╱ // 0x26d @0x6
0x0267…02aa at0007 = ╱ef╱$╱ // 0x26e @0x7
0x0267…02aa at0008 = ╱ed╱(╱ // 0x26f @0x8
0x0267…02aa at0009 = ╱31╱1╱ // 0x270 @0x9
0x0267…02aa at000a = ╱32╱2╱ // 0x271 @0xa
0x0267…02aa at000b = ╱fe0000c004╱ // 0x272 @0xb
0x0267…02aa at0010 = ╱ee╱)╱ // 0x277 @0x10
0x0267…02aa at0011 = ╱ec╱,╱ // 0x278 @0x11
0x0267…02aa at0012 = ╱44╱D╱ // 0x279 @0x12
0x0267…02aa at0013 = ╱44╱D╱ // 0x27a @0x13
0x0267…02aa at0014 = ╱ef╱$╱ // 0x27b @0x14
0x0267…02aa at0015 = ╱ed╱(╱ // 0x27c @0x15
0x0267…02aa at0016 = ╱36╱6╱ // 0x27d @0x16
0x0267…02aa at0017 = ╱fe0000c003╱ // 0x27e @0x17
0x0267…02aa at001c = ╱ee╱)╱ // 0x283 @0x1c
0x0267…02aa at001d = ╱ec╱,╱ // 0x284 @0x1d
0x0267…02aa at001e = ╱50╱P╱ // 0x285 @0x1e
0x0267…02aa at001f = ╱41╱A╱ // 0x286 @0x1f
0x0267…02aa at0020 = ╱47╱G╱ // 0x287 @0x20
0x0267…02aa at0021 = ╱45╱E╱ // 0x288 @0x21
0x0267…02aa at0022 = ╱ef╱$╱ // 0x289 @0x22
0x0267…02aa at0023 = ╱ed╱(╱ // 0x28a @0x23
0x0267…02aa at0024 = ╱31╱1╱ // 0x28b @0x24
0x0267…02aa at0025 = ╱39╱9╱ // 0x28c @0x25
0x0267…02aa at0026 = ╱fe00009805╱ // 0x28d @0x26
0x0267…02aa at002b = ╱ec╱,╱ // 0x292 @0x2b
0x0267…02aa at002c = ╱36╱6╱ // 0x293 @0x2c
0x0267…02aa at002d = ╱38╱8╱ // 0x294 @0x2d
0x0267…02aa at002e = ╱fe00008807╱ // 0x295 @0x2e
0x0267…02aa at0033 = ╱ee╱)╱ // 0x29a @0x33
0x0267…02aa at0034 = ╱ec╱,╱ // 0x29b @0x34
0x0267…02aa at0035 = ╱5d╱Å╱ // 0x29c @0x35
0x0267…02aa at0036 = ╱52╱R╱ // 0x29d @0x36
0x0267…02aa at0037 = ╱ef╱$╱ // 0x29e @0x37
0x0267…02aa at0038 = ╱ed╱(╱ // 0x29f @0x38
0x0267…02aa at0039 = ╱47╱G╱ // 0x2a0 @0x39
0x0267…02aa at003a = ╱ee╱)╱ // 0x2a1 @0x3a
0x0267…02aa at003b = ╱ec╱,╱ // 0x2a2 @0x3b
0x0267…02aa at003c = ╱4b╱K╱ // 0x2a3 @0x3c
0x0267…02aa at003d = ╱56╱V╱ // 0x2a4 @0x3d
0x0267…02aa at003e = ╱ef╱$╱ // 0x2a5 @0x3e
0x0267…02aa at003f = ╱ed╱(╱ // 0x2a6 @0x3f
0x0267…02aa at0040 = ╱45╱E╱ // 0x2a7 @0x40
0x0267…02aa at0041 = ╱ee╱)╱ // 0x2a8 @0x41
0x0267…02aa at0042 = EOL // 0x2a9 @0x42
0x0267…02aa }
0x02aa…02e7 903e 0170 B3$=" 0+";B5$=" 6,00+";B4$=" 100,00+"
0x02aa…02e7 LineComalBin {
0x02aa…02e7 ptr = 0x903e // 0x2aa @0x0
0x02aa…02e7 lno = 0x00aa // 0x2ac @0x2
0x02aa…02e7 at0004 = ╱42╱B╱ // 0x2ae @0x4
0x02aa…02e7 at0005 = ╱33╱3╱ // 0x2af @0x5
0x02aa…02e7 at0006 = ╱ef╱$╱ // 0x2b0 @0x6
0x02aa…02e7 at0007 = ╱dc╱=╱ // 0x2b1 @0x7
0x02aa…02e7 at0008 = ╱22╱"╱ // 0x2b2 @0x8
0x02aa…02e7 at0009 = ╱20╱…╱ // 0x2b3 @0x9
0x02aa…02e7 at000a = ╱20╱…╱ // 0x2b4 @0xa
0x02aa…02e7 at000b = ╱20╱…╱ // 0x2b5 @0xb
0x02aa…02e7 at000c = ╱20╱…╱ // 0x2b6 @0xc
0x02aa…02e7 at000d = ╱20╱…╱ // 0x2b7 @0xd
0x02aa…02e7 at000e = ╱20╱…╱ // 0x2b8 @0xe
0x02aa…02e7 at000f = ╱20╱…╱ // 0x2b9 @0xf
0x02aa…02e7 at0010 = ╱20╱…╱ // 0x2ba @0x10
0x02aa…02e7 at0011 = ╱20╱…╱ // 0x2bb @0x11
0x02aa…02e7 at0012 = ╱20╱…╱ // 0x2bc @0x12
0x02aa…02e7 at0013 = ╱30╱0╱ // 0x2bd @0x13
0x02aa…02e7 at0014 = ╱2b╱+╱ // 0x2be @0x14
0x02aa…02e7 at0015 = ╱22╱"╱ // 0x2bf @0x15
0x02aa…02e7 at0016 = ╱eb╱;╱ // 0x2c0 @0x16
0x02aa…02e7 at0017 = ╱42╱B╱ // 0x2c1 @0x17
0x02aa…02e7 at0018 = ╱35╱5╱ // 0x2c2 @0x18
0x02aa…02e7 at0019 = ╱ef╱$╱ // 0x2c3 @0x19
0x02aa…02e7 at001a = ╱dc╱=╱ // 0x2c4 @0x1a
0x02aa…02e7 at001b = ╱22╱"╱ // 0x2c5 @0x1b
0x02aa…02e7 at001c = ╱20╱…╱ // 0x2c6 @0x1c
0x02aa…02e7 at001d = ╱20╱…╱ // 0x2c7 @0x1d
0x02aa…02e7 at001e = ╱20╱…╱ // 0x2c8 @0x1e
0x02aa…02e7 at001f = ╱20╱…╱ // 0x2c9 @0x1f
0x02aa…02e7 at0020 = ╱20╱…╱ // 0x2ca @0x20
0x02aa…02e7 at0021 = ╱20╱…╱ // 0x2cb @0x21
0x02aa…02e7 at0022 = ╱20╱…╱ // 0x2cc @0x22
0x02aa…02e7 at0023 = ╱36╱6╱ // 0x2cd @0x23
0x02aa…02e7 at0024 = ╱2c╱,╱ // 0x2ce @0x24
0x02aa…02e7 at0025 = ╱30╱0╱ // 0x2cf @0x25
0x02aa…02e7 at0026 = ╱30╱0╱ // 0x2d0 @0x26
0x02aa…02e7 at0027 = ╱2b╱+╱ // 0x2d1 @0x27
0x02aa…02e7 at0028 = ╱22╱"╱ // 0x2d2 @0x28
0x02aa…02e7 at0029 = ╱eb╱;╱ // 0x2d3 @0x29
0x02aa…02e7 at002a = ╱42╱B╱ // 0x2d4 @0x2a
0x02aa…02e7 at002b = ╱34╱4╱ // 0x2d5 @0x2b
0x02aa…02e7 at002c = ╱ef╱$╱ // 0x2d6 @0x2c
0x02aa…02e7 at002d = ╱dc╱=╱ // 0x2d7 @0x2d
0x02aa…02e7 at002e = ╱22╱"╱ // 0x2d8 @0x2e
0x02aa…02e7 at002f = ╱20╱…╱ // 0x2d9 @0x2f
0x02aa…02e7 at0030 = ╱20╱…╱ // 0x2da @0x30
0x02aa…02e7 at0031 = ╱20╱…╱ // 0x2db @0x31
0x02aa…02e7 at0032 = ╱20╱…╱ // 0x2dc @0x32
0x02aa…02e7 at0033 = ╱20╱…╱ // 0x2dd @0x33
0x02aa…02e7 at0034 = ╱31╱1╱ // 0x2de @0x34
0x02aa…02e7 at0035 = ╱30╱0╱ // 0x2df @0x35
0x02aa…02e7 at0036 = ╱30╱0╱ // 0x2e0 @0x36
0x02aa…02e7 at0037 = ╱2c╱,╱ // 0x2e1 @0x37
0x02aa…02e7 at0038 = ╱30╱0╱ // 0x2e2 @0x38
0x02aa…02e7 at0039 = ╱30╱0╱ // 0x2e3 @0x39
0x02aa…02e7 at003a = ╱2b╱+╱ // 0x2e4 @0x3a
0x02aa…02e7 at003b = ╱22╱"╱ // 0x2e5 @0x3b
0x02aa…02e7 at003c = EOL // 0x2e6 @0x3c
0x02aa…02e7 }
0x02e7…02f8 904f 0171 FOR I=E TO 16
0x02e7…02f8 LineComalBin {
0x02e7…02f8 ptr = 0x904f // 0x2e7 @0x0
0x02e7…02f8 lno = 0x00ab // 0x2e9 @0x2
0x02e7…02f8 at0004 = ╱83╱ FOR ╱ // 0x2eb @0x4
0x02e7…02f8 at0005 = ╱49╱I╱ // 0x2ec @0x5
0x02e7…02f8 at0006 = ╱dc╱=╱ // 0x2ed @0x6
0x02e7…02f8 at0007 = ╱45╱E╱ // 0x2ee @0x7
0x02e7…02f8 at0008 = ╱b7╱ TO ╱ // 0x2ef @0x8
0x02e7…02f8 at0009 = ╱31╱1╱ // 0x2f0 @0x9
0x02e7…02f8 at000a = ╱36╱6╱ // 0x2f1 @0xa
0x02e7…02f8 at000b = ╱fe00008005╱ // 0x2f2 @0xb
0x02e7…02f8 at0010 = EOL // 0x2f7 @0x10
0x02e7…02f8 }
0x02f8…0307 905e 0172 E2$(I)=B3$
0x02f8…0307 LineComalBin {
0x02f8…0307 ptr = 0x905e // 0x2f8 @0x0
0x02f8…0307 lno = 0x00ac // 0x2fa @0x2
0x02f8…0307 at0004 = ╱45╱E╱ // 0x2fc @0x4
0x02f8…0307 at0005 = ╱32╱2╱ // 0x2fd @0x5
0x02f8…0307 at0006 = ╱ef╱$╱ // 0x2fe @0x6
0x02f8…0307 at0007 = ╱ed╱(╱ // 0x2ff @0x7
0x02f8…0307 at0008 = ╱49╱I╱ // 0x300 @0x8
0x02f8…0307 at0009 = ╱ee╱)╱ // 0x301 @0x9
0x02f8…0307 at000a = ╱dc╱=╱ // 0x302 @0xa
0x02f8…0307 at000b = ╱42╱B╱ // 0x303 @0xb
0x02f8…0307 at000c = ╱33╱3╱ // 0x304 @0xc
0x02f8…0307 at000d = ╱ef╱$╱ // 0x305 @0xd
0x02f8…0307 at000e = EOL // 0x306 @0xe
0x02f8…0307 }
0x0307…030e 9065 0173 NEXT I
0x0307…030e LineComalBin {
0x0307…030e ptr = 0x9065 // 0x307 @0x0
0x0307…030e lno = 0x00ad // 0x309 @0x2
0x0307…030e at0004 = ╱84╱ NEXT ╱ // 0x30b @0x4
0x0307…030e at0005 = ╱49╱I╱ // 0x30c @0x5
0x0307…030e at0006 = EOL // 0x30d @0x6
0x0307…030e }
0x030e…0329 9080 0200 A6(E),A6(G),E3,E4,E5=B
0x030e…0329 LineComalBin {
0x030e…0329 ptr = 0x9080 // 0x30e @0x0
0x030e…0329 lno = 0x00c8 // 0x310 @0x2
0x030e…0329 at0004 = ╱41╱A╱ // 0x312 @0x4
0x030e…0329 at0005 = ╱36╱6╱ // 0x313 @0x5
0x030e…0329 at0006 = ╱ed╱(╱ // 0x314 @0x6
0x030e…0329 at0007 = ╱45╱E╱ // 0x315 @0x7
0x030e…0329 at0008 = ╱ee╱)╱ // 0x316 @0x8
0x030e…0329 at0009 = ╱ec╱,╱ // 0x317 @0x9
0x030e…0329 at000a = ╱41╱A╱ // 0x318 @0xa
0x030e…0329 at000b = ╱36╱6╱ // 0x319 @0xb
0x030e…0329 at000c = ╱ed╱(╱ // 0x31a @0xc
0x030e…0329 at000d = ╱47╱G╱ // 0x31b @0xd
0x030e…0329 at000e = ╱ee╱)╱ // 0x31c @0xe
0x030e…0329 at000f = ╱ec╱,╱ // 0x31d @0xf
0x030e…0329 at0010 = ╱45╱E╱ // 0x31e @0x10
0x030e…0329 at0011 = ╱33╱3╱ // 0x31f @0x11
0x030e…0329 at0012 = ╱ec╱,╱ // 0x320 @0x12
0x030e…0329 at0013 = ╱45╱E╱ // 0x321 @0x13
0x030e…0329 at0014 = ╱34╱4╱ // 0x322 @0x14
0x030e…0329 at0015 = ╱ec╱,╱ // 0x323 @0x15
0x030e…0329 at0016 = ╱45╱E╱ // 0x324 @0x16
0x030e…0329 at0017 = ╱35╱5╱ // 0x325 @0x17
0x030e…0329 at0018 = ╱dc╱=╱ // 0x326 @0x18
0x030e…0329 at0019 = ╱42╱B╱ // 0x327 @0x19
0x030e…0329 at001a = EOL // 0x328 @0x1a
0x030e…0329 }
0x0329…033a 9091 0230 FOR I=E TO 79
0x0329…033a LineComalBin {
0x0329…033a ptr = 0x9091 // 0x329 @0x0
0x0329…033a lno = 0x00e6 // 0x32b @0x2
0x0329…033a at0004 = ╱83╱ FOR ╱ // 0x32d @0x4
0x0329…033a at0005 = ╱49╱I╱ // 0x32e @0x5
0x0329…033a at0006 = ╱dc╱=╱ // 0x32f @0x6
0x0329…033a at0007 = ╱45╱E╱ // 0x330 @0x7
0x0329…033a at0008 = ╱b7╱ TO ╱ // 0x331 @0x8
0x0329…033a at0009 = ╱37╱7╱ // 0x332 @0x9
0x0329…033a at000a = ╱39╱9╱ // 0x333 @0xa
0x0329…033a at000b = ╱fe00009e07╱ // 0x334 @0xb
0x0329…033a at0010 = EOL // 0x339 @0x10
0x0329…033a }
0x033a…034a 90a1 0240 E9$=E9$+" "
0x033a…034a LineComalBin {
0x033a…034a ptr = 0x90a1 // 0x33a @0x0
0x033a…034a lno = 0x00f0 // 0x33c @0x2
0x033a…034a at0004 = ╱45╱E╱ // 0x33e @0x4
0x033a…034a at0005 = ╱39╱9╱ // 0x33f @0x5
0x033a…034a at0006 = ╱ef╱$╱ // 0x340 @0x6
0x033a…034a at0007 = ╱dc╱=╱ // 0x341 @0x7
0x033a…034a at0008 = ╱45╱E╱ // 0x342 @0x8
0x033a…034a at0009 = ╱39╱9╱ // 0x343 @0x9
0x033a…034a at000a = ╱ef╱$╱ // 0x344 @0xa
0x033a…034a at000b = ╱f1╱+╱ // 0x345 @0xb
0x033a…034a at000c = ╱22╱"╱ // 0x346 @0xc
0x033a…034a at000d = ╱20╱…╱ // 0x347 @0xd
0x033a…034a at000e = ╱22╱"╱ // 0x348 @0xe
0x033a…034a at000f = EOL // 0x349 @0xf
0x033a…034a }
0x034a…0351 90a8 0250 NEXT I
0x034a…0351 LineComalBin {
0x034a…0351 ptr = 0x90a8 // 0x34a @0x0
0x034a…0351 lno = 0x00fa // 0x34c @0x2
0x034a…0351 at0004 = ╱84╱ NEXT ╱ // 0x34e @0x4
0x034a…0351 at0005 = ╱49╱I╱ // 0x34f @0x5
0x034a…0351 at0006 = EOL // 0x350 @0x6
0x034a…0351 }
0x0351…0362 90b9 0251 FOR I=E TO 19
0x0351…0362 LineComalBin {
0x0351…0362 ptr = 0x90b9 // 0x351 @0x0
0x0351…0362 lno = 0x00fb // 0x353 @0x2
0x0351…0362 at0004 = ╱83╱ FOR ╱ // 0x355 @0x4
0x0351…0362 at0005 = ╱49╱I╱ // 0x356 @0x5
0x0351…0362 at0006 = ╱dc╱=╱ // 0x357 @0x6
0x0351…0362 at0007 = ╱45╱E╱ // 0x358 @0x7
0x0351…0362 at0008 = ╱b7╱ TO ╱ // 0x359 @0x8
0x0351…0362 at0009 = ╱31╱1╱ // 0x35a @0x9
0x0351…0362 at000a = ╱39╱9╱ // 0x35b @0xa
0x0351…0362 at000b = ╱fe00009805╱ // 0x35c @0xb
0x0351…0362 at0010 = EOL // 0x361 @0x10
0x0351…0362 }
0x0362…037e 90d5 0253 PAGE$(I)=E9$(E,68)
0x0362…037e LineComalBin {
0x0362…037e ptr = 0x90d5 // 0x362 @0x0
0x0362…037e lno = 0x00fd // 0x364 @0x2
0x0362…037e at0004 = ╱50╱P╱ // 0x366 @0x4
0x0362…037e at0005 = ╱41╱A╱ // 0x367 @0x5
0x0362…037e at0006 = ╱47╱G╱ // 0x368 @0x6
0x0362…037e at0007 = ╱45╱E╱ // 0x369 @0x7
0x0362…037e at0008 = ╱ef╱$╱ // 0x36a @0x8
0x0362…037e at0009 = ╱ed╱(╱ // 0x36b @0x9
0x0362…037e at000a = ╱49╱I╱ // 0x36c @0xa
0x0362…037e at000b = ╱ee╱)╱ // 0x36d @0xb
0x0362…037e at000c = ╱dc╱=╱ // 0x36e @0xc
0x0362…037e at000d = ╱45╱E╱ // 0x36f @0xd
0x0362…037e at000e = ╱39╱9╱ // 0x370 @0xe
0x0362…037e at000f = ╱ef╱$╱ // 0x371 @0xf
0x0362…037e at0010 = ╱ed╱(╱ // 0x372 @0x10
0x0362…037e at0011 = ╱45╱E╱ // 0x373 @0x11
0x0362…037e at0012 = ╱ec╱,╱ // 0x374 @0x12
0x0362…037e at0013 = ╱36╱6╱ // 0x375 @0x13
0x0362…037e at0014 = ╱38╱8╱ // 0x376 @0x14
0x0362…037e at0015 = ╱fe00008807╱ // 0x377 @0x15
0x0362…037e at001a = ╱ee╱)╱ // 0x37c @0x1a
0x0362…037e at001b = EOL // 0x37d @0x1b
0x0362…037e }
0x037e…0385 90dc 0255 NEXT I
0x037e…0385 LineComalBin {
0x037e…0385 ptr = 0x90dc // 0x37e @0x0
0x037e…0385 lno = 0x00ff // 0x380 @0x2
0x037e…0385 at0004 = ╱84╱ NEXT ╱ // 0x382 @0x4
0x037e…0385 at0005 = ╱49╱I╱ // 0x383 @0x5
0x037e…0385 at0006 = EOL // 0x384 @0x6
0x037e…0385 }
0x0385…03e1 9138 0260 E6(11),E6(14),E6(17)=27;E6(12),E6(15),E6(18)=34
0x0385…03e1 LineComalBin {
0x0385…03e1 ptr = 0x9138 // 0x385 @0x0
0x0385…03e1 lno = 0x0104 // 0x387 @0x2
0x0385…03e1 at0004 = ╱45╱E╱ // 0x389 @0x4
0x0385…03e1 at0005 = ╱36╱6╱ // 0x38a @0x5
0x0385…03e1 at0006 = ╱ed╱(╱ // 0x38b @0x6
0x0385…03e1 at0007 = ╱31╱1╱ // 0x38c @0x7
0x0385…03e1 at0008 = ╱31╱1╱ // 0x38d @0x8
0x0385…03e1 at0009 = ╱fe0000b004╱ // 0x38e @0x9
0x0385…03e1 at000e = ╱ee╱)╱ // 0x393 @0xe
0x0385…03e1 at000f = ╱ec╱,╱ // 0x394 @0xf
0x0385…03e1 at0010 = ╱45╱E╱ // 0x395 @0x10
0x0385…03e1 at0011 = ╱36╱6╱ // 0x396 @0x11
0x0385…03e1 at0012 = ╱ed╱(╱ // 0x397 @0x12
0x0385…03e1 at0013 = ╱31╱1╱ // 0x398 @0x13
0x0385…03e1 at0014 = ╱34╱4╱ // 0x399 @0x14
0x0385…03e1 at0015 = ╱fe0000e004╱ // 0x39a @0x15
0x0385…03e1 at001a = ╱ee╱)╱ // 0x39f @0x1a
0x0385…03e1 at001b = ╱ec╱,╱ // 0x3a0 @0x1b
0x0385…03e1 at001c = ╱45╱E╱ // 0x3a1 @0x1c
0x0385…03e1 at001d = ╱36╱6╱ // 0x3a2 @0x1d
0x0385…03e1 at001e = ╱ed╱(╱ // 0x3a3 @0x1e
0x0385…03e1 at001f = ╱31╱1╱ // 0x3a4 @0x1f
0x0385…03e1 at0020 = ╱37╱7╱ // 0x3a5 @0x20
0x0385…03e1 at0021 = ╱fe00008805╱ // 0x3a6 @0x21
0x0385…03e1 at0026 = ╱ee╱)╱ // 0x3ab @0x26
0x0385…03e1 at0027 = ╱dc╱=╱ // 0x3ac @0x27
0x0385…03e1 at0028 = ╱32╱2╱ // 0x3ad @0x28
0x0385…03e1 at0029 = ╱37╱7╱ // 0x3ae @0x29
0x0385…03e1 at002a = ╱fe0000d805╱ // 0x3af @0x2a
0x0385…03e1 at002f = ╱eb╱;╱ // 0x3b4 @0x2f
0x0385…03e1 at0030 = ╱45╱E╱ // 0x3b5 @0x30
0x0385…03e1 at0031 = ╱36╱6╱ // 0x3b6 @0x31
0x0385…03e1 at0032 = ╱ed╱(╱ // 0x3b7 @0x32
0x0385…03e1 at0033 = ╱31╱1╱ // 0x3b8 @0x33
0x0385…03e1 at0034 = ╱32╱2╱ // 0x3b9 @0x34
0x0385…03e1 at0035 = ╱fe0000c004╱ // 0x3ba @0x35
0x0385…03e1 at003a = ╱ee╱)╱ // 0x3bf @0x3a
0x0385…03e1 at003b = ╱ec╱,╱ // 0x3c0 @0x3b
0x0385…03e1 at003c = ╱45╱E╱ // 0x3c1 @0x3c
0x0385…03e1 at003d = ╱36╱6╱ // 0x3c2 @0x3d
0x0385…03e1 at003e = ╱ed╱(╱ // 0x3c3 @0x3e
0x0385…03e1 at003f = ╱31╱1╱ // 0x3c4 @0x3f
0x0385…03e1 at0040 = ╱35╱5╱ // 0x3c5 @0x40
0x0385…03e1 at0041 = ╱fe0000f004╱ // 0x3c6 @0x41
0x0385…03e1 at0046 = ╱ee╱)╱ // 0x3cb @0x46
0x0385…03e1 at0047 = ╱ec╱,╱ // 0x3cc @0x47
0x0385…03e1 at0048 = ╱45╱E╱ // 0x3cd @0x48
0x0385…03e1 at0049 = ╱36╱6╱ // 0x3ce @0x49
0x0385…03e1 at004a = ╱ed╱(╱ // 0x3cf @0x4a
0x0385…03e1 at004b = ╱31╱1╱ // 0x3d0 @0x4b
0x0385…03e1 at004c = ╱38╱8╱ // 0x3d1 @0x4c
0x0385…03e1 at004d = ╱fe00009005╱ // 0x3d2 @0x4d
0x0385…03e1 at0052 = ╱ee╱)╱ // 0x3d7 @0x52
0x0385…03e1 at0053 = ╱dc╱=╱ // 0x3d8 @0x53
0x0385…03e1 at0054 = ╱33╱3╱ // 0x3d9 @0x54
0x0385…03e1 at0055 = ╱34╱4╱ // 0x3da @0x55
0x0385…03e1 at0056 = ╱fe00008806╱ // 0x3db @0x56
0x0385…03e1 at005b = EOL // 0x3e0 @0x5b
0x0385…03e1 }
0x03e1…03f8 914f 0280 E8(4)=-4
0x03e1…03f8 LineComalBin {
0x03e1…03f8 ptr = 0x914f // 0x3e1 @0x0
0x03e1…03f8 lno = 0x0118 // 0x3e3 @0x2
0x03e1…03f8 at0004 = ╱45╱E╱ // 0x3e5 @0x4
0x03e1…03f8 at0005 = ╱38╱8╱ // 0x3e6 @0x5
0x03e1…03f8 at0006 = ╱ed╱(╱ // 0x3e7 @0x6
0x03e1…03f8 at0007 = ╱34╱4╱ // 0x3e8 @0x7
0x03e1…03f8 at0008 = ╱fe00008003╱ // 0x3e9 @0x8
0x03e1…03f8 at000d = ╱ee╱)╱ // 0x3ee @0xd
0x03e1…03f8 at000e = ╱dc╱=╱ // 0x3ef @0xe
0x03e1…03f8 at000f = ╱e9╱-╱ // 0x3f0 @0xf
0x03e1…03f8 at0010 = ╱34╱4╱ // 0x3f1 @0x10
0x03e1…03f8 at0011 = ╱fe00008003╱ // 0x3f2 @0x11
0x03e1…03f8 at0016 = EOL // 0x3f7 @0x16
0x03e1…03f8 }
0x03f8…0459 91b0 0300 E6(4)=36;E6(5),E6(6)=39;E6(10),E6(13),E6(16)=23
0x03f8…0459 LineComalBin {
0x03f8…0459 ptr = 0x91b0 // 0x3f8 @0x0
0x03f8…0459 lno = 0x012c // 0x3fa @0x2
0x03f8…0459 at0004 = ╱45╱E╱ // 0x3fc @0x4
0x03f8…0459 at0005 = ╱36╱6╱ // 0x3fd @0x5
0x03f8…0459 at0006 = ╱ed╱(╱ // 0x3fe @0x6
0x03f8…0459 at0007 = ╱34╱4╱ // 0x3ff @0x7
0x03f8…0459 at0008 = ╱fe00008003╱ // 0x400 @0x8
0x03f8…0459 at000d = ╱ee╱)╱ // 0x405 @0xd
0x03f8…0459 at000e = ╱dc╱=╱ // 0x406 @0xe
0x03f8…0459 at000f = ╱33╱3╱ // 0x407 @0xf
0x03f8…0459 at0010 = ╱36╱6╱ // 0x408 @0x10
0x03f8…0459 at0011 = ╱fe00009006╱ // 0x409 @0x11
0x03f8…0459 at0016 = ╱eb╱;╱ // 0x40e @0x16
0x03f8…0459 at0017 = ╱45╱E╱ // 0x40f @0x17
0x03f8…0459 at0018 = ╱36╱6╱ // 0x410 @0x18
0x03f8…0459 at0019 = ╱ed╱(╱ // 0x411 @0x19
0x03f8…0459 at001a = ╱35╱5╱ // 0x412 @0x1a
0x03f8…0459 at001b = ╱fe0000a003╱ // 0x413 @0x1b
0x03f8…0459 at0020 = ╱ee╱)╱ // 0x418 @0x20
0x03f8…0459 at0021 = ╱ec╱,╱ // 0x419 @0x21
0x03f8…0459 at0022 = ╱45╱E╱ // 0x41a @0x22
0x03f8…0459 at0023 = ╱36╱6╱ // 0x41b @0x23
0x03f8…0459 at0024 = ╱ed╱(╱ // 0x41c @0x24
0x03f8…0459 at0025 = ╱36╱6╱ // 0x41d @0x25
0x03f8…0459 at0026 = ╱fe0000c003╱ // 0x41e @0x26
0x03f8…0459 at002b = ╱ee╱)╱ // 0x423 @0x2b
0x03f8…0459 at002c = ╱dc╱=╱ // 0x424 @0x2c
0x03f8…0459 at002d = ╱33╱3╱ // 0x425 @0x2d
0x03f8…0459 at002e = ╱39╱9╱ // 0x426 @0x2e
0x03f8…0459 at002f = ╱fe00009c06╱ // 0x427 @0x2f
0x03f8…0459 at0034 = ╱eb╱;╱ // 0x42c @0x34
0x03f8…0459 at0035 = ╱45╱E╱ // 0x42d @0x35
0x03f8…0459 at0036 = ╱36╱6╱ // 0x42e @0x36
0x03f8…0459 at0037 = ╱ed╱(╱ // 0x42f @0x37
0x03f8…0459 at0038 = ╱31╱1╱ // 0x430 @0x38
0x03f8…0459 at0039 = ╱30╱0╱ // 0x431 @0x39
0x03f8…0459 at003a = ╱fe0000a004╱ // 0x432 @0x3a
0x03f8…0459 at003f = ╱ee╱)╱ // 0x437 @0x3f
0x03f8…0459 at0040 = ╱ec╱,╱ // 0x438 @0x40
0x03f8…0459 at0041 = ╱45╱E╱ // 0x439 @0x41
0x03f8…0459 at0042 = ╱36╱6╱ // 0x43a @0x42
0x03f8…0459 at0043 = ╱ed╱(╱ // 0x43b @0x43
0x03f8…0459 at0044 = ╱31╱1╱ // 0x43c @0x44
0x03f8…0459 at0045 = ╱33╱3╱ // 0x43d @0x45
0x03f8…0459 at0046 = ╱fe0000d004╱ // 0x43e @0x46
0x03f8…0459 at004b = ╱ee╱)╱ // 0x443 @0x4b
0x03f8…0459 at004c = ╱ec╱,╱ // 0x444 @0x4c
0x03f8…0459 at004d = ╱45╱E╱ // 0x445 @0x4d
0x03f8…0459 at004e = ╱36╱6╱ // 0x446 @0x4e
0x03f8…0459 at004f = ╱ed╱(╱ // 0x447 @0x4f
0x03f8…0459 at0050 = ╱31╱1╱ // 0x448 @0x50
0x03f8…0459 at0051 = ╱36╱6╱ // 0x449 @0x51
0x03f8…0459 at0052 = ╱fe00008005╱ // 0x44a @0x52
0x03f8…0459 at0057 = ╱ee╱)╱ // 0x44f @0x57
0x03f8…0459 at0058 = ╱dc╱=╱ // 0x450 @0x58
0x03f8…0459 at0059 = ╱32╱2╱ // 0x451 @0x59
0x03f8…0459 at005a = ╱33╱3╱ // 0x452 @0x5a
0x03f8…0459 at005b = ╱fe0000b805╱ // 0x453 @0x5b
0x03f8…0459 at0060 = EOL // 0x458 @0x60
0x03f8…0459 }
0x0459…0493 91ea 0310 E7(4)=4;E7(5)=5;E7(6)=6
0x0459…0493 LineComalBin {
0x0459…0493 ptr = 0x91ea // 0x459 @0x0
0x0459…0493 lno = 0x0136 // 0x45b @0x2
0x0459…0493 at0004 = ╱45╱E╱ // 0x45d @0x4
0x0459…0493 at0005 = ╱37╱7╱ // 0x45e @0x5
0x0459…0493 at0006 = ╱ed╱(╱ // 0x45f @0x6
0x0459…0493 at0007 = ╱34╱4╱ // 0x460 @0x7
0x0459…0493 at0008 = ╱fe00008003╱ // 0x461 @0x8
0x0459…0493 at000d = ╱ee╱)╱ // 0x466 @0xd
0x0459…0493 at000e = ╱dc╱=╱ // 0x467 @0xe
0x0459…0493 at000f = ╱34╱4╱ // 0x468 @0xf
0x0459…0493 at0010 = ╱fe00008003╱ // 0x469 @0x10
0x0459…0493 at0015 = ╱eb╱;╱ // 0x46e @0x15
0x0459…0493 at0016 = ╱45╱E╱ // 0x46f @0x16
0x0459…0493 at0017 = ╱37╱7╱ // 0x470 @0x17
0x0459…0493 at0018 = ╱ed╱(╱ // 0x471 @0x18
0x0459…0493 at0019 = ╱35╱5╱ // 0x472 @0x19
0x0459…0493 at001a = ╱fe0000a003╱ // 0x473 @0x1a
0x0459…0493 at001f = ╱ee╱)╱ // 0x478 @0x1f
0x0459…0493 at0020 = ╱dc╱=╱ // 0x479 @0x20
0x0459…0493 at0021 = ╱35╱5╱ // 0x47a @0x21
0x0459…0493 at0022 = ╱fe0000a003╱ // 0x47b @0x22
0x0459…0493 at0027 = ╱eb╱;╱ // 0x480 @0x27
0x0459…0493 at0028 = ╱45╱E╱ // 0x481 @0x28
0x0459…0493 at0029 = ╱37╱7╱ // 0x482 @0x29
0x0459…0493 at002a = ╱ed╱(╱ // 0x483 @0x2a
0x0459…0493 at002b = ╱36╱6╱ // 0x484 @0x2b
0x0459…0493 at002c = ╱fe0000c003╱ // 0x485 @0x2c
0x0459…0493 at0031 = ╱ee╱)╱ // 0x48a @0x31
0x0459…0493 at0032 = ╱dc╱=╱ // 0x48b @0x32
0x0459…0493 at0033 = ╱36╱6╱ // 0x48c @0x33
0x0459…0493 at0034 = ╱fe0000c003╱ // 0x48d @0x34
0x0459…0493 at0039 = EOL // 0x492 @0x39
0x0459…0493 }
0x0493…051b 9272 0320 E7(10),E7(11),E7(12)=12;E7(13),E7(14),E7(15)=13;E7(16),E7(17),E7(18)=14
0x0493…051b LineComalBin {
0x0493…051b ptr = 0x9272 // 0x493 @0x0
0x0493…051b lno = 0x0140 // 0x495 @0x2
0x0493…051b at0004 = ╱45╱E╱ // 0x497 @0x4
0x0493…051b at0005 = ╱37╱7╱ // 0x498 @0x5
0x0493…051b at0006 = ╱ed╱(╱ // 0x499 @0x6
0x0493…051b at0007 = ╱31╱1╱ // 0x49a @0x7
0x0493…051b at0008 = ╱30╱0╱ // 0x49b @0x8
0x0493…051b at0009 = ╱fe0000a004╱ // 0x49c @0x9
0x0493…051b at000e = ╱ee╱)╱ // 0x4a1 @0xe
0x0493…051b at000f = ╱ec╱,╱ // 0x4a2 @0xf
0x0493…051b at0010 = ╱45╱E╱ // 0x4a3 @0x10
0x0493…051b at0011 = ╱37╱7╱ // 0x4a4 @0x11
0x0493…051b at0012 = ╱ed╱(╱ // 0x4a5 @0x12
0x0493…051b at0013 = ╱31╱1╱ // 0x4a6 @0x13
0x0493…051b at0014 = ╱31╱1╱ // 0x4a7 @0x14
0x0493…051b at0015 = ╱fe0000b004╱ // 0x4a8 @0x15
0x0493…051b at001a = ╱ee╱)╱ // 0x4ad @0x1a
0x0493…051b at001b = ╱ec╱,╱ // 0x4ae @0x1b
0x0493…051b at001c = ╱45╱E╱ // 0x4af @0x1c
0x0493…051b at001d = ╱37╱7╱ // 0x4b0 @0x1d
0x0493…051b at001e = ╱ed╱(╱ // 0x4b1 @0x1e
0x0493…051b at001f = ╱31╱1╱ // 0x4b2 @0x1f
0x0493…051b at0020 = ╱32╱2╱ // 0x4b3 @0x20
0x0493…051b at0021 = ╱fe0000c004╱ // 0x4b4 @0x21
0x0493…051b at0026 = ╱ee╱)╱ // 0x4b9 @0x26
0x0493…051b at0027 = ╱dc╱=╱ // 0x4ba @0x27
0x0493…051b at0028 = ╱31╱1╱ // 0x4bb @0x28
0x0493…051b at0029 = ╱32╱2╱ // 0x4bc @0x29
0x0493…051b at002a = ╱fe0000c004╱ // 0x4bd @0x2a
0x0493…051b at002f = ╱eb╱;╱ // 0x4c2 @0x2f
0x0493…051b at0030 = ╱45╱E╱ // 0x4c3 @0x30
0x0493…051b at0031 = ╱37╱7╱ // 0x4c4 @0x31
0x0493…051b at0032 = ╱ed╱(╱ // 0x4c5 @0x32
0x0493…051b at0033 = ╱31╱1╱ // 0x4c6 @0x33
0x0493…051b at0034 = ╱33╱3╱ // 0x4c7 @0x34
0x0493…051b at0035 = ╱fe0000d004╱ // 0x4c8 @0x35
0x0493…051b at003a = ╱ee╱)╱ // 0x4cd @0x3a
0x0493…051b at003b = ╱ec╱,╱ // 0x4ce @0x3b
0x0493…051b at003c = ╱45╱E╱ // 0x4cf @0x3c
0x0493…051b at003d = ╱37╱7╱ // 0x4d0 @0x3d
0x0493…051b at003e = ╱ed╱(╱ // 0x4d1 @0x3e
0x0493…051b at003f = ╱31╱1╱ // 0x4d2 @0x3f
0x0493…051b at0040 = ╱34╱4╱ // 0x4d3 @0x40
0x0493…051b at0041 = ╱fe0000e004╱ // 0x4d4 @0x41
0x0493…051b at0046 = ╱ee╱)╱ // 0x4d9 @0x46
0x0493…051b at0047 = ╱ec╱,╱ // 0x4da @0x47
0x0493…051b at0048 = ╱45╱E╱ // 0x4db @0x48
0x0493…051b at0049 = ╱37╱7╱ // 0x4dc @0x49
0x0493…051b at004a = ╱ed╱(╱ // 0x4dd @0x4a
0x0493…051b at004b = ╱31╱1╱ // 0x4de @0x4b
0x0493…051b at004c = ╱35╱5╱ // 0x4df @0x4c
0x0493…051b at004d = ╱fe0000f004╱ // 0x4e0 @0x4d
0x0493…051b at0052 = ╱ee╱)╱ // 0x4e5 @0x52
0x0493…051b at0053 = ╱dc╱=╱ // 0x4e6 @0x53
0x0493…051b at0054 = ╱31╱1╱ // 0x4e7 @0x54
0x0493…051b at0055 = ╱33╱3╱ // 0x4e8 @0x55
0x0493…051b at0056 = ╱fe0000d004╱ // 0x4e9 @0x56
0x0493…051b at005b = ╱eb╱;╱ // 0x4ee @0x5b
0x0493…051b at005c = ╱45╱E╱ // 0x4ef @0x5c
0x0493…051b at005d = ╱37╱7╱ // 0x4f0 @0x5d
0x0493…051b at005e = ╱ed╱(╱ // 0x4f1 @0x5e
0x0493…051b at005f = ╱31╱1╱ // 0x4f2 @0x5f
0x0493…051b at0060 = ╱36╱6╱ // 0x4f3 @0x60
0x0493…051b at0061 = ╱fe00008005╱ // 0x4f4 @0x61
0x0493…051b at0066 = ╱ee╱)╱ // 0x4f9 @0x66
0x0493…051b at0067 = ╱ec╱,╱ // 0x4fa @0x67
0x0493…051b at0068 = ╱45╱E╱ // 0x4fb @0x68
0x0493…051b at0069 = ╱37╱7╱ // 0x4fc @0x69
0x0493…051b at006a = ╱ed╱(╱ // 0x4fd @0x6a
0x0493…051b at006b = ╱31╱1╱ // 0x4fe @0x6b
0x0493…051b at006c = ╱37╱7╱ // 0x4ff @0x6c
0x0493…051b at006d = ╱fe00008805╱ // 0x500 @0x6d
0x0493…051b at0072 = ╱ee╱)╱ // 0x505 @0x72
0x0493…051b at0073 = ╱ec╱,╱ // 0x506 @0x73
0x0493…051b at0074 = ╱45╱E╱ // 0x507 @0x74
0x0493…051b at0075 = ╱37╱7╱ // 0x508 @0x75
0x0493…051b at0076 = ╱ed╱(╱ // 0x509 @0x76
0x0493…051b at0077 = ╱31╱1╱ // 0x50a @0x77
0x0493…051b at0078 = ╱38╱8╱ // 0x50b @0x78
0x0493…051b at0079 = ╱fe00009005╱ // 0x50c @0x79
0x0493…051b at007e = ╱ee╱)╱ // 0x511 @0x7e
0x0493…051b at007f = ╱dc╱=╱ // 0x512 @0x7f
0x0493…051b at0080 = ╱31╱1╱ // 0x513 @0x80
0x0493…051b at0081 = ╱34╱4╱ // 0x514 @0x81
0x0493…051b at0082 = ╱fe0000e004╱ // 0x515 @0x82
0x0493…051b at0087 = EOL // 0x51a @0x87
0x0493…051b }
0x051b…0587 92de 0340 E8(11),E8(12),E8(14),E8(15),E8(17),E8(18)=6;E8(5),E8(6)=-E
0x051b…0587 LineComalBin {
0x051b…0587 ptr = 0x92de // 0x51b @0x0
0x051b…0587 lno = 0x0154 // 0x51d @0x2
0x051b…0587 at0004 = ╱45╱E╱ // 0x51f @0x4
0x051b…0587 at0005 = ╱38╱8╱ // 0x520 @0x5
0x051b…0587 at0006 = ╱ed╱(╱ // 0x521 @0x6
0x051b…0587 at0007 = ╱31╱1╱ // 0x522 @0x7
0x051b…0587 at0008 = ╱31╱1╱ // 0x523 @0x8
0x051b…0587 at0009 = ╱fe0000b004╱ // 0x524 @0x9
0x051b…0587 at000e = ╱ee╱)╱ // 0x529 @0xe
0x051b…0587 at000f = ╱ec╱,╱ // 0x52a @0xf
0x051b…0587 at0010 = ╱45╱E╱ // 0x52b @0x10
0x051b…0587 at0011 = ╱38╱8╱ // 0x52c @0x11
0x051b…0587 at0012 = ╱ed╱(╱ // 0x52d @0x12
0x051b…0587 at0013 = ╱31╱1╱ // 0x52e @0x13
0x051b…0587 at0014 = ╱32╱2╱ // 0x52f @0x14
0x051b…0587 at0015 = ╱fe0000c004╱ // 0x530 @0x15
0x051b…0587 at001a = ╱ee╱)╱ // 0x535 @0x1a
0x051b…0587 at001b = ╱ec╱,╱ // 0x536 @0x1b
0x051b…0587 at001c = ╱45╱E╱ // 0x537 @0x1c
0x051b…0587 at001d = ╱38╱8╱ // 0x538 @0x1d
0x051b…0587 at001e = ╱ed╱(╱ // 0x539 @0x1e
0x051b…0587 at001f = ╱31╱1╱ // 0x53a @0x1f
0x051b…0587 at0020 = ╱34╱4╱ // 0x53b @0x20
0x051b…0587 at0021 = ╱fe0000e004╱ // 0x53c @0x21
0x051b…0587 at0026 = ╱ee╱)╱ // 0x541 @0x26
0x051b…0587 at0027 = ╱ec╱,╱ // 0x542 @0x27
0x051b…0587 at0028 = ╱45╱E╱ // 0x543 @0x28
0x051b…0587 at0029 = ╱38╱8╱ // 0x544 @0x29
0x051b…0587 at002a = ╱ed╱(╱ // 0x545 @0x2a
0x051b…0587 at002b = ╱31╱1╱ // 0x546 @0x2b
0x051b…0587 at002c = ╱35╱5╱ // 0x547 @0x2c
0x051b…0587 at002d = ╱fe0000f004╱ // 0x548 @0x2d
0x051b…0587 at0032 = ╱ee╱)╱ // 0x54d @0x32
0x051b…0587 at0033 = ╱ec╱,╱ // 0x54e @0x33
0x051b…0587 at0034 = ╱45╱E╱ // 0x54f @0x34
0x051b…0587 at0035 = ╱38╱8╱ // 0x550 @0x35
0x051b…0587 at0036 = ╱ed╱(╱ // 0x551 @0x36
0x051b…0587 at0037 = ╱31╱1╱ // 0x552 @0x37
0x051b…0587 at0038 = ╱37╱7╱ // 0x553 @0x38
0x051b…0587 at0039 = ╱fe00008805╱ // 0x554 @0x39
0x051b…0587 at003e = ╱ee╱)╱ // 0x559 @0x3e
0x051b…0587 at003f = ╱ec╱,╱ // 0x55a @0x3f
0x051b…0587 at0040 = ╱45╱E╱ // 0x55b @0x40
0x051b…0587 at0041 = ╱38╱8╱ // 0x55c @0x41
0x051b…0587 at0042 = ╱ed╱(╱ // 0x55d @0x42
0x051b…0587 at0043 = ╱31╱1╱ // 0x55e @0x43
0x051b…0587 at0044 = ╱38╱8╱ // 0x55f @0x44
0x051b…0587 at0045 = ╱fe00009005╱ // 0x560 @0x45
0x051b…0587 at004a = ╱ee╱)╱ // 0x565 @0x4a
0x051b…0587 at004b = ╱dc╱=╱ // 0x566 @0x4b
0x051b…0587 at004c = ╱36╱6╱ // 0x567 @0x4c
0x051b…0587 at004d = ╱fe0000c003╱ // 0x568 @0x4d
0x051b…0587 at0052 = ╱eb╱;╱ // 0x56d @0x52
0x051b…0587 at0053 = ╱45╱E╱ // 0x56e @0x53
0x051b…0587 at0054 = ╱38╱8╱ // 0x56f @0x54
0x051b…0587 at0055 = ╱ed╱(╱ // 0x570 @0x55
0x051b…0587 at0056 = ╱35╱5╱ // 0x571 @0x56
0x051b…0587 at0057 = ╱fe0000a003╱ // 0x572 @0x57
0x051b…0587 at005c = ╱ee╱)╱ // 0x577 @0x5c
0x051b…0587 at005d = ╱ec╱,╱ // 0x578 @0x5d
0x051b…0587 at005e = ╱45╱E╱ // 0x579 @0x5e
0x051b…0587 at005f = ╱38╱8╱ // 0x57a @0x5f
0x051b…0587 at0060 = ╱ed╱(╱ // 0x57b @0x60
0x051b…0587 at0061 = ╱36╱6╱ // 0x57c @0x61
0x051b…0587 at0062 = ╱fe0000c003╱ // 0x57d @0x62
0x051b…0587 at0067 = ╱ee╱)╱ // 0x582 @0x67
0x051b…0587 at0068 = ╱dc╱=╱ // 0x583 @0x68
0x051b…0587 at0069 = ╱e9╱-╱ // 0x584 @0x69
0x051b…0587 at006a = ╱45╱E╱ // 0x585 @0x6a
0x051b…0587 at006b = EOL // 0x586 @0x6b
0x051b…0587 }
0x0587…05b1 9308 0350 E8(10),E8(13),E8(16)=B
0x0587…05b1 LineComalBin {
0x0587…05b1 ptr = 0x9308 // 0x587 @0x0
0x0587…05b1 lno = 0x015e // 0x589 @0x2
0x0587…05b1 at0004 = ╱45╱E╱ // 0x58b @0x4
0x0587…05b1 at0005 = ╱38╱8╱ // 0x58c @0x5
0x0587…05b1 at0006 = ╱ed╱(╱ // 0x58d @0x6
0x0587…05b1 at0007 = ╱31╱1╱ // 0x58e @0x7
0x0587…05b1 at0008 = ╱30╱0╱ // 0x58f @0x8
0x0587…05b1 at0009 = ╱fe0000a004╱ // 0x590 @0x9
0x0587…05b1 at000e = ╱ee╱)╱ // 0x595 @0xe
0x0587…05b1 at000f = ╱ec╱,╱ // 0x596 @0xf
0x0587…05b1 at0010 = ╱45╱E╱ // 0x597 @0x10
0x0587…05b1 at0011 = ╱38╱8╱ // 0x598 @0x11
0x0587…05b1 at0012 = ╱ed╱(╱ // 0x599 @0x12
0x0587…05b1 at0013 = ╱31╱1╱ // 0x59a @0x13
0x0587…05b1 at0014 = ╱33╱3╱ // 0x59b @0x14
0x0587…05b1 at0015 = ╱fe0000d004╱ // 0x59c @0x15
0x0587…05b1 at001a = ╱ee╱)╱ // 0x5a1 @0x1a
0x0587…05b1 at001b = ╱ec╱,╱ // 0x5a2 @0x1b
0x0587…05b1 at001c = ╱45╱E╱ // 0x5a3 @0x1c
0x0587…05b1 at001d = ╱38╱8╱ // 0x5a4 @0x1d
0x0587…05b1 at001e = ╱ed╱(╱ // 0x5a5 @0x1e
0x0587…05b1 at001f = ╱31╱1╱ // 0x5a6 @0x1f
0x0587…05b1 at0020 = ╱36╱6╱ // 0x5a7 @0x20
0x0587…05b1 at0021 = ╱fe00008005╱ // 0x5a8 @0x21
0x0587…05b1 at0026 = ╱ee╱)╱ // 0x5ad @0x26
0x0587…05b1 at0027 = ╱dc╱=╱ // 0x5ae @0x27
0x0587…05b1 at0028 = ╱42╱B╱ // 0x5af @0x28
0x0587…05b1 at0029 = EOL // 0x5b0 @0x29
0x0587…05b1 }
0x05b1…05c5 931c 0370 PROC C(F2,F3,F4,F5)
0x05b1…05c5 LineComalBin {
0x05b1…05c5 ptr = 0x931c // 0x5b1 @0x0
0x05b1…05c5 lno = 0x0172 // 0x5b3 @0x2
0x05b1…05c5 at0004 = ╱9e╱ PROC ╱ // 0x5b5 @0x4
0x05b1…05c5 at0005 = ╱43╱C╱ // 0x5b6 @0x5
0x05b1…05c5 at0006 = ╱ed╱(╱ // 0x5b7 @0x6
0x05b1…05c5 at0007 = ╱46╱F╱ // 0x5b8 @0x7
0x05b1…05c5 at0008 = ╱32╱2╱ // 0x5b9 @0x8
0x05b1…05c5 at0009 = ╱ec╱,╱ // 0x5ba @0x9
0x05b1…05c5 at000a = ╱46╱F╱ // 0x5bb @0xa
0x05b1…05c5 at000b = ╱33╱3╱ // 0x5bc @0xb
0x05b1…05c5 at000c = ╱ec╱,╱ // 0x5bd @0xc
0x05b1…05c5 at000d = ╱46╱F╱ // 0x5be @0xd
0x05b1…05c5 at000e = ╱34╱4╱ // 0x5bf @0xe
0x05b1…05c5 at000f = ╱ec╱,╱ // 0x5c0 @0xf
0x05b1…05c5 at0010 = ╱46╱F╱ // 0x5c1 @0x10
0x05b1…05c5 at0011 = ╱35╱5╱ // 0x5c2 @0x11
0x05b1…05c5 at0012 = ╱ee╱)╱ // 0x5c3 @0x12
0x05b1…05c5 at0013 = EOL // 0x5c4 @0x13
0x05b1…05c5 }
0x05c5…060a 9361 0380 RES$=F5$;OP1$=F3$;OP2$=F4$;SI=B;FLAG=B;ART=F2-6*(F2>5)
0x05c5…060a LineComalBin {
0x05c5…060a ptr = 0x9361 // 0x5c5 @0x0
0x05c5…060a lno = 0x017c // 0x5c7 @0x2
0x05c5…060a at0004 = ╱52╱R╱ // 0x5c9 @0x4
0x05c5…060a at0005 = ╱45╱E╱ // 0x5ca @0x5
0x05c5…060a at0006 = ╱53╱S╱ // 0x5cb @0x6
0x05c5…060a at0007 = ╱ef╱$╱ // 0x5cc @0x7
0x05c5…060a at0008 = ╱dc╱=╱ // 0x5cd @0x8
0x05c5…060a at0009 = ╱46╱F╱ // 0x5ce @0x9
0x05c5…060a at000a = ╱35╱5╱ // 0x5cf @0xa
0x05c5…060a at000b = ╱ef╱$╱ // 0x5d0 @0xb
0x05c5…060a at000c = ╱eb╱;╱ // 0x5d1 @0xc
0x05c5…060a at000d = ╱4f╱O╱ // 0x5d2 @0xd
0x05c5…060a at000e = ╱50╱P╱ // 0x5d3 @0xe
0x05c5…060a at000f = ╱31╱1╱ // 0x5d4 @0xf
0x05c5…060a at0010 = ╱ef╱$╱ // 0x5d5 @0x10
0x05c5…060a at0011 = ╱dc╱=╱ // 0x5d6 @0x11
0x05c5…060a at0012 = ╱46╱F╱ // 0x5d7 @0x12
0x05c5…060a at0013 = ╱33╱3╱ // 0x5d8 @0x13
0x05c5…060a at0014 = ╱ef╱$╱ // 0x5d9 @0x14
0x05c5…060a at0015 = ╱eb╱;╱ // 0x5da @0x15
0x05c5…060a at0016 = ╱4f╱O╱ // 0x5db @0x16
0x05c5…060a at0017 = ╱50╱P╱ // 0x5dc @0x17
0x05c5…060a at0018 = ╱32╱2╱ // 0x5dd @0x18
0x05c5…060a at0019 = ╱ef╱$╱ // 0x5de @0x19
0x05c5…060a at001a = ╱dc╱=╱ // 0x5df @0x1a
0x05c5…060a at001b = ╱46╱F╱ // 0x5e0 @0x1b
0x05c5…060a at001c = ╱34╱4╱ // 0x5e1 @0x1c
0x05c5…060a at001d = ╱ef╱$╱ // 0x5e2 @0x1d
0x05c5…060a at001e = ╱eb╱;╱ // 0x5e3 @0x1e
0x05c5…060a at001f = ╱53╱S╱ // 0x5e4 @0x1f
0x05c5…060a at0020 = ╱49╱I╱ // 0x5e5 @0x20
0x05c5…060a at0021 = ╱dc╱=╱ // 0x5e6 @0x21
0x05c5…060a at0022 = ╱42╱B╱ // 0x5e7 @0x22
0x05c5…060a at0023 = ╱eb╱;╱ // 0x5e8 @0x23
0x05c5…060a at0024 = ╱46╱F╱ // 0x5e9 @0x24
0x05c5…060a at0025 = ╱4c╱L╱ // 0x5ea @0x25
0x05c5…060a at0026 = ╱41╱A╱ // 0x5eb @0x26
0x05c5…060a at0027 = ╱47╱G╱ // 0x5ec @0x27
0x05c5…060a at0028 = ╱dc╱=╱ // 0x5ed @0x28
0x05c5…060a at0029 = ╱42╱B╱ // 0x5ee @0x29
0x05c5…060a at002a = ╱eb╱;╱ // 0x5ef @0x2a
0x05c5…060a at002b = ╱41╱A╱ // 0x5f0 @0x2b
0x05c5…060a at002c = ╱52╱R╱ // 0x5f1 @0x2c
0x05c5…060a at002d = ╱54╱T╱ // 0x5f2 @0x2d
0x05c5…060a at002e = ╱dc╱=╱ // 0x5f3 @0x2e
0x05c5…060a at002f = ╱46╱F╱ // 0x5f4 @0x2f
0x05c5…060a at0030 = ╱32╱2╱ // 0x5f5 @0x30
0x05c5…060a at0031 = ╱e3╱-╱ // 0x5f6 @0x31
0x05c5…060a at0032 = ╱36╱6╱ // 0x5f7 @0x32
0x05c5…060a at0033 = ╱fe0000c003╱ // 0x5f8 @0x33
0x05c5…060a at0038 = ╱e4╱*╱ // 0x5fd @0x38
0x05c5…060a at0039 = ╱ed╱(╱ // 0x5fe @0x39
0x05c5…060a at003a = ╱46╱F╱ // 0x5ff @0x3a
0x05c5…060a at003b = ╱32╱2╱ // 0x600 @0x3b
0x05c5…060a at003c = ╱de╱>╱ // 0x601 @0x3c
0x05c5…060a at003d = ╱35╱5╱ // 0x602 @0x3d
0x05c5…060a at003e = ╱fe0000a003╱ // 0x603 @0x3e
0x05c5…060a at0043 = ╱ee╱)╱ // 0x608 @0x43
0x05c5…060a at0044 = EOL // 0x609 @0x44
0x05c5…060a }
0x060a…0620 9377 0390 CALL "P641210:REGN"
0x060a…0620 LineComalBin {
0x060a…0620 ptr = 0x9377 // 0x60a @0x0
0x060a…0620 lno = 0x0186 // 0x60c @0x2
0x060a…0620 at0004 = ╱addf31╱ CALL ╱ // 0x60e @0x4
0x060a…0620 at0007 = ╱22╱"╱ // 0x611 @0x7
0x060a…0620 at0008 = ╱50╱P╱ // 0x612 @0x8
0x060a…0620 at0009 = ╱36╱6╱ // 0x613 @0x9
0x060a…0620 at000a = ╱34╱4╱ // 0x614 @0xa
0x060a…0620 at000b = ╱31╱1╱ // 0x615 @0xb
0x060a…0620 at000c = ╱32╱2╱ // 0x616 @0xc
0x060a…0620 at000d = ╱31╱1╱ // 0x617 @0xd
0x060a…0620 at000e = ╱30╱0╱ // 0x618 @0xe
0x060a…0620 at000f = ╱3a╱:╱ // 0x619 @0xf
0x060a…0620 at0010 = ╱52╱R╱ // 0x61a @0x10
0x060a…0620 at0011 = ╱45╱E╱ // 0x61b @0x11
0x060a…0620 at0012 = ╱47╱G╱ // 0x61c @0x12
0x060a…0620 at0013 = ╱4e╱N╱ // 0x61d @0x13
0x060a…0620 at0014 = ╱22╱"╱ // 0x61e @0x14
0x060a…0620 at0015 = EOL // 0x61f @0x15
0x060a…0620 }
0x0620…0636 938d 0400 IF F2<6 AND FLAG THEN STOP
0x0620…0636 LineComalBin {
0x0620…0636 ptr = 0x938d // 0x620 @0x0
0x0620…0636 lno = 0x0190 // 0x622 @0x2
0x0620…0636 at0004 = ╱82╱ IF ╱ // 0x624 @0x4
0x0620…0636 at0005 = ╱46╱F╱ // 0x625 @0x5
0x0620…0636 at0006 = ╱32╱2╱ // 0x626 @0x6
0x0620…0636 at0007 = ╱dd╱<╱ // 0x627 @0x7
0x0620…0636 at0008 = ╱36╱6╱ // 0x628 @0x8
0x0620…0636 at0009 = ╱fe0000c003╱ // 0x629 @0x9
0x0620…0636 at000e = ╱da╱ AND ╱ // 0x62e @0xe
0x0620…0636 at000f = ╱46╱F╱ // 0x62f @0xf
0x0620…0636 at0010 = ╱4c╱L╱ // 0x630 @0x10
0x0620…0636 at0011 = ╱41╱A╱ // 0x631 @0x11
0x0620…0636 at0012 = ╱47╱G╱ // 0x632 @0x12
0x0620…0636 at0013 = ╱b6╱ THEN ╱ // 0x633 @0x13
0x0620…0636 at0014 = ╱8d╱ STOP ╱ // 0x634 @0x14
0x0620…0636 at0015 = EOL // 0x635 @0x15
0x0620…0636 }
0x0636…0643 939a 0430 F5$=RES$
0x0636…0643 LineComalBin {
0x0636…0643 ptr = 0x939a // 0x636 @0x0
0x0636…0643 lno = 0x01ae // 0x638 @0x2
0x0636…0643 at0004 = ╱46╱F╱ // 0x63a @0x4
0x0636…0643 at0005 = ╱35╱5╱ // 0x63b @0x5
0x0636…0643 at0006 = ╱ef╱$╱ // 0x63c @0x6
0x0636…0643 at0007 = ╱dc╱=╱ // 0x63d @0x7
0x0636…0643 at0008 = ╱52╱R╱ // 0x63e @0x8
0x0636…0643 at0009 = ╱45╱E╱ // 0x63f @0x9
0x0636…0643 at000a = ╱53╱S╱ // 0x640 @0xa
0x0636…0643 at000b = ╱ef╱$╱ // 0x641 @0xb
0x0636…0643 at000c = EOL // 0x642 @0xc
0x0636…0643 }
0x0643…0649 93a0 0440 ENDPROC
0x0643…0649 LineComalBin {
0x0643…0649 ptr = 0x93a0 // 0x643 @0x0
0x0643…0649 lno = 0x01b8 // 0x645 @0x2
0x0643…0649 at0004 = ╱9f╱ ENDPROC ╱ // 0x647 @0x4
0x0643…0649 at0005 = EOL // 0x648 @0x5
0x0643…0649 }
0x0649…065b 93b2 0441 PROC OPTÆL(F6,F7)
0x0649…065b LineComalBin {
0x0649…065b ptr = 0x93b2 // 0x649 @0x0
0x0649…065b lno = 0x01b9 // 0x64b @0x2
0x0649…065b at0004 = ╱9e╱ PROC ╱ // 0x64d @0x4
0x0649…065b at0005 = ╱4f╱O╱ // 0x64e @0x5
0x0649…065b at0006 = ╱50╱P╱ // 0x64f @0x6
0x0649…065b at0007 = ╱54╱T╱ // 0x650 @0x7
0x0649…065b at0008 = ╱5b╱Æ╱ // 0x651 @0x8
0x0649…065b at0009 = ╱4c╱L╱ // 0x652 @0x9
0x0649…065b at000a = ╱ed╱(╱ // 0x653 @0xa
0x0649…065b at000b = ╱46╱F╱ // 0x654 @0xb
0x0649…065b at000c = ╱36╱6╱ // 0x655 @0xc
0x0649…065b at000d = ╱ec╱,╱ // 0x656 @0xd
0x0649…065b at000e = ╱46╱F╱ // 0x657 @0xe
0x0649…065b at000f = ╱37╱7╱ // 0x658 @0xf
0x0649…065b at0010 = ╱ee╱)╱ // 0x659 @0x10
0x0649…065b at0011 = EOL // 0x65a @0x11
0x0649…065b }
0x065b…0673 93ca 0442 F1$=F7$;C2$=C5$(F6)
0x065b…0673 LineComalBin {
0x065b…0673 ptr = 0x93ca // 0x65b @0x0
0x065b…0673 lno = 0x01ba // 0x65d @0x2
0x065b…0673 at0004 = ╱46╱F╱ // 0x65f @0x4
0x065b…0673 at0005 = ╱31╱1╱ // 0x660 @0x5
0x065b…0673 at0006 = ╱ef╱$╱ // 0x661 @0x6
0x065b…0673 at0007 = ╱dc╱=╱ // 0x662 @0x7
0x065b…0673 at0008 = ╱46╱F╱ // 0x663 @0x8
0x065b…0673 at0009 = ╱37╱7╱ // 0x664 @0x9
0x065b…0673 at000a = ╱ef╱$╱ // 0x665 @0xa
0x065b…0673 at000b = ╱eb╱;╱ // 0x666 @0xb
0x065b…0673 at000c = ╱43╱C╱ // 0x667 @0xc
0x065b…0673 at000d = ╱32╱2╱ // 0x668 @0xd
0x065b…0673 at000e = ╱ef╱$╱ // 0x669 @0xe
0x065b…0673 at000f = ╱dc╱=╱ // 0x66a @0xf
0x065b…0673 at0010 = ╱43╱C╱ // 0x66b @0x10
0x065b…0673 at0011 = ╱35╱5╱ // 0x66c @0x11
0x065b…0673 at0012 = ╱ef╱$╱ // 0x66d @0x12
0x065b…0673 at0013 = ╱ed╱(╱ // 0x66e @0x13
0x065b…0673 at0014 = ╱46╱F╱ // 0x66f @0x14
0x065b…0673 at0015 = ╱36╱6╱ // 0x670 @0x15
0x065b…0673 at0016 = ╱ee╱)╱ // 0x671 @0x16
0x065b…0673 at0017 = EOL // 0x672 @0x17
0x065b…0673 }
0x0673…068e 93e5 0443 EXEC C(0,C2$,F1$,F1$)
0x0673…068e LineComalBin {
0x0673…068e ptr = 0x93e5 // 0x673 @0x0
0x0673…068e lno = 0x01bb // 0x675 @0x2
0x0673…068e at0004 = ╱9d╱ EXEC ╱ // 0x677 @0x4
0x0673…068e at0005 = ╱43╱C╱ // 0x678 @0x5
0x0673…068e at0006 = ╱ed╱(╱ // 0x679 @0x6
0x0673…068e at0007 = ╱30╱0╱ // 0x67a @0x7
0x0673…068e at0008 = ╱fe00000000╱ // 0x67b @0x8
0x0673…068e at000d = ╱ec╱,╱ // 0x680 @0xd
0x0673…068e at000e = ╱43╱C╱ // 0x681 @0xe
0x0673…068e at000f = ╱32╱2╱ // 0x682 @0xf
0x0673…068e at0010 = ╱ef╱$╱ // 0x683 @0x10
0x0673…068e at0011 = ╱ec╱,╱ // 0x684 @0x11
0x0673…068e at0012 = ╱46╱F╱ // 0x685 @0x12
0x0673…068e at0013 = ╱31╱1╱ // 0x686 @0x13
0x0673…068e at0014 = ╱ef╱$╱ // 0x687 @0x14
0x0673…068e at0015 = ╱ec╱,╱ // 0x688 @0x15
0x0673…068e at0016 = ╱46╱F╱ // 0x689 @0x16
0x0673…068e at0017 = ╱31╱1╱ // 0x68a @0x17
0x0673…068e at0018 = ╱ef╱$╱ // 0x68b @0x18
0x0673…068e at0019 = ╱ee╱)╱ // 0x68c @0x19
0x0673…068e at001a = EOL // 0x68d @0x1a
0x0673…068e }
0x068e…06a9 9400 0444 C5$(F6)=F1$(G:11)
0x068e…06a9 LineComalBin {
0x068e…06a9 ptr = 0x9400 // 0x68e @0x0
0x068e…06a9 lno = 0x01bc // 0x690 @0x2
0x068e…06a9 at0004 = ╱43╱C╱ // 0x692 @0x4
0x068e…06a9 at0005 = ╱35╱5╱ // 0x693 @0x5
0x068e…06a9 at0006 = ╱ef╱$╱ // 0x694 @0x6
0x068e…06a9 at0007 = ╱ed╱(╱ // 0x695 @0x7
0x068e…06a9 at0008 = ╱46╱F╱ // 0x696 @0x8
0x068e…06a9 at0009 = ╱36╱6╱ // 0x697 @0x9
0x068e…06a9 at000a = ╱ee╱)╱ // 0x698 @0xa
0x068e…06a9 at000b = ╱dc╱=╱ // 0x699 @0xb
0x068e…06a9 at000c = ╱46╱F╱ // 0x69a @0xc
0x068e…06a9 at000d = ╱31╱1╱ // 0x69b @0xd
0x068e…06a9 at000e = ╱ef╱$╱ // 0x69c @0xe
0x068e…06a9 at000f = ╱ed╱(╱ // 0x69d @0xf
0x068e…06a9 at0010 = ╱47╱G╱ // 0x69e @0x10
0x068e…06a9 at0011 = ╱f0╱:╱ // 0x69f @0x11
0x068e…06a9 at0012 = ╱31╱1╱ // 0x6a0 @0x12
0x068e…06a9 at0013 = ╱31╱1╱ // 0x6a1 @0x13
0x068e…06a9 at0014 = ╱fe0000b004╱ // 0x6a2 @0x14
0x068e…06a9 at0019 = ╱ee╱)╱ // 0x6a7 @0x19
0x068e…06a9 at001a = EOL // 0x6a8 @0x1a
0x068e…06a9 }
0x06a9…06af 9406 0448 ENDPROC
0x06a9…06af LineComalBin {
0x06a9…06af ptr = 0x9406 // 0x6a9 @0x0
0x06a9…06af lno = 0x01c0 // 0x6ab @0x2
0x06a9…06af at0004 = ╱9f╱ ENDPROC ╱ // 0x6ad @0x4
0x06a9…06af at0005 = EOL // 0x6ae @0x5
0x06a9…06af }
0x06af…06ba 9411 0450 PROC UDTÆL
0x06af…06ba LineComalBin {
0x06af…06ba ptr = 0x9411 // 0x6af @0x0
0x06af…06ba lno = 0x01c2 // 0x6b1 @0x2
0x06af…06ba at0004 = ╱9e╱ PROC ╱ // 0x6b3 @0x4
0x06af…06ba at0005 = ╱55╱U╱ // 0x6b4 @0x5
0x06af…06ba at0006 = ╱44╱D╱ // 0x6b5 @0x6
0x06af…06ba at0007 = ╱54╱T╱ // 0x6b6 @0x7
0x06af…06ba at0008 = ╱5b╱Æ╱ // 0x6b7 @0x8
0x06af…06ba at0009 = ╱4c╱L╱ // 0x6b8 @0x9
0x06af…06ba at000a = EOL // 0x6b9 @0xa
0x06af…06ba }
0x06ba…06c9 9420 0460 J=W*(F8-E)
0x06ba…06c9 LineComalBin {
0x06ba…06c9 ptr = 0x9420 // 0x6ba @0x0
0x06ba…06c9 lno = 0x01cc // 0x6bc @0x2
0x06ba…06c9 at0004 = ╱4a╱J╱ // 0x6be @0x4
0x06ba…06c9 at0005 = ╱dc╱=╱ // 0x6bf @0x5
0x06ba…06c9 at0006 = ╱57╱W╱ // 0x6c0 @0x6
0x06ba…06c9 at0007 = ╱e4╱*╱ // 0x6c1 @0x7
0x06ba…06c9 at0008 = ╱ed╱(╱ // 0x6c2 @0x8
0x06ba…06c9 at0009 = ╱46╱F╱ // 0x6c3 @0x9
0x06ba…06c9 at000a = ╱38╱8╱ // 0x6c4 @0xa
0x06ba…06c9 at000b = ╱e3╱-╱ // 0x6c5 @0xb
0x06ba…06c9 at000c = ╱45╱E╱ // 0x6c6 @0xc
0x06ba…06c9 at000d = ╱ee╱)╱ // 0x6c7 @0xd
0x06ba…06c9 at000e = EOL // 0x6c8 @0xe
0x06ba…06c9 }
0x06c9…06d5 942c 0470 FOR F9=E TO W
0x06c9…06d5 LineComalBin {
0x06c9…06d5 ptr = 0x942c // 0x6c9 @0x0
0x06c9…06d5 lno = 0x01d6 // 0x6cb @0x2
0x06c9…06d5 at0004 = ╱83╱ FOR ╱ // 0x6cd @0x4
0x06c9…06d5 at0005 = ╱46╱F╱ // 0x6ce @0x5
0x06c9…06d5 at0006 = ╱39╱9╱ // 0x6cf @0x6
0x06c9…06d5 at0007 = ╱dc╱=╱ // 0x6d0 @0x7
0x06c9…06d5 at0008 = ╱45╱E╱ // 0x6d1 @0x8
0x06c9…06d5 at0009 = ╱b7╱ TO ╱ // 0x6d2 @0x9
0x06c9…06d5 at000a = ╱57╱W╱ // 0x6d3 @0xa
0x06c9…06d5 at000b = EOL // 0x6d4 @0xb
0x06c9…06d5 }
0x06d5…06e5 943c 0480 FOR I=E TO 5
0x06d5…06e5 LineComalBin {
0x06d5…06e5 ptr = 0x943c // 0x6d5 @0x0
0x06d5…06e5 lno = 0x01e0 // 0x6d7 @0x2
0x06d5…06e5 at0004 = ╱83╱ FOR ╱ // 0x6d9 @0x4
0x06d5…06e5 at0005 = ╱49╱I╱ // 0x6da @0x5
0x06d5…06e5 at0006 = ╱dc╱=╱ // 0x6db @0x6
0x06d5…06e5 at0007 = ╱45╱E╱ // 0x6dc @0x7
0x06d5…06e5 at0008 = ╱b7╱ TO ╱ // 0x6dd @0x8
0x06d5…06e5 at0009 = ╱35╱5╱ // 0x6de @0x9
0x06d5…06e5 at000a = ╱fe0000a003╱ // 0x6df @0xa
0x06d5…06e5 at000f = EOL // 0x6e4 @0xf
0x06d5…06e5 }
0x06e5…071b 9472 0490 C6$((I-E)*11+E:11)=C5$((F9-E)*5+I)
0x06e5…071b LineComalBin {
0x06e5…071b ptr = 0x9472 // 0x6e5 @0x0
0x06e5…071b lno = 0x01ea // 0x6e7 @0x2
0x06e5…071b at0004 = ╱43╱C╱ // 0x6e9 @0x4
0x06e5…071b at0005 = ╱36╱6╱ // 0x6ea @0x5
0x06e5…071b at0006 = ╱ef╱$╱ // 0x6eb @0x6
0x06e5…071b at0007 = ╱ed╱(╱ // 0x6ec @0x7
0x06e5…071b at0008 = ╱ed╱(╱ // 0x6ed @0x8
0x06e5…071b at0009 = ╱49╱I╱ // 0x6ee @0x9
0x06e5…071b at000a = ╱e3╱-╱ // 0x6ef @0xa
0x06e5…071b at000b = ╱45╱E╱ // 0x6f0 @0xb
0x06e5…071b at000c = ╱ee╱)╱ // 0x6f1 @0xc
0x06e5…071b at000d = ╱e4╱*╱ // 0x6f2 @0xd
0x06e5…071b at000e = ╱31╱1╱ // 0x6f3 @0xe
0x06e5…071b at000f = ╱31╱1╱ // 0x6f4 @0xf
0x06e5…071b at0010 = ╱fe0000b004╱ // 0x6f5 @0x10
0x06e5…071b at0015 = ╱e2╱+╱ // 0x6fa @0x15
0x06e5…071b at0016 = ╱45╱E╱ // 0x6fb @0x16
0x06e5…071b at0017 = ╱f0╱:╱ // 0x6fc @0x17
0x06e5…071b at0018 = ╱31╱1╱ // 0x6fd @0x18
0x06e5…071b at0019 = ╱31╱1╱ // 0x6fe @0x19
0x06e5…071b at001a = ╱fe0000b004╱ // 0x6ff @0x1a
0x06e5…071b at001f = ╱ee╱)╱ // 0x704 @0x1f
0x06e5…071b at0020 = ╱dc╱=╱ // 0x705 @0x20
0x06e5…071b at0021 = ╱43╱C╱ // 0x706 @0x21
0x06e5…071b at0022 = ╱35╱5╱ // 0x707 @0x22
0x06e5…071b at0023 = ╱ef╱$╱ // 0x708 @0x23
0x06e5…071b at0024 = ╱ed╱(╱ // 0x709 @0x24
0x06e5…071b at0025 = ╱ed╱(╱ // 0x70a @0x25
0x06e5…071b at0026 = ╱46╱F╱ // 0x70b @0x26
0x06e5…071b at0027 = ╱39╱9╱ // 0x70c @0x27
0x06e5…071b at0028 = ╱e3╱-╱ // 0x70d @0x28
0x06e5…071b at0029 = ╱45╱E╱ // 0x70e @0x29
0x06e5…071b at002a = ╱ee╱)╱ // 0x70f @0x2a
0x06e5…071b at002b = ╱e4╱*╱ // 0x710 @0x2b
0x06e5…071b at002c = ╱35╱5╱ // 0x711 @0x2c
0x06e5…071b at002d = ╱fe0000a003╱ // 0x712 @0x2d
0x06e5…071b at0032 = ╱e2╱+╱ // 0x717 @0x32
0x06e5…071b at0033 = ╱49╱I╱ // 0x718 @0x33
0x06e5…071b at0034 = ╱ee╱)╱ // 0x719 @0x34
0x06e5…071b at0035 = EOL // 0x71a @0x35
0x06e5…071b }
0x071b…0722 9479 0500 NEXT I
0x071b…0722 LineComalBin {
0x071b…0722 ptr = 0x9479 // 0x71b @0x0
0x071b…0722 lno = 0x01f4 // 0x71d @0x2
0x071b…0722 at0004 = ╱84╱ NEXT ╱ // 0x71f @0x4
0x071b…0722 at0005 = ╱49╱I╱ // 0x720 @0x5
0x071b…0722 at0006 = EOL // 0x721 @0x6
0x071b…0722 }
0x0722…0734 948b 0510 PUT D0$,J+F9:C6$
0x0722…0734 LineComalBin {
0x0722…0734 ptr = 0x948b // 0x722 @0x0
0x0722…0734 lno = 0x01fe // 0x724 @0x2
0x0722…0734 at0004 = ╱aa╱ PUT ╱ // 0x726 @0x4
0x0722…0734 at0005 = ╱44╱D╱ // 0x727 @0x5
0x0722…0734 at0006 = ╱30╱0╱ // 0x728 @0x6
0x0722…0734 at0007 = ╱ef╱$╱ // 0x729 @0x7
0x0722…0734 at0008 = ╱ec╱,╱ // 0x72a @0x8
0x0722…0734 at0009 = ╱4a╱J╱ // 0x72b @0x9
0x0722…0734 at000a = ╱e2╱+╱ // 0x72c @0xa
0x0722…0734 at000b = ╱46╱F╱ // 0x72d @0xb
0x0722…0734 at000c = ╱39╱9╱ // 0x72e @0xc
0x0722…0734 at000d = ╱f0╱:╱ // 0x72f @0xd
0x0722…0734 at000e = ╱43╱C╱ // 0x730 @0xe
0x0722…0734 at000f = ╱36╱6╱ // 0x731 @0xf
0x0722…0734 at0010 = ╱ef╱$╱ // 0x732 @0x10
0x0722…0734 at0011 = EOL // 0x733 @0x11
0x0722…0734 }
0x0734…073c 9493 0520 NEXT F9
0x0734…073c LineComalBin {
0x0734…073c ptr = 0x9493 // 0x734 @0x0
0x0734…073c lno = 0x0208 // 0x736 @0x2
0x0734…073c at0004 = ╱84╱ NEXT ╱ // 0x738 @0x4
0x0734…073c at0005 = ╱46╱F╱ // 0x739 @0x5
0x0734…073c at0006 = ╱39╱9╱ // 0x73a @0x6
0x0734…073c at0007 = EOL // 0x73b @0x7
0x0734…073c }
0x073c…0750 94a7 0530 EXEC F(-F8,-F9,D0$)
0x073c…0750 LineComalBin {
0x073c…0750 ptr = 0x94a7 // 0x73c @0x0
0x073c…0750 lno = 0x0212 // 0x73e @0x2
0x073c…0750 at0004 = ╱9d╱ EXEC ╱ // 0x740 @0x4
0x073c…0750 at0005 = ╱46╱F╱ // 0x741 @0x5
0x073c…0750 at0006 = ╱ed╱(╱ // 0x742 @0x6
0x073c…0750 at0007 = ╱e9╱-╱ // 0x743 @0x7
0x073c…0750 at0008 = ╱46╱F╱ // 0x744 @0x8
0x073c…0750 at0009 = ╱38╱8╱ // 0x745 @0x9
0x073c…0750 at000a = ╱ec╱,╱ // 0x746 @0xa
0x073c…0750 at000b = ╱e9╱-╱ // 0x747 @0xb
0x073c…0750 at000c = ╱46╱F╱ // 0x748 @0xc
0x073c…0750 at000d = ╱39╱9╱ // 0x749 @0xd
0x073c…0750 at000e = ╱ec╱,╱ // 0x74a @0xe
0x073c…0750 at000f = ╱44╱D╱ // 0x74b @0xf
0x073c…0750 at0010 = ╱30╱0╱ // 0x74c @0x10
0x073c…0750 at0011 = ╱ef╱$╱ // 0x74d @0x11
0x073c…0750 at0012 = ╱ee╱)╱ // 0x74e @0x12
0x073c…0750 at0013 = EOL // 0x74f @0x13
0x073c…0750 }
0x0750…0756 94ad 0540 ENDPROC
0x0750…0756 LineComalBin {
0x0750…0756 ptr = 0x94ad // 0x750 @0x0
0x0750…0756 lno = 0x021c // 0x752 @0x2
0x0750…0756 at0004 = ╱9f╱ ENDPROC ╱ // 0x754 @0x4
0x0750…0756 at0005 = EOL // 0x755 @0x5
0x0750…0756 }
0x0756…0762 94b9 0550 PROC INDTÆL
0x0756…0762 LineComalBin {
0x0756…0762 ptr = 0x94b9 // 0x756 @0x0
0x0756…0762 lno = 0x0226 // 0x758 @0x2
0x0756…0762 at0004 = ╱9e╱ PROC ╱ // 0x75a @0x4
0x0756…0762 at0005 = ╱49╱I╱ // 0x75b @0x5
0x0756…0762 at0006 = ╱4e╱N╱ // 0x75c @0x6
0x0756…0762 at0007 = ╱44╱D╱ // 0x75d @0x7
0x0756…0762 at0008 = ╱54╱T╱ // 0x75e @0x8
0x0756…0762 at0009 = ╱5b╱Æ╱ // 0x75f @0x9
0x0756…0762 at000a = ╱4c╱L╱ // 0x760 @0xa
0x0756…0762 at000b = EOL // 0x761 @0xb
0x0756…0762 }
0x0762…0771 94c8 0560 J=W*(F8-E)
0x0762…0771 LineComalBin {
0x0762…0771 ptr = 0x94c8 // 0x762 @0x0
0x0762…0771 lno = 0x0230 // 0x764 @0x2
0x0762…0771 at0004 = ╱4a╱J╱ // 0x766 @0x4
0x0762…0771 at0005 = ╱dc╱=╱ // 0x767 @0x5
0x0762…0771 at0006 = ╱57╱W╱ // 0x768 @0x6
0x0762…0771 at0007 = ╱e4╱*╱ // 0x769 @0x7
0x0762…0771 at0008 = ╱ed╱(╱ // 0x76a @0x8
0x0762…0771 at0009 = ╱46╱F╱ // 0x76b @0x9
0x0762…0771 at000a = ╱38╱8╱ // 0x76c @0xa
0x0762…0771 at000b = ╱e3╱-╱ // 0x76d @0xb
0x0762…0771 at000c = ╱45╱E╱ // 0x76e @0xc
0x0762…0771 at000d = ╱ee╱)╱ // 0x76f @0xd
0x0762…0771 at000e = EOL // 0x770 @0xe
0x0762…0771 }
0x0771…077d 94d4 0570 FOR F9=E TO W
0x0771…077d LineComalBin {
0x0771…077d ptr = 0x94d4 // 0x771 @0x0
0x0771…077d lno = 0x023a // 0x773 @0x2
0x0771…077d at0004 = ╱83╱ FOR ╱ // 0x775 @0x4
0x0771…077d at0005 = ╱46╱F╱ // 0x776 @0x5
0x0771…077d at0006 = ╱39╱9╱ // 0x777 @0x6
0x0771…077d at0007 = ╱dc╱=╱ // 0x778 @0x7
0x0771…077d at0008 = ╱45╱E╱ // 0x779 @0x8
0x0771…077d at0009 = ╱b7╱ TO ╱ // 0x77a @0x9
0x0771…077d at000a = ╱57╱W╱ // 0x77b @0xa
0x0771…077d at000b = EOL // 0x77c @0xb
0x0771…077d }
0x077d…078f 94e6 0580 GET D0$,J+F9:C6$
0x077d…078f LineComalBin {
0x077d…078f ptr = 0x94e6 // 0x77d @0x0
0x077d…078f lno = 0x0244 // 0x77f @0x2
0x077d…078f at0004 = ╱a9╱ GET ╱ // 0x781 @0x4
0x077d…078f at0005 = ╱44╱D╱ // 0x782 @0x5
0x077d…078f at0006 = ╱30╱0╱ // 0x783 @0x6
0x077d…078f at0007 = ╱ef╱$╱ // 0x784 @0x7
0x077d…078f at0008 = ╱ec╱,╱ // 0x785 @0x8
0x077d…078f at0009 = ╱4a╱J╱ // 0x786 @0x9
0x077d…078f at000a = ╱e2╱+╱ // 0x787 @0xa
0x077d…078f at000b = ╱46╱F╱ // 0x788 @0xb
0x077d…078f at000c = ╱39╱9╱ // 0x789 @0xc
0x077d…078f at000d = ╱f0╱:╱ // 0x78a @0xd
0x077d…078f at000e = ╱43╱C╱ // 0x78b @0xe
0x077d…078f at000f = ╱36╱6╱ // 0x78c @0xf
0x077d…078f at0010 = ╱ef╱$╱ // 0x78d @0x10
0x077d…078f at0011 = EOL // 0x78e @0x11
0x077d…078f }
0x078f…079f 94f6 0590 FOR I=E TO 5
0x078f…079f LineComalBin {
0x078f…079f ptr = 0x94f6 // 0x78f @0x0
0x078f…079f lno = 0x024e // 0x791 @0x2
0x078f…079f at0004 = ╱83╱ FOR ╱ // 0x793 @0x4
0x078f…079f at0005 = ╱49╱I╱ // 0x794 @0x5
0x078f…079f at0006 = ╱dc╱=╱ // 0x795 @0x6
0x078f…079f at0007 = ╱45╱E╱ // 0x796 @0x7
0x078f…079f at0008 = ╱b7╱ TO ╱ // 0x797 @0x8
0x078f…079f at0009 = ╱35╱5╱ // 0x798 @0x9
0x078f…079f at000a = ╱fe0000a003╱ // 0x799 @0xa
0x078f…079f at000f = EOL // 0x79e @0xf
0x078f…079f }
0x079f…07d5 952c 0600 C5$((F9-E)*5+I)=C6$((I-E)*11+E:11)
0x079f…07d5 LineComalBin {
0x079f…07d5 ptr = 0x952c // 0x79f @0x0
0x079f…07d5 lno = 0x0258 // 0x7a1 @0x2
0x079f…07d5 at0004 = ╱43╱C╱ // 0x7a3 @0x4
0x079f…07d5 at0005 = ╱35╱5╱ // 0x7a4 @0x5
0x079f…07d5 at0006 = ╱ef╱$╱ // 0x7a5 @0x6
0x079f…07d5 at0007 = ╱ed╱(╱ // 0x7a6 @0x7
0x079f…07d5 at0008 = ╱ed╱(╱ // 0x7a7 @0x8
0x079f…07d5 at0009 = ╱46╱F╱ // 0x7a8 @0x9
0x079f…07d5 at000a = ╱39╱9╱ // 0x7a9 @0xa
0x079f…07d5 at000b = ╱e3╱-╱ // 0x7aa @0xb
0x079f…07d5 at000c = ╱45╱E╱ // 0x7ab @0xc
0x079f…07d5 at000d = ╱ee╱)╱ // 0x7ac @0xd
0x079f…07d5 at000e = ╱e4╱*╱ // 0x7ad @0xe
0x079f…07d5 at000f = ╱35╱5╱ // 0x7ae @0xf
0x079f…07d5 at0010 = ╱fe0000a003╱ // 0x7af @0x10
0x079f…07d5 at0015 = ╱e2╱+╱ // 0x7b4 @0x15
0x079f…07d5 at0016 = ╱49╱I╱ // 0x7b5 @0x16
0x079f…07d5 at0017 = ╱ee╱)╱ // 0x7b6 @0x17
0x079f…07d5 at0018 = ╱dc╱=╱ // 0x7b7 @0x18
0x079f…07d5 at0019 = ╱43╱C╱ // 0x7b8 @0x19
0x079f…07d5 at001a = ╱36╱6╱ // 0x7b9 @0x1a
0x079f…07d5 at001b = ╱ef╱$╱ // 0x7ba @0x1b
0x079f…07d5 at001c = ╱ed╱(╱ // 0x7bb @0x1c
0x079f…07d5 at001d = ╱ed╱(╱ // 0x7bc @0x1d
0x079f…07d5 at001e = ╱49╱I╱ // 0x7bd @0x1e
0x079f…07d5 at001f = ╱e3╱-╱ // 0x7be @0x1f
0x079f…07d5 at0020 = ╱45╱E╱ // 0x7bf @0x20
0x079f…07d5 at0021 = ╱ee╱)╱ // 0x7c0 @0x21
0x079f…07d5 at0022 = ╱e4╱*╱ // 0x7c1 @0x22
0x079f…07d5 at0023 = ╱31╱1╱ // 0x7c2 @0x23
0x079f…07d5 at0024 = ╱31╱1╱ // 0x7c3 @0x24
0x079f…07d5 at0025 = ╱fe0000b004╱ // 0x7c4 @0x25
0x079f…07d5 at002a = ╱e2╱+╱ // 0x7c9 @0x2a
0x079f…07d5 at002b = ╱45╱E╱ // 0x7ca @0x2b
0x079f…07d5 at002c = ╱f0╱:╱ // 0x7cb @0x2c
0x079f…07d5 at002d = ╱31╱1╱ // 0x7cc @0x2d
0x079f…07d5 at002e = ╱31╱1╱ // 0x7cd @0x2e
0x079f…07d5 at002f = ╱fe0000b004╱ // 0x7ce @0x2f
0x079f…07d5 at0034 = ╱ee╱)╱ // 0x7d3 @0x34
0x079f…07d5 at0035 = EOL // 0x7d4 @0x35
0x079f…07d5 }
0x07d5…07dc 9533 0610 NEXT I
0x07d5…07dc LineComalBin {
0x07d5…07dc ptr = 0x9533 // 0x7d5 @0x0
0x07d5…07dc lno = 0x0262 // 0x7d7 @0x2
0x07d5…07dc at0004 = ╱84╱ NEXT ╱ // 0x7d9 @0x4
0x07d5…07dc at0005 = ╱49╱I╱ // 0x7da @0x5
0x07d5…07dc at0006 = EOL // 0x7db @0x6
0x07d5…07dc }
0x07dc…07e4 953b 0620 NEXT F9
0x07dc…07e4 LineComalBin {
0x07dc…07e4 ptr = 0x953b // 0x7dc @0x0
0x07dc…07e4 lno = 0x026c // 0x7de @0x2
0x07dc…07e4 at0004 = ╱84╱ NEXT ╱ // 0x7e0 @0x4
0x07dc…07e4 at0005 = ╱46╱F╱ // 0x7e1 @0x5
0x07dc…07e4 at0006 = ╱39╱9╱ // 0x7e2 @0x6
0x07dc…07e4 at0007 = EOL // 0x7e3 @0x7
0x07dc…07e4 }
0x07e4…07f6 954d 0630 EXEC F(F8,F9,D0$)
0x07e4…07f6 LineComalBin {
0x07e4…07f6 ptr = 0x954d // 0x7e4 @0x0
0x07e4…07f6 lno = 0x0276 // 0x7e6 @0x2
0x07e4…07f6 at0004 = ╱9d╱ EXEC ╱ // 0x7e8 @0x4
0x07e4…07f6 at0005 = ╱46╱F╱ // 0x7e9 @0x5
0x07e4…07f6 at0006 = ╱ed╱(╱ // 0x7ea @0x6
0x07e4…07f6 at0007 = ╱46╱F╱ // 0x7eb @0x7
0x07e4…07f6 at0008 = ╱38╱8╱ // 0x7ec @0x8
0x07e4…07f6 at0009 = ╱ec╱,╱ // 0x7ed @0x9
0x07e4…07f6 at000a = ╱46╱F╱ // 0x7ee @0xa
0x07e4…07f6 at000b = ╱39╱9╱ // 0x7ef @0xb
0x07e4…07f6 at000c = ╱ec╱,╱ // 0x7f0 @0xc
0x07e4…07f6 at000d = ╱44╱D╱ // 0x7f1 @0xd
0x07e4…07f6 at000e = ╱30╱0╱ // 0x7f2 @0xe
0x07e4…07f6 at000f = ╱ef╱$╱ // 0x7f3 @0xf
0x07e4…07f6 at0010 = ╱ee╱)╱ // 0x7f4 @0x10
0x07e4…07f6 at0011 = EOL // 0x7f5 @0x11
0x07e4…07f6 }
0x07f6…07fc 9553 0640 ENDPROC
0x07f6…07fc LineComalBin {
0x07f6…07fc ptr = 0x9553 // 0x7f6 @0x0
0x07f6…07fc lno = 0x0280 // 0x7f8 @0x2
0x07f6…07fc at0004 = ╱9f╱ ENDPROC ╱ // 0x7fa @0x4
0x07f6…07fc at0005 = EOL // 0x7fb @0x5
0x07f6…07fc }
0x07fc…080b 9562 0641 PROC OP(F6,F7)
0x07fc…080b LineComalBin {
0x07fc…080b ptr = 0x9562 // 0x7fc @0x0
0x07fc…080b lno = 0x0281 // 0x7fe @0x2
0x07fc…080b at0004 = ╱9e╱ PROC ╱ // 0x800 @0x4
0x07fc…080b at0005 = ╱4f╱O╱ // 0x801 @0x5
0x07fc…080b at0006 = ╱50╱P╱ // 0x802 @0x6
0x07fc…080b at0007 = ╱ed╱(╱ // 0x803 @0x7
0x07fc…080b at0008 = ╱46╱F╱ // 0x804 @0x8
0x07fc…080b at0009 = ╱36╱6╱ // 0x805 @0x9
0x07fc…080b at000a = ╱ec╱,╱ // 0x806 @0xa
0x07fc…080b at000b = ╱46╱F╱ // 0x807 @0xb
0x07fc…080b at000c = ╱37╱7╱ // 0x808 @0xc
0x07fc…080b at000d = ╱ee╱)╱ // 0x809 @0xd
0x07fc…080b at000e = EOL // 0x80a @0xe
0x07fc…080b }
0x080b…0823 957a 0642 F1$=F7$;C2$=E2$(F6)
0x080b…0823 LineComalBin {
0x080b…0823 ptr = 0x957a // 0x80b @0x0
0x080b…0823 lno = 0x0282 // 0x80d @0x2
0x080b…0823 at0004 = ╱46╱F╱ // 0x80f @0x4
0x080b…0823 at0005 = ╱31╱1╱ // 0x810 @0x5
0x080b…0823 at0006 = ╱ef╱$╱ // 0x811 @0x6
0x080b…0823 at0007 = ╱dc╱=╱ // 0x812 @0x7
0x080b…0823 at0008 = ╱46╱F╱ // 0x813 @0x8
0x080b…0823 at0009 = ╱37╱7╱ // 0x814 @0x9
0x080b…0823 at000a = ╱ef╱$╱ // 0x815 @0xa
0x080b…0823 at000b = ╱eb╱;╱ // 0x816 @0xb
0x080b…0823 at000c = ╱43╱C╱ // 0x817 @0xc
0x080b…0823 at000d = ╱32╱2╱ // 0x818 @0xd
0x080b…0823 at000e = ╱ef╱$╱ // 0x819 @0xe
0x080b…0823 at000f = ╱dc╱=╱ // 0x81a @0xf
0x080b…0823 at0010 = ╱45╱E╱ // 0x81b @0x10
0x080b…0823 at0011 = ╱32╱2╱ // 0x81c @0x11
0x080b…0823 at0012 = ╱ef╱$╱ // 0x81d @0x12
0x080b…0823 at0013 = ╱ed╱(╱ // 0x81e @0x13
0x080b…0823 at0014 = ╱46╱F╱ // 0x81f @0x14
0x080b…0823 at0015 = ╱36╱6╱ // 0x820 @0x15
0x080b…0823 at0016 = ╱ee╱)╱ // 0x821 @0x16
0x080b…0823 at0017 = EOL // 0x822 @0x17
0x080b…0823 }
0x0823…083e 9595 0643 EXEC C(0,C2$,F1$,F1$)
0x0823…083e LineComalBin {
0x0823…083e ptr = 0x9595 // 0x823 @0x0
0x0823…083e lno = 0x0283 // 0x825 @0x2
0x0823…083e at0004 = ╱9d╱ EXEC ╱ // 0x827 @0x4
0x0823…083e at0005 = ╱43╱C╱ // 0x828 @0x5
0x0823…083e at0006 = ╱ed╱(╱ // 0x829 @0x6
0x0823…083e at0007 = ╱30╱0╱ // 0x82a @0x7
0x0823…083e at0008 = ╱fe00000000╱ // 0x82b @0x8
0x0823…083e at000d = ╱ec╱,╱ // 0x830 @0xd
0x0823…083e at000e = ╱43╱C╱ // 0x831 @0xe
0x0823…083e at000f = ╱32╱2╱ // 0x832 @0xf
0x0823…083e at0010 = ╱ef╱$╱ // 0x833 @0x10
0x0823…083e at0011 = ╱ec╱,╱ // 0x834 @0x11
0x0823…083e at0012 = ╱46╱F╱ // 0x835 @0x12
0x0823…083e at0013 = ╱31╱1╱ // 0x836 @0x13
0x0823…083e at0014 = ╱ef╱$╱ // 0x837 @0x14
0x0823…083e at0015 = ╱ec╱,╱ // 0x838 @0x15
0x0823…083e at0016 = ╱46╱F╱ // 0x839 @0x16
0x0823…083e at0017 = ╱31╱1╱ // 0x83a @0x17
0x0823…083e at0018 = ╱ef╱$╱ // 0x83b @0x18
0x0823…083e at0019 = ╱ee╱)╱ // 0x83c @0x19
0x0823…083e at001a = EOL // 0x83d @0x1a
0x0823…083e }
0x083e…084e 95a5 0644 E2$(F6)=F1$
0x083e…084e LineComalBin {
0x083e…084e ptr = 0x95a5 // 0x83e @0x0
0x083e…084e lno = 0x0284 // 0x840 @0x2
0x083e…084e at0004 = ╱45╱E╱ // 0x842 @0x4
0x083e…084e at0005 = ╱32╱2╱ // 0x843 @0x5
0x083e…084e at0006 = ╱ef╱$╱ // 0x844 @0x6
0x083e…084e at0007 = ╱ed╱(╱ // 0x845 @0x7
0x083e…084e at0008 = ╱46╱F╱ // 0x846 @0x8
0x083e…084e at0009 = ╱36╱6╱ // 0x847 @0x9
0x083e…084e at000a = ╱ee╱)╱ // 0x848 @0xa
0x083e…084e at000b = ╱dc╱=╱ // 0x849 @0xb
0x083e…084e at000c = ╱46╱F╱ // 0x84a @0xc
0x083e…084e at000d = ╱31╱1╱ // 0x84b @0xd
0x083e…084e at000e = ╱ef╱$╱ // 0x84c @0xe
0x083e…084e at000f = EOL // 0x84d @0xf
0x083e…084e }
0x084e…0854 95ab 0645 ENDPROC
0x084e…0854 LineComalBin {
0x084e…0854 ptr = 0x95ab // 0x84e @0x0
0x084e…0854 lno = 0x0285 // 0x850 @0x2
0x084e…0854 at0004 = ╱9f╱ ENDPROC ╱ // 0x852 @0x4
0x084e…0854 at0005 = EOL // 0x853 @0x5
0x084e…0854 }
0x0854…086a 95c1 0650 PROC DATOCHECK(G0,G1)
0x0854…086a LineComalBin {
0x0854…086a ptr = 0x95c1 // 0x854 @0x0
0x0854…086a lno = 0x028a // 0x856 @0x2
0x0854…086a at0004 = ╱9e╱ PROC ╱ // 0x858 @0x4
0x0854…086a at0005 = ╱44╱D╱ // 0x859 @0x5
0x0854…086a at0006 = ╱41╱A╱ // 0x85a @0x6
0x0854…086a at0007 = ╱54╱T╱ // 0x85b @0x7
0x0854…086a at0008 = ╱4f╱O╱ // 0x85c @0x8
0x0854…086a at0009 = ╱43╱C╱ // 0x85d @0x9
0x0854…086a at000a = ╱48╱H╱ // 0x85e @0xa
0x0854…086a at000b = ╱45╱E╱ // 0x85f @0xb
0x0854…086a at000c = ╱43╱C╱ // 0x860 @0xc
0x0854…086a at000d = ╱4b╱K╱ // 0x861 @0xd
0x0854…086a at000e = ╱ed╱(╱ // 0x862 @0xe
0x0854…086a at000f = ╱47╱G╱ // 0x863 @0xf
0x0854…086a at0010 = ╱30╱0╱ // 0x864 @0x10
0x0854…086a at0011 = ╱ec╱,╱ // 0x865 @0x11
0x0854…086a at0012 = ╱47╱G╱ // 0x866 @0x12
0x0854…086a at0013 = ╱31╱1╱ // 0x867 @0x13
0x0854…086a at0014 = ╱ee╱)╱ // 0x868 @0x14
0x0854…086a at0015 = EOL // 0x869 @0x15
0x0854…086a }
0x086a…0873 95ca 0660 G1=E
0x086a…0873 LineComalBin {
0x086a…0873 ptr = 0x95ca // 0x86a @0x0
0x086a…0873 lno = 0x0294 // 0x86c @0x2
0x086a…0873 at0004 = ╱47╱G╱ // 0x86e @0x4
0x086a…0873 at0005 = ╱31╱1╱ // 0x86f @0x5
0x086a…0873 at0006 = ╱dc╱=╱ // 0x870 @0x6
0x086a…0873 at0007 = ╱45╱E╱ // 0x871 @0x7
0x086a…0873 at0008 = EOL // 0x872 @0x8
0x086a…0873 }
0x0873…08a8 95ff 0670 G2=(ORD(G0$(E))-48)*10+ORD(G0$(G))-48
0x0873…08a8 LineComalBin {
0x0873…08a8 ptr = 0x95ff // 0x873 @0x0
0x0873…08a8 lno = 0x029e // 0x875 @0x2
0x0873…08a8 at0004 = ╱47╱G╱ // 0x877 @0x4
0x0873…08a8 at0005 = ╱32╱2╱ // 0x878 @0x5
0x0873…08a8 at0006 = ╱dc╱=╱ // 0x879 @0x6
0x0873…08a8 at0007 = ╱ed╱(╱ // 0x87a @0x7
0x0873…08a8 at0008 = ╱cd╱ORD╱ // 0x87b @0x8
0x0873…08a8 at0009 = ╱ed╱(╱ // 0x87c @0x9
0x0873…08a8 at000a = ╱47╱G╱ // 0x87d @0xa
0x0873…08a8 at000b = ╱30╱0╱ // 0x87e @0xb
0x0873…08a8 at000c = ╱ef╱$╱ // 0x87f @0xc
0x0873…08a8 at000d = ╱ed╱(╱ // 0x880 @0xd
0x0873…08a8 at000e = ╱45╱E╱ // 0x881 @0xe
0x0873…08a8 at000f = ╱ee╱)╱ // 0x882 @0xf
0x0873…08a8 at0010 = ╱ee╱)╱ // 0x883 @0x10
0x0873…08a8 at0011 = ╱e3╱-╱ // 0x884 @0x11
0x0873…08a8 at0012 = ╱34╱4╱ // 0x885 @0x12
0x0873…08a8 at0013 = ╱38╱8╱ // 0x886 @0x13
0x0873…08a8 at0014 = ╱fe0000c006╱ // 0x887 @0x14
0x0873…08a8 at0019 = ╱ee╱)╱ // 0x88c @0x19
0x0873…08a8 at001a = ╱e4╱*╱ // 0x88d @0x1a
0x0873…08a8 at001b = ╱31╱1╱ // 0x88e @0x1b
0x0873…08a8 at001c = ╱30╱0╱ // 0x88f @0x1c
0x0873…08a8 at001d = ╱fe0000a004╱ // 0x890 @0x1d
0x0873…08a8 at0022 = ╱e2╱+╱ // 0x895 @0x22
0x0873…08a8 at0023 = ╱cd╱ORD╱ // 0x896 @0x23
0x0873…08a8 at0024 = ╱ed╱(╱ // 0x897 @0x24
0x0873…08a8 at0025 = ╱47╱G╱ // 0x898 @0x25
0x0873…08a8 at0026 = ╱30╱0╱ // 0x899 @0x26
0x0873…08a8 at0027 = ╱ef╱$╱ // 0x89a @0x27
0x0873…08a8 at0028 = ╱ed╱(╱ // 0x89b @0x28
0x0873…08a8 at0029 = ╱47╱G╱ // 0x89c @0x29
0x0873…08a8 at002a = ╱ee╱)╱ // 0x89d @0x2a
0x0873…08a8 at002b = ╱ee╱)╱ // 0x89e @0x2b
0x0873…08a8 at002c = ╱e3╱-╱ // 0x89f @0x2c
0x0873…08a8 at002d = ╱34╱4╱ // 0x8a0 @0x2d
0x0873…08a8 at002e = ╱38╱8╱ // 0x8a1 @0x2e
0x0873…08a8 at002f = ╱fe0000c006╱ // 0x8a2 @0x2f
0x0873…08a8 at0034 = EOL // 0x8a7 @0x34
0x0873…08a8 }
0x08a8…08e2 9639 0680 G3=(ORD(G0$(V))-48)*10+ORD(G0$(4))-48
0x08a8…08e2 LineComalBin {
0x08a8…08e2 ptr = 0x9639 // 0x8a8 @0x0
0x08a8…08e2 lno = 0x02a8 // 0x8aa @0x2
0x08a8…08e2 at0004 = ╱47╱G╱ // 0x8ac @0x4
0x08a8…08e2 at0005 = ╱33╱3╱ // 0x8ad @0x5
0x08a8…08e2 at0006 = ╱dc╱=╱ // 0x8ae @0x6
0x08a8…08e2 at0007 = ╱ed╱(╱ // 0x8af @0x7
0x08a8…08e2 at0008 = ╱cd╱ORD╱ // 0x8b0 @0x8
0x08a8…08e2 at0009 = ╱ed╱(╱ // 0x8b1 @0x9
0x08a8…08e2 at000a = ╱47╱G╱ // 0x8b2 @0xa
0x08a8…08e2 at000b = ╱30╱0╱ // 0x8b3 @0xb
0x08a8…08e2 at000c = ╱ef╱$╱ // 0x8b4 @0xc
0x08a8…08e2 at000d = ╱ed╱(╱ // 0x8b5 @0xd
0x08a8…08e2 at000e = ╱56╱V╱ // 0x8b6 @0xe
0x08a8…08e2 at000f = ╱ee╱)╱ // 0x8b7 @0xf
0x08a8…08e2 at0010 = ╱ee╱)╱ // 0x8b8 @0x10
0x08a8…08e2 at0011 = ╱e3╱-╱ // 0x8b9 @0x11
0x08a8…08e2 at0012 = ╱34╱4╱ // 0x8ba @0x12
0x08a8…08e2 at0013 = ╱38╱8╱ // 0x8bb @0x13
0x08a8…08e2 at0014 = ╱fe0000c006╱ // 0x8bc @0x14
0x08a8…08e2 at0019 = ╱ee╱)╱ // 0x8c1 @0x19
0x08a8…08e2 at001a = ╱e4╱*╱ // 0x8c2 @0x1a
0x08a8…08e2 at001b = ╱31╱1╱ // 0x8c3 @0x1b
0x08a8…08e2 at001c = ╱30╱0╱ // 0x8c4 @0x1c
0x08a8…08e2 at001d = ╱fe0000a004╱ // 0x8c5 @0x1d
0x08a8…08e2 at0022 = ╱e2╱+╱ // 0x8ca @0x22
0x08a8…08e2 at0023 = ╱cd╱ORD╱ // 0x8cb @0x23
0x08a8…08e2 at0024 = ╱ed╱(╱ // 0x8cc @0x24
0x08a8…08e2 at0025 = ╱47╱G╱ // 0x8cd @0x25
0x08a8…08e2 at0026 = ╱30╱0╱ // 0x8ce @0x26
0x08a8…08e2 at0027 = ╱ef╱$╱ // 0x8cf @0x27
0x08a8…08e2 at0028 = ╱ed╱(╱ // 0x8d0 @0x28
0x08a8…08e2 at0029 = ╱34╱4╱ // 0x8d1 @0x29
0x08a8…08e2 at002a = ╱fe00008003╱ // 0x8d2 @0x2a
0x08a8…08e2 at002f = ╱ee╱)╱ // 0x8d7 @0x2f
0x08a8…08e2 at0030 = ╱ee╱)╱ // 0x8d8 @0x30
0x08a8…08e2 at0031 = ╱e3╱-╱ // 0x8d9 @0x31
0x08a8…08e2 at0032 = ╱34╱4╱ // 0x8da @0x32
0x08a8…08e2 at0033 = ╱38╱8╱ // 0x8db @0x33
0x08a8…08e2 at0034 = ╱fe0000c006╱ // 0x8dc @0x34
0x08a8…08e2 at0039 = EOL // 0x8e1 @0x39
0x08a8…08e2 }
0x08e2…0921 9678 0690 G4=(ORD(G0$(5))-48)*10+ORD(G0$(6))-48
0x08e2…0921 LineComalBin {
0x08e2…0921 ptr = 0x9678 // 0x8e2 @0x0
0x08e2…0921 lno = 0x02b2 // 0x8e4 @0x2
0x08e2…0921 at0004 = ╱47╱G╱ // 0x8e6 @0x4
0x08e2…0921 at0005 = ╱34╱4╱ // 0x8e7 @0x5
0x08e2…0921 at0006 = ╱dc╱=╱ // 0x8e8 @0x6
0x08e2…0921 at0007 = ╱ed╱(╱ // 0x8e9 @0x7
0x08e2…0921 at0008 = ╱cd╱ORD╱ // 0x8ea @0x8
0x08e2…0921 at0009 = ╱ed╱(╱ // 0x8eb @0x9
0x08e2…0921 at000a = ╱47╱G╱ // 0x8ec @0xa
0x08e2…0921 at000b = ╱30╱0╱ // 0x8ed @0xb
0x08e2…0921 at000c = ╱ef╱$╱ // 0x8ee @0xc
0x08e2…0921 at000d = ╱ed╱(╱ // 0x8ef @0xd
0x08e2…0921 at000e = ╱35╱5╱ // 0x8f0 @0xe
0x08e2…0921 at000f = ╱fe0000a003╱ // 0x8f1 @0xf
0x08e2…0921 at0014 = ╱ee╱)╱ // 0x8f6 @0x14
0x08e2…0921 at0015 = ╱ee╱)╱ // 0x8f7 @0x15
0x08e2…0921 at0016 = ╱e3╱-╱ // 0x8f8 @0x16
0x08e2…0921 at0017 = ╱34╱4╱ // 0x8f9 @0x17
0x08e2…0921 at0018 = ╱38╱8╱ // 0x8fa @0x18
0x08e2…0921 at0019 = ╱fe0000c006╱ // 0x8fb @0x19
0x08e2…0921 at001e = ╱ee╱)╱ // 0x900 @0x1e
0x08e2…0921 at001f = ╱e4╱*╱ // 0x901 @0x1f
0x08e2…0921 at0020 = ╱31╱1╱ // 0x902 @0x20
0x08e2…0921 at0021 = ╱30╱0╱ // 0x903 @0x21
0x08e2…0921 at0022 = ╱fe0000a004╱ // 0x904 @0x22
0x08e2…0921 at0027 = ╱e2╱+╱ // 0x909 @0x27
0x08e2…0921 at0028 = ╱cd╱ORD╱ // 0x90a @0x28
0x08e2…0921 at0029 = ╱ed╱(╱ // 0x90b @0x29
0x08e2…0921 at002a = ╱47╱G╱ // 0x90c @0x2a
0x08e2…0921 at002b = ╱30╱0╱ // 0x90d @0x2b
0x08e2…0921 at002c = ╱ef╱$╱ // 0x90e @0x2c
0x08e2…0921 at002d = ╱ed╱(╱ // 0x90f @0x2d
0x08e2…0921 at002e = ╱36╱6╱ // 0x910 @0x2e
0x08e2…0921 at002f = ╱fe0000c003╱ // 0x911 @0x2f
0x08e2…0921 at0034 = ╱ee╱)╱ // 0x916 @0x34
0x08e2…0921 at0035 = ╱ee╱)╱ // 0x917 @0x35
0x08e2…0921 at0036 = ╱e3╱-╱ // 0x918 @0x36
0x08e2…0921 at0037 = ╱34╱4╱ // 0x919 @0x37
0x08e2…0921 at0038 = ╱38╱8╱ // 0x91a @0x38
0x08e2…0921 at0039 = ╱fe0000c006╱ // 0x91b @0x39
0x08e2…0921 at003e = EOL // 0x920 @0x3e
0x08e2…0921 }
0x0921…094b 96a2 0700 IF G4<E OR G3<E OR G3>12 OR G4>31 THEN G1=B
0x0921…094b LineComalBin {
0x0921…094b ptr = 0x96a2 // 0x921 @0x0
0x0921…094b lno = 0x02bc // 0x923 @0x2
0x0921…094b at0004 = ╱82╱ IF ╱ // 0x925 @0x4
0x0921…094b at0005 = ╱47╱G╱ // 0x926 @0x5
0x0921…094b at0006 = ╱34╱4╱ // 0x927 @0x6
0x0921…094b at0007 = ╱dd╱<╱ // 0x928 @0x7
0x0921…094b at0008 = ╱45╱E╱ // 0x929 @0x8
0x0921…094b at0009 = ╱db╱ OR ╱ // 0x92a @0x9
0x0921…094b at000a = ╱47╱G╱ // 0x92b @0xa
0x0921…094b at000b = ╱33╱3╱ // 0x92c @0xb
0x0921…094b at000c = ╱dd╱<╱ // 0x92d @0xc
0x0921…094b at000d = ╱45╱E╱ // 0x92e @0xd
0x0921…094b at000e = ╱db╱ OR ╱ // 0x92f @0xe
0x0921…094b at000f = ╱47╱G╱ // 0x930 @0xf
0x0921…094b at0010 = ╱33╱3╱ // 0x931 @0x10
0x0921…094b at0011 = ╱de╱>╱ // 0x932 @0x11
0x0921…094b at0012 = ╱31╱1╱ // 0x933 @0x12
0x0921…094b at0013 = ╱32╱2╱ // 0x934 @0x13
0x0921…094b at0014 = ╱fe0000c004╱ // 0x935 @0x14
0x0921…094b at0019 = ╱db╱ OR ╱ // 0x93a @0x19
0x0921…094b at001a = ╱47╱G╱ // 0x93b @0x1a
0x0921…094b at001b = ╱34╱4╱ // 0x93c @0x1b
0x0921…094b at001c = ╱de╱>╱ // 0x93d @0x1c
0x0921…094b at001d = ╱33╱3╱ // 0x93e @0x1d
0x0921…094b at001e = ╱31╱1╱ // 0x93f @0x1e
0x0921…094b at001f = ╱fe0000f805╱ // 0x940 @0x1f
0x0921…094b at0024 = ╱b6╱ THEN ╱ // 0x945 @0x24
0x0921…094b at0025 = ╱47╱G╱ // 0x946 @0x25
0x0921…094b at0026 = ╱31╱1╱ // 0x947 @0x26
0x0921…094b at0027 = ╱dc╱=╱ // 0x948 @0x27
0x0921…094b at0028 = ╱42╱B╱ // 0x949 @0x28
0x0921…094b at0029 = EOL // 0x94a @0x29
0x0921…094b }
0x094b…0957 96ae 0710 IF G1=B THEN EXIT
0x094b…0957 LineComalBin {
0x094b…0957 ptr = 0x96ae // 0x94b @0x0
0x094b…0957 lno = 0x02c6 // 0x94d @0x2
0x094b…0957 at0004 = ╱82╱ IF ╱ // 0x94f @0x4
0x094b…0957 at0005 = ╱47╱G╱ // 0x950 @0x5
0x094b…0957 at0006 = ╱31╱1╱ // 0x951 @0x6
0x094b…0957 at0007 = ╱dc╱=╱ // 0x952 @0x7
0x094b…0957 at0008 = ╱42╱B╱ // 0x953 @0x8
0x094b…0957 at0009 = ╱b6╱ THEN ╱ // 0x954 @0x9
0x094b…0957 at000a = ╱99╱ EXIT ╱ // 0x955 @0xa
0x094b…0957 at000b = EOL // 0x956 @0xb
0x094b…0957 }
0x0957…0961 96b8 0720 CASE G3 OF
0x0957…0961 LineComalBin {
0x0957…0961 ptr = 0x96b8 // 0x957 @0x0
0x0957…0961 lno = 0x02d0 // 0x959 @0x2
0x0957…0961 at0004 = ╱a201╱ CASE ╱ // 0x95b @0x4
0x0957…0961 at0006 = ╱47╱G╱ // 0x95d @0x6
0x0957…0961 at0007 = ╱33╱3╱ // 0x95e @0x7
0x0957…0961 at0008 = ╱ba╱ OF ╱ // 0x95f @0x8
0x0957…0961 at0009 = EOL // 0x960 @0x9
0x0957…0961 }
0x0961…097f 96d6 0730 WHEN 4,6,W,11
0x0961…097f LineComalBin {
0x0961…097f ptr = 0x96d6 // 0x961 @0x0
0x0961…097f lno = 0x02da // 0x963 @0x2
0x0961…097f at0004 = ╱a301╱ WHEN ╱ // 0x965 @0x4
0x0961…097f at0006 = ╱34╱4╱ // 0x967 @0x6
0x0961…097f at0007 = ╱fe00008003╱ // 0x968 @0x7
0x0961…097f at000c = ╱ec╱,╱ // 0x96d @0xc
0x0961…097f at000d = ╱36╱6╱ // 0x96e @0xd
0x0961…097f at000e = ╱fe0000c003╱ // 0x96f @0xe
0x0961…097f at0013 = ╱ec╱,╱ // 0x974 @0x13
0x0961…097f at0014 = ╱57╱W╱ // 0x975 @0x14
0x0961…097f at0015 = ╱ec╱,╱ // 0x976 @0x15
0x0961…097f at0016 = ╱31╱1╱ // 0x977 @0x16
0x0961…097f at0017 = ╱31╱1╱ // 0x978 @0x17
0x0961…097f at0018 = ╱fe0000b004╱ // 0x979 @0x18
0x0961…097f at001d = EOL // 0x97e @0x1d
0x0961…097f }
0x097f…0994 96eb 0740 IF G4>30 THEN G1=B
0x097f…0994 LineComalBin {
0x097f…0994 ptr = 0x96eb // 0x97f @0x0
0x097f…0994 lno = 0x02e4 // 0x981 @0x2
0x097f…0994 at0004 = ╱82╱ IF ╱ // 0x983 @0x4
0x097f…0994 at0005 = ╱47╱G╱ // 0x984 @0x5
0x097f…0994 at0006 = ╱34╱4╱ // 0x985 @0x6
0x097f…0994 at0007 = ╱de╱>╱ // 0x986 @0x7
0x097f…0994 at0008 = ╱33╱3╱ // 0x987 @0x8
0x097f…0994 at0009 = ╱30╱0╱ // 0x988 @0x9
0x097f…0994 at000a = ╱fe0000f005╱ // 0x989 @0xa
0x097f…0994 at000f = ╱b6╱ THEN ╱ // 0x98e @0xf
0x097f…0994 at0010 = ╱47╱G╱ // 0x98f @0x10
0x097f…0994 at0011 = ╱31╱1╱ // 0x990 @0x11
0x097f…0994 at0012 = ╱dc╱=╱ // 0x991 @0x12
0x097f…0994 at0013 = ╱42╱B╱ // 0x992 @0x13
0x097f…0994 at0014 = EOL // 0x993 @0x14
0x097f…0994 }
0x0994…099c 96f3 0750 WHEN G
0x0994…099c LineComalBin {
0x0994…099c ptr = 0x96f3 // 0x994 @0x0
0x0994…099c lno = 0x02ee // 0x996 @0x2
0x0994…099c at0004 = ╱a301╱ WHEN ╱ // 0x998 @0x4
0x0994…099c at0006 = ╱47╱G╱ // 0x99a @0x6
0x0994…099c at0007 = EOL // 0x99b @0x7
0x0994…099c }
0x099c…09b1 9708 0760 IF G4>29 THEN G1=B
0x099c…09b1 LineComalBin {
0x099c…09b1 ptr = 0x9708 // 0x99c @0x0
0x099c…09b1 lno = 0x02f8 // 0x99e @0x2
0x099c…09b1 at0004 = ╱82╱ IF ╱ // 0x9a0 @0x4
0x099c…09b1 at0005 = ╱47╱G╱ // 0x9a1 @0x5
0x099c…09b1 at0006 = ╱34╱4╱ // 0x9a2 @0x6
0x099c…09b1 at0007 = ╱de╱>╱ // 0x9a3 @0x7
0x099c…09b1 at0008 = ╱32╱2╱ // 0x9a4 @0x8
0x099c…09b1 at0009 = ╱39╱9╱ // 0x9a5 @0x9
0x099c…09b1 at000a = ╱fe0000e805╱ // 0x9a6 @0xa
0x099c…09b1 at000f = ╱b6╱ THEN ╱ // 0x9ab @0xf
0x099c…09b1 at0010 = ╱47╱G╱ // 0x9ac @0x10
0x099c…09b1 at0011 = ╱31╱1╱ // 0x9ad @0x11
0x099c…09b1 at0012 = ╱dc╱=╱ // 0x9ae @0x12
0x099c…09b1 at0013 = ╱42╱B╱ // 0x9af @0x13
0x099c…09b1 at0014 = EOL // 0x9b0 @0x14
0x099c…09b1 }
0x09b1…09d2 9729 0770 IF G4=29 AND G2 MOD 4<>B THEN G1=B
0x09b1…09d2 LineComalBin {
0x09b1…09d2 ptr = 0x9729 // 0x9b1 @0x0
0x09b1…09d2 lno = 0x0302 // 0x9b3 @0x2
0x09b1…09d2 at0004 = ╱82╱ IF ╱ // 0x9b5 @0x4
0x09b1…09d2 at0005 = ╱47╱G╱ // 0x9b6 @0x5
0x09b1…09d2 at0006 = ╱34╱4╱ // 0x9b7 @0x6
0x09b1…09d2 at0007 = ╱dc╱=╱ // 0x9b8 @0x7
0x09b1…09d2 at0008 = ╱32╱2╱ // 0x9b9 @0x8
0x09b1…09d2 at0009 = ╱39╱9╱ // 0x9ba @0x9
0x09b1…09d2 at000a = ╱fe0000e805╱ // 0x9bb @0xa
0x09b1…09d2 at000f = ╱da╱ AND ╱ // 0x9c0 @0xf
0x09b1…09d2 at0010 = ╱47╱G╱ // 0x9c1 @0x10
0x09b1…09d2 at0011 = ╱32╱2╱ // 0x9c2 @0x11
0x09b1…09d2 at0012 = ╱e8╱ MOD ╱ // 0x9c3 @0x12
0x09b1…09d2 at0013 = ╱34╱4╱ // 0x9c4 @0x13
0x09b1…09d2 at0014 = ╱fe00008003╱ // 0x9c5 @0x14
0x09b1…09d2 at0019 = ╱e1╱<>╱ // 0x9ca @0x19
0x09b1…09d2 at001a = ╱42╱B╱ // 0x9cb @0x1a
0x09b1…09d2 at001b = ╱b6╱ THEN ╱ // 0x9cc @0x1b
0x09b1…09d2 at001c = ╱47╱G╱ // 0x9cd @0x1c
0x09b1…09d2 at001d = ╱31╱1╱ // 0x9ce @0x1d
0x09b1…09d2 at001e = ╱dc╱=╱ // 0x9cf @0x1e
0x09b1…09d2 at001f = ╱42╱B╱ // 0x9d0 @0x1f
0x09b1…09d2 at0020 = EOL // 0x9d1 @0x20
0x09b1…09d2 }
0x09d2…09d8 972f 0780 ENDCASE
0x09d2…09d8 LineComalBin {
0x09d2…09d8 ptr = 0x972f // 0x9d2 @0x0
0x09d2…09d8 lno = 0x030c // 0x9d4 @0x2
0x09d2…09d8 at0004 = ╱a4╱ ENDCASE ╱ // 0x9d6 @0x4
0x09d2…09d8 at0005 = EOL // 0x9d7 @0x5
0x09d2…09d8 }
0x09d8…09de 9735 0790 ENDPROC
0x09d8…09de LineComalBin {
0x09d8…09de ptr = 0x9735 // 0x9d8 @0x0
0x09d8…09de lno = 0x0316 // 0x9da @0x2
0x09d8…09de at0004 = ╱9f╱ ENDPROC ╱ // 0x9dc @0x4
0x09d8…09de at0005 = EOL // 0x9dd @0x5
0x09d8…09de }
0x09de…09f0 9747 0800 PROC INLØNMOD(G5)
0x09de…09f0 LineComalBin {
0x09de…09f0 ptr = 0x9747 // 0x9de @0x0
0x09de…09f0 lno = 0x0320 // 0x9e0 @0x2
0x09de…09f0 at0004 = ╱9e╱ PROC ╱ // 0x9e2 @0x4
0x09de…09f0 at0005 = ╱49╱I╱ // 0x9e3 @0x5
0x09de…09f0 at0006 = ╱4e╱N╱ // 0x9e4 @0x6
0x09de…09f0 at0007 = ╱4c╱L╱ // 0x9e5 @0x7
0x09de…09f0 at0008 = ╱5c╱Ø╱ // 0x9e6 @0x8
0x09de…09f0 at0009 = ╱4e╱N╱ // 0x9e7 @0x9
0x09de…09f0 at000a = ╱4d╱M╱ // 0x9e8 @0xa
0x09de…09f0 at000b = ╱4f╱O╱ // 0x9e9 @0xb
0x09de…09f0 at000c = ╱44╱D╱ // 0x9ea @0xc
0x09de…09f0 at000d = ╱ed╱(╱ // 0x9eb @0xd
0x09de…09f0 at000e = ╱47╱G╱ // 0x9ec @0xe
0x09de…09f0 at000f = ╱35╱5╱ // 0x9ed @0xf
0x09de…09f0 at0010 = ╱ee╱)╱ // 0x9ee @0x10
0x09de…09f0 at0011 = EOL // 0x9ef @0x11
0x09de…09f0 }
0x09f0…0a04 975b 0810 GET C9$,G*G5-E:D1$
0x09f0…0a04 LineComalBin {
0x09f0…0a04 ptr = 0x975b // 0x9f0 @0x0
0x09f0…0a04 lno = 0x032a // 0x9f2 @0x2
0x09f0…0a04 at0004 = ╱a9╱ GET ╱ // 0x9f4 @0x4
0x09f0…0a04 at0005 = ╱43╱C╱ // 0x9f5 @0x5
0x09f0…0a04 at0006 = ╱39╱9╱ // 0x9f6 @0x6
0x09f0…0a04 at0007 = ╱ef╱$╱ // 0x9f7 @0x7
0x09f0…0a04 at0008 = ╱ec╱,╱ // 0x9f8 @0x8
0x09f0…0a04 at0009 = ╱47╱G╱ // 0x9f9 @0x9
0x09f0…0a04 at000a = ╱e4╱*╱ // 0x9fa @0xa
0x09f0…0a04 at000b = ╱47╱G╱ // 0x9fb @0xb
0x09f0…0a04 at000c = ╱35╱5╱ // 0x9fc @0xc
0x09f0…0a04 at000d = ╱e3╱-╱ // 0x9fd @0xd
0x09f0…0a04 at000e = ╱45╱E╱ // 0x9fe @0xe
0x09f0…0a04 at000f = ╱f0╱:╱ // 0x9ff @0xf
0x09f0…0a04 at0010 = ╱44╱D╱ // 0xa00 @0x10
0x09f0…0a04 at0011 = ╱31╱1╱ // 0xa01 @0x11
0x09f0…0a04 at0012 = ╱ef╱$╱ // 0xa02 @0x12
0x09f0…0a04 at0013 = EOL // 0xa03 @0x13
0x09f0…0a04 }
0x0a04…0a37 978e 0820 GET C9$,G*G5:D2$,G6,G7,G8,G9,H0,H1,H2,H3,H4,H5,H6
0x0a04…0a37 LineComalBin {
0x0a04…0a37 ptr = 0x978e // 0xa04 @0x0
0x0a04…0a37 lno = 0x0334 // 0xa06 @0x2
0x0a04…0a37 at0004 = ╱a9╱ GET ╱ // 0xa08 @0x4
0x0a04…0a37 at0005 = ╱43╱C╱ // 0xa09 @0x5
0x0a04…0a37 at0006 = ╱39╱9╱ // 0xa0a @0x6
0x0a04…0a37 at0007 = ╱ef╱$╱ // 0xa0b @0x7
0x0a04…0a37 at0008 = ╱ec╱,╱ // 0xa0c @0x8
0x0a04…0a37 at0009 = ╱47╱G╱ // 0xa0d @0x9
0x0a04…0a37 at000a = ╱e4╱*╱ // 0xa0e @0xa
0x0a04…0a37 at000b = ╱47╱G╱ // 0xa0f @0xb
0x0a04…0a37 at000c = ╱35╱5╱ // 0xa10 @0xc
0x0a04…0a37 at000d = ╱f0╱:╱ // 0xa11 @0xd
0x0a04…0a37 at000e = ╱44╱D╱ // 0xa12 @0xe
0x0a04…0a37 at000f = ╱32╱2╱ // 0xa13 @0xf
0x0a04…0a37 at0010 = ╱ef╱$╱ // 0xa14 @0x10
0x0a04…0a37 at0011 = ╱ec╱,╱ // 0xa15 @0x11
0x0a04…0a37 at0012 = ╱47╱G╱ // 0xa16 @0x12
0x0a04…0a37 at0013 = ╱36╱6╱ // 0xa17 @0x13
0x0a04…0a37 at0014 = ╱ec╱,╱ // 0xa18 @0x14
0x0a04…0a37 at0015 = ╱47╱G╱ // 0xa19 @0x15
0x0a04…0a37 at0016 = ╱37╱7╱ // 0xa1a @0x16
0x0a04…0a37 at0017 = ╱ec╱,╱ // 0xa1b @0x17
0x0a04…0a37 at0018 = ╱47╱G╱ // 0xa1c @0x18
0x0a04…0a37 at0019 = ╱38╱8╱ // 0xa1d @0x19
0x0a04…0a37 at001a = ╱ec╱,╱ // 0xa1e @0x1a
0x0a04…0a37 at001b = ╱47╱G╱ // 0xa1f @0x1b
0x0a04…0a37 at001c = ╱39╱9╱ // 0xa20 @0x1c
0x0a04…0a37 at001d = ╱ec╱,╱ // 0xa21 @0x1d
0x0a04…0a37 at001e = ╱48╱H╱ // 0xa22 @0x1e
0x0a04…0a37 at001f = ╱30╱0╱ // 0xa23 @0x1f
0x0a04…0a37 at0020 = ╱ec╱,╱ // 0xa24 @0x20
0x0a04…0a37 at0021 = ╱48╱H╱ // 0xa25 @0x21
0x0a04…0a37 at0022 = ╱31╱1╱ // 0xa26 @0x22
0x0a04…0a37 at0023 = ╱ec╱,╱ // 0xa27 @0x23
0x0a04…0a37 at0024 = ╱48╱H╱ // 0xa28 @0x24
0x0a04…0a37 at0025 = ╱32╱2╱ // 0xa29 @0x25
0x0a04…0a37 at0026 = ╱ec╱,╱ // 0xa2a @0x26
0x0a04…0a37 at0027 = ╱48╱H╱ // 0xa2b @0x27
0x0a04…0a37 at0028 = ╱33╱3╱ // 0xa2c @0x28
0x0a04…0a37 at0029 = ╱ec╱,╱ // 0xa2d @0x29
0x0a04…0a37 at002a = ╱48╱H╱ // 0xa2e @0x2a
0x0a04…0a37 at002b = ╱34╱4╱ // 0xa2f @0x2b
0x0a04…0a37 at002c = ╱ec╱,╱ // 0xa30 @0x2c
0x0a04…0a37 at002d = ╱48╱H╱ // 0xa31 @0x2d
0x0a04…0a37 at002e = ╱35╱5╱ // 0xa32 @0x2e
0x0a04…0a37 at002f = ╱ec╱,╱ // 0xa33 @0x2f
0x0a04…0a37 at0030 = ╱48╱H╱ // 0xa34 @0x30
0x0a04…0a37 at0031 = ╱36╱6╱ // 0xa35 @0x31
0x0a04…0a37 at0032 = EOL // 0xa36 @0x32
0x0a04…0a37 }
0x0a37…0a4d 97a4 0830 EXEC F(1,G5,C9$)
0x0a37…0a4d LineComalBin {
0x0a37…0a4d ptr = 0x97a4 // 0xa37 @0x0
0x0a37…0a4d lno = 0x033e // 0xa39 @0x2
0x0a37…0a4d at0004 = ╱9d╱ EXEC ╱ // 0xa3b @0x4
0x0a37…0a4d at0005 = ╱46╱F╱ // 0xa3c @0x5
0x0a37…0a4d at0006 = ╱ed╱(╱ // 0xa3d @0x6
0x0a37…0a4d at0007 = ╱31╱1╱ // 0xa3e @0x7
0x0a37…0a4d at0008 = ╱fe00008001╱ // 0xa3f @0x8
0x0a37…0a4d at000d = ╱ec╱,╱ // 0xa44 @0xd
0x0a37…0a4d at000e = ╱47╱G╱ // 0xa45 @0xe
0x0a37…0a4d at000f = ╱35╱5╱ // 0xa46 @0xf
0x0a37…0a4d at0010 = ╱ec╱,╱ // 0xa47 @0x10
0x0a37…0a4d at0011 = ╱43╱C╱ // 0xa48 @0x11
0x0a37…0a4d at0012 = ╱39╱9╱ // 0xa49 @0x12
0x0a37…0a4d at0013 = ╱ef╱$╱ // 0xa4a @0x13
0x0a37…0a4d at0014 = ╱ee╱)╱ // 0xa4b @0x14
0x0a37…0a4d at0015 = EOL // 0xa4c @0x15
0x0a37…0a4d }
0x0a4d…0a53 97aa 0840 ENDPROC
0x0a4d…0a53 LineComalBin {
0x0a4d…0a53 ptr = 0x97aa // 0xa4d @0x0
0x0a4d…0a53 lno = 0x0348 // 0xa4f @0x2
0x0a4d…0a53 at0004 = ╱9f╱ ENDPROC ╱ // 0xa51 @0x4
0x0a4d…0a53 at0005 = EOL // 0xa52 @0x5
0x0a4d…0a53 }
0x0a53…0a65 97bc 0850 PROC UDLØNMOD(G5)
0x0a53…0a65 LineComalBin {
0x0a53…0a65 ptr = 0x97bc // 0xa53 @0x0
0x0a53…0a65 lno = 0x0352 // 0xa55 @0x2
0x0a53…0a65 at0004 = ╱9e╱ PROC ╱ // 0xa57 @0x4
0x0a53…0a65 at0005 = ╱55╱U╱ // 0xa58 @0x5
0x0a53…0a65 at0006 = ╱44╱D╱ // 0xa59 @0x6
0x0a53…0a65 at0007 = ╱4c╱L╱ // 0xa5a @0x7
0x0a53…0a65 at0008 = ╱5c╱Ø╱ // 0xa5b @0x8
0x0a53…0a65 at0009 = ╱4e╱N╱ // 0xa5c @0x9
0x0a53…0a65 at000a = ╱4d╱M╱ // 0xa5d @0xa
0x0a53…0a65 at000b = ╱4f╱O╱ // 0xa5e @0xb
0x0a53…0a65 at000c = ╱44╱D╱ // 0xa5f @0xc
0x0a53…0a65 at000d = ╱ed╱(╱ // 0xa60 @0xd
0x0a53…0a65 at000e = ╱47╱G╱ // 0xa61 @0xe
0x0a53…0a65 at000f = ╱35╱5╱ // 0xa62 @0xf
0x0a53…0a65 at0010 = ╱ee╱)╱ // 0xa63 @0x10
0x0a53…0a65 at0011 = EOL // 0xa64 @0x11
0x0a53…0a65 }
0x0a65…0a79 97d0 0860 PUT C9$,G*G5-E:D1$
0x0a65…0a79 LineComalBin {
0x0a65…0a79 ptr = 0x97d0 // 0xa65 @0x0
0x0a65…0a79 lno = 0x035c // 0xa67 @0x2
0x0a65…0a79 at0004 = ╱aa╱ PUT ╱ // 0xa69 @0x4
0x0a65…0a79 at0005 = ╱43╱C╱ // 0xa6a @0x5
0x0a65…0a79 at0006 = ╱39╱9╱ // 0xa6b @0x6
0x0a65…0a79 at0007 = ╱ef╱$╱ // 0xa6c @0x7
0x0a65…0a79 at0008 = ╱ec╱,╱ // 0xa6d @0x8
0x0a65…0a79 at0009 = ╱47╱G╱ // 0xa6e @0x9
0x0a65…0a79 at000a = ╱e4╱*╱ // 0xa6f @0xa
0x0a65…0a79 at000b = ╱47╱G╱ // 0xa70 @0xb
0x0a65…0a79 at000c = ╱35╱5╱ // 0xa71 @0xc
0x0a65…0a79 at000d = ╱e3╱-╱ // 0xa72 @0xd
0x0a65…0a79 at000e = ╱45╱E╱ // 0xa73 @0xe
0x0a65…0a79 at000f = ╱f0╱:╱ // 0xa74 @0xf
0x0a65…0a79 at0010 = ╱44╱D╱ // 0xa75 @0x10
0x0a65…0a79 at0011 = ╱31╱1╱ // 0xa76 @0x11
0x0a65…0a79 at0012 = ╱ef╱$╱ // 0xa77 @0x12
0x0a65…0a79 at0013 = EOL // 0xa78 @0x13
0x0a65…0a79 }
0x0a79…0aac 9803 0870 PUT C9$,G*G5:D2$,G6,G7,G8,G9,H0,H1,H2,H3,H4,H5,H6
0x0a79…0aac LineComalBin {
0x0a79…0aac ptr = 0x9803 // 0xa79 @0x0
0x0a79…0aac lno = 0x0366 // 0xa7b @0x2
0x0a79…0aac at0004 = ╱aa╱ PUT ╱ // 0xa7d @0x4
0x0a79…0aac at0005 = ╱43╱C╱ // 0xa7e @0x5
0x0a79…0aac at0006 = ╱39╱9╱ // 0xa7f @0x6
0x0a79…0aac at0007 = ╱ef╱$╱ // 0xa80 @0x7
0x0a79…0aac at0008 = ╱ec╱,╱ // 0xa81 @0x8
0x0a79…0aac at0009 = ╱47╱G╱ // 0xa82 @0x9
0x0a79…0aac at000a = ╱e4╱*╱ // 0xa83 @0xa
0x0a79…0aac at000b = ╱47╱G╱ // 0xa84 @0xb
0x0a79…0aac at000c = ╱35╱5╱ // 0xa85 @0xc
0x0a79…0aac at000d = ╱f0╱:╱ // 0xa86 @0xd
0x0a79…0aac at000e = ╱44╱D╱ // 0xa87 @0xe
0x0a79…0aac at000f = ╱32╱2╱ // 0xa88 @0xf
0x0a79…0aac at0010 = ╱ef╱$╱ // 0xa89 @0x10
0x0a79…0aac at0011 = ╱ec╱,╱ // 0xa8a @0x11
0x0a79…0aac at0012 = ╱47╱G╱ // 0xa8b @0x12
0x0a79…0aac at0013 = ╱36╱6╱ // 0xa8c @0x13
0x0a79…0aac at0014 = ╱ec╱,╱ // 0xa8d @0x14
0x0a79…0aac at0015 = ╱47╱G╱ // 0xa8e @0x15
0x0a79…0aac at0016 = ╱37╱7╱ // 0xa8f @0x16
0x0a79…0aac at0017 = ╱ec╱,╱ // 0xa90 @0x17
0x0a79…0aac at0018 = ╱47╱G╱ // 0xa91 @0x18
0x0a79…0aac at0019 = ╱38╱8╱ // 0xa92 @0x19
0x0a79…0aac at001a = ╱ec╱,╱ // 0xa93 @0x1a
0x0a79…0aac at001b = ╱47╱G╱ // 0xa94 @0x1b
0x0a79…0aac at001c = ╱39╱9╱ // 0xa95 @0x1c
0x0a79…0aac at001d = ╱ec╱,╱ // 0xa96 @0x1d
0x0a79…0aac at001e = ╱48╱H╱ // 0xa97 @0x1e
0x0a79…0aac at001f = ╱30╱0╱ // 0xa98 @0x1f
0x0a79…0aac at0020 = ╱ec╱,╱ // 0xa99 @0x20
0x0a79…0aac at0021 = ╱48╱H╱ // 0xa9a @0x21
0x0a79…0aac at0022 = ╱31╱1╱ // 0xa9b @0x22
0x0a79…0aac at0023 = ╱ec╱,╱ // 0xa9c @0x23
0x0a79…0aac at0024 = ╱48╱H╱ // 0xa9d @0x24
0x0a79…0aac at0025 = ╱32╱2╱ // 0xa9e @0x25
0x0a79…0aac at0026 = ╱ec╱,╱ // 0xa9f @0x26
0x0a79…0aac at0027 = ╱48╱H╱ // 0xaa0 @0x27
0x0a79…0aac at0028 = ╱33╱3╱ // 0xaa1 @0x28
0x0a79…0aac at0029 = ╱ec╱,╱ // 0xaa2 @0x29
0x0a79…0aac at002a = ╱48╱H╱ // 0xaa3 @0x2a
0x0a79…0aac at002b = ╱34╱4╱ // 0xaa4 @0x2b
0x0a79…0aac at002c = ╱ec╱,╱ // 0xaa5 @0x2c
0x0a79…0aac at002d = ╱48╱H╱ // 0xaa6 @0x2d
0x0a79…0aac at002e = ╱35╱5╱ // 0xaa7 @0x2e
0x0a79…0aac at002f = ╱ec╱,╱ // 0xaa8 @0x2f
0x0a79…0aac at0030 = ╱48╱H╱ // 0xaa9 @0x30
0x0a79…0aac at0031 = ╱36╱6╱ // 0xaaa @0x31
0x0a79…0aac at0032 = EOL // 0xaab @0x32
0x0a79…0aac }
0x0aac…0ac2 9819 0880 EXEC F(2,G5,C9$)
0x0aac…0ac2 LineComalBin {
0x0aac…0ac2 ptr = 0x9819 // 0xaac @0x0
0x0aac…0ac2 lno = 0x0370 // 0xaae @0x2
0x0aac…0ac2 at0004 = ╱9d╱ EXEC ╱ // 0xab0 @0x4
0x0aac…0ac2 at0005 = ╱46╱F╱ // 0xab1 @0x5
0x0aac…0ac2 at0006 = ╱ed╱(╱ // 0xab2 @0x6
0x0aac…0ac2 at0007 = ╱32╱2╱ // 0xab3 @0x7
0x0aac…0ac2 at0008 = ╱fe00008002╱ // 0xab4 @0x8
0x0aac…0ac2 at000d = ╱ec╱,╱ // 0xab9 @0xd
0x0aac…0ac2 at000e = ╱47╱G╱ // 0xaba @0xe
0x0aac…0ac2 at000f = ╱35╱5╱ // 0xabb @0xf
0x0aac…0ac2 at0010 = ╱ec╱,╱ // 0xabc @0x10
0x0aac…0ac2 at0011 = ╱43╱C╱ // 0xabd @0x11
0x0aac…0ac2 at0012 = ╱39╱9╱ // 0xabe @0x12
0x0aac…0ac2 at0013 = ╱ef╱$╱ // 0xabf @0x13
0x0aac…0ac2 at0014 = ╱ee╱)╱ // 0xac0 @0x14
0x0aac…0ac2 at0015 = EOL // 0xac1 @0x15
0x0aac…0ac2 }
0x0ac2…0ac8 981f 0890 ENDPROC
0x0ac2…0ac8 LineComalBin {
0x0ac2…0ac8 ptr = 0x981f // 0xac2 @0x0
0x0ac2…0ac8 lno = 0x037a // 0xac4 @0x2
0x0ac2…0ac8 at0004 = ╱9f╱ ENDPROC ╱ // 0xac6 @0x4
0x0ac2…0ac8 at0005 = EOL // 0xac7 @0x5
0x0ac2…0ac8 }
0x0ac8…0adc 9833 0900 PROC CONV(H7,H8,H9)
0x0ac8…0adc LineComalBin {
0x0ac8…0adc ptr = 0x9833 // 0xac8 @0x0
0x0ac8…0adc lno = 0x0384 // 0xaca @0x2
0x0ac8…0adc at0004 = ╱9e╱ PROC ╱ // 0xacc @0x4
0x0ac8…0adc at0005 = ╱43╱C╱ // 0xacd @0x5
0x0ac8…0adc at0006 = ╱4f╱O╱ // 0xace @0x6
0x0ac8…0adc at0007 = ╱4e╱N╱ // 0xacf @0x7
0x0ac8…0adc at0008 = ╱56╱V╱ // 0xad0 @0x8
0x0ac8…0adc at0009 = ╱ed╱(╱ // 0xad1 @0x9
0x0ac8…0adc at000a = ╱48╱H╱ // 0xad2 @0xa
0x0ac8…0adc at000b = ╱37╱7╱ // 0xad3 @0xb
0x0ac8…0adc at000c = ╱ec╱,╱ // 0xad4 @0xc
0x0ac8…0adc at000d = ╱48╱H╱ // 0xad5 @0xd
0x0ac8…0adc at000e = ╱38╱8╱ // 0xad6 @0xe
0x0ac8…0adc at000f = ╱ec╱,╱ // 0xad7 @0xf
0x0ac8…0adc at0010 = ╱48╱H╱ // 0xad8 @0x10
0x0ac8…0adc at0011 = ╱39╱9╱ // 0xad9 @0x11
0x0ac8…0adc at0012 = ╱ee╱)╱ // 0xada @0x12
0x0ac8…0adc at0013 = EOL // 0xadb @0x13
0x0ac8…0adc }
0x0adc…0aed 9844 0910 I0=H8;H7$=""
0x0adc…0aed LineComalBin {
0x0adc…0aed ptr = 0x9844 // 0xadc @0x0
0x0adc…0aed lno = 0x038e // 0xade @0x2
0x0adc…0aed at0004 = ╱49╱I╱ // 0xae0 @0x4
0x0adc…0aed at0005 = ╱30╱0╱ // 0xae1 @0x5
0x0adc…0aed at0006 = ╱dc╱=╱ // 0xae2 @0x6
0x0adc…0aed at0007 = ╱48╱H╱ // 0xae3 @0x7
0x0adc…0aed at0008 = ╱38╱8╱ // 0xae4 @0x8
0x0adc…0aed at0009 = ╱eb╱;╱ // 0xae5 @0x9
0x0adc…0aed at000a = ╱48╱H╱ // 0xae6 @0xa
0x0adc…0aed at000b = ╱37╱7╱ // 0xae7 @0xb
0x0adc…0aed at000c = ╱ef╱$╱ // 0xae8 @0xc
0x0adc…0aed at000d = ╱dc╱=╱ // 0xae9 @0xd
0x0adc…0aed at000e = ╱22╱"╱ // 0xaea @0xe
0x0adc…0aed at000f = ╱22╱"╱ // 0xaeb @0xf
0x0adc…0aed at0010 = EOL // 0xaec @0x10
0x0adc…0aed }
0x0aed…0af3 984a 0930 REPEAT
0x0aed…0af3 LineComalBin {
0x0aed…0af3 ptr = 0x984a // 0xaed @0x0
0x0aed…0af3 lno = 0x03a2 // 0xaef @0x2
0x0aed…0af3 at0004 = ╱97╱ REPEAT ╱ // 0xaf1 @0x4
0x0aed…0af3 at0005 = EOL // 0xaf2 @0x5
0x0aed…0af3 }
0x0af3…0b2d 9884 0940 H7$=CHR((I0 MOD 10)+48)+H7$;H9=H9-E;I0=I0 DIV 10
0x0af3…0b2d LineComalBin {
0x0af3…0b2d ptr = 0x9884 // 0xaf3 @0x0
0x0af3…0b2d lno = 0x03ac // 0xaf5 @0x2
0x0af3…0b2d at0004 = ╱48╱H╱ // 0xaf7 @0x4
0x0af3…0b2d at0005 = ╱37╱7╱ // 0xaf8 @0x5
0x0af3…0b2d at0006 = ╱ef╱$╱ // 0xaf9 @0x6
0x0af3…0b2d at0007 = ╱dc╱=╱ // 0xafa @0x7
0x0af3…0b2d at0008 = ╱cf╱CHR╱ // 0xafb @0x8
0x0af3…0b2d at0009 = ╱ed╱(╱ // 0xafc @0x9
0x0af3…0b2d at000a = ╱ed╱(╱ // 0xafd @0xa
0x0af3…0b2d at000b = ╱49╱I╱ // 0xafe @0xb
0x0af3…0b2d at000c = ╱30╱0╱ // 0xaff @0xc
0x0af3…0b2d at000d = ╱e8╱ MOD ╱ // 0xb00 @0xd
0x0af3…0b2d at000e = ╱31╱1╱ // 0xb01 @0xe
0x0af3…0b2d at000f = ╱30╱0╱ // 0xb02 @0xf
0x0af3…0b2d at0010 = ╱fe0000a004╱ // 0xb03 @0x10
0x0af3…0b2d at0015 = ╱ee╱)╱ // 0xb08 @0x15
0x0af3…0b2d at0016 = ╱e2╱+╱ // 0xb09 @0x16
0x0af3…0b2d at0017 = ╱34╱4╱ // 0xb0a @0x17
0x0af3…0b2d at0018 = ╱38╱8╱ // 0xb0b @0x18
0x0af3…0b2d at0019 = ╱fe0000c006╱ // 0xb0c @0x19
0x0af3…0b2d at001e = ╱ee╱)╱ // 0xb11 @0x1e
0x0af3…0b2d at001f = ╱f1╱+╱ // 0xb12 @0x1f
0x0af3…0b2d at0020 = ╱48╱H╱ // 0xb13 @0x20
0x0af3…0b2d at0021 = ╱37╱7╱ // 0xb14 @0x21
0x0af3…0b2d at0022 = ╱ef╱$╱ // 0xb15 @0x22
0x0af3…0b2d at0023 = ╱eb╱;╱ // 0xb16 @0x23
0x0af3…0b2d at0024 = ╱48╱H╱ // 0xb17 @0x24
0x0af3…0b2d at0025 = ╱39╱9╱ // 0xb18 @0x25
0x0af3…0b2d at0026 = ╱dc╱=╱ // 0xb19 @0x26
0x0af3…0b2d at0027 = ╱48╱H╱ // 0xb1a @0x27
0x0af3…0b2d at0028 = ╱39╱9╱ // 0xb1b @0x28
0x0af3…0b2d at0029 = ╱e3╱-╱ // 0xb1c @0x29
0x0af3…0b2d at002a = ╱45╱E╱ // 0xb1d @0x2a
0x0af3…0b2d at002b = ╱eb╱;╱ // 0xb1e @0x2b
0x0af3…0b2d at002c = ╱49╱I╱ // 0xb1f @0x2c
0x0af3…0b2d at002d = ╱30╱0╱ // 0xb20 @0x2d
0x0af3…0b2d at002e = ╱dc╱=╱ // 0xb21 @0x2e
0x0af3…0b2d at002f = ╱49╱I╱ // 0xb22 @0x2f
0x0af3…0b2d at0030 = ╱30╱0╱ // 0xb23 @0x30
0x0af3…0b2d at0031 = ╱e7╱ DIV ╱ // 0xb24 @0x31
0x0af3…0b2d at0032 = ╱31╱1╱ // 0xb25 @0x32
0x0af3…0b2d at0033 = ╱30╱0╱ // 0xb26 @0x33
0x0af3…0b2d at0034 = ╱fe0000a004╱ // 0xb27 @0x34
0x0af3…0b2d at0039 = EOL // 0xb2c @0x39
0x0af3…0b2d }
0x0b2d…0b41 9898 0970 IF H9<B AND I0=B THEN H9=B
0x0b2d…0b41 LineComalBin {
0x0b2d…0b41 ptr = 0x9898 // 0xb2d @0x0
0x0b2d…0b41 lno = 0x03ca // 0xb2f @0x2
0x0b2d…0b41 at0004 = ╱82╱ IF ╱ // 0xb31 @0x4
0x0b2d…0b41 at0005 = ╱48╱H╱ // 0xb32 @0x5
0x0b2d…0b41 at0006 = ╱39╱9╱ // 0xb33 @0x6
0x0b2d…0b41 at0007 = ╱dd╱<╱ // 0xb34 @0x7
0x0b2d…0b41 at0008 = ╱42╱B╱ // 0xb35 @0x8
0x0b2d…0b41 at0009 = ╱da╱ AND ╱ // 0xb36 @0x9
0x0b2d…0b41 at000a = ╱49╱I╱ // 0xb37 @0xa
0x0b2d…0b41 at000b = ╱30╱0╱ // 0xb38 @0xb
0x0b2d…0b41 at000c = ╱dc╱=╱ // 0xb39 @0xc
0x0b2d…0b41 at000d = ╱42╱B╱ // 0xb3a @0xd
0x0b2d…0b41 at000e = ╱b6╱ THEN ╱ // 0xb3b @0xe
0x0b2d…0b41 at000f = ╱48╱H╱ // 0xb3c @0xf
0x0b2d…0b41 at0010 = ╱39╱9╱ // 0xb3d @0x10
0x0b2d…0b41 at0011 = ╱dc╱=╱ // 0xb3e @0x11
0x0b2d…0b41 at0012 = ╱42╱B╱ // 0xb3f @0x12
0x0b2d…0b41 at0013 = EOL // 0xb40 @0x13
0x0b2d…0b41 }
0x0b41…0b4b 98a2 0980 UNTIL H9=B
0x0b41…0b4b LineComalBin {
0x0b41…0b4b ptr = 0x98a2 // 0xb41 @0x0
0x0b41…0b4b lno = 0x03d4 // 0xb43 @0x2
0x0b41…0b4b at0004 = ╱98╱ UNTIL ╱ // 0xb45 @0x4
0x0b41…0b4b at0005 = ╱48╱H╱ // 0xb46 @0x5
0x0b41…0b4b at0006 = ╱39╱9╱ // 0xb47 @0x6
0x0b41…0b4b at0007 = ╱dc╱=╱ // 0xb48 @0x7
0x0b41…0b4b at0008 = ╱42╱B╱ // 0xb49 @0x8
0x0b41…0b4b at0009 = EOL // 0xb4a @0x9
0x0b41…0b4b }
0x0b4b…0b51 98a8 0990 ENDPROC
0x0b4b…0b51 LineComalBin {
0x0b4b…0b51 ptr = 0x98a8 // 0xb4b @0x0
0x0b4b…0b51 lno = 0x03de // 0xb4d @0x2
0x0b4b…0b51 at0004 = ╱9f╱ ENDPROC ╱ // 0xb4f @0x4
0x0b4b…0b51 at0005 = EOL // 0xb50 @0x5
0x0b4b…0b51 }
0x0b51…0b63 98ba 1000 PROC CHECK(I1,I2)
0x0b51…0b63 LineComalBin {
0x0b51…0b63 ptr = 0x98ba // 0xb51 @0x0
0x0b51…0b63 lno = 0x03e8 // 0xb53 @0x2
0x0b51…0b63 at0004 = ╱9e╱ PROC ╱ // 0xb55 @0x4
0x0b51…0b63 at0005 = ╱43╱C╱ // 0xb56 @0x5
0x0b51…0b63 at0006 = ╱48╱H╱ // 0xb57 @0x6
0x0b51…0b63 at0007 = ╱45╱E╱ // 0xb58 @0x7
0x0b51…0b63 at0008 = ╱43╱C╱ // 0xb59 @0x8
0x0b51…0b63 at0009 = ╱4b╱K╱ // 0xb5a @0x9
0x0b51…0b63 at000a = ╱ed╱(╱ // 0xb5b @0xa
0x0b51…0b63 at000b = ╱49╱I╱ // 0xb5c @0xb
0x0b51…0b63 at000c = ╱31╱1╱ // 0xb5d @0xc
0x0b51…0b63 at000d = ╱ec╱,╱ // 0xb5e @0xd
0x0b51…0b63 at000e = ╱49╱I╱ // 0xb5f @0xe
0x0b51…0b63 at000f = ╱32╱2╱ // 0xb60 @0xf
0x0b51…0b63 at0010 = ╱ee╱)╱ // 0xb61 @0x10
0x0b51…0b63 at0011 = EOL // 0xb62 @0x11
0x0b51…0b63 }
0x0b63…0b6f 98c6 1010 I2,I3=B
0x0b63…0b6f LineComalBin {
0x0b63…0b6f ptr = 0x98c6 // 0xb63 @0x0
0x0b63…0b6f lno = 0x03f2 // 0xb65 @0x2
0x0b63…0b6f at0004 = ╱49╱I╱ // 0xb67 @0x4
0x0b63…0b6f at0005 = ╱32╱2╱ // 0xb68 @0x5
0x0b63…0b6f at0006 = ╱ec╱,╱ // 0xb69 @0x6
0x0b63…0b6f at0007 = ╱49╱I╱ // 0xb6a @0x7
0x0b63…0b6f at0008 = ╱33╱3╱ // 0xb6b @0x8
0x0b63…0b6f at0009 = ╱dc╱=╱ // 0xb6c @0x9
0x0b63…0b6f at000a = ╱42╱B╱ // 0xb6d @0xa
0x0b63…0b6f at000b = EOL // 0xb6e @0xb
0x0b63…0b6f }
0x0b6f…0b7e 98d5 1030 IF LEN(I1$)>B THEN
0x0b6f…0b7e LineComalBin {
0x0b6f…0b7e ptr = 0x98d5 // 0xb6f @0x0
0x0b6f…0b7e lno = 0x0406 // 0xb71 @0x2
0x0b6f…0b7e at0004 = ╱9c╱ IF ╱ // 0xb73 @0x4
0x0b6f…0b7e at0005 = ╱cc╱LEN╱ // 0xb74 @0x5
0x0b6f…0b7e at0006 = ╱ed╱(╱ // 0xb75 @0x6
0x0b6f…0b7e at0007 = ╱49╱I╱ // 0xb76 @0x7
0x0b6f…0b7e at0008 = ╱31╱1╱ // 0xb77 @0x8
0x0b6f…0b7e at0009 = ╱ef╱$╱ // 0xb78 @0x9
0x0b6f…0b7e at000a = ╱ee╱)╱ // 0xb79 @0xa
0x0b6f…0b7e at000b = ╱de╱>╱ // 0xb7a @0xb
0x0b6f…0b7e at000c = ╱42╱B╱ // 0xb7b @0xc
0x0b6f…0b7e at000d = ╱b6╱ THEN ╱ // 0xb7c @0xd
0x0b6f…0b7e at000e = EOL // 0xb7d @0xe
0x0b6f…0b7e }
0x0b7e…0b87 98de 1035 I4=E
0x0b7e…0b87 LineComalBin {
0x0b7e…0b87 ptr = 0x98de // 0xb7e @0x0
0x0b7e…0b87 lno = 0x040b // 0xb80 @0x2
0x0b7e…0b87 at0004 = ╱49╱I╱ // 0xb82 @0x4
0x0b7e…0b87 at0005 = ╱34╱4╱ // 0xb83 @0x5
0x0b7e…0b87 at0006 = ╱dc╱=╱ // 0xb84 @0x6
0x0b7e…0b87 at0007 = ╱45╱E╱ // 0xb85 @0x7
0x0b7e…0b87 at0008 = EOL // 0xb86 @0x8
0x0b7e…0b87 }
0x0b87…0ba2 98f9 1040 IF I1$(E)="-" THEN I4=-E;I2=E
0x0b87…0ba2 LineComalBin {
0x0b87…0ba2 ptr = 0x98f9 // 0xb87 @0x0
0x0b87…0ba2 lno = 0x0410 // 0xb89 @0x2
0x0b87…0ba2 at0004 = ╱82╱ IF ╱ // 0xb8b @0x4
0x0b87…0ba2 at0005 = ╱49╱I╱ // 0xb8c @0x5
0x0b87…0ba2 at0006 = ╱31╱1╱ // 0xb8d @0x6
0x0b87…0ba2 at0007 = ╱ef╱$╱ // 0xb8e @0x7
0x0b87…0ba2 at0008 = ╱ed╱(╱ // 0xb8f @0x8
0x0b87…0ba2 at0009 = ╱45╱E╱ // 0xb90 @0x9
0x0b87…0ba2 at000a = ╱ee╱)╱ // 0xb91 @0xa
0x0b87…0ba2 at000b = ╱dc╱=╱ // 0xb92 @0xb
0x0b87…0ba2 at000c = ╱22╱"╱ // 0xb93 @0xc
0x0b87…0ba2 at000d = ╱2d╱-╱ // 0xb94 @0xd
0x0b87…0ba2 at000e = ╱22╱"╱ // 0xb95 @0xe
0x0b87…0ba2 at000f = ╱b6╱ THEN ╱ // 0xb96 @0xf
0x0b87…0ba2 at0010 = ╱49╱I╱ // 0xb97 @0x10
0x0b87…0ba2 at0011 = ╱34╱4╱ // 0xb98 @0x11
0x0b87…0ba2 at0012 = ╱dc╱=╱ // 0xb99 @0x12
0x0b87…0ba2 at0013 = ╱e9╱-╱ // 0xb9a @0x13
0x0b87…0ba2 at0014 = ╱45╱E╱ // 0xb9b @0x14
0x0b87…0ba2 at0015 = ╱eb╱;╱ // 0xb9c @0x15
0x0b87…0ba2 at0016 = ╱49╱I╱ // 0xb9d @0x16
0x0b87…0ba2 at0017 = ╱32╱2╱ // 0xb9e @0x17
0x0b87…0ba2 at0018 = ╱dc╱=╱ // 0xb9f @0x18
0x0b87…0ba2 at0019 = ╱45╱E╱ // 0xba0 @0x19
0x0b87…0ba2 at001a = EOL // 0xba1 @0x1a
0x0b87…0ba2 }
0x0ba2…0bb1 9908 1100 WHILE LEN(I1$)>I2
0x0ba2…0bb1 LineComalBin {
0x0ba2…0bb1 ptr = 0x9908 // 0xba2 @0x0
0x0ba2…0bb1 lno = 0x044c // 0xba4 @0x2
0x0ba2…0bb1 at0004 = ╱93╱ WHILE ╱ // 0xba6 @0x4
0x0ba2…0bb1 at0005 = ╱cc╱LEN╱ // 0xba7 @0x5
0x0ba2…0bb1 at0006 = ╱ed╱(╱ // 0xba8 @0x6
0x0ba2…0bb1 at0007 = ╱49╱I╱ // 0xba9 @0x7
0x0ba2…0bb1 at0008 = ╱31╱1╱ // 0xbaa @0x8
0x0ba2…0bb1 at0009 = ╱ef╱$╱ // 0xbab @0x9
0x0ba2…0bb1 at000a = ╱ee╱)╱ // 0xbac @0xa
0x0ba2…0bb1 at000b = ╱de╱>╱ // 0xbad @0xb
0x0ba2…0bb1 at000c = ╱49╱I╱ // 0xbae @0xc
0x0ba2…0bb1 at000d = ╱32╱2╱ // 0xbaf @0xd
0x0ba2…0bb1 at000e = EOL // 0xbb0 @0xe
0x0ba2…0bb1 }
0x0bb1…0bbd 9914 1110 I2=I2+E
0x0bb1…0bbd LineComalBin {
0x0bb1…0bbd ptr = 0x9914 // 0xbb1 @0x0
0x0bb1…0bbd lno = 0x0456 // 0xbb3 @0x2
0x0bb1…0bbd at0004 = ╱49╱I╱ // 0xbb5 @0x4
0x0bb1…0bbd at0005 = ╱32╱2╱ // 0xbb6 @0x5
0x0bb1…0bbd at0006 = ╱dc╱=╱ // 0xbb7 @0x6
0x0bb1…0bbd at0007 = ╱49╱I╱ // 0xbb8 @0x7
0x0bb1…0bbd at0008 = ╱32╱2╱ // 0xbb9 @0x8
0x0bb1…0bbd at0009 = ╱e2╱+╱ // 0xbba @0x9
0x0bb1…0bbd at000a = ╱45╱E╱ // 0xbbb @0xa
0x0bb1…0bbd at000b = EOL // 0xbbc @0xb
0x0bb1…0bbd }
0x0bbd…0be9 9940 1120 IF I1$(I2)<"0" OR I1$(I2)>"9" THEN I4=B;I2=LEN(I1$)
0x0bbd…0be9 LineComalBin {
0x0bbd…0be9 ptr = 0x9940 // 0xbbd @0x0
0x0bbd…0be9 lno = 0x0460 // 0xbbf @0x2
0x0bbd…0be9 at0004 = ╱82╱ IF ╱ // 0xbc1 @0x4
0x0bbd…0be9 at0005 = ╱49╱I╱ // 0xbc2 @0x5
0x0bbd…0be9 at0006 = ╱31╱1╱ // 0xbc3 @0x6
0x0bbd…0be9 at0007 = ╱ef╱$╱ // 0xbc4 @0x7
0x0bbd…0be9 at0008 = ╱ed╱(╱ // 0xbc5 @0x8
0x0bbd…0be9 at0009 = ╱49╱I╱ // 0xbc6 @0x9
0x0bbd…0be9 at000a = ╱32╱2╱ // 0xbc7 @0xa
0x0bbd…0be9 at000b = ╱ee╱)╱ // 0xbc8 @0xb
0x0bbd…0be9 at000c = ╱dd╱<╱ // 0xbc9 @0xc
0x0bbd…0be9 at000d = ╱22╱"╱ // 0xbca @0xd
0x0bbd…0be9 at000e = ╱30╱0╱ // 0xbcb @0xe
0x0bbd…0be9 at000f = ╱22╱"╱ // 0xbcc @0xf
0x0bbd…0be9 at0010 = ╱db╱ OR ╱ // 0xbcd @0x10
0x0bbd…0be9 at0011 = ╱49╱I╱ // 0xbce @0x11
0x0bbd…0be9 at0012 = ╱31╱1╱ // 0xbcf @0x12
0x0bbd…0be9 at0013 = ╱ef╱$╱ // 0xbd0 @0x13
0x0bbd…0be9 at0014 = ╱ed╱(╱ // 0xbd1 @0x14
0x0bbd…0be9 at0015 = ╱49╱I╱ // 0xbd2 @0x15
0x0bbd…0be9 at0016 = ╱32╱2╱ // 0xbd3 @0x16
0x0bbd…0be9 at0017 = ╱ee╱)╱ // 0xbd4 @0x17
0x0bbd…0be9 at0018 = ╱de╱>╱ // 0xbd5 @0x18
0x0bbd…0be9 at0019 = ╱22╱"╱ // 0xbd6 @0x19
0x0bbd…0be9 at001a = ╱39╱9╱ // 0xbd7 @0x1a
0x0bbd…0be9 at001b = ╱22╱"╱ // 0xbd8 @0x1b
0x0bbd…0be9 at001c = ╱b6╱ THEN ╱ // 0xbd9 @0x1c
0x0bbd…0be9 at001d = ╱49╱I╱ // 0xbda @0x1d
0x0bbd…0be9 at001e = ╱34╱4╱ // 0xbdb @0x1e
0x0bbd…0be9 at001f = ╱dc╱=╱ // 0xbdc @0x1f
0x0bbd…0be9 at0020 = ╱42╱B╱ // 0xbdd @0x20
0x0bbd…0be9 at0021 = ╱eb╱;╱ // 0xbde @0x21
0x0bbd…0be9 at0022 = ╱49╱I╱ // 0xbdf @0x22
0x0bbd…0be9 at0023 = ╱32╱2╱ // 0xbe0 @0x23
0x0bbd…0be9 at0024 = ╱dc╱=╱ // 0xbe1 @0x24
0x0bbd…0be9 at0025 = ╱cc╱LEN╱ // 0xbe2 @0x25
0x0bbd…0be9 at0026 = ╱ed╱(╱ // 0xbe3 @0x26
0x0bbd…0be9 at0027 = ╱49╱I╱ // 0xbe4 @0x27
0x0bbd…0be9 at0028 = ╱31╱1╱ // 0xbe5 @0x28
0x0bbd…0be9 at0029 = ╱ef╱$╱ // 0xbe6 @0x29
0x0bbd…0be9 at002a = ╱ee╱)╱ // 0xbe7 @0x2a
0x0bbd…0be9 at002b = EOL // 0xbe8 @0x2b
0x0bbd…0be9 }
0x0be9…0c0e 9965 1160 I3=I3*10+ORD(I1$(I2))-48
0x0be9…0c0e LineComalBin {
0x0be9…0c0e ptr = 0x9965 // 0xbe9 @0x0
0x0be9…0c0e lno = 0x0488 // 0xbeb @0x2
0x0be9…0c0e at0004 = ╱49╱I╱ // 0xbed @0x4
0x0be9…0c0e at0005 = ╱33╱3╱ // 0xbee @0x5
0x0be9…0c0e at0006 = ╱dc╱=╱ // 0xbef @0x6
0x0be9…0c0e at0007 = ╱49╱I╱ // 0xbf0 @0x7
0x0be9…0c0e at0008 = ╱33╱3╱ // 0xbf1 @0x8
0x0be9…0c0e at0009 = ╱e4╱*╱ // 0xbf2 @0x9
0x0be9…0c0e at000a = ╱31╱1╱ // 0xbf3 @0xa
0x0be9…0c0e at000b = ╱30╱0╱ // 0xbf4 @0xb
0x0be9…0c0e at000c = ╱fe0000a004╱ // 0xbf5 @0xc
0x0be9…0c0e at0011 = ╱e2╱+╱ // 0xbfa @0x11
0x0be9…0c0e at0012 = ╱cd╱ORD╱ // 0xbfb @0x12
0x0be9…0c0e at0013 = ╱ed╱(╱ // 0xbfc @0x13
0x0be9…0c0e at0014 = ╱49╱I╱ // 0xbfd @0x14
0x0be9…0c0e at0015 = ╱31╱1╱ // 0xbfe @0x15
0x0be9…0c0e at0016 = ╱ef╱$╱ // 0xbff @0x16
0x0be9…0c0e at0017 = ╱ed╱(╱ // 0xc00 @0x17
0x0be9…0c0e at0018 = ╱49╱I╱ // 0xc01 @0x18
0x0be9…0c0e at0019 = ╱32╱2╱ // 0xc02 @0x19
0x0be9…0c0e at001a = ╱ee╱)╱ // 0xc03 @0x1a
0x0be9…0c0e at001b = ╱ee╱)╱ // 0xc04 @0x1b
0x0be9…0c0e at001c = ╱e3╱-╱ // 0xc05 @0x1c
0x0be9…0c0e at001d = ╱34╱4╱ // 0xc06 @0x1d
0x0be9…0c0e at001e = ╱38╱8╱ // 0xc07 @0x1e
0x0be9…0c0e at001f = ╱fe0000c006╱ // 0xc08 @0x1f
0x0be9…0c0e at0024 = EOL // 0xc0d @0x24
0x0be9…0c0e }
0x0c0e…0c14 996b 1170 ENDWHILE
0x0c0e…0c14 LineComalBin {
0x0c0e…0c14 ptr = 0x996b // 0xc0e @0x0
0x0c0e…0c14 lno = 0x0492 // 0xc10 @0x2
0x0c0e…0c14 at0004 = ╱94╱ ENDWHILE ╱ // 0xc12 @0x4
0x0c0e…0c14 at0005 = EOL // 0xc13 @0x5
0x0c0e…0c14 }
0x0c14…0c2a 9981 1175 I3=I3*I4;I2=I2*I4
0x0c14…0c2a LineComalBin {
0x0c14…0c2a ptr = 0x9981 // 0xc14 @0x0
0x0c14…0c2a lno = 0x0497 // 0xc16 @0x2
0x0c14…0c2a at0004 = ╱49╱I╱ // 0xc18 @0x4
0x0c14…0c2a at0005 = ╱33╱3╱ // 0xc19 @0x5
0x0c14…0c2a at0006 = ╱dc╱=╱ // 0xc1a @0x6
0x0c14…0c2a at0007 = ╱49╱I╱ // 0xc1b @0x7
0x0c14…0c2a at0008 = ╱33╱3╱ // 0xc1c @0x8
0x0c14…0c2a at0009 = ╱e4╱*╱ // 0xc1d @0x9
0x0c14…0c2a at000a = ╱49╱I╱ // 0xc1e @0xa
0x0c14…0c2a at000b = ╱34╱4╱ // 0xc1f @0xb
0x0c14…0c2a at000c = ╱eb╱;╱ // 0xc20 @0xc
0x0c14…0c2a at000d = ╱49╱I╱ // 0xc21 @0xd
0x0c14…0c2a at000e = ╱32╱2╱ // 0xc22 @0xe
0x0c14…0c2a at000f = ╱dc╱=╱ // 0xc23 @0xf
0x0c14…0c2a at0010 = ╱49╱I╱ // 0xc24 @0x10
0x0c14…0c2a at0011 = ╱32╱2╱ // 0xc25 @0x11
0x0c14…0c2a at0012 = ╱e4╱*╱ // 0xc26 @0x12
0x0c14…0c2a at0013 = ╱49╱I╱ // 0xc27 @0x13
0x0c14…0c2a at0014 = ╱34╱4╱ // 0xc28 @0x14
0x0c14…0c2a at0015 = EOL // 0xc29 @0x15
0x0c14…0c2a }
0x0c2a…0c3c 9993 1190 IF I2<B THEN I2=I2+E
0x0c2a…0c3c LineComalBin {
0x0c2a…0c3c ptr = 0x9993 // 0xc2a @0x0
0x0c2a…0c3c lno = 0x04a6 // 0xc2c @0x2
0x0c2a…0c3c at0004 = ╱82╱ IF ╱ // 0xc2e @0x4
0x0c2a…0c3c at0005 = ╱49╱I╱ // 0xc2f @0x5
0x0c2a…0c3c at0006 = ╱32╱2╱ // 0xc30 @0x6
0x0c2a…0c3c at0007 = ╱dd╱<╱ // 0xc31 @0x7
0x0c2a…0c3c at0008 = ╱42╱B╱ // 0xc32 @0x8
0x0c2a…0c3c at0009 = ╱b6╱ THEN ╱ // 0xc33 @0x9
0x0c2a…0c3c at000a = ╱49╱I╱ // 0xc34 @0xa
0x0c2a…0c3c at000b = ╱32╱2╱ // 0xc35 @0xb
0x0c2a…0c3c at000c = ╱dc╱=╱ // 0xc36 @0xc
0x0c2a…0c3c at000d = ╱49╱I╱ // 0xc37 @0xd
0x0c2a…0c3c at000e = ╱32╱2╱ // 0xc38 @0xe
0x0c2a…0c3c at000f = ╱e2╱+╱ // 0xc39 @0xf
0x0c2a…0c3c at0010 = ╱45╱E╱ // 0xc3a @0x10
0x0c2a…0c3c at0011 = EOL // 0xc3b @0x11
0x0c2a…0c3c }
0x0c3c…0c42 9999 1200 ENDIF
0x0c3c…0c42 LineComalBin {
0x0c3c…0c42 ptr = 0x9999 // 0xc3c @0x0
0x0c3c…0c42 lno = 0x04b0 // 0xc3e @0x2
0x0c3c…0c42 at0004 = ╱9b╱ ENDIF ╱ // 0xc40 @0x4
0x0c3c…0c42 at0005 = EOL // 0xc41 @0x5
0x0c3c…0c42 }
0x0c42…0c48 999f 1210 ENDPROC
0x0c42…0c48 LineComalBin {
0x0c42…0c48 ptr = 0x999f // 0xc42 @0x0
0x0c42…0c48 lno = 0x04ba // 0xc44 @0x2
0x0c42…0c48 at0004 = ╱9f╱ ENDPROC ╱ // 0xc46 @0x4
0x0c42…0c48 at0005 = EOL // 0xc47 @0x5
0x0c42…0c48 }
0x0c48…0c4f 99a6 1211 PROC Ø
0x0c48…0c4f LineComalBin {
0x0c48…0c4f ptr = 0x99a6 // 0xc48 @0x0
0x0c48…0c4f lno = 0x04bb // 0xc4a @0x2
0x0c48…0c4f at0004 = ╱9e╱ PROC ╱ // 0xc4c @0x4
0x0c48…0c4f at0005 = ╱5c╱Ø╱ // 0xc4d @0x5
0x0c48…0c4f at0006 = EOL // 0xc4e @0x6
0x0c48…0c4f }
0x0c4f…0c55 99ac 1212 REPEAT
0x0c4f…0c55 LineComalBin {
0x0c4f…0c55 ptr = 0x99ac // 0xc4f @0x0
0x0c4f…0c55 lno = 0x04bc // 0xc51 @0x2
0x0c4f…0c55 at0004 = ╱97╱ REPEAT ╱ // 0xc53 @0x4
0x0c4f…0c55 at0005 = EOL // 0xc54 @0x5
0x0c4f…0c55 }
0x0c55…0c6b (41,) 99c2 1213 EXEC DATOCHECK(F0$,I)
0x0c55…0c6b LineComalBin {
0x0c55…0c6b ptr = 0x99c2 // 0xc55 @0x0
0x0c55…0c6b lno = 0x04bd // 0xc57 @0x2
0x0c55…0c6b at0004 = ╱9d╱ EXEC ╱ // 0xc59 @0x4
0x0c55…0c6b at0005 = ╱44╱D╱ // 0xc5a @0x5
0x0c55…0c6b at0006 = ╱41╱A╱ // 0xc5b @0x6
0x0c55…0c6b at0007 = ╱54╱T╱ // 0xc5c @0x7
0x0c55…0c6b at0008 = ╱4f╱O╱ // 0xc5d @0x8
0x0c55…0c6b at0009 = ╱43╱C╱ // 0xc5e @0x9
0x0c55…0c6b at000a = ╱48╱H╱ // 0xc5f @0xa
0x0c55…0c6b at000b = ╱45╱E╱ // 0xc60 @0xb
0x0c55…0c6b at000c = ╱43╱C╱ // 0xc61 @0xc
0x0c55…0c6b at000d = ╱4b╱K╱ // 0xc62 @0xd
0x0c55…0c6b at000e = ╱ed╱(╱ // 0xc63 @0xe
0x0c55…0c6b at000f = ╱46╱F╱ // 0xc64 @0xf
0x0c55…0c6b at0010 = ╱30╱0╱ // 0xc65 @0x10
0x0c55…0c6b at0011 = ╱ef╱$╱ // 0xc66 @0x11
0x0c55…0c6b at0012 = ╱ec╱,╱ // 0xc67 @0x12
0x0c55…0c6b at0013 = ╱49╱I╱ // 0xc68 @0x13
0x0c55…0c6b at0014 = ╱ee╱)╱ // 0xc69 @0x14
0x0c55…0c6b at0015 = EOL // 0xc6a @0x15
0x0c55…0c6b }
0x0c6b…0c80 99d7 1214 IF I=B THEN EXEC INLINE(I5)
0x0c6b…0c80 LineComalBin {
0x0c6b…0c80 ptr = 0x99d7 // 0xc6b @0x0
0x0c6b…0c80 lno = 0x04be // 0xc6d @0x2
0x0c6b…0c80 at0004 = ╱82╱ IF ╱ // 0xc6f @0x4
0x0c6b…0c80 at0005 = ╱49╱I╱ // 0xc70 @0x5
0x0c6b…0c80 at0006 = ╱dc╱=╱ // 0xc71 @0x6
0x0c6b…0c80 at0007 = ╱42╱B╱ // 0xc72 @0x7
0x0c6b…0c80 at0008 = ╱b6╱ THEN ╱ // 0xc73 @0x8
0x0c6b…0c80 at0009 = ╱9d╱ EXEC ╱ // 0xc74 @0x9
0x0c6b…0c80 at000a = ╱49╱I╱ // 0xc75 @0xa
0x0c6b…0c80 at000b = ╱4e╱N╱ // 0xc76 @0xb
0x0c6b…0c80 at000c = ╱4c╱L╱ // 0xc77 @0xc
0x0c6b…0c80 at000d = ╱49╱I╱ // 0xc78 @0xd
0x0c6b…0c80 at000e = ╱4e╱N╱ // 0xc79 @0xe
0x0c6b…0c80 at000f = ╱45╱E╱ // 0xc7a @0xf
0x0c6b…0c80 at0010 = ╱ed╱(╱ // 0xc7b @0x10
0x0c6b…0c80 at0011 = ╱49╱I╱ // 0xc7c @0x11
0x0c6b…0c80 at0012 = ╱35╱5╱ // 0xc7d @0x12
0x0c6b…0c80 at0013 = ╱ee╱)╱ // 0xc7e @0x13
0x0c6b…0c80 at0014 = EOL // 0xc7f @0x14
0x0c6b…0c80 }
0x0c80…0c89 99e0 1215 UNTIL I=E
0x0c80…0c89 LineComalBin {
0x0c80…0c89 ptr = 0x99e0 // 0xc80 @0x0
0x0c80…0c89 lno = 0x04bf // 0xc82 @0x2
0x0c80…0c89 at0004 = ╱98╱ UNTIL ╱ // 0xc84 @0x4
0x0c80…0c89 at0005 = ╱49╱I╱ // 0xc85 @0x5
0x0c80…0c89 at0006 = ╱dc╱=╱ // 0xc86 @0x6
0x0c80…0c89 at0007 = ╱45╱E╱ // 0xc87 @0x7
0x0c80…0c89 at0008 = EOL // 0xc88 @0x8
0x0c80…0c89 }
0x0c89…0c8f 99e6 1216 ENDPROC
0x0c89…0c8f LineComalBin {
0x0c89…0c8f ptr = 0x99e6 // 0xc89 @0x0
0x0c89…0c8f lno = 0x04c0 // 0xc8b @0x2
0x0c89…0c8f at0004 = ╱9f╱ ENDPROC ╱ // 0xc8d @0x4
0x0c89…0c8f at0005 = EOL // 0xc8e @0x5
0x0c89…0c8f }
0x0c8f…0c9e 99f5 1220 PROC INOPL(I5)
0x0c8f…0c9e LineComalBin {
0x0c8f…0c9e ptr = 0x99f5 // 0xc8f @0x0
0x0c8f…0c9e lno = 0x04c4 // 0xc91 @0x2
0x0c8f…0c9e at0004 = ╱9e╱ PROC ╱ // 0xc93 @0x4
0x0c8f…0c9e at0005 = ╱49╱I╱ // 0xc94 @0x5
0x0c8f…0c9e at0006 = ╱4e╱N╱ // 0xc95 @0x6
0x0c8f…0c9e at0007 = ╱4f╱O╱ // 0xc96 @0x7
0x0c8f…0c9e at0008 = ╱50╱P╱ // 0xc97 @0x8
0x0c8f…0c9e at0009 = ╱4c╱L╱ // 0xc98 @0x9
0x0c8f…0c9e at000a = ╱ed╱(╱ // 0xc99 @0xa
0x0c8f…0c9e at000b = ╱49╱I╱ // 0xc9a @0xb
0x0c8f…0c9e at000c = ╱35╱5╱ // 0xc9b @0xc
0x0c8f…0c9e at000d = ╱ee╱)╱ // 0xc9c @0xd
0x0c8f…0c9e at000e = EOL // 0xc9d @0xe
0x0c8f…0c9e }
0x0c9e…0cae 9a05 1230 EXEC INLINE(I5)
0x0c9e…0cae LineComalBin {
0x0c9e…0cae ptr = 0x9a05 // 0xc9e @0x0
0x0c9e…0cae lno = 0x04ce // 0xca0 @0x2
0x0c9e…0cae at0004 = ╱9d╱ EXEC ╱ // 0xca2 @0x4
0x0c9e…0cae at0005 = ╱49╱I╱ // 0xca3 @0x5
0x0c9e…0cae at0006 = ╱4e╱N╱ // 0xca4 @0x6
0x0c9e…0cae at0007 = ╱4c╱L╱ // 0xca5 @0x7
0x0c9e…0cae at0008 = ╱49╱I╱ // 0xca6 @0x8
0x0c9e…0cae at0009 = ╱4e╱N╱ // 0xca7 @0x9
0x0c9e…0cae at000a = ╱45╱E╱ // 0xca8 @0xa
0x0c9e…0cae at000b = ╱ed╱(╱ // 0xca9 @0xb
0x0c9e…0cae at000c = ╱49╱I╱ // 0xcaa @0xc
0x0c9e…0cae at000d = ╱35╱5╱ // 0xcab @0xd
0x0c9e…0cae at000e = ╱ee╱)╱ // 0xcac @0xe
0x0c9e…0cae at000f = EOL // 0xcad @0xf
0x0c9e…0cae }
0x0cae…0cb8 9a0f 1240 CASE I5 OF
0x0cae…0cb8 LineComalBin {
0x0cae…0cb8 ptr = 0x9a0f // 0xcae @0x0
0x0cae…0cb8 lno = 0x04d8 // 0xcb0 @0x2
0x0cae…0cb8 at0004 = ╱a201╱ CASE ╱ // 0xcb2 @0x4
0x0cae…0cb8 at0006 = ╱49╱I╱ // 0xcb4 @0x6
0x0cae…0cb8 at0007 = ╱35╱5╱ // 0xcb5 @0x7
0x0cae…0cb8 at0008 = ╱ba╱ OF ╱ // 0xcb6 @0x8
0x0cae…0cb8 at0009 = EOL // 0xcb7 @0x9
0x0cae…0cb8 }
0x0cb8…0cc5 9a1c 1460 WHEN 4
0x0cb8…0cc5 LineComalBin {
0x0cb8…0cc5 ptr = 0x9a1c // 0xcb8 @0x0
0x0cb8…0cc5 lno = 0x05b4 // 0xcba @0x2
0x0cb8…0cc5 at0004 = ╱a301╱ WHEN ╱ // 0xcbc @0x4
0x0cb8…0cc5 at0006 = ╱34╱4╱ // 0xcbe @0x6
0x0cb8…0cc5 at0007 = ╱fe00008003╱ // 0xcbf @0x7
0x0cb8…0cc5 at000c = EOL // 0xcc4 @0xc
0x0cb8…0cc5 }
0x0cc5…0ccb 9a22 1470 REPEAT
0x0cc5…0ccb LineComalBin {
0x0cc5…0ccb ptr = 0x9a22 // 0xcc5 @0x0
0x0cc5…0ccb lno = 0x05be // 0xcc7 @0x2
0x0cc5…0ccb at0004 = ╱97╱ REPEAT ╱ // 0xcc9 @0x4
0x0cc5…0ccb at0005 = EOL // 0xcca @0x5
0x0cc5…0ccb }
0x0ccb…0cdb 9a32 1480 F0$=F0$+"+"
0x0ccb…0cdb LineComalBin {
0x0ccb…0cdb ptr = 0x9a32 // 0xccb @0x0
0x0ccb…0cdb lno = 0x05c8 // 0xccd @0x2
0x0ccb…0cdb at0004 = ╱46╱F╱ // 0xccf @0x4
0x0ccb…0cdb at0005 = ╱30╱0╱ // 0xcd0 @0x5
0x0ccb…0cdb at0006 = ╱ef╱$╱ // 0xcd1 @0x6
0x0ccb…0cdb at0007 = ╱dc╱=╱ // 0xcd2 @0x7
0x0ccb…0cdb at0008 = ╱46╱F╱ // 0xcd3 @0x8
0x0ccb…0cdb at0009 = ╱30╱0╱ // 0xcd4 @0x9
0x0ccb…0cdb at000a = ╱ef╱$╱ // 0xcd5 @0xa
0x0ccb…0cdb at000b = ╱f1╱+╱ // 0xcd6 @0xb
0x0ccb…0cdb at000c = ╱22╱"╱ // 0xcd7 @0xc
0x0ccb…0cdb at000d = ╱2b╱+╱ // 0xcd8 @0xd
0x0ccb…0cdb at000e = ╱22╱"╱ // 0xcd9 @0xe
0x0ccb…0cdb at000f = EOL // 0xcda @0xf
0x0ccb…0cdb }
0x0cdb…0cf6 9a4d 1490 EXEC C(6,F0$,B3$,F1$)
0x0cdb…0cf6 LineComalBin {
0x0cdb…0cf6 ptr = 0x9a4d // 0xcdb @0x0
0x0cdb…0cf6 lno = 0x05d2 // 0xcdd @0x2
0x0cdb…0cf6 at0004 = ╱9d╱ EXEC ╱ // 0xcdf @0x4
0x0cdb…0cf6 at0005 = ╱43╱C╱ // 0xce0 @0x5
0x0cdb…0cf6 at0006 = ╱ed╱(╱ // 0xce1 @0x6
0x0cdb…0cf6 at0007 = ╱36╱6╱ // 0xce2 @0x7
0x0cdb…0cf6 at0008 = ╱fe0000c003╱ // 0xce3 @0x8
0x0cdb…0cf6 at000d = ╱ec╱,╱ // 0xce8 @0xd
0x0cdb…0cf6 at000e = ╱46╱F╱ // 0xce9 @0xe
0x0cdb…0cf6 at000f = ╱30╱0╱ // 0xcea @0xf
0x0cdb…0cf6 at0010 = ╱ef╱$╱ // 0xceb @0x10
0x0cdb…0cf6 at0011 = ╱ec╱,╱ // 0xcec @0x11
0x0cdb…0cf6 at0012 = ╱42╱B╱ // 0xced @0x12
0x0cdb…0cf6 at0013 = ╱33╱3╱ // 0xcee @0x13
0x0cdb…0cf6 at0014 = ╱ef╱$╱ // 0xcef @0x14
0x0cdb…0cf6 at0015 = ╱ec╱,╱ // 0xcf0 @0x15
0x0cdb…0cf6 at0016 = ╱46╱F╱ // 0xcf1 @0x16
0x0cdb…0cf6 at0017 = ╱31╱1╱ // 0xcf2 @0x17
0x0cdb…0cf6 at0018 = ╱ef╱$╱ // 0xcf3 @0x18
0x0cdb…0cf6 at0019 = ╱ee╱)╱ // 0xcf4 @0x19
0x0cdb…0cf6 at001a = EOL // 0xcf5 @0x1a
0x0cdb…0cf6 }
0x0cf6…0d0e 9a65 1500 IF FLAG<>B THEN EXEC INLINE(I5)
0x0cf6…0d0e LineComalBin {
0x0cf6…0d0e ptr = 0x9a65 // 0xcf6 @0x0
0x0cf6…0d0e lno = 0x05dc // 0xcf8 @0x2
0x0cf6…0d0e at0004 = ╱82╱ IF ╱ // 0xcfa @0x4
0x0cf6…0d0e at0005 = ╱46╱F╱ // 0xcfb @0x5
0x0cf6…0d0e at0006 = ╱4c╱L╱ // 0xcfc @0x6
0x0cf6…0d0e at0007 = ╱41╱A╱ // 0xcfd @0x7
0x0cf6…0d0e at0008 = ╱47╱G╱ // 0xcfe @0x8
0x0cf6…0d0e at0009 = ╱e1╱<>╱ // 0xcff @0x9
0x0cf6…0d0e at000a = ╱42╱B╱ // 0xd00 @0xa
0x0cf6…0d0e at000b = ╱b6╱ THEN ╱ // 0xd01 @0xb
0x0cf6…0d0e at000c = ╱9d╱ EXEC ╱ // 0xd02 @0xc
0x0cf6…0d0e at000d = ╱49╱I╱ // 0xd03 @0xd
0x0cf6…0d0e at000e = ╱4e╱N╱ // 0xd04 @0xe
0x0cf6…0d0e at000f = ╱4c╱L╱ // 0xd05 @0xf
0x0cf6…0d0e at0010 = ╱49╱I╱ // 0xd06 @0x10
0x0cf6…0d0e at0011 = ╱4e╱N╱ // 0xd07 @0x11
0x0cf6…0d0e at0012 = ╱45╱E╱ // 0xd08 @0x12
0x0cf6…0d0e at0013 = ╱ed╱(╱ // 0xd09 @0x13
0x0cf6…0d0e at0014 = ╱49╱I╱ // 0xd0a @0x14
0x0cf6…0d0e at0015 = ╱35╱5╱ // 0xd0b @0x15
0x0cf6…0d0e at0016 = ╱ee╱)╱ // 0xd0c @0x16
0x0cf6…0d0e at0017 = EOL // 0xd0d @0x17
0x0cf6…0d0e }
0x0d0e…0d1a 9a71 1510 UNTIL FLAG=B
0x0d0e…0d1a LineComalBin {
0x0d0e…0d1a ptr = 0x9a71 // 0xd0e @0x0
0x0d0e…0d1a lno = 0x05e6 // 0xd10 @0x2
0x0d0e…0d1a at0004 = ╱98╱ UNTIL ╱ // 0xd12 @0x4
0x0d0e…0d1a at0005 = ╱46╱F╱ // 0xd13 @0x5
0x0d0e…0d1a at0006 = ╱4c╱L╱ // 0xd14 @0x6
0x0d0e…0d1a at0007 = ╱41╱A╱ // 0xd15 @0x7
0x0d0e…0d1a at0008 = ╱47╱G╱ // 0xd16 @0x8
0x0d0e…0d1a at0009 = ╱dc╱=╱ // 0xd17 @0x9
0x0d0e…0d1a at000a = ╱42╱B╱ // 0xd18 @0xa
0x0d0e…0d1a at000b = EOL // 0xd19 @0xb
0x0d0e…0d1a }
0x0d1a…0d35 9a8c 1520 EXEC C(0,F0$,B3$,F1$)
0x0d1a…0d35 LineComalBin {
0x0d1a…0d35 ptr = 0x9a8c // 0xd1a @0x0
0x0d1a…0d35 lno = 0x05f0 // 0xd1c @0x2
0x0d1a…0d35 at0004 = ╱9d╱ EXEC ╱ // 0xd1e @0x4
0x0d1a…0d35 at0005 = ╱43╱C╱ // 0xd1f @0x5
0x0d1a…0d35 at0006 = ╱ed╱(╱ // 0xd20 @0x6
0x0d1a…0d35 at0007 = ╱30╱0╱ // 0xd21 @0x7
0x0d1a…0d35 at0008 = ╱fe00000000╱ // 0xd22 @0x8
0x0d1a…0d35 at000d = ╱ec╱,╱ // 0xd27 @0xd
0x0d1a…0d35 at000e = ╱46╱F╱ // 0xd28 @0xe
0x0d1a…0d35 at000f = ╱30╱0╱ // 0xd29 @0xf
0x0d1a…0d35 at0010 = ╱ef╱$╱ // 0xd2a @0x10
0x0d1a…0d35 at0011 = ╱ec╱,╱ // 0xd2b @0x11
0x0d1a…0d35 at0012 = ╱42╱B╱ // 0xd2c @0x12
0x0d1a…0d35 at0013 = ╱33╱3╱ // 0xd2d @0x13
0x0d1a…0d35 at0014 = ╱ef╱$╱ // 0xd2e @0x14
0x0d1a…0d35 at0015 = ╱ec╱,╱ // 0xd2f @0x15
0x0d1a…0d35 at0016 = ╱46╱F╱ // 0xd30 @0x16
0x0d1a…0d35 at0017 = ╱31╱1╱ // 0xd31 @0x17
0x0d1a…0d35 at0018 = ╱ef╱$╱ // 0xd32 @0x18
0x0d1a…0d35 at0019 = ╱ee╱)╱ // 0xd33 @0x19
0x0d1a…0d35 at001a = EOL // 0xd34 @0x1a
0x0d1a…0d35 }
0x0d35…0d4a 9aa1 1530 EXEC PERVERT(F1$,I7)
0x0d35…0d4a LineComalBin {
0x0d35…0d4a ptr = 0x9aa1 // 0xd35 @0x0
0x0d35…0d4a lno = 0x05fa // 0xd37 @0x2
0x0d35…0d4a at0004 = ╱9d╱ EXEC ╱ // 0xd39 @0x4
0x0d35…0d4a at0005 = ╱50╱P╱ // 0xd3a @0x5
0x0d35…0d4a at0006 = ╱45╱E╱ // 0xd3b @0x6
0x0d35…0d4a at0007 = ╱52╱R╱ // 0xd3c @0x7
0x0d35…0d4a at0008 = ╱56╱V╱ // 0xd3d @0x8
0x0d35…0d4a at0009 = ╱45╱E╱ // 0xd3e @0x9
0x0d35…0d4a at000a = ╱52╱R╱ // 0xd3f @0xa
0x0d35…0d4a at000b = ╱54╱T╱ // 0xd40 @0xb
0x0d35…0d4a at000c = ╱ed╱(╱ // 0xd41 @0xc
0x0d35…0d4a at000d = ╱46╱F╱ // 0xd42 @0xd
0x0d35…0d4a at000e = ╱31╱1╱ // 0xd43 @0xe
0x0d35…0d4a at000f = ╱ef╱$╱ // 0xd44 @0xf
0x0d35…0d4a at0010 = ╱ec╱,╱ // 0xd45 @0x10
0x0d35…0d4a at0011 = ╱49╱I╱ // 0xd46 @0x11
0x0d35…0d4a at0012 = ╱37╱7╱ // 0xd47 @0x12
0x0d35…0d4a at0013 = ╱ee╱)╱ // 0xd48 @0x13
0x0d35…0d4a at0014 = EOL // 0xd49 @0x14
0x0d35…0d4a }
0x0d4a…0d57 9aae 1540 WHEN 5
0x0d4a…0d57 LineComalBin {
0x0d4a…0d57 ptr = 0x9aae // 0xd4a @0x0
0x0d4a…0d57 lno = 0x0604 // 0xd4c @0x2
0x0d4a…0d57 at0004 = ╱a301╱ WHEN ╱ // 0xd4e @0x4
0x0d4a…0d57 at0006 = ╱35╱5╱ // 0xd50 @0x6
0x0d4a…0d57 at0007 = ╱fe0000a003╱ // 0xd51 @0x7
0x0d4a…0d57 at000c = EOL // 0xd56 @0xc
0x0d4a…0d57 }
0x0d57…0d6c 9ac3 1550 WHILE F0$<"1" OR F0$>"7"
0x0d57…0d6c LineComalBin {
0x0d57…0d6c ptr = 0x9ac3 // 0xd57 @0x0
0x0d57…0d6c lno = 0x060e // 0xd59 @0x2
0x0d57…0d6c at0004 = ╱93╱ WHILE ╱ // 0xd5b @0x4
0x0d57…0d6c at0005 = ╱46╱F╱ // 0xd5c @0x5
0x0d57…0d6c at0006 = ╱30╱0╱ // 0xd5d @0x6
0x0d57…0d6c at0007 = ╱ef╱$╱ // 0xd5e @0x7
0x0d57…0d6c at0008 = ╱dd╱<╱ // 0xd5f @0x8
0x0d57…0d6c at0009 = ╱22╱"╱ // 0xd60 @0x9
0x0d57…0d6c at000a = ╱31╱1╱ // 0xd61 @0xa
0x0d57…0d6c at000b = ╱22╱"╱ // 0xd62 @0xb
0x0d57…0d6c at000c = ╱db╱ OR ╱ // 0xd63 @0xc
0x0d57…0d6c at000d = ╱46╱F╱ // 0xd64 @0xd
0x0d57…0d6c at000e = ╱30╱0╱ // 0xd65 @0xe
0x0d57…0d6c at000f = ╱ef╱$╱ // 0xd66 @0xf
0x0d57…0d6c at0010 = ╱de╱>╱ // 0xd67 @0x10
0x0d57…0d6c at0011 = ╱22╱"╱ // 0xd68 @0x11
0x0d57…0d6c at0012 = ╱37╱7╱ // 0xd69 @0x12
0x0d57…0d6c at0013 = ╱22╱"╱ // 0xd6a @0x13
0x0d57…0d6c at0014 = EOL // 0xd6b @0x14
0x0d57…0d6c }
0x0d6c…0d7c 9ad3 1560 EXEC INLINE(I5)
0x0d6c…0d7c LineComalBin {
0x0d6c…0d7c ptr = 0x9ad3 // 0xd6c @0x0
0x0d6c…0d7c lno = 0x0618 // 0xd6e @0x2
0x0d6c…0d7c at0004 = ╱9d╱ EXEC ╱ // 0xd70 @0x4
0x0d6c…0d7c at0005 = ╱49╱I╱ // 0xd71 @0x5
0x0d6c…0d7c at0006 = ╱4e╱N╱ // 0xd72 @0x6
0x0d6c…0d7c at0007 = ╱4c╱L╱ // 0xd73 @0x7
0x0d6c…0d7c at0008 = ╱49╱I╱ // 0xd74 @0x8
0x0d6c…0d7c at0009 = ╱4e╱N╱ // 0xd75 @0x9
0x0d6c…0d7c at000a = ╱45╱E╱ // 0xd76 @0xa
0x0d6c…0d7c at000b = ╱ed╱(╱ // 0xd77 @0xb
0x0d6c…0d7c at000c = ╱49╱I╱ // 0xd78 @0xc
0x0d6c…0d7c at000d = ╱35╱5╱ // 0xd79 @0xd
0x0d6c…0d7c at000e = ╱ee╱)╱ // 0xd7a @0xe
0x0d6c…0d7c at000f = EOL // 0xd7b @0xf
0x0d6c…0d7c }
0x0d7c…0d82 9ad9 1570 ENDWHILE
0x0d7c…0d82 LineComalBin {
0x0d7c…0d82 ptr = 0x9ad9 // 0xd7c @0x0
0x0d7c…0d82 lno = 0x0622 // 0xd7e @0x2
0x0d7c…0d82 at0004 = ╱94╱ ENDWHILE ╱ // 0xd80 @0x4
0x0d7c…0d82 at0005 = EOL // 0xd81 @0x5
0x0d7c…0d82 }
0x0d82…0d8e 9ae5 1580 A9$=F0$
0x0d82…0d8e LineComalBin {
0x0d82…0d8e ptr = 0x9ae5 // 0xd82 @0x0
0x0d82…0d8e lno = 0x062c // 0xd84 @0x2
0x0d82…0d8e at0004 = ╱41╱A╱ // 0xd86 @0x4
0x0d82…0d8e at0005 = ╱39╱9╱ // 0xd87 @0x5
0x0d82…0d8e at0006 = ╱ef╱$╱ // 0xd88 @0x6
0x0d82…0d8e at0007 = ╱dc╱=╱ // 0xd89 @0x7
0x0d82…0d8e at0008 = ╱46╱F╱ // 0xd8a @0x8
0x0d82…0d8e at0009 = ╱30╱0╱ // 0xd8b @0x9
0x0d82…0d8e at000a = ╱ef╱$╱ // 0xd8c @0xa
0x0d82…0d8e at000b = EOL // 0xd8d @0xb
0x0d82…0d8e }
0x0d8e…0d9b 9af2 1590 WHEN 6
0x0d8e…0d9b LineComalBin {
0x0d8e…0d9b ptr = 0x9af2 // 0xd8e @0x0
0x0d8e…0d9b lno = 0x0636 // 0xd90 @0x2
0x0d8e…0d9b at0004 = ╱a301╱ WHEN ╱ // 0xd92 @0x4
0x0d8e…0d9b at0006 = ╱36╱6╱ // 0xd94 @0x6
0x0d8e…0d9b at0007 = ╱fe0000c003╱ // 0xd95 @0x7
0x0d8e…0d9b at000c = EOL // 0xd9a @0xc
0x0d8e…0d9b }
0x0d9b…0db0 9b07 1600 WHILE F0$<>"A" AND F0$<>"F"
0x0d9b…0db0 LineComalBin {
0x0d9b…0db0 ptr = 0x9b07 // 0xd9b @0x0
0x0d9b…0db0 lno = 0x0640 // 0xd9d @0x2
0x0d9b…0db0 at0004 = ╱93╱ WHILE ╱ // 0xd9f @0x4
0x0d9b…0db0 at0005 = ╱46╱F╱ // 0xda0 @0x5
0x0d9b…0db0 at0006 = ╱30╱0╱ // 0xda1 @0x6
0x0d9b…0db0 at0007 = ╱ef╱$╱ // 0xda2 @0x7
0x0d9b…0db0 at0008 = ╱e1╱<>╱ // 0xda3 @0x8
0x0d9b…0db0 at0009 = ╱22╱"╱ // 0xda4 @0x9
0x0d9b…0db0 at000a = ╱41╱A╱ // 0xda5 @0xa
0x0d9b…0db0 at000b = ╱22╱"╱ // 0xda6 @0xb
0x0d9b…0db0 at000c = ╱da╱ AND ╱ // 0xda7 @0xc
0x0d9b…0db0 at000d = ╱46╱F╱ // 0xda8 @0xd
0x0d9b…0db0 at000e = ╱30╱0╱ // 0xda9 @0xe
0x0d9b…0db0 at000f = ╱ef╱$╱ // 0xdaa @0xf
0x0d9b…0db0 at0010 = ╱e1╱<>╱ // 0xdab @0x10
0x0d9b…0db0 at0011 = ╱22╱"╱ // 0xdac @0x11
0x0d9b…0db0 at0012 = ╱46╱F╱ // 0xdad @0x12
0x0d9b…0db0 at0013 = ╱22╱"╱ // 0xdae @0x13
0x0d9b…0db0 at0014 = EOL // 0xdaf @0x14
0x0d9b…0db0 }
0x0db0…0dc0 9b17 1610 EXEC INLINE(I5)
0x0db0…0dc0 LineComalBin {
0x0db0…0dc0 ptr = 0x9b17 // 0xdb0 @0x0
0x0db0…0dc0 lno = 0x064a // 0xdb2 @0x2
0x0db0…0dc0 at0004 = ╱9d╱ EXEC ╱ // 0xdb4 @0x4
0x0db0…0dc0 at0005 = ╱49╱I╱ // 0xdb5 @0x5
0x0db0…0dc0 at0006 = ╱4e╱N╱ // 0xdb6 @0x6
0x0db0…0dc0 at0007 = ╱4c╱L╱ // 0xdb7 @0x7
0x0db0…0dc0 at0008 = ╱49╱I╱ // 0xdb8 @0x8
0x0db0…0dc0 at0009 = ╱4e╱N╱ // 0xdb9 @0x9
0x0db0…0dc0 at000a = ╱45╱E╱ // 0xdba @0xa
0x0db0…0dc0 at000b = ╱ed╱(╱ // 0xdbb @0xb
0x0db0…0dc0 at000c = ╱49╱I╱ // 0xdbc @0xc
0x0db0…0dc0 at000d = ╱35╱5╱ // 0xdbd @0xd
0x0db0…0dc0 at000e = ╱ee╱)╱ // 0xdbe @0xe
0x0db0…0dc0 at000f = EOL // 0xdbf @0xf
0x0db0…0dc0 }
0x0dc0…0dc6 9b1d 1620 ENDWHILE
0x0dc0…0dc6 LineComalBin {
0x0dc0…0dc6 ptr = 0x9b1d // 0xdc0 @0x0
0x0dc0…0dc6 lno = 0x0654 // 0xdc2 @0x2
0x0dc0…0dc6 at0004 = ╱94╱ ENDWHILE ╱ // 0xdc4 @0x4
0x0dc0…0dc6 at0005 = EOL // 0xdc5 @0x5
0x0dc0…0dc6 }
0x0dc6…0dd2 9b29 1630 B0$=F0$
0x0dc6…0dd2 LineComalBin {
0x0dc6…0dd2 ptr = 0x9b29 // 0xdc6 @0x0
0x0dc6…0dd2 lno = 0x065e // 0xdc8 @0x2
0x0dc6…0dd2 at0004 = ╱42╱B╱ // 0xdca @0x4
0x0dc6…0dd2 at0005 = ╱30╱0╱ // 0xdcb @0x5
0x0dc6…0dd2 at0006 = ╱ef╱$╱ // 0xdcc @0x6
0x0dc6…0dd2 at0007 = ╱dc╱=╱ // 0xdcd @0x7
0x0dc6…0dd2 at0008 = ╱46╱F╱ // 0xdce @0x8
0x0dc6…0dd2 at0009 = ╱30╱0╱ // 0xdcf @0x9
0x0dc6…0dd2 at000a = ╱ef╱$╱ // 0xdd0 @0xa
0x0dc6…0dd2 at000b = EOL // 0xdd1 @0xb
0x0dc6…0dd2 }
0x0dd2…0df0 9b47 1660 WHEN 10,13,16
0x0dd2…0df0 LineComalBin {
0x0dd2…0df0 ptr = 0x9b47 // 0xdd2 @0x0
0x0dd2…0df0 lno = 0x067c // 0xdd4 @0x2
0x0dd2…0df0 at0004 = ╱a301╱ WHEN ╱ // 0xdd6 @0x4
0x0dd2…0df0 at0006 = ╱31╱1╱ // 0xdd8 @0x6
0x0dd2…0df0 at0007 = ╱30╱0╱ // 0xdd9 @0x7
0x0dd2…0df0 at0008 = ╱fe0000a004╱ // 0xdda @0x8
0x0dd2…0df0 at000d = ╱ec╱,╱ // 0xddf @0xd
0x0dd2…0df0 at000e = ╱31╱1╱ // 0xde0 @0xe
0x0dd2…0df0 at000f = ╱33╱3╱ // 0xde1 @0xf
0x0dd2…0df0 at0010 = ╱fe0000d004╱ // 0xde2 @0x10
0x0dd2…0df0 at0015 = ╱ec╱,╱ // 0xde7 @0x15
0x0dd2…0df0 at0016 = ╱31╱1╱ // 0xde8 @0x16
0x0dd2…0df0 at0017 = ╱36╱6╱ // 0xde9 @0x17
0x0dd2…0df0 at0018 = ╱fe00008005╱ // 0xdea @0x18
0x0dd2…0df0 at001d = EOL // 0xdef @0x1d
0x0dd2…0df0 }
0x0df0…0e02 9b59 1670 A2(I5 DIV V-G)=I3
0x0df0…0e02 LineComalBin {
0x0df0…0e02 ptr = 0x9b59 // 0xdf0 @0x0
0x0df0…0e02 lno = 0x0686 // 0xdf2 @0x2
0x0df0…0e02 at0004 = ╱41╱A╱ // 0xdf4 @0x4
0x0df0…0e02 at0005 = ╱32╱2╱ // 0xdf5 @0x5
0x0df0…0e02 at0006 = ╱ed╱(╱ // 0xdf6 @0x6
0x0df0…0e02 at0007 = ╱49╱I╱ // 0xdf7 @0x7
0x0df0…0e02 at0008 = ╱35╱5╱ // 0xdf8 @0x8
0x0df0…0e02 at0009 = ╱e7╱ DIV ╱ // 0xdf9 @0x9
0x0df0…0e02 at000a = ╱56╱V╱ // 0xdfa @0xa
0x0df0…0e02 at000b = ╱e3╱-╱ // 0xdfb @0xb
0x0df0…0e02 at000c = ╱47╱G╱ // 0xdfc @0xc
0x0df0…0e02 at000d = ╱ee╱)╱ // 0xdfd @0xd
0x0df0…0e02 at000e = ╱dc╱=╱ // 0xdfe @0xe
0x0df0…0e02 at000f = ╱49╱I╱ // 0xdff @0xf
0x0df0…0e02 at0010 = ╱33╱3╱ // 0xe00 @0x10
0x0df0…0e02 at0011 = EOL // 0xe01 @0x11
0x0df0…0e02 }
0x0e02…0e0d 9b64 1680 IF I3<>B THEN
0x0e02…0e0d LineComalBin {
0x0e02…0e0d ptr = 0x9b64 // 0xe02 @0x0
0x0e02…0e0d lno = 0x0690 // 0xe04 @0x2
0x0e02…0e0d at0004 = ╱9c╱ IF ╱ // 0xe06 @0x4
0x0e02…0e0d at0005 = ╱49╱I╱ // 0xe07 @0x5
0x0e02…0e0d at0006 = ╱33╱3╱ // 0xe08 @0x6
0x0e02…0e0d at0007 = ╱e1╱<>╱ // 0xe09 @0x7
0x0e02…0e0d at0008 = ╱42╱B╱ // 0xe0a @0x8
0x0e02…0e0d at0009 = ╱b6╱ THEN ╱ // 0xe0b @0x9
0x0e02…0e0d at000a = EOL // 0xe0c @0xa
0x0e02…0e0d }
0x0e0d…0e16 9b6d 1690 E4=E
0x0e0d…0e16 LineComalBin {
0x0e0d…0e16 ptr = 0x9b6d // 0xe0d @0x0
0x0e0d…0e16 lno = 0x069a // 0xe0f @0x2
0x0e0d…0e16 at0004 = ╱45╱E╱ // 0xe11 @0x4
0x0e0d…0e16 at0005 = ╱34╱4╱ // 0xe12 @0x5
0x0e0d…0e16 at0006 = ╱dc╱=╱ // 0xe13 @0x6
0x0e0d…0e16 at0007 = ╱45╱E╱ // 0xe14 @0x7
0x0e0d…0e16 at0008 = EOL // 0xe15 @0x8
0x0e0d…0e16 }
0x0e16…0e1c 9b73 1700 ELSE
0x0e16…0e1c LineComalBin {
0x0e16…0e1c ptr = 0x9b73 // 0xe16 @0x0
0x0e16…0e1c lno = 0x06a4 // 0xe18 @0x2
0x0e16…0e1c at0004 = ╱9a╱ ELSE ╱ // 0xe1a @0x4
0x0e16…0e1c at0005 = EOL // 0xe1b @0x5
0x0e16…0e1c }
0x0e1c…0e28 9b7f 1710 I5=I5+G
0x0e1c…0e28 LineComalBin {
0x0e1c…0e28 ptr = 0x9b7f // 0xe1c @0x0
0x0e1c…0e28 lno = 0x06ae // 0xe1e @0x2
0x0e1c…0e28 at0004 = ╱49╱I╱ // 0xe20 @0x4
0x0e1c…0e28 at0005 = ╱35╱5╱ // 0xe21 @0x5
0x0e1c…0e28 at0006 = ╱dc╱=╱ // 0xe22 @0x6
0x0e1c…0e28 at0007 = ╱49╱I╱ // 0xe23 @0x7
0x0e1c…0e28 at0008 = ╱35╱5╱ // 0xe24 @0x8
0x0e1c…0e28 at0009 = ╱e2╱+╱ // 0xe25 @0x9
0x0e1c…0e28 at000a = ╱47╱G╱ // 0xe26 @0xa
0x0e1c…0e28 at000b = EOL // 0xe27 @0xb
0x0e1c…0e28 }
0x0e28…0e2e 9b85 1720 ENDIF
0x0e28…0e2e LineComalBin {
0x0e28…0e2e ptr = 0x9b85 // 0xe28 @0x0
0x0e28…0e2e lno = 0x06b8 // 0xe2a @0x2
0x0e28…0e2e at0004 = ╱9b╱ ENDIF ╱ // 0xe2c @0x4
0x0e28…0e2e at0005 = EOL // 0xe2d @0x5
0x0e28…0e2e }
0x0e2e…0e4c 9ba3 1730 WHEN 11,14,17
0x0e2e…0e4c LineComalBin {
0x0e2e…0e4c ptr = 0x9ba3 // 0xe2e @0x0
0x0e2e…0e4c lno = 0x06c2 // 0xe30 @0x2
0x0e2e…0e4c at0004 = ╱a301╱ WHEN ╱ // 0xe32 @0x4
0x0e2e…0e4c at0006 = ╱31╱1╱ // 0xe34 @0x6
0x0e2e…0e4c at0007 = ╱31╱1╱ // 0xe35 @0x7
0x0e2e…0e4c at0008 = ╱fe0000b004╱ // 0xe36 @0x8
0x0e2e…0e4c at000d = ╱ec╱,╱ // 0xe3b @0xd
0x0e2e…0e4c at000e = ╱31╱1╱ // 0xe3c @0xe
0x0e2e…0e4c at000f = ╱34╱4╱ // 0xe3d @0xf
0x0e2e…0e4c at0010 = ╱fe0000e004╱ // 0xe3e @0x10
0x0e2e…0e4c at0015 = ╱ec╱,╱ // 0xe43 @0x15
0x0e2e…0e4c at0016 = ╱31╱1╱ // 0xe44 @0x16
0x0e2e…0e4c at0017 = ╱37╱7╱ // 0xe45 @0x17
0x0e2e…0e4c at0018 = ╱fe00008805╱ // 0xe46 @0x18
0x0e2e…0e4c at001d = EOL // 0xe4b @0x1d
0x0e2e…0e4c }
0x0e4c…0e53 9baa 1740 EXEC Ø
0x0e4c…0e53 LineComalBin {
0x0e4c…0e53 ptr = 0x9baa // 0xe4c @0x0
0x0e4c…0e53 lno = 0x06cc // 0xe4e @0x2
0x0e4c…0e53 at0004 = ╱9d╱ EXEC ╱ // 0xe50 @0x4
0x0e4c…0e53 at0005 = ╱5c╱Ø╱ // 0xe51 @0x5
0x0e4c…0e53 at0006 = EOL // 0xe52 @0x6
0x0e4c…0e53 }
0x0e53…0e6f 9bc6 1780 A4(I5 DIV 3-2)=I3
0x0e53…0e6f LineComalBin {
0x0e53…0e6f ptr = 0x9bc6 // 0xe53 @0x0
0x0e53…0e6f lno = 0x06f4 // 0xe55 @0x2
0x0e53…0e6f at0004 = ╱41╱A╱ // 0xe57 @0x4
0x0e53…0e6f at0005 = ╱34╱4╱ // 0xe58 @0x5
0x0e53…0e6f at0006 = ╱ed╱(╱ // 0xe59 @0x6
0x0e53…0e6f at0007 = ╱49╱I╱ // 0xe5a @0x7
0x0e53…0e6f at0008 = ╱35╱5╱ // 0xe5b @0x8
0x0e53…0e6f at0009 = ╱e7╱ DIV ╱ // 0xe5c @0x9
0x0e53…0e6f at000a = ╱33╱3╱ // 0xe5d @0xa
0x0e53…0e6f at000b = ╱fe0000c002╱ // 0xe5e @0xb
0x0e53…0e6f at0010 = ╱e3╱-╱ // 0xe63 @0x10
0x0e53…0e6f at0011 = ╱32╱2╱ // 0xe64 @0x11
0x0e53…0e6f at0012 = ╱fe00008002╱ // 0xe65 @0x12
0x0e53…0e6f at0017 = ╱ee╱)╱ // 0xe6a @0x17
0x0e53…0e6f at0018 = ╱dc╱=╱ // 0xe6b @0x18
0x0e53…0e6f at0019 = ╱49╱I╱ // 0xe6c @0x19
0x0e53…0e6f at001a = ╱33╱3╱ // 0xe6d @0x1a
0x0e53…0e6f at001b = EOL // 0xe6e @0x1b
0x0e53…0e6f }
0x0e6f…0e8d 9be4 1790 WHEN 12,15,18
0x0e6f…0e8d LineComalBin {
0x0e6f…0e8d ptr = 0x9be4 // 0xe6f @0x0
0x0e6f…0e8d lno = 0x06fe // 0xe71 @0x2
0x0e6f…0e8d at0004 = ╱a301╱ WHEN ╱ // 0xe73 @0x4
0x0e6f…0e8d at0006 = ╱31╱1╱ // 0xe75 @0x6
0x0e6f…0e8d at0007 = ╱32╱2╱ // 0xe76 @0x7
0x0e6f…0e8d at0008 = ╱fe0000c004╱ // 0xe77 @0x8
0x0e6f…0e8d at000d = ╱ec╱,╱ // 0xe7c @0xd
0x0e6f…0e8d at000e = ╱31╱1╱ // 0xe7d @0xe
0x0e6f…0e8d at000f = ╱35╱5╱ // 0xe7e @0xf
0x0e6f…0e8d at0010 = ╱fe0000f004╱ // 0xe7f @0x10
0x0e6f…0e8d at0015 = ╱ec╱,╱ // 0xe84 @0x15
0x0e6f…0e8d at0016 = ╱31╱1╱ // 0xe85 @0x16
0x0e6f…0e8d at0017 = ╱38╱8╱ // 0xe86 @0x17
0x0e6f…0e8d at0018 = ╱fe00009005╱ // 0xe87 @0x18
0x0e6f…0e8d at001d = EOL // 0xe8c @0x1d
0x0e6f…0e8d }
0x0e8d…0e94 9beb 1800 EXEC Ø
0x0e8d…0e94 LineComalBin {
0x0e8d…0e94 ptr = 0x9beb // 0xe8d @0x0
0x0e8d…0e94 lno = 0x0708 // 0xe8f @0x2
0x0e8d…0e94 at0004 = ╱9d╱ EXEC ╱ // 0xe91 @0x4
0x0e8d…0e94 at0005 = ╱5c╱Ø╱ // 0xe92 @0x5
0x0e8d…0e94 at0006 = EOL // 0xe93 @0x6
0x0e8d…0e94 }
0x0e94…0eb0 9c07 1840 A5(I5 DIV 3-3)=I3
0x0e94…0eb0 LineComalBin {
0x0e94…0eb0 ptr = 0x9c07 // 0xe94 @0x0
0x0e94…0eb0 lno = 0x0730 // 0xe96 @0x2
0x0e94…0eb0 at0004 = ╱41╱A╱ // 0xe98 @0x4
0x0e94…0eb0 at0005 = ╱35╱5╱ // 0xe99 @0x5
0x0e94…0eb0 at0006 = ╱ed╱(╱ // 0xe9a @0x6
0x0e94…0eb0 at0007 = ╱49╱I╱ // 0xe9b @0x7
0x0e94…0eb0 at0008 = ╱35╱5╱ // 0xe9c @0x8
0x0e94…0eb0 at0009 = ╱e7╱ DIV ╱ // 0xe9d @0x9
0x0e94…0eb0 at000a = ╱33╱3╱ // 0xe9e @0xa
0x0e94…0eb0 at000b = ╱fe0000c002╱ // 0xe9f @0xb
0x0e94…0eb0 at0010 = ╱e3╱-╱ // 0xea4 @0x10
0x0e94…0eb0 at0011 = ╱33╱3╱ // 0xea5 @0x11
0x0e94…0eb0 at0012 = ╱fe0000c002╱ // 0xea6 @0x12
0x0e94…0eb0 at0017 = ╱ee╱)╱ // 0xeab @0x17
0x0e94…0eb0 at0018 = ╱dc╱=╱ // 0xeac @0x18
0x0e94…0eb0 at0019 = ╱49╱I╱ // 0xead @0x19
0x0e94…0eb0 at001a = ╱33╱3╱ // 0xeae @0x1a
0x0e94…0eb0 at001b = EOL // 0xeaf @0x1b
0x0e94…0eb0 }
0x0eb0…0eb6 9c0d 1870 ENDCASE
0x0eb0…0eb6 LineComalBin {
0x0eb0…0eb6 ptr = 0x9c0d // 0xeb0 @0x0
0x0eb0…0eb6 lno = 0x074e // 0xeb2 @0x2
0x0eb0…0eb6 at0004 = ╱a4╱ ENDCASE ╱ // 0xeb4 @0x4
0x0eb0…0eb6 at0005 = EOL // 0xeb5 @0x5
0x0eb0…0eb6 }
0x0eb6…0ebc 9c13 1880 ENDPROC
0x0eb6…0ebc LineComalBin {
0x0eb6…0ebc ptr = 0x9c13 // 0xeb6 @0x0
0x0eb6…0ebc lno = 0x0758 // 0xeb8 @0x2
0x0eb6…0ebc at0004 = ╱9f╱ ENDPROC ╱ // 0xeba @0x4
0x0eb6…0ebc at0005 = EOL // 0xebb @0x5
0x0eb6…0ebc }
0x0ebc…0ec9 9c20 1890 PROC INDVIRK
0x0ebc…0ec9 LineComalBin {
0x0ebc…0ec9 ptr = 0x9c20 // 0xebc @0x0
0x0ebc…0ec9 lno = 0x0762 // 0xebe @0x2
0x0ebc…0ec9 at0004 = ╱9e╱ PROC ╱ // 0xec0 @0x4
0x0ebc…0ec9 at0005 = ╱49╱I╱ // 0xec1 @0x5
0x0ebc…0ec9 at0006 = ╱4e╱N╱ // 0xec2 @0x6
0x0ebc…0ec9 at0007 = ╱44╱D╱ // 0xec3 @0x7
0x0ebc…0ec9 at0008 = ╱56╱V╱ // 0xec4 @0x8
0x0ebc…0ec9 at0009 = ╱49╱I╱ // 0xec5 @0x9
0x0ebc…0ec9 at000a = ╱52╱R╱ // 0xec6 @0xa
0x0ebc…0ec9 at000b = ╱4b╱K╱ // 0xec7 @0xb
0x0ebc…0ec9 at000c = EOL // 0xec8 @0xc
0x0ebc…0ec9 }
0x0ec9…0ed4 9c2b 1900 OPEN C9$,R
0x0ec9…0ed4 LineComalBin {
0x0ec9…0ed4 ptr = 0x9c2b // 0xec9 @0x0
0x0ec9…0ed4 lno = 0x076c // 0xecb @0x2
0x0ec9…0ed4 at0004 = ╱a7╱ OPEN ╱ // 0xecd @0x4
0x0ec9…0ed4 at0005 = ╱43╱C╱ // 0xece @0x5
0x0ec9…0ed4 at0006 = ╱39╱9╱ // 0xecf @0x6
0x0ec9…0ed4 at0007 = ╱ef╱$╱ // 0xed0 @0x7
0x0ec9…0ed4 at0008 = ╱ec╱,╱ // 0xed1 @0x8
0x0ec9…0ed4 at0009 = ╱52╱R╱ // 0xed2 @0x9
0x0ec9…0ed4 at000a = EOL // 0xed3 @0xa
0x0ec9…0ed4 }
0x0ed4…0eee 9c45 1910 EXEC F(0,0,C9$)
0x0ed4…0eee LineComalBin {
0x0ed4…0eee ptr = 0x9c45 // 0xed4 @0x0
0x0ed4…0eee lno = 0x0776 // 0xed6 @0x2
0x0ed4…0eee at0004 = ╱9d╱ EXEC ╱ // 0xed8 @0x4
0x0ed4…0eee at0005 = ╱46╱F╱ // 0xed9 @0x5
0x0ed4…0eee at0006 = ╱ed╱(╱ // 0xeda @0x6
0x0ed4…0eee at0007 = ╱30╱0╱ // 0xedb @0x7
0x0ed4…0eee at0008 = ╱fe00000000╱ // 0xedc @0x8
0x0ed4…0eee at000d = ╱ec╱,╱ // 0xee1 @0xd
0x0ed4…0eee at000e = ╱30╱0╱ // 0xee2 @0xe
0x0ed4…0eee at000f = ╱fe00000000╱ // 0xee3 @0xf
0x0ed4…0eee at0014 = ╱ec╱,╱ // 0xee8 @0x14
0x0ed4…0eee at0015 = ╱43╱C╱ // 0xee9 @0x15
0x0ed4…0eee at0016 = ╱39╱9╱ // 0xeea @0x16
0x0ed4…0eee at0017 = ╱ef╱$╱ // 0xeeb @0x17
0x0ed4…0eee at0018 = ╱ee╱)╱ // 0xeec @0x18
0x0ed4…0eee at0019 = EOL // 0xeed @0x19
0x0ed4…0eee }
0x0eee…0efd 9c54 1920 GET C9$,E:D3$
0x0eee…0efd LineComalBin {
0x0eee…0efd ptr = 0x9c54 // 0xeee @0x0
0x0eee…0efd lno = 0x0780 // 0xef0 @0x2
0x0eee…0efd at0004 = ╱a9╱ GET ╱ // 0xef2 @0x4
0x0eee…0efd at0005 = ╱43╱C╱ // 0xef3 @0x5
0x0eee…0efd at0006 = ╱39╱9╱ // 0xef4 @0x6
0x0eee…0efd at0007 = ╱ef╱$╱ // 0xef5 @0x7
0x0eee…0efd at0008 = ╱ec╱,╱ // 0xef6 @0x8
0x0eee…0efd at0009 = ╱45╱E╱ // 0xef7 @0x9
0x0eee…0efd at000a = ╱f0╱:╱ // 0xef8 @0xa
0x0eee…0efd at000b = ╱44╱D╱ // 0xef9 @0xb
0x0eee…0efd at000c = ╱33╱3╱ // 0xefa @0xc
0x0eee…0efd at000d = ╱ef╱$╱ // 0xefb @0xd
0x0eee…0efd at000e = EOL // 0xefc @0xe
0x0eee…0efd }
0x0efd…0f15 9c6c 1930 GET C9$,G:D4$,I8,I9,J0
0x0efd…0f15 LineComalBin {
0x0efd…0f15 ptr = 0x9c6c // 0xefd @0x0
0x0efd…0f15 lno = 0x078a // 0xeff @0x2
0x0efd…0f15 at0004 = ╱a9╱ GET ╱ // 0xf01 @0x4
0x0efd…0f15 at0005 = ╱43╱C╱ // 0xf02 @0x5
0x0efd…0f15 at0006 = ╱39╱9╱ // 0xf03 @0x6
0x0efd…0f15 at0007 = ╱ef╱$╱ // 0xf04 @0x7
0x0efd…0f15 at0008 = ╱ec╱,╱ // 0xf05 @0x8
0x0efd…0f15 at0009 = ╱47╱G╱ // 0xf06 @0x9
0x0efd…0f15 at000a = ╱f0╱:╱ // 0xf07 @0xa
0x0efd…0f15 at000b = ╱44╱D╱ // 0xf08 @0xb
0x0efd…0f15 at000c = ╱34╱4╱ // 0xf09 @0xc
0x0efd…0f15 at000d = ╱ef╱$╱ // 0xf0a @0xd
0x0efd…0f15 at000e = ╱ec╱,╱ // 0xf0b @0xe
0x0efd…0f15 at000f = ╱49╱I╱ // 0xf0c @0xf
0x0efd…0f15 at0010 = ╱38╱8╱ // 0xf0d @0x10
0x0efd…0f15 at0011 = ╱ec╱,╱ // 0xf0e @0x11
0x0efd…0f15 at0012 = ╱49╱I╱ // 0xf0f @0x12
0x0efd…0f15 at0013 = ╱39╱9╱ // 0xf10 @0x13
0x0efd…0f15 at0014 = ╱ec╱,╱ // 0xf11 @0x14
0x0efd…0f15 at0015 = ╱4a╱J╱ // 0xf12 @0x15
0x0efd…0f15 at0016 = ╱30╱0╱ // 0xf13 @0x16
0x0efd…0f15 at0017 = EOL // 0xf14 @0x17
0x0efd…0f15 }
0x0f15…0f1b 9c72 1940 ENDPROC
0x0f15…0f1b LineComalBin {
0x0f15…0f1b ptr = 0x9c72 // 0xf15 @0x0
0x0f15…0f1b lno = 0x0794 // 0xf17 @0x2
0x0f15…0f1b at0004 = ╱9f╱ ENDPROC ╱ // 0xf19 @0x4
0x0f15…0f1b at0005 = EOL // 0xf1a @0x5
0x0f15…0f1b }
0x0f1b…0f2c 9c83 1950 PROC F(J1,J2,J3)
0x0f1b…0f2c LineComalBin {
0x0f1b…0f2c ptr = 0x9c83 // 0xf1b @0x0
0x0f1b…0f2c lno = 0x079e // 0xf1d @0x2
0x0f1b…0f2c at0004 = ╱9e╱ PROC ╱ // 0xf1f @0x4
0x0f1b…0f2c at0005 = ╱46╱F╱ // 0xf20 @0x5
0x0f1b…0f2c at0006 = ╱ed╱(╱ // 0xf21 @0x6
0x0f1b…0f2c at0007 = ╱4a╱J╱ // 0xf22 @0x7
0x0f1b…0f2c at0008 = ╱31╱1╱ // 0xf23 @0x8
0x0f1b…0f2c at0009 = ╱ec╱,╱ // 0xf24 @0x9
0x0f1b…0f2c at000a = ╱4a╱J╱ // 0xf25 @0xa
0x0f1b…0f2c at000b = ╱32╱2╱ // 0xf26 @0xb
0x0f1b…0f2c at000c = ╱ec╱,╱ // 0xf27 @0xc
0x0f1b…0f2c at000d = ╱4a╱J╱ // 0xf28 @0xd
0x0f1b…0f2c at000e = ╱33╱3╱ // 0xf29 @0xe
0x0f1b…0f2c at000f = ╱ee╱)╱ // 0xf2a @0xf
0x0f1b…0f2c at0010 = EOL // 0xf2b @0x10
0x0f1b…0f2c }
0x0f2c…0f3b 9c92 1960 IF STATUS(J3$)<>B THEN
0x0f2c…0f3b LineComalBin {
0x0f2c…0f3b ptr = 0x9c92 // 0xf2c @0x0
0x0f2c…0f3b lno = 0x07a8 // 0xf2e @0x2
0x0f2c…0f3b at0004 = ╱9c╱ IF ╱ // 0xf30 @0x4
0x0f2c…0f3b at0005 = ╱ce╱STATUS╱ // 0xf31 @0x5
0x0f2c…0f3b at0006 = ╱ed╱(╱ // 0xf32 @0x6
0x0f2c…0f3b at0007 = ╱4a╱J╱ // 0xf33 @0x7
0x0f2c…0f3b at0008 = ╱33╱3╱ // 0xf34 @0x8
0x0f2c…0f3b at0009 = ╱ef╱$╱ // 0xf35 @0x9
0x0f2c…0f3b at000a = ╱ee╱)╱ // 0xf36 @0xa
0x0f2c…0f3b at000b = ╱e1╱<>╱ // 0xf37 @0xb
0x0f2c…0f3b at000c = ╱42╱B╱ // 0xf38 @0xc
0x0f2c…0f3b at000d = ╱b6╱ THEN ╱ // 0xf39 @0xd
0x0f2c…0f3b at000e = EOL // 0xf3a @0xe
0x0f2c…0f3b }
0x0f3b…0f42 9c99 1970 OUTPUT T
0x0f3b…0f42 LineComalBin {
0x0f3b…0f42 ptr = 0x9c99 // 0xf3b @0x0
0x0f3b…0f42 lno = 0x07b2 // 0xf3d @0x2
0x0f3b…0f42 at0004 = ╱a5╱ OUTPUT ╱ // 0xf3f @0x4
0x0f3b…0f42 at0005 = ╱54╱T╱ // 0xf40 @0x5
0x0f3b…0f42 at0006 = EOL // 0xf41 @0x6
0x0f3b…0f42 }
0x0f42…0f64 9cbb 1980 PRINT "FIL-FEJL ";J3$;STATUS(J3$),J1;J2
0x0f42…0f64 LineComalBin {
0x0f42…0f64 ptr = 0x9cbb // 0xf42 @0x0
0x0f42…0f64 lno = 0x07bc // 0xf44 @0x2
0x0f42…0f64 at0004 = ╱92╱ PRINT ╱ // 0xf46 @0x4
0x0f42…0f64 at0005 = ╱22╱"╱ // 0xf47 @0x5
0x0f42…0f64 at0006 = ╱46╱F╱ // 0xf48 @0x6
0x0f42…0f64 at0007 = ╱49╱I╱ // 0xf49 @0x7
0x0f42…0f64 at0008 = ╱4c╱L╱ // 0xf4a @0x8
0x0f42…0f64 at0009 = ╱2d╱-╱ // 0xf4b @0x9
0x0f42…0f64 at000a = ╱46╱F╱ // 0xf4c @0xa
0x0f42…0f64 at000b = ╱45╱E╱ // 0xf4d @0xb
0x0f42…0f64 at000c = ╱4a╱J╱ // 0xf4e @0xc
0x0f42…0f64 at000d = ╱4c╱L╱ // 0xf4f @0xd
0x0f42…0f64 at000e = ╱20╱…╱ // 0xf50 @0xe
0x0f42…0f64 at000f = ╱22╱"╱ // 0xf51 @0xf
0x0f42…0f64 at0010 = ╱eb╱;╱ // 0xf52 @0x10
0x0f42…0f64 at0011 = ╱4a╱J╱ // 0xf53 @0x11
0x0f42…0f64 at0012 = ╱33╱3╱ // 0xf54 @0x12
0x0f42…0f64 at0013 = ╱ef╱$╱ // 0xf55 @0x13
0x0f42…0f64 at0014 = ╱eb╱;╱ // 0xf56 @0x14
0x0f42…0f64 at0015 = ╱ce╱STATUS╱ // 0xf57 @0x15
0x0f42…0f64 at0016 = ╱ed╱(╱ // 0xf58 @0x16
0x0f42…0f64 at0017 = ╱4a╱J╱ // 0xf59 @0x17
0x0f42…0f64 at0018 = ╱33╱3╱ // 0xf5a @0x18
0x0f42…0f64 at0019 = ╱ef╱$╱ // 0xf5b @0x19
0x0f42…0f64 at001a = ╱ee╱)╱ // 0xf5c @0x1a
0x0f42…0f64 at001b = ╱ec╱,╱ // 0xf5d @0x1b
0x0f42…0f64 at001c = ╱4a╱J╱ // 0xf5e @0x1c
0x0f42…0f64 at001d = ╱31╱1╱ // 0xf5f @0x1d
0x0f42…0f64 at001e = ╱eb╱;╱ // 0xf60 @0x1e
0x0f42…0f64 at001f = ╱4a╱J╱ // 0xf61 @0x1f
0x0f42…0f64 at0020 = ╱32╱2╱ // 0xf62 @0x20
0x0f42…0f64 at0021 = EOL // 0xf63 @0x21
0x0f42…0f64 }
0x0f64…0f6a 9cc1 1990 STOP
0x0f64…0f6a LineComalBin {
0x0f64…0f6a ptr = 0x9cc1 // 0xf64 @0x0
0x0f64…0f6a lno = 0x07c6 // 0xf66 @0x2
0x0f64…0f6a at0004 = ╱8d╱ STOP ╱ // 0xf68 @0x4
0x0f64…0f6a at0005 = EOL // 0xf69 @0x5
0x0f64…0f6a }
0x0f6a…0f70 9cc7 2000 ENDIF
0x0f6a…0f70 LineComalBin {
0x0f6a…0f70 ptr = 0x9cc7 // 0xf6a @0x0
0x0f6a…0f70 lno = 0x07d0 // 0xf6c @0x2
0x0f6a…0f70 at0004 = ╱9b╱ ENDIF ╱ // 0xf6e @0x4
0x0f6a…0f70 at0005 = EOL // 0xf6f @0x5
0x0f6a…0f70 }
0x0f70…0f76 9ccd 2010 ENDPROC
0x0f70…0f76 LineComalBin {
0x0f70…0f76 ptr = 0x9ccd // 0xf70 @0x0
0x0f70…0f76 lno = 0x07da // 0xf72 @0x2
0x0f70…0f76 at0004 = ╱9f╱ ENDPROC ╱ // 0xf74 @0x4
0x0f70…0f76 at0005 = EOL // 0xf75 @0x5
0x0f70…0f76 }
0x0f76…0f86 9cdd 2020 PROC INLINE(G5)
0x0f76…0f86 LineComalBin {
0x0f76…0f86 ptr = 0x9cdd // 0xf76 @0x0
0x0f76…0f86 lno = 0x07e4 // 0xf78 @0x2
0x0f76…0f86 at0004 = ╱9e╱ PROC ╱ // 0xf7a @0x4
0x0f76…0f86 at0005 = ╱49╱I╱ // 0xf7b @0x5
0x0f76…0f86 at0006 = ╱4e╱N╱ // 0xf7c @0x6
0x0f76…0f86 at0007 = ╱4c╱L╱ // 0xf7d @0x7
0x0f76…0f86 at0008 = ╱49╱I╱ // 0xf7e @0x8
0x0f76…0f86 at0009 = ╱4e╱N╱ // 0xf7f @0x9
0x0f76…0f86 at000a = ╱45╱E╱ // 0xf80 @0xa
0x0f76…0f86 at000b = ╱ed╱(╱ // 0xf81 @0xb
0x0f76…0f86 at000c = ╱47╱G╱ // 0xf82 @0xc
0x0f76…0f86 at000d = ╱35╱5╱ // 0xf83 @0xd
0x0f76…0f86 at000e = ╱ee╱)╱ // 0xf84 @0xe
0x0f76…0f86 at000f = EOL // 0xf85 @0xf
0x0f76…0f86 }
0x0f86…0f8c 9ce3 2030 REPEAT
0x0f86…0f8c LineComalBin {
0x0f86…0f8c ptr = 0x9ce3 // 0xf86 @0x0
0x0f86…0f8c lno = 0x07ee // 0xf88 @0x2
0x0f86…0f8c at0004 = ╱97╱ REPEAT ╱ // 0xf8a @0x4
0x0f86…0f8c at0005 = EOL // 0xf8b @0x5
0x0f86…0f8c }
0x0f8c…0f9f 9cf6 2040 CURSOR E6(G5),E7(G5)
0x0f8c…0f9f LineComalBin {
0x0f8c…0f9f ptr = 0x9cf6 // 0xf8c @0x0
0x0f8c…0f9f lno = 0x07f8 // 0xf8e @0x2
0x0f8c…0f9f at0004 = ╱a1╱ CURSOR ╱ // 0xf90 @0x4
0x0f8c…0f9f at0005 = ╱45╱E╱ // 0xf91 @0x5
0x0f8c…0f9f at0006 = ╱36╱6╱ // 0xf92 @0x6
0x0f8c…0f9f at0007 = ╱ed╱(╱ // 0xf93 @0x7
0x0f8c…0f9f at0008 = ╱47╱G╱ // 0xf94 @0x8
0x0f8c…0f9f at0009 = ╱35╱5╱ // 0xf95 @0x9
0x0f8c…0f9f at000a = ╱ee╱)╱ // 0xf96 @0xa
0x0f8c…0f9f at000b = ╱ec╱,╱ // 0xf97 @0xb
0x0f8c…0f9f at000c = ╱45╱E╱ // 0xf98 @0xc
0x0f8c…0f9f at000d = ╱37╱7╱ // 0xf99 @0xd
0x0f8c…0f9f at000e = ╱ed╱(╱ // 0xf9a @0xe
0x0f8c…0f9f at000f = ╱47╱G╱ // 0xf9b @0xf
0x0f8c…0f9f at0010 = ╱35╱5╱ // 0xf9c @0x10
0x0f8c…0f9f at0011 = ╱ee╱)╱ // 0xf9d @0x11
0x0f8c…0f9f at0012 = EOL // 0xf9e @0x12
0x0f8c…0f9f }
0x0f9f…0fab 9d02 2050 INPUT "",F0$
0x0f9f…0fab LineComalBin {
0x0f9f…0fab ptr = 0x9d02 // 0xf9f @0x0
0x0f9f…0fab lno = 0x0802 // 0xfa1 @0x2
0x0f9f…0fab at0004 = ╱91╱ INPUT ╱ // 0xfa3 @0x4
0x0f9f…0fab at0005 = ╱22╱"╱ // 0xfa4 @0x5
0x0f9f…0fab at0006 = ╱22╱"╱ // 0xfa5 @0x6
0x0f9f…0fab at0007 = ╱ec╱,╱ // 0xfa6 @0x7
0x0f9f…0fab at0008 = ╱46╱F╱ // 0xfa7 @0x8
0x0f9f…0fab at0009 = ╱30╱0╱ // 0xfa8 @0x9
0x0f9f…0fab at000a = ╱ef╱$╱ // 0xfa9 @0xa
0x0f9f…0fab at000b = EOL // 0xfaa @0xb
0x0f9f…0fab }
0x0fab…0fba 9d11 2060 IF E8(G5)<B THEN
0x0fab…0fba LineComalBin {
0x0fab…0fba ptr = 0x9d11 // 0xfab @0x0
0x0fab…0fba lno = 0x080c // 0xfad @0x2
0x0fab…0fba at0004 = ╱9c╱ IF ╱ // 0xfaf @0x4
0x0fab…0fba at0005 = ╱45╱E╱ // 0xfb0 @0x5
0x0fab…0fba at0006 = ╱38╱8╱ // 0xfb1 @0x6
0x0fab…0fba at0007 = ╱ed╱(╱ // 0xfb2 @0x7
0x0fab…0fba at0008 = ╱47╱G╱ // 0xfb3 @0x8
0x0fab…0fba at0009 = ╱35╱5╱ // 0xfb4 @0x9
0x0fab…0fba at000a = ╱ee╱)╱ // 0xfb5 @0xa
0x0fab…0fba at000b = ╱dd╱<╱ // 0xfb6 @0xb
0x0fab…0fba at000c = ╱42╱B╱ // 0xfb7 @0xc
0x0fab…0fba at000d = ╱b6╱ THEN ╱ // 0xfb8 @0xd
0x0fab…0fba at000e = EOL // 0xfb9 @0xe
0x0fab…0fba }
0x0fba…0fc3 9d1a 2065 J4=B
0x0fba…0fc3 LineComalBin {
0x0fba…0fc3 ptr = 0x9d1a // 0xfba @0x0
0x0fba…0fc3 lno = 0x0811 // 0xfbc @0x2
0x0fba…0fc3 at0004 = ╱4a╱J╱ // 0xfbe @0x4
0x0fba…0fc3 at0005 = ╱34╱4╱ // 0xfbf @0x5
0x0fba…0fc3 at0006 = ╱dc╱=╱ // 0xfc0 @0x6
0x0fba…0fc3 at0007 = ╱42╱B╱ // 0xfc1 @0x7
0x0fba…0fc3 at0008 = EOL // 0xfc2 @0x8
0x0fba…0fc3 }
0x0fc3…0fda 9d31 2070 IF LEN(F0$)<=ABS(E8(G5)) THEN
0x0fc3…0fda LineComalBin {
0x0fc3…0fda ptr = 0x9d31 // 0xfc3 @0x0
0x0fc3…0fda lno = 0x0816 // 0xfc5 @0x2
0x0fc3…0fda at0004 = ╱9c╱ IF ╱ // 0xfc7 @0x4
0x0fc3…0fda at0005 = ╱cc╱LEN╱ // 0xfc8 @0x5
0x0fc3…0fda at0006 = ╱ed╱(╱ // 0xfc9 @0x6
0x0fc3…0fda at0007 = ╱46╱F╱ // 0xfca @0x7
0x0fc3…0fda at0008 = ╱30╱0╱ // 0xfcb @0x8
0x0fc3…0fda at0009 = ╱ef╱$╱ // 0xfcc @0x9
0x0fc3…0fda at000a = ╱ee╱)╱ // 0xfcd @0xa
0x0fc3…0fda at000b = ╱df╱<=╱ // 0xfce @0xb
0x0fc3…0fda at000c = ╱c4╱ABS╱ // 0xfcf @0xc
0x0fc3…0fda at000d = ╱ed╱(╱ // 0xfd0 @0xd
0x0fc3…0fda at000e = ╱45╱E╱ // 0xfd1 @0xe
0x0fc3…0fda at000f = ╱38╱8╱ // 0xfd2 @0xf
0x0fc3…0fda at0010 = ╱ed╱(╱ // 0xfd3 @0x10
0x0fc3…0fda at0011 = ╱47╱G╱ // 0xfd4 @0x11
0x0fc3…0fda at0012 = ╱35╱5╱ // 0xfd5 @0x12
0x0fc3…0fda at0013 = ╱ee╱)╱ // 0xfd6 @0x13
0x0fc3…0fda at0014 = ╱ee╱)╱ // 0xfd7 @0x14
0x0fc3…0fda at0015 = ╱b6╱ THEN ╱ // 0xfd8 @0x15
0x0fc3…0fda at0016 = EOL // 0xfd9 @0x16
0x0fc3…0fda }
0x0fda…0fe3 9d3a 2080 J4=E
0x0fda…0fe3 LineComalBin {
0x0fda…0fe3 ptr = 0x9d3a // 0xfda @0x0
0x0fda…0fe3 lno = 0x0820 // 0xfdc @0x2
0x0fda…0fe3 at0004 = ╱4a╱J╱ // 0xfde @0x4
0x0fda…0fe3 at0005 = ╱34╱4╱ // 0xfdf @0x5
0x0fda…0fe3 at0006 = ╱dc╱=╱ // 0xfe0 @0x6
0x0fda…0fe3 at0007 = ╱45╱E╱ // 0xfe1 @0x7
0x0fda…0fe3 at0008 = EOL // 0xfe2 @0x8
0x0fda…0fe3 }
0x0fe3…0ffd 9d54 2090 FOR I=LEN(F0$)+E TO ABS(E8(G5))
0x0fe3…0ffd LineComalBin {
0x0fe3…0ffd ptr = 0x9d54 // 0xfe3 @0x0
0x0fe3…0ffd lno = 0x082a // 0xfe5 @0x2
0x0fe3…0ffd at0004 = ╱83╱ FOR ╱ // 0xfe7 @0x4
0x0fe3…0ffd at0005 = ╱49╱I╱ // 0xfe8 @0x5
0x0fe3…0ffd at0006 = ╱dc╱=╱ // 0xfe9 @0x6
0x0fe3…0ffd at0007 = ╱cc╱LEN╱ // 0xfea @0x7
0x0fe3…0ffd at0008 = ╱ed╱(╱ // 0xfeb @0x8
0x0fe3…0ffd at0009 = ╱46╱F╱ // 0xfec @0x9
0x0fe3…0ffd at000a = ╱30╱0╱ // 0xfed @0xa
0x0fe3…0ffd at000b = ╱ef╱$╱ // 0xfee @0xb
0x0fe3…0ffd at000c = ╱ee╱)╱ // 0xfef @0xc
0x0fe3…0ffd at000d = ╱e2╱+╱ // 0xff0 @0xd
0x0fe3…0ffd at000e = ╱45╱E╱ // 0xff1 @0xe
0x0fe3…0ffd at000f = ╱b7╱ TO ╱ // 0xff2 @0xf
0x0fe3…0ffd at0010 = ╱c4╱ABS╱ // 0xff3 @0x10
0x0fe3…0ffd at0011 = ╱ed╱(╱ // 0xff4 @0x11
0x0fe3…0ffd at0012 = ╱45╱E╱ // 0xff5 @0x12
0x0fe3…0ffd at0013 = ╱38╱8╱ // 0xff6 @0x13
0x0fe3…0ffd at0014 = ╱ed╱(╱ // 0xff7 @0x14
0x0fe3…0ffd at0015 = ╱47╱G╱ // 0xff8 @0x15
0x0fe3…0ffd at0016 = ╱35╱5╱ // 0xff9 @0x16
0x0fe3…0ffd at0017 = ╱ee╱)╱ // 0xffa @0x17
0x0fe3…0ffd at0018 = ╱ee╱)╱ // 0xffb @0x18
0x0fe3…0ffd at0019 = EOL // 0xffc @0x19
0x0fe3…0ffd }
0x0ffd…100c 9d63 2100 F0$(I)=" "
0x0ffd…100c LineComalBin {
0x0ffd…100c ptr = 0x9d63 // 0xffd @0x0
0x0ffd…100c lno = 0x0834 // 0xfff @0x2
0x0ffd…100c at0004 = ╱46╱F╱ // 0x1001 @0x4
0x0ffd…100c at0005 = ╱30╱0╱ // 0x1002 @0x5
0x0ffd…100c at0006 = ╱ef╱$╱ // 0x1003 @0x6
0x0ffd…100c at0007 = ╱ed╱(╱ // 0x1004 @0x7
0x0ffd…100c at0008 = ╱49╱I╱ // 0x1005 @0x8
0x0ffd…100c at0009 = ╱ee╱)╱ // 0x1006 @0x9
0x0ffd…100c at000a = ╱dc╱=╱ // 0x1007 @0xa
0x0ffd…100c at000b = ╱22╱"╱ // 0x1008 @0xb
0x0ffd…100c at000c = ╱20╱…╱ // 0x1009 @0xc
0x0ffd…100c at000d = ╱22╱"╱ // 0x100a @0xd
0x0ffd…100c at000e = EOL // 0x100b @0xe
0x0ffd…100c }
0x100c…1013 9d6a 2110 NEXT I
0x100c…1013 LineComalBin {
0x100c…1013 ptr = 0x9d6a // 0x100c @0x0
0x100c…1013 lno = 0x083e // 0x100e @0x2
0x100c…1013 at0004 = ╱84╱ NEXT ╱ // 0x1010 @0x4
0x100c…1013 at0005 = ╱49╱I╱ // 0x1011 @0x5
0x100c…1013 at0006 = EOL // 0x1012 @0x6
0x100c…1013 }
0x1013…1019 9d70 2140 ENDIF
0x1013…1019 LineComalBin {
0x1013…1019 ptr = 0x9d70 // 0x1013 @0x0
0x1013…1019 lno = 0x085c // 0x1015 @0x2
0x1013…1019 at0004 = ╱9b╱ ENDIF ╱ // 0x1017 @0x4
0x1013…1019 at0005 = EOL // 0x1018 @0x5
0x1013…1019 }
0x1019…101f 9d76 2150 ELSE
0x1019…101f LineComalBin {
0x1019…101f ptr = 0x9d76 // 0x1019 @0x0
0x1019…101f lno = 0x0866 // 0x101b @0x2
0x1019…101f at0004 = ╱9a╱ ELSE ╱ // 0x101d @0x4
0x1019…101f at0005 = EOL // 0x101e @0x5
0x1019…101f }
0x101f…1032 9d89 2160 EXEC CHECK(F0$,J4)
0x101f…1032 LineComalBin {
0x101f…1032 ptr = 0x9d89 // 0x101f @0x0
0x101f…1032 lno = 0x0870 // 0x1021 @0x2
0x101f…1032 at0004 = ╱9d╱ EXEC ╱ // 0x1023 @0x4
0x101f…1032 at0005 = ╱43╱C╱ // 0x1024 @0x5
0x101f…1032 at0006 = ╱48╱H╱ // 0x1025 @0x6
0x101f…1032 at0007 = ╱45╱E╱ // 0x1026 @0x7
0x101f…1032 at0008 = ╱43╱C╱ // 0x1027 @0x8
0x101f…1032 at0009 = ╱4b╱K╱ // 0x1028 @0x9
0x101f…1032 at000a = ╱ed╱(╱ // 0x1029 @0xa
0x101f…1032 at000b = ╱46╱F╱ // 0x102a @0xb
0x101f…1032 at000c = ╱30╱0╱ // 0x102b @0xc
0x101f…1032 at000d = ╱ef╱$╱ // 0x102c @0xd
0x101f…1032 at000e = ╱ec╱,╱ // 0x102d @0xe
0x101f…1032 at000f = ╱4a╱J╱ // 0x102e @0xf
0x101f…1032 at0010 = ╱34╱4╱ // 0x102f @0x10
0x101f…1032 at0011 = ╱ee╱)╱ // 0x1030 @0x11
0x101f…1032 at0012 = EOL // 0x1031 @0x12
0x101f…1032 }
0x1032…104f 9da6 2170 IF E8(G5)>B AND E8(G5)<>J4 THEN J4=B
0x1032…104f LineComalBin {
0x1032…104f ptr = 0x9da6 // 0x1032 @0x0
0x1032…104f lno = 0x087a // 0x1034 @0x2
0x1032…104f at0004 = ╱82╱ IF ╱ // 0x1036 @0x4
0x1032…104f at0005 = ╱45╱E╱ // 0x1037 @0x5
0x1032…104f at0006 = ╱38╱8╱ // 0x1038 @0x6
0x1032…104f at0007 = ╱ed╱(╱ // 0x1039 @0x7
0x1032…104f at0008 = ╱47╱G╱ // 0x103a @0x8
0x1032…104f at0009 = ╱35╱5╱ // 0x103b @0x9
0x1032…104f at000a = ╱ee╱)╱ // 0x103c @0xa
0x1032…104f at000b = ╱de╱>╱ // 0x103d @0xb
0x1032…104f at000c = ╱42╱B╱ // 0x103e @0xc
0x1032…104f at000d = ╱da╱ AND ╱ // 0x103f @0xd
0x1032…104f at000e = ╱45╱E╱ // 0x1040 @0xe
0x1032…104f at000f = ╱38╱8╱ // 0x1041 @0xf
0x1032…104f at0010 = ╱ed╱(╱ // 0x1042 @0x10
0x1032…104f at0011 = ╱47╱G╱ // 0x1043 @0x11
0x1032…104f at0012 = ╱35╱5╱ // 0x1044 @0x12
0x1032…104f at0013 = ╱ee╱)╱ // 0x1045 @0x13
0x1032…104f at0014 = ╱e1╱<>╱ // 0x1046 @0x14
0x1032…104f at0015 = ╱4a╱J╱ // 0x1047 @0x15
0x1032…104f at0016 = ╱34╱4╱ // 0x1048 @0x16
0x1032…104f at0017 = ╱b6╱ THEN ╱ // 0x1049 @0x17
0x1032…104f at0018 = ╱4a╱J╱ // 0x104a @0x18
0x1032…104f at0019 = ╱34╱4╱ // 0x104b @0x19
0x1032…104f at001a = ╱dc╱=╱ // 0x104c @0x1a
0x1032…104f at001b = ╱42╱B╱ // 0x104d @0x1b
0x1032…104f at001c = EOL // 0x104e @0x1c
0x1032…104f }
0x104f…1055 9dac 2180 ENDIF
0x104f…1055 LineComalBin {
0x104f…1055 ptr = 0x9dac // 0x104f @0x0
0x104f…1055 lno = 0x0884 // 0x1051 @0x2
0x104f…1055 at0004 = ╱9b╱ ENDIF ╱ // 0x1053 @0x4
0x104f…1055 at0005 = EOL // 0x1054 @0x5
0x104f…1055 }
0x1055…105f 9db6 2190 UNTIL J4<>B
0x1055…105f LineComalBin {
0x1055…105f ptr = 0x9db6 // 0x1055 @0x0
0x1055…105f lno = 0x088e // 0x1057 @0x2
0x1055…105f at0004 = ╱98╱ UNTIL ╱ // 0x1059 @0x4
0x1055…105f at0005 = ╱4a╱J╱ // 0x105a @0x5
0x1055…105f at0006 = ╱34╱4╱ // 0x105b @0x6
0x1055…105f at0007 = ╱e1╱<>╱ // 0x105c @0x7
0x1055…105f at0008 = ╱42╱B╱ // 0x105d @0x8
0x1055…105f at0009 = EOL // 0x105e @0x9
0x1055…105f }
0x105f…1065 9dbc 2200 ENDPROC
0x105f…1065 LineComalBin {
0x105f…1065 ptr = 0x9dbc // 0x105f @0x0
0x105f…1065 lno = 0x0898 // 0x1061 @0x2
0x105f…1065 at0004 = ╱9f╱ ENDPROC ╱ // 0x1063 @0x4
0x105f…1065 at0005 = EOL // 0x1064 @0x5
0x105f…1065 }
0x1065…1074 9dcb 2210 PROC SKRIVPICT
0x1065…1074 LineComalBin {
0x1065…1074 ptr = 0x9dcb // 0x1065 @0x0
0x1065…1074 lno = 0x08a2 // 0x1067 @0x2
0x1065…1074 at0004 = ╱9e╱ PROC ╱ // 0x1069 @0x4
0x1065…1074 at0005 = ╱53╱S╱ // 0x106a @0x5
0x1065…1074 at0006 = ╱4b╱K╱ // 0x106b @0x6
0x1065…1074 at0007 = ╱52╱R╱ // 0x106c @0x7
0x1065…1074 at0008 = ╱49╱I╱ // 0x106d @0x8
0x1065…1074 at0009 = ╱56╱V╱ // 0x106e @0x9
0x1065…1074 at000a = ╱50╱P╱ // 0x106f @0xa
0x1065…1074 at000b = ╱49╱I╱ // 0x1070 @0xb
0x1065…1074 at000c = ╱43╱C╱ // 0x1071 @0xc
0x1065…1074 at000d = ╱54╱T╱ // 0x1072 @0xd
0x1065…1074 at000e = EOL // 0x1073 @0xe
0x1065…1074 }
0x1074…107a 9dd1 2220 CLEAR
0x1074…107a LineComalBin {
0x1074…107a ptr = 0x9dd1 // 0x1074 @0x0
0x1074…107a lno = 0x08ac // 0x1076 @0x2
0x1074…107a at0004 = ╱a0╱ CLEAR ╱ // 0x1078 @0x4
0x1074…107a at0005 = EOL // 0x1079 @0x5
0x1074…107a }
0x107a…1096 9ded 2230 PRINT TAB(17);"Afregning"
0x107a…1096 LineComalBin {
0x107a…1096 ptr = 0x9ded // 0x107a @0x0
0x107a…1096 lno = 0x08b6 // 0x107c @0x2
0x107a…1096 at0004 = ╱92╱ PRINT ╱ // 0x107e @0x4
0x107a…1096 at0005 = ╱d2╱TAB╱ // 0x107f @0x5
0x107a…1096 at0006 = ╱ed╱(╱ // 0x1080 @0x6
0x107a…1096 at0007 = ╱31╱1╱ // 0x1081 @0x7
0x107a…1096 at0008 = ╱37╱7╱ // 0x1082 @0x8
0x107a…1096 at0009 = ╱fe00008805╱ // 0x1083 @0x9
0x107a…1096 at000e = ╱ee╱)╱ // 0x1088 @0xe
0x107a…1096 at000f = ╱eb╱;╱ // 0x1089 @0xf
0x107a…1096 at0010 = ╱22╱"╱ // 0x108a @0x10
0x107a…1096 at0011 = ╱41╱A╱ // 0x108b @0x11
0x107a…1096 at0012 = ╱66╱f╱ // 0x108c @0x12
0x107a…1096 at0013 = ╱72╱r╱ // 0x108d @0x13
0x107a…1096 at0014 = ╱65╱e╱ // 0x108e @0x14
0x107a…1096 at0015 = ╱67╱g╱ // 0x108f @0x15
0x107a…1096 at0016 = ╱6e╱n╱ // 0x1090 @0x16
0x107a…1096 at0017 = ╱69╱i╱ // 0x1091 @0x17
0x107a…1096 at0018 = ╱6e╱n╱ // 0x1092 @0x18
0x107a…1096 at0019 = ╱67╱g╱ // 0x1093 @0x19
0x107a…1096 at001a = ╱22╱"╱ // 0x1094 @0x1a
0x107a…1096 at001b = EOL // 0x1095 @0x1b
0x107a…1096 }
0x1096…109c 9df3 2240 PRINT
0x1096…109c LineComalBin {
0x1096…109c ptr = 0x9df3 // 0x1096 @0x0
0x1096…109c lno = 0x08c0 // 0x1098 @0x2
0x1096…109c at0004 = ╱92╱ PRINT ╱ // 0x109a @0x4
0x1096…109c at0005 = EOL // 0x109b @0x5
0x1096…109c }
0x109c…10a2 9df9 2250 PRINT
0x109c…10a2 LineComalBin {
0x109c…10a2 ptr = 0x9df9 // 0x109c @0x0
0x109c…10a2 lno = 0x08ca // 0x109e @0x2
0x109c…10a2 at0004 = ╱92╱ PRINT ╱ // 0x10a0 @0x4
0x109c…10a2 at0005 = EOL // 0x10a1 @0x5
0x109c…10a2 }
0x10a2…10c4 9e1b 2260 PRINT " Maksimum feriedage i året"
0x10a2…10c4 LineComalBin {
0x10a2…10c4 ptr = 0x9e1b // 0x10a2 @0x0
0x10a2…10c4 lno = 0x08d4 // 0x10a4 @0x2
0x10a2…10c4 at0004 = ╱92╱ PRINT ╱ // 0x10a6 @0x4
0x10a2…10c4 at0005 = ╱22╱"╱ // 0x10a7 @0x5
0x10a2…10c4 at0006 = ╱20╱…╱ // 0x10a8 @0x6
0x10a2…10c4 at0007 = ╱4d╱M╱ // 0x10a9 @0x7
0x10a2…10c4 at0008 = ╱61╱a╱ // 0x10aa @0x8
0x10a2…10c4 at0009 = ╱6b╱k╱ // 0x10ab @0x9
0x10a2…10c4 at000a = ╱73╱s╱ // 0x10ac @0xa
0x10a2…10c4 at000b = ╱69╱i╱ // 0x10ad @0xb
0x10a2…10c4 at000c = ╱6d╱m╱ // 0x10ae @0xc
0x10a2…10c4 at000d = ╱75╱u╱ // 0x10af @0xd
0x10a2…10c4 at000e = ╱6d╱m╱ // 0x10b0 @0xe
0x10a2…10c4 at000f = ╱20╱…╱ // 0x10b1 @0xf
0x10a2…10c4 at0010 = ╱66╱f╱ // 0x10b2 @0x10
0x10a2…10c4 at0011 = ╱65╱e╱ // 0x10b3 @0x11
0x10a2…10c4 at0012 = ╱72╱r╱ // 0x10b4 @0x12
0x10a2…10c4 at0013 = ╱69╱i╱ // 0x10b5 @0x13
0x10a2…10c4 at0014 = ╱65╱e╱ // 0x10b6 @0x14
0x10a2…10c4 at0015 = ╱64╱d╱ // 0x10b7 @0x15
0x10a2…10c4 at0016 = ╱61╱a╱ // 0x10b8 @0x16
0x10a2…10c4 at0017 = ╱67╱g╱ // 0x10b9 @0x17
0x10a2…10c4 at0018 = ╱65╱e╱ // 0x10ba @0x18
0x10a2…10c4 at0019 = ╱20╱…╱ // 0x10bb @0x19
0x10a2…10c4 at001a = ╱69╱i╱ // 0x10bc @0x1a
0x10a2…10c4 at001b = ╱20╱…╱ // 0x10bd @0x1b
0x10a2…10c4 at001c = ╱7d╱å╱ // 0x10be @0x1c
0x10a2…10c4 at001d = ╱72╱r╱ // 0x10bf @0x1d
0x10a2…10c4 at001e = ╱65╱e╱ // 0x10c0 @0x1e
0x10a2…10c4 at001f = ╱74╱t╱ // 0x10c1 @0x1f
0x10a2…10c4 at0020 = ╱22╱"╱ // 0x10c2 @0x20
0x10a2…10c4 at0021 = EOL // 0x10c3 @0x21
0x10a2…10c4 }
0x10c4…10ef 9e46 2270 PRINT " Lønperiodekode 1,2,3,4,5,6 eller 7"
0x10c4…10ef LineComalBin {
0x10c4…10ef ptr = 0x9e46 // 0x10c4 @0x0
0x10c4…10ef lno = 0x08de // 0x10c6 @0x2
0x10c4…10ef at0004 = ╱92╱ PRINT ╱ // 0x10c8 @0x4
0x10c4…10ef at0005 = ╱22╱"╱ // 0x10c9 @0x5
0x10c4…10ef at0006 = ╱20╱…╱ // 0x10ca @0x6
0x10c4…10ef at0007 = ╱4c╱L╱ // 0x10cb @0x7
0x10c4…10ef at0008 = ╱7c╱ø╱ // 0x10cc @0x8
0x10c4…10ef at0009 = ╱6e╱n╱ // 0x10cd @0x9
0x10c4…10ef at000a = ╱70╱p╱ // 0x10ce @0xa
0x10c4…10ef at000b = ╱65╱e╱ // 0x10cf @0xb
0x10c4…10ef at000c = ╱72╱r╱ // 0x10d0 @0xc
0x10c4…10ef at000d = ╱69╱i╱ // 0x10d1 @0xd
0x10c4…10ef at000e = ╱6f╱o╱ // 0x10d2 @0xe
0x10c4…10ef at000f = ╱64╱d╱ // 0x10d3 @0xf
0x10c4…10ef at0010 = ╱65╱e╱ // 0x10d4 @0x10
0x10c4…10ef at0011 = ╱6b╱k╱ // 0x10d5 @0x11
0x10c4…10ef at0012 = ╱6f╱o╱ // 0x10d6 @0x12
0x10c4…10ef at0013 = ╱64╱d╱ // 0x10d7 @0x13
0x10c4…10ef at0014 = ╱65╱e╱ // 0x10d8 @0x14
0x10c4…10ef at0015 = ╱20╱…╱ // 0x10d9 @0x15
0x10c4…10ef at0016 = ╱31╱1╱ // 0x10da @0x16
0x10c4…10ef at0017 = ╱2c╱,╱ // 0x10db @0x17
0x10c4…10ef at0018 = ╱32╱2╱ // 0x10dc @0x18
0x10c4…10ef at0019 = ╱2c╱,╱ // 0x10dd @0x19
0x10c4…10ef at001a = ╱33╱3╱ // 0x10de @0x1a
0x10c4…10ef at001b = ╱2c╱,╱ // 0x10df @0x1b
0x10c4…10ef at001c = ╱34╱4╱ // 0x10e0 @0x1c
0x10c4…10ef at001d = ╱2c╱,╱ // 0x10e1 @0x1d
0x10c4…10ef at001e = ╱35╱5╱ // 0x10e2 @0x1e
0x10c4…10ef at001f = ╱2c╱,╱ // 0x10e3 @0x1f
0x10c4…10ef at0020 = ╱36╱6╱ // 0x10e4 @0x20
0x10c4…10ef at0021 = ╱20╱…╱ // 0x10e5 @0x21
0x10c4…10ef at0022 = ╱65╱e╱ // 0x10e6 @0x22
0x10c4…10ef at0023 = ╱6c╱l╱ // 0x10e7 @0x23
0x10c4…10ef at0024 = ╱6c╱l╱ // 0x10e8 @0x24
0x10c4…10ef at0025 = ╱65╱e╱ // 0x10e9 @0x25
0x10c4…10ef at0026 = ╱72╱r╱ // 0x10ea @0x26
0x10c4…10ef at0027 = ╱20╱…╱ // 0x10eb @0x27
0x10c4…10ef at0028 = ╱37╱7╱ // 0x10ec @0x28
0x10c4…10ef at0029 = ╱22╱"╱ // 0x10ed @0x29
0x10c4…10ef at002a = EOL // 0x10ee @0x2a
0x10c4…10ef }
0x10ef…111a 9e71 2280 PRINT " Arbejdere(A) eller funktionærer(F)"
0x10ef…111a LineComalBin {
0x10ef…111a ptr = 0x9e71 // 0x10ef @0x0
0x10ef…111a lno = 0x08e8 // 0x10f1 @0x2
0x10ef…111a at0004 = ╱92╱ PRINT ╱ // 0x10f3 @0x4
0x10ef…111a at0005 = ╱22╱"╱ // 0x10f4 @0x5
0x10ef…111a at0006 = ╱20╱…╱ // 0x10f5 @0x6
0x10ef…111a at0007 = ╱41╱A╱ // 0x10f6 @0x7
0x10ef…111a at0008 = ╱72╱r╱ // 0x10f7 @0x8
0x10ef…111a at0009 = ╱62╱b╱ // 0x10f8 @0x9
0x10ef…111a at000a = ╱65╱e╱ // 0x10f9 @0xa
0x10ef…111a at000b = ╱6a╱j╱ // 0x10fa @0xb
0x10ef…111a at000c = ╱64╱d╱ // 0x10fb @0xc
0x10ef…111a at000d = ╱65╱e╱ // 0x10fc @0xd
0x10ef…111a at000e = ╱72╱r╱ // 0x10fd @0xe
0x10ef…111a at000f = ╱65╱e╱ // 0x10fe @0xf
0x10ef…111a at0010 = ╱28╱(╱ // 0x10ff @0x10
0x10ef…111a at0011 = ╱41╱A╱ // 0x1100 @0x11
0x10ef…111a at0012 = ╱29╱)╱ // 0x1101 @0x12
0x10ef…111a at0013 = ╱20╱…╱ // 0x1102 @0x13
0x10ef…111a at0014 = ╱65╱e╱ // 0x1103 @0x14
0x10ef…111a at0015 = ╱6c╱l╱ // 0x1104 @0x15
0x10ef…111a at0016 = ╱6c╱l╱ // 0x1105 @0x16
0x10ef…111a at0017 = ╱65╱e╱ // 0x1106 @0x17
0x10ef…111a at0018 = ╱72╱r╱ // 0x1107 @0x18
0x10ef…111a at0019 = ╱20╱…╱ // 0x1108 @0x19
0x10ef…111a at001a = ╱66╱f╱ // 0x1109 @0x1a
0x10ef…111a at001b = ╱75╱u╱ // 0x110a @0x1b
0x10ef…111a at001c = ╱6e╱n╱ // 0x110b @0x1c
0x10ef…111a at001d = ╱6b╱k╱ // 0x110c @0x1d
0x10ef…111a at001e = ╱74╱t╱ // 0x110d @0x1e
0x10ef…111a at001f = ╱69╱i╱ // 0x110e @0x1f
0x10ef…111a at0020 = ╱6f╱o╱ // 0x110f @0x20
0x10ef…111a at0021 = ╱6e╱n╱ // 0x1110 @0x21
0x10ef…111a at0022 = ╱7b╱æ╱ // 0x1111 @0x22
0x10ef…111a at0023 = ╱72╱r╱ // 0x1112 @0x23
0x10ef…111a at0024 = ╱65╱e╱ // 0x1113 @0x24
0x10ef…111a at0025 = ╱72╱r╱ // 0x1114 @0x25
0x10ef…111a at0026 = ╱28╱(╱ // 0x1115 @0x26
0x10ef…111a at0027 = ╱46╱F╱ // 0x1116 @0x27
0x10ef…111a at0028 = ╱29╱)╱ // 0x1117 @0x28
0x10ef…111a at0029 = ╱22╱"╱ // 0x1118 @0x29
0x10ef…111a at002a = EOL // 0x1119 @0x2a
0x10ef…111a }
0x111a…1120 9e77 2290 PRINT
0x111a…1120 LineComalBin {
0x111a…1120 ptr = 0x9e77 // 0x111a @0x0
0x111a…1120 lno = 0x08f2 // 0x111c @0x2
0x111a…1120 at0004 = ╱92╱ PRINT ╱ // 0x111e @0x4
0x111a…1120 at0005 = EOL // 0x111f @0x5
0x111a…1120 }
0x1120…1126 9e7d 2300 PRINT
0x1120…1126 LineComalBin {
0x1120…1126 ptr = 0x9e7d // 0x1120 @0x0
0x1120…1126 lno = 0x08fc // 0x1122 @0x2
0x1120…1126 at0004 = ╱92╱ PRINT ╱ // 0x1124 @0x4
0x1120…1126 at0005 = EOL // 0x1125 @0x5
0x1120…1126 }
0x1126…112c 9e83 2310 ;
0x1126…112c LineComalBin {
0x1126…112c ptr = 0x9e83 // 0x1126 @0x0
0x1126…112c lno = 0x0906 // 0x1128 @0x2
0x1126…112c at0004 = ╱b2╱ ; ╱ // 0x112a @0x4
0x1126…112c at0005 = EOL // 0x112b @0x5
0x1126…112c }
0x112c…1132 9e89 2320 PRINT
0x112c…1132 LineComalBin {
0x112c…1132 ptr = 0x9e89 // 0x112c @0x0
0x112c…1132 lno = 0x0910 // 0x112e @0x2
0x112c…1132 at0004 = ╱92╱ PRINT ╱ // 0x1130 @0x4
0x112c…1132 at0005 = EOL // 0x1131 @0x5
0x112c…1132 }
0x1132…1161 9eb8 2330 PRINT " Feriepengeopgørelse: start-slutdag"
0x1132…1161 LineComalBin {
0x1132…1161 ptr = 0x9eb8 // 0x1132 @0x0
0x1132…1161 lno = 0x091a // 0x1134 @0x2
0x1132…1161 at0004 = ╱92╱ PRINT ╱ // 0x1136 @0x4
0x1132…1161 at0005 = ╱22╱"╱ // 0x1137 @0x5
0x1132…1161 at0006 = ╱20╱…╱ // 0x1138 @0x6
0x1132…1161 at0007 = ╱46╱F╱ // 0x1139 @0x7
0x1132…1161 at0008 = ╱65╱e╱ // 0x113a @0x8
0x1132…1161 at0009 = ╱72╱r╱ // 0x113b @0x9
0x1132…1161 at000a = ╱69╱i╱ // 0x113c @0xa
0x1132…1161 at000b = ╱65╱e╱ // 0x113d @0xb
0x1132…1161 at000c = ╱70╱p╱ // 0x113e @0xc
0x1132…1161 at000d = ╱65╱e╱ // 0x113f @0xd
0x1132…1161 at000e = ╱6e╱n╱ // 0x1140 @0xe
0x1132…1161 at000f = ╱67╱g╱ // 0x1141 @0xf
0x1132…1161 at0010 = ╱65╱e╱ // 0x1142 @0x10
0x1132…1161 at0011 = ╱6f╱o╱ // 0x1143 @0x11
0x1132…1161 at0012 = ╱70╱p╱ // 0x1144 @0x12
0x1132…1161 at0013 = ╱67╱g╱ // 0x1145 @0x13
0x1132…1161 at0014 = ╱7c╱ø╱ // 0x1146 @0x14
0x1132…1161 at0015 = ╱72╱r╱ // 0x1147 @0x15
0x1132…1161 at0016 = ╱65╱e╱ // 0x1148 @0x16
0x1132…1161 at0017 = ╱6c╱l╱ // 0x1149 @0x17
0x1132…1161 at0018 = ╱73╱s╱ // 0x114a @0x18
0x1132…1161 at0019 = ╱65╱e╱ // 0x114b @0x19
0x1132…1161 at001a = ╱3a╱:╱ // 0x114c @0x1a
0x1132…1161 at001b = ╱20╱…╱ // 0x114d @0x1b
0x1132…1161 at001c = ╱20╱…╱ // 0x114e @0x1c
0x1132…1161 at001d = ╱20╱…╱ // 0x114f @0x1d
0x1132…1161 at001e = ╱20╱…╱ // 0x1150 @0x1e
0x1132…1161 at001f = ╱20╱…╱ // 0x1151 @0x1f
0x1132…1161 at0020 = ╱73╱s╱ // 0x1152 @0x20
0x1132…1161 at0021 = ╱74╱t╱ // 0x1153 @0x21
0x1132…1161 at0022 = ╱61╱a╱ // 0x1154 @0x22
0x1132…1161 at0023 = ╱72╱r╱ // 0x1155 @0x23
0x1132…1161 at0024 = ╱74╱t╱ // 0x1156 @0x24
0x1132…1161 at0025 = ╱2d╱-╱ // 0x1157 @0x25
0x1132…1161 at0026 = ╱73╱s╱ // 0x1158 @0x26
0x1132…1161 at0027 = ╱6c╱l╱ // 0x1159 @0x27
0x1132…1161 at0028 = ╱75╱u╱ // 0x115a @0x28
0x1132…1161 at0029 = ╱74╱t╱ // 0x115b @0x29
0x1132…1161 at002a = ╱64╱d╱ // 0x115c @0x2a
0x1132…1161 at002b = ╱61╱a╱ // 0x115d @0x2b
0x1132…1161 at002c = ╱67╱g╱ // 0x115e @0x2c
0x1132…1161 at002d = ╱22╱"╱ // 0x115f @0x2d
0x1132…1161 at002e = EOL // 0x1160 @0x2e
0x1132…1161 }
0x1161…117b 9ed2 2340 PRINT " Feriekode 1/lønnr"
0x1161…117b LineComalBin {
0x1161…117b ptr = 0x9ed2 // 0x1161 @0x0
0x1161…117b lno = 0x0924 // 0x1163 @0x2
0x1161…117b at0004 = ╱92╱ PRINT ╱ // 0x1165 @0x4
0x1161…117b at0005 = ╱22╱"╱ // 0x1166 @0x5
0x1161…117b at0006 = ╱20╱…╱ // 0x1167 @0x6
0x1161…117b at0007 = ╱46╱F╱ // 0x1168 @0x7
0x1161…117b at0008 = ╱65╱e╱ // 0x1169 @0x8
0x1161…117b at0009 = ╱72╱r╱ // 0x116a @0x9
0x1161…117b at000a = ╱69╱i╱ // 0x116b @0xa
0x1161…117b at000b = ╱65╱e╱ // 0x116c @0xb
0x1161…117b at000c = ╱6b╱k╱ // 0x116d @0xc
0x1161…117b at000d = ╱6f╱o╱ // 0x116e @0xd
0x1161…117b at000e = ╱64╱d╱ // 0x116f @0xe
0x1161…117b at000f = ╱65╱e╱ // 0x1170 @0xf
0x1161…117b at0010 = ╱20╱…╱ // 0x1171 @0x10
0x1161…117b at0011 = ╱31╱1╱ // 0x1172 @0x11
0x1161…117b at0012 = ╱2f╱/╱ // 0x1173 @0x12
0x1161…117b at0013 = ╱6c╱l╱ // 0x1174 @0x13
0x1161…117b at0014 = ╱7c╱ø╱ // 0x1175 @0x14
0x1161…117b at0015 = ╱6e╱n╱ // 0x1176 @0x15
0x1161…117b at0016 = ╱6e╱n╱ // 0x1177 @0x16
0x1161…117b at0017 = ╱72╱r╱ // 0x1178 @0x17
0x1161…117b at0018 = ╱22╱"╱ // 0x1179 @0x18
0x1161…117b at0019 = EOL // 0x117a @0x19
0x1161…117b }
0x117b…1195 9eec 2350 PRINT " Feriekode 2/lønnr"
0x117b…1195 LineComalBin {
0x117b…1195 ptr = 0x9eec // 0x117b @0x0
0x117b…1195 lno = 0x092e // 0x117d @0x2
0x117b…1195 at0004 = ╱92╱ PRINT ╱ // 0x117f @0x4
0x117b…1195 at0005 = ╱22╱"╱ // 0x1180 @0x5
0x117b…1195 at0006 = ╱20╱…╱ // 0x1181 @0x6
0x117b…1195 at0007 = ╱46╱F╱ // 0x1182 @0x7
0x117b…1195 at0008 = ╱65╱e╱ // 0x1183 @0x8
0x117b…1195 at0009 = ╱72╱r╱ // 0x1184 @0x9
0x117b…1195 at000a = ╱69╱i╱ // 0x1185 @0xa
0x117b…1195 at000b = ╱65╱e╱ // 0x1186 @0xb
0x117b…1195 at000c = ╱6b╱k╱ // 0x1187 @0xc
0x117b…1195 at000d = ╱6f╱o╱ // 0x1188 @0xd
0x117b…1195 at000e = ╱64╱d╱ // 0x1189 @0xe
0x117b…1195 at000f = ╱65╱e╱ // 0x118a @0xf
0x117b…1195 at0010 = ╱20╱…╱ // 0x118b @0x10
0x117b…1195 at0011 = ╱32╱2╱ // 0x118c @0x11
0x117b…1195 at0012 = ╱2f╱/╱ // 0x118d @0x12
0x117b…1195 at0013 = ╱6c╱l╱ // 0x118e @0x13
0x117b…1195 at0014 = ╱7c╱ø╱ // 0x118f @0x14
0x117b…1195 at0015 = ╱6e╱n╱ // 0x1190 @0x15
0x117b…1195 at0016 = ╱6e╱n╱ // 0x1191 @0x16
0x117b…1195 at0017 = ╱72╱r╱ // 0x1192 @0x17
0x117b…1195 at0018 = ╱22╱"╱ // 0x1193 @0x18
0x117b…1195 at0019 = EOL // 0x1194 @0x19
0x117b…1195 }
0x1195…11af 9f06 2360 PRINT " Feriekode 3/lønnr"
0x1195…11af LineComalBin {
0x1195…11af ptr = 0x9f06 // 0x1195 @0x0
0x1195…11af lno = 0x0938 // 0x1197 @0x2
0x1195…11af at0004 = ╱92╱ PRINT ╱ // 0x1199 @0x4
0x1195…11af at0005 = ╱22╱"╱ // 0x119a @0x5
0x1195…11af at0006 = ╱20╱…╱ // 0x119b @0x6
0x1195…11af at0007 = ╱46╱F╱ // 0x119c @0x7
0x1195…11af at0008 = ╱65╱e╱ // 0x119d @0x8
0x1195…11af at0009 = ╱72╱r╱ // 0x119e @0x9
0x1195…11af at000a = ╱69╱i╱ // 0x119f @0xa
0x1195…11af at000b = ╱65╱e╱ // 0x11a0 @0xb
0x1195…11af at000c = ╱6b╱k╱ // 0x11a1 @0xc
0x1195…11af at000d = ╱6f╱o╱ // 0x11a2 @0xd
0x1195…11af at000e = ╱64╱d╱ // 0x11a3 @0xe
0x1195…11af at000f = ╱65╱e╱ // 0x11a4 @0xf
0x1195…11af at0010 = ╱20╱…╱ // 0x11a5 @0x10
0x1195…11af at0011 = ╱33╱3╱ // 0x11a6 @0x11
0x1195…11af at0012 = ╱2f╱/╱ // 0x11a7 @0x12
0x1195…11af at0013 = ╱6c╱l╱ // 0x11a8 @0x13
0x1195…11af at0014 = ╱7c╱ø╱ // 0x11a9 @0x14
0x1195…11af at0015 = ╱6e╱n╱ // 0x11aa @0x15
0x1195…11af at0016 = ╱6e╱n╱ // 0x11ab @0x16
0x1195…11af at0017 = ╱72╱r╱ // 0x11ac @0x17
0x1195…11af at0018 = ╱22╱"╱ // 0x11ad @0x18
0x1195…11af at0019 = EOL // 0x11ae @0x19
0x1195…11af }
0x11af…11b5 9f0c 2420 ENDPROC
0x11af…11b5 LineComalBin {
0x11af…11b5 ptr = 0x9f0c // 0x11af @0x0
0x11af…11b5 lno = 0x0974 // 0x11b1 @0x2
0x11af…11b5 at0004 = ╱9f╱ ENDPROC ╱ // 0x11b3 @0x4
0x11af…11b5 at0005 = EOL // 0x11b4 @0x5
0x11af…11b5 }
0x11b5…11ca 9f21 2600 PROC CONVDATE(I1,I2)
0x11b5…11ca LineComalBin {
0x11b5…11ca ptr = 0x9f21 // 0x11b5 @0x0
0x11b5…11ca lno = 0x0a28 // 0x11b7 @0x2
0x11b5…11ca at0004 = ╱9e╱ PROC ╱ // 0x11b9 @0x4
0x11b5…11ca at0005 = ╱43╱C╱ // 0x11ba @0x5
0x11b5…11ca at0006 = ╱4f╱O╱ // 0x11bb @0x6
0x11b5…11ca at0007 = ╱4e╱N╱ // 0x11bc @0x7
0x11b5…11ca at0008 = ╱56╱V╱ // 0x11bd @0x8
0x11b5…11ca at0009 = ╱44╱D╱ // 0x11be @0x9
0x11b5…11ca at000a = ╱41╱A╱ // 0x11bf @0xa
0x11b5…11ca at000b = ╱54╱T╱ // 0x11c0 @0xb
0x11b5…11ca at000c = ╱45╱E╱ // 0x11c1 @0xc
0x11b5…11ca at000d = ╱ed╱(╱ // 0x11c2 @0xd
0x11b5…11ca at000e = ╱49╱I╱ // 0x11c3 @0xe
0x11b5…11ca at000f = ╱31╱1╱ // 0x11c4 @0xf
0x11b5…11ca at0010 = ╱ec╱,╱ // 0x11c5 @0x10
0x11b5…11ca at0011 = ╱49╱I╱ // 0x11c6 @0x11
0x11b5…11ca at0012 = ╱32╱2╱ // 0x11c7 @0x12
0x11b5…11ca at0013 = ╱ee╱)╱ // 0x11c8 @0x13
0x11b5…11ca at0014 = EOL // 0x11c9 @0x14
0x11b5…11ca }
0x11ca…11db 9f32 2610 K0=I2;I1$=""
0x11ca…11db LineComalBin {
0x11ca…11db ptr = 0x9f32 // 0x11ca @0x0
0x11ca…11db lno = 0x0a32 // 0x11cc @0x2
0x11ca…11db at0004 = ╱4b╱K╱ // 0x11ce @0x4
0x11ca…11db at0005 = ╱30╱0╱ // 0x11cf @0x5
0x11ca…11db at0006 = ╱dc╱=╱ // 0x11d0 @0x6
0x11ca…11db at0007 = ╱49╱I╱ // 0x11d1 @0x7
0x11ca…11db at0008 = ╱32╱2╱ // 0x11d2 @0x8
0x11ca…11db at0009 = ╱eb╱;╱ // 0x11d3 @0x9
0x11ca…11db at000a = ╱49╱I╱ // 0x11d4 @0xa
0x11ca…11db at000b = ╱31╱1╱ // 0x11d5 @0xb
0x11ca…11db at000c = ╱ef╱$╱ // 0x11d6 @0xc
0x11ca…11db at000d = ╱dc╱=╱ // 0x11d7 @0xd
0x11ca…11db at000e = ╱22╱"╱ // 0x11d8 @0xe
0x11ca…11db at000f = ╱22╱"╱ // 0x11d9 @0xf
0x11ca…11db at0010 = EOL // 0x11da @0x10
0x11ca…11db }
0x11db…11ee 9f45 2620 FOR I=6 TO E STEP -E
0x11db…11ee LineComalBin {
0x11db…11ee ptr = 0x9f45 // 0x11db @0x0
0x11db…11ee lno = 0x0a3c // 0x11dd @0x2
0x11db…11ee at0004 = ╱83╱ FOR ╱ // 0x11df @0x4
0x11db…11ee at0005 = ╱49╱I╱ // 0x11e0 @0x5
0x11db…11ee at0006 = ╱dc╱=╱ // 0x11e1 @0x6
0x11db…11ee at0007 = ╱36╱6╱ // 0x11e2 @0x7
0x11db…11ee at0008 = ╱fe0000c003╱ // 0x11e3 @0x8
0x11db…11ee at000d = ╱b7╱ TO ╱ // 0x11e8 @0xd
0x11db…11ee at000e = ╱45╱E╱ // 0x11e9 @0xe
0x11db…11ee at000f = ╱b8╱ STEP ╱ // 0x11ea @0xf
0x11db…11ee at0010 = ╱e9╱-╱ // 0x11eb @0x10
0x11db…11ee at0011 = ╱45╱E╱ // 0x11ec @0x11
0x11db…11ee at0012 = EOL // 0x11ed @0x12
0x11db…11ee }
0x11ee…120f 9f66 2625 I1$(I)=CHR(K0 MOD 10+48)
0x11ee…120f LineComalBin {
0x11ee…120f ptr = 0x9f66 // 0x11ee @0x0
0x11ee…120f lno = 0x0a41 // 0x11f0 @0x2
0x11ee…120f at0004 = ╱49╱I╱ // 0x11f2 @0x4
0x11ee…120f at0005 = ╱31╱1╱ // 0x11f3 @0x5
0x11ee…120f at0006 = ╱ef╱$╱ // 0x11f4 @0x6
0x11ee…120f at0007 = ╱ed╱(╱ // 0x11f5 @0x7
0x11ee…120f at0008 = ╱49╱I╱ // 0x11f6 @0x8
0x11ee…120f at0009 = ╱ee╱)╱ // 0x11f7 @0x9
0x11ee…120f at000a = ╱dc╱=╱ // 0x11f8 @0xa
0x11ee…120f at000b = ╱cf╱CHR╱ // 0x11f9 @0xb
0x11ee…120f at000c = ╱ed╱(╱ // 0x11fa @0xc
0x11ee…120f at000d = ╱4b╱K╱ // 0x11fb @0xd
0x11ee…120f at000e = ╱30╱0╱ // 0x11fc @0xe
0x11ee…120f at000f = ╱e8╱ MOD ╱ // 0x11fd @0xf
0x11ee…120f at0010 = ╱31╱1╱ // 0x11fe @0x10
0x11ee…120f at0011 = ╱30╱0╱ // 0x11ff @0x11
0x11ee…120f at0012 = ╱fe0000a004╱ // 0x1200 @0x12
0x11ee…120f at0017 = ╱e2╱+╱ // 0x1205 @0x17
0x11ee…120f at0018 = ╱34╱4╱ // 0x1206 @0x18
0x11ee…120f at0019 = ╱38╱8╱ // 0x1207 @0x19
0x11ee…120f at001a = ╱fe0000c006╱ // 0x1208 @0x1a
0x11ee…120f at001f = ╱ee╱)╱ // 0x120d @0x1f
0x11ee…120f at0020 = EOL // 0x120e @0x20
0x11ee…120f }
0x120f…1221 9f78 2633 K0=K0 DIV 10
0x120f…1221 LineComalBin {
0x120f…1221 ptr = 0x9f78 // 0x120f @0x0
0x120f…1221 lno = 0x0a49 // 0x1211 @0x2
0x120f…1221 at0004 = ╱4b╱K╱ // 0x1213 @0x4
0x120f…1221 at0005 = ╱30╱0╱ // 0x1214 @0x5
0x120f…1221 at0006 = ╱dc╱=╱ // 0x1215 @0x6
0x120f…1221 at0007 = ╱4b╱K╱ // 0x1216 @0x7
0x120f…1221 at0008 = ╱30╱0╱ // 0x1217 @0x8
0x120f…1221 at0009 = ╱e7╱ DIV ╱ // 0x1218 @0x9
0x120f…1221 at000a = ╱31╱1╱ // 0x1219 @0xa
0x120f…1221 at000b = ╱30╱0╱ // 0x121a @0xb
0x120f…1221 at000c = ╱fe0000a004╱ // 0x121b @0xc
0x120f…1221 at0011 = EOL // 0x1220 @0x11
0x120f…1221 }
0x1221…1228 9f7f 2690 NEXT I
0x1221…1228 LineComalBin {
0x1221…1228 ptr = 0x9f7f // 0x1221 @0x0
0x1221…1228 lno = 0x0a82 // 0x1223 @0x2
0x1221…1228 at0004 = ╱84╱ NEXT ╱ // 0x1225 @0x4
0x1221…1228 at0005 = ╱49╱I╱ // 0x1226 @0x5
0x1221…1228 at0006 = EOL // 0x1227 @0x6
0x1221…1228 }
0x1228…122e 9f85 2700 ENDPROC
0x1228…122e LineComalBin {
0x1228…122e ptr = 0x9f85 // 0x1228 @0x0
0x1228…122e lno = 0x0a8c // 0x122a @0x2
0x1228…122e at0004 = ╱9f╱ ENDPROC ╱ // 0x122c @0x4
0x1228…122e at0005 = EOL // 0x122d @0x5
0x1228…122e }
0x122e…123c 9f93 2710 PROC Æ(I1,I2)
0x122e…123c LineComalBin {
0x122e…123c ptr = 0x9f93 // 0x122e @0x0
0x122e…123c lno = 0x0a96 // 0x1230 @0x2
0x122e…123c at0004 = ╱9e╱ PROC ╱ // 0x1232 @0x4
0x122e…123c at0005 = ╱5b╱Æ╱ // 0x1233 @0x5
0x122e…123c at0006 = ╱ed╱(╱ // 0x1234 @0x6
0x122e…123c at0007 = ╱49╱I╱ // 0x1235 @0x7
0x122e…123c at0008 = ╱31╱1╱ // 0x1236 @0x8
0x122e…123c at0009 = ╱ec╱,╱ // 0x1237 @0x9
0x122e…123c at000a = ╱49╱I╱ // 0x1238 @0xa
0x122e…123c at000b = ╱32╱2╱ // 0x1239 @0xb
0x122e…123c at000c = ╱ee╱)╱ // 0x123a @0xc
0x122e…123c at000d = EOL // 0x123b @0xd
0x122e…123c }
0x123c…1253 9faa 2720 I1$=" 0+"
0x123c…1253 LineComalBin {
0x123c…1253 ptr = 0x9faa // 0x123c @0x0
0x123c…1253 lno = 0x0aa0 // 0x123e @0x2
0x123c…1253 at0004 = ╱49╱I╱ // 0x1240 @0x4
0x123c…1253 at0005 = ╱31╱1╱ // 0x1241 @0x5
0x123c…1253 at0006 = ╱ef╱$╱ // 0x1242 @0x6
0x123c…1253 at0007 = ╱dc╱=╱ // 0x1243 @0x7
0x123c…1253 at0008 = ╱22╱"╱ // 0x1244 @0x8
0x123c…1253 at0009 = ╱20╱…╱ // 0x1245 @0x9
0x123c…1253 at000a = ╱20╱…╱ // 0x1246 @0xa
0x123c…1253 at000b = ╱20╱…╱ // 0x1247 @0xb
0x123c…1253 at000c = ╱20╱…╱ // 0x1248 @0xc
0x123c…1253 at000d = ╱20╱…╱ // 0x1249 @0xd
0x123c…1253 at000e = ╱20╱…╱ // 0x124a @0xe
0x123c…1253 at000f = ╱20╱…╱ // 0x124b @0xf
0x123c…1253 at0010 = ╱20╱…╱ // 0x124c @0x10
0x123c…1253 at0011 = ╱20╱…╱ // 0x124d @0x11
0x123c…1253 at0012 = ╱20╱…╱ // 0x124e @0x12
0x123c…1253 at0013 = ╱30╱0╱ // 0x124f @0x13
0x123c…1253 at0014 = ╱2b╱+╱ // 0x1250 @0x14
0x123c…1253 at0015 = ╱22╱"╱ // 0x1251 @0x15
0x123c…1253 at0016 = EOL // 0x1252 @0x16
0x123c…1253 }
0x1253…125e 9fb5 2730 IF I2<>B THEN
0x1253…125e LineComalBin {
0x1253…125e ptr = 0x9fb5 // 0x1253 @0x0
0x1253…125e lno = 0x0aaa // 0x1255 @0x2
0x1253…125e at0004 = ╱9c╱ IF ╱ // 0x1257 @0x4
0x1253…125e at0005 = ╱49╱I╱ // 0x1258 @0x5
0x1253…125e at0006 = ╱32╱2╱ // 0x1259 @0x6
0x1253…125e at0007 = ╱e1╱<>╱ // 0x125a @0x7
0x1253…125e at0008 = ╱42╱B╱ // 0x125b @0x8
0x1253…125e at0009 = ╱b6╱ THEN ╱ // 0x125c @0x9
0x1253…125e at000a = EOL // 0x125d @0xa
0x1253…125e }
0x125e…12a6 9ffd 2740 I1$(W,10)=",0";I0=ABS(I2);K0=INT((I0-INT(I0))*100+0.50001)
0x125e…12a6 LineComalBin {
0x125e…12a6 ptr = 0x9ffd // 0x125e @0x0
0x125e…12a6 lno = 0x0ab4 // 0x1260 @0x2
0x125e…12a6 at0004 = ╱49╱I╱ // 0x1262 @0x4
0x125e…12a6 at0005 = ╱31╱1╱ // 0x1263 @0x5
0x125e…12a6 at0006 = ╱ef╱$╱ // 0x1264 @0x6
0x125e…12a6 at0007 = ╱ed╱(╱ // 0x1265 @0x7
0x125e…12a6 at0008 = ╱57╱W╱ // 0x1266 @0x8
0x125e…12a6 at0009 = ╱ec╱,╱ // 0x1267 @0x9
0x125e…12a6 at000a = ╱31╱1╱ // 0x1268 @0xa
0x125e…12a6 at000b = ╱30╱0╱ // 0x1269 @0xb
0x125e…12a6 at000c = ╱fe0000a004╱ // 0x126a @0xc
0x125e…12a6 at0011 = ╱ee╱)╱ // 0x126f @0x11
0x125e…12a6 at0012 = ╱dc╱=╱ // 0x1270 @0x12
0x125e…12a6 at0013 = ╱22╱"╱ // 0x1271 @0x13
0x125e…12a6 at0014 = ╱2c╱,╱ // 0x1272 @0x14
0x125e…12a6 at0015 = ╱30╱0╱ // 0x1273 @0x15
0x125e…12a6 at0016 = ╱22╱"╱ // 0x1274 @0x16
0x125e…12a6 at0017 = ╱eb╱;╱ // 0x1275 @0x17
0x125e…12a6 at0018 = ╱49╱I╱ // 0x1276 @0x18
0x125e…12a6 at0019 = ╱30╱0╱ // 0x1277 @0x19
0x125e…12a6 at001a = ╱dc╱=╱ // 0x1278 @0x1a
0x125e…12a6 at001b = ╱c4╱ABS╱ // 0x1279 @0x1b
0x125e…12a6 at001c = ╱ed╱(╱ // 0x127a @0x1c
0x125e…12a6 at001d = ╱49╱I╱ // 0x127b @0x1d
0x125e…12a6 at001e = ╱32╱2╱ // 0x127c @0x1e
0x125e…12a6 at001f = ╱ee╱)╱ // 0x127d @0x1f
0x125e…12a6 at0020 = ╱eb╱;╱ // 0x127e @0x20
0x125e…12a6 at0021 = ╱4b╱K╱ // 0x127f @0x21
0x125e…12a6 at0022 = ╱30╱0╱ // 0x1280 @0x22
0x125e…12a6 at0023 = ╱dc╱=╱ // 0x1281 @0x23
0x125e…12a6 at0024 = ╱c6╱INT╱ // 0x1282 @0x24
0x125e…12a6 at0025 = ╱ed╱(╱ // 0x1283 @0x25
0x125e…12a6 at0026 = ╱ed╱(╱ // 0x1284 @0x26
0x125e…12a6 at0027 = ╱49╱I╱ // 0x1285 @0x27
0x125e…12a6 at0028 = ╱30╱0╱ // 0x1286 @0x28
0x125e…12a6 at0029 = ╱e3╱-╱ // 0x1287 @0x29
0x125e…12a6 at002a = ╱c6╱INT╱ // 0x1288 @0x2a
0x125e…12a6 at002b = ╱ed╱(╱ // 0x1289 @0x2b
0x125e…12a6 at002c = ╱49╱I╱ // 0x128a @0x2c
0x125e…12a6 at002d = ╱30╱0╱ // 0x128b @0x2d
0x125e…12a6 at002e = ╱ee╱)╱ // 0x128c @0x2e
0x125e…12a6 at002f = ╱ee╱)╱ // 0x128d @0x2f
0x125e…12a6 at0030 = ╱e4╱*╱ // 0x128e @0x30
0x125e…12a6 at0031 = ╱31╱1╱ // 0x128f @0x31
0x125e…12a6 at0032 = ╱30╱0╱ // 0x1290 @0x32
0x125e…12a6 at0033 = ╱30╱0╱ // 0x1291 @0x33
0x125e…12a6 at0034 = ╱fe0000c807╱ // 0x1292 @0x34
0x125e…12a6 at0039 = ╱e2╱+╱ // 0x1297 @0x39
0x125e…12a6 at003a = ╱30╱0╱ // 0x1298 @0x3a
0x125e…12a6 at003b = ╱2e╱.╱ // 0x1299 @0x3b
0x125e…12a6 at003c = ╱35╱5╱ // 0x129a @0x3c
0x125e…12a6 at003d = ╱30╱0╱ // 0x129b @0x3d
0x125e…12a6 at003e = ╱30╱0╱ // 0x129c @0x3e
0x125e…12a6 at003f = ╱30╱0╱ // 0x129d @0x3f
0x125e…12a6 at0040 = ╱31╱1╱ // 0x129e @0x40
0x125e…12a6 at0041 = ╱fea7008000╱ // 0x129f @0x41
0x125e…12a6 at0046 = ╱ee╱)╱ // 0x12a4 @0x46
0x125e…12a6 at0047 = EOL // 0x12a5 @0x47
0x125e…12a6 }
0x12a6…12c1 (62,) a018 2770 IF I2<B THEN I1$(12)="-"
0x12a6…12c1 LineComalBin {
0x12a6…12c1 ptr = 0xa018 // 0x12a6 @0x0
0x12a6…12c1 lno = 0x0ad2 // 0x12a8 @0x2
0x12a6…12c1 at0004 = ╱82╱ IF ╱ // 0x12aa @0x4
0x12a6…12c1 at0005 = ╱49╱I╱ // 0x12ab @0x5
0x12a6…12c1 at0006 = ╱32╱2╱ // 0x12ac @0x6
0x12a6…12c1 at0007 = ╱dd╱<╱ // 0x12ad @0x7
0x12a6…12c1 at0008 = ╱42╱B╱ // 0x12ae @0x8
0x12a6…12c1 at0009 = ╱b6╱ THEN ╱ // 0x12af @0x9
0x12a6…12c1 at000a = ╱49╱I╱ // 0x12b0 @0xa
0x12a6…12c1 at000b = ╱31╱1╱ // 0x12b1 @0xb
0x12a6…12c1 at000c = ╱ef╱$╱ // 0x12b2 @0xc
0x12a6…12c1 at000d = ╱ed╱(╱ // 0x12b3 @0xd
0x12a6…12c1 at000e = ╱31╱1╱ // 0x12b4 @0xe
0x12a6…12c1 at000f = ╱32╱2╱ // 0x12b5 @0xf
0x12a6…12c1 at0010 = ╱fe0000c004╱ // 0x12b6 @0x10
0x12a6…12c1 at0015 = ╱ee╱)╱ // 0x12bb @0x15
0x12a6…12c1 at0016 = ╱dc╱=╱ // 0x12bc @0x16
0x12a6…12c1 at0017 = ╱22╱"╱ // 0x12bd @0x17
0x12a6…12c1 at0018 = ╱2d╱-╱ // 0x12be @0x18
0x12a6…12c1 at0019 = ╱22╱"╱ // 0x12bf @0x19
0x12a6…12c1 at001a = EOL // 0x12c0 @0x1a
0x12a6…12c1 }
0x12c1…12d5 a02c 2780 FOR I=11 TO E STEP -E
0x12c1…12d5 LineComalBin {
0x12c1…12d5 ptr = 0xa02c // 0x12c1 @0x0
0x12c1…12d5 lno = 0x0adc // 0x12c3 @0x2
0x12c1…12d5 at0004 = ╱83╱ FOR ╱ // 0x12c5 @0x4
0x12c1…12d5 at0005 = ╱49╱I╱ // 0x12c6 @0x5
0x12c1…12d5 at0006 = ╱dc╱=╱ // 0x12c7 @0x6
0x12c1…12d5 at0007 = ╱31╱1╱ // 0x12c8 @0x7
0x12c1…12d5 at0008 = ╱31╱1╱ // 0x12c9 @0x8
0x12c1…12d5 at0009 = ╱fe0000b004╱ // 0x12ca @0x9
0x12c1…12d5 at000e = ╱b7╱ TO ╱ // 0x12cf @0xe
0x12c1…12d5 at000f = ╱45╱E╱ // 0x12d0 @0xf
0x12c1…12d5 at0010 = ╱b8╱ STEP ╱ // 0x12d1 @0x10
0x12c1…12d5 at0011 = ╱e9╱-╱ // 0x12d2 @0x11
0x12c1…12d5 at0012 = ╱45╱E╱ // 0x12d3 @0x12
0x12c1…12d5 at0013 = EOL // 0x12d4 @0x13
0x12c1…12d5 }
0x12d5…12df a036 2790 IF I<>W THEN
0x12d5…12df LineComalBin {
0x12d5…12df ptr = 0xa036 // 0x12d5 @0x0
0x12d5…12df lno = 0x0ae6 // 0x12d7 @0x2
0x12d5…12df at0004 = ╱9c╱ IF ╱ // 0x12d9 @0x4
0x12d5…12df at0005 = ╱49╱I╱ // 0x12da @0x5
0x12d5…12df at0006 = ╱e1╱<>╱ // 0x12db @0x6
0x12d5…12df at0007 = ╱57╱W╱ // 0x12dc @0x7
0x12d5…12df at0008 = ╱b6╱ THEN ╱ // 0x12dd @0x8
0x12d5…12df at0009 = EOL // 0x12de @0x9
0x12d5…12df }
0x12df…1300 a057 2800 I1$(I)=CHR(K0 MOD 10+48)
0x12df…1300 LineComalBin {
0x12df…1300 ptr = 0xa057 // 0x12df @0x0
0x12df…1300 lno = 0x0af0 // 0x12e1 @0x2
0x12df…1300 at0004 = ╱49╱I╱ // 0x12e3 @0x4
0x12df…1300 at0005 = ╱31╱1╱ // 0x12e4 @0x5
0x12df…1300 at0006 = ╱ef╱$╱ // 0x12e5 @0x6
0x12df…1300 at0007 = ╱ed╱(╱ // 0x12e6 @0x7
0x12df…1300 at0008 = ╱49╱I╱ // 0x12e7 @0x8
0x12df…1300 at0009 = ╱ee╱)╱ // 0x12e8 @0x9
0x12df…1300 at000a = ╱dc╱=╱ // 0x12e9 @0xa
0x12df…1300 at000b = ╱cf╱CHR╱ // 0x12ea @0xb
0x12df…1300 at000c = ╱ed╱(╱ // 0x12eb @0xc
0x12df…1300 at000d = ╱4b╱K╱ // 0x12ec @0xd
0x12df…1300 at000e = ╱30╱0╱ // 0x12ed @0xe
0x12df…1300 at000f = ╱e8╱ MOD ╱ // 0x12ee @0xf
0x12df…1300 at0010 = ╱31╱1╱ // 0x12ef @0x10
0x12df…1300 at0011 = ╱30╱0╱ // 0x12f0 @0x11
0x12df…1300 at0012 = ╱fe0000a004╱ // 0x12f1 @0x12
0x12df…1300 at0017 = ╱e2╱+╱ // 0x12f6 @0x17
0x12df…1300 at0018 = ╱34╱4╱ // 0x12f7 @0x18
0x12df…1300 at0019 = ╱38╱8╱ // 0x12f8 @0x19
0x12df…1300 at001a = ╱fe0000c006╱ // 0x12f9 @0x1a
0x12df…1300 at001f = ╱ee╱)╱ // 0x12fe @0x1f
0x12df…1300 at0020 = EOL // 0x12ff @0x20
0x12df…1300 }
0x1300…1312 a069 2810 K0=K0 DIV 10
0x1300…1312 LineComalBin {
0x1300…1312 ptr = 0xa069 // 0x1300 @0x0
0x1300…1312 lno = 0x0afa // 0x1302 @0x2
0x1300…1312 at0004 = ╱4b╱K╱ // 0x1304 @0x4
0x1300…1312 at0005 = ╱30╱0╱ // 0x1305 @0x5
0x1300…1312 at0006 = ╱dc╱=╱ // 0x1306 @0x6
0x1300…1312 at0007 = ╱4b╱K╱ // 0x1307 @0x7
0x1300…1312 at0008 = ╱30╱0╱ // 0x1308 @0x8
0x1300…1312 at0009 = ╱e7╱ DIV ╱ // 0x1309 @0x9
0x1300…1312 at000a = ╱31╱1╱ // 0x130a @0xa
0x1300…1312 at000b = ╱30╱0╱ // 0x130b @0xb
0x1300…1312 at000c = ╱fe0000a004╱ // 0x130c @0xc
0x1300…1312 at0011 = EOL // 0x1311 @0x11
0x1300…1312 }
0x1312…132a a081 2820 IF K0=B AND I<10 THEN I=B
0x1312…132a LineComalBin {
0x1312…132a ptr = 0xa081 // 0x1312 @0x0
0x1312…132a lno = 0x0b04 // 0x1314 @0x2
0x1312…132a at0004 = ╱82╱ IF ╱ // 0x1316 @0x4
0x1312…132a at0005 = ╱4b╱K╱ // 0x1317 @0x5
0x1312…132a at0006 = ╱30╱0╱ // 0x1318 @0x6
0x1312…132a at0007 = ╱dc╱=╱ // 0x1319 @0x7
0x1312…132a at0008 = ╱42╱B╱ // 0x131a @0x8
0x1312…132a at0009 = ╱da╱ AND ╱ // 0x131b @0x9
0x1312…132a at000a = ╱49╱I╱ // 0x131c @0xa
0x1312…132a at000b = ╱dd╱<╱ // 0x131d @0xb
0x1312…132a at000c = ╱31╱1╱ // 0x131e @0xc
0x1312…132a at000d = ╱30╱0╱ // 0x131f @0xd
0x1312…132a at000e = ╱fe0000a004╱ // 0x1320 @0xe
0x1312…132a at0013 = ╱b6╱ THEN ╱ // 0x1325 @0x13
0x1312…132a at0014 = ╱49╱I╱ // 0x1326 @0x14
0x1312…132a at0015 = ╱dc╱=╱ // 0x1327 @0x15
0x1312…132a at0016 = ╱42╱B╱ // 0x1328 @0x16
0x1312…132a at0017 = EOL // 0x1329 @0x17
0x1312…132a }
0x132a…1330 a087 2830 ELSE
0x132a…1330 LineComalBin {
0x132a…1330 ptr = 0xa087 // 0x132a @0x0
0x132a…1330 lno = 0x0b0e // 0x132c @0x2
0x132a…1330 at0004 = ╱9a╱ ELSE ╱ // 0x132e @0x4
0x132a…1330 at0005 = EOL // 0x132f @0x5
0x132a…1330 }
0x1330…133d a094 2840 K0=INT(I0)
0x1330…133d LineComalBin {
0x1330…133d ptr = 0xa094 // 0x1330 @0x0
0x1330…133d lno = 0x0b18 // 0x1332 @0x2
0x1330…133d at0004 = ╱4b╱K╱ // 0x1334 @0x4
0x1330…133d at0005 = ╱30╱0╱ // 0x1335 @0x5
0x1330…133d at0006 = ╱dc╱=╱ // 0x1336 @0x6
0x1330…133d at0007 = ╱c6╱INT╱ // 0x1337 @0x7
0x1330…133d at0008 = ╱ed╱(╱ // 0x1338 @0x8
0x1330…133d at0009 = ╱49╱I╱ // 0x1339 @0x9
0x1330…133d at000a = ╱30╱0╱ // 0x133a @0xa
0x1330…133d at000b = ╱ee╱)╱ // 0x133b @0xb
0x1330…133d at000c = EOL // 0x133c @0xc
0x1330…133d }
0x133d…1343 a09a 2850 ENDIF
0x133d…1343 LineComalBin {
0x133d…1343 ptr = 0xa09a // 0x133d @0x0
0x133d…1343 lno = 0x0b22 // 0x133f @0x2
0x133d…1343 at0004 = ╱9b╱ ENDIF ╱ // 0x1341 @0x4
0x133d…1343 at0005 = EOL // 0x1342 @0x5
0x133d…1343 }
0x1343…134a a0a1 2860 NEXT I
0x1343…134a LineComalBin {
0x1343…134a ptr = 0xa0a1 // 0x1343 @0x0
0x1343…134a lno = 0x0b2c // 0x1345 @0x2
0x1343…134a at0004 = ╱84╱ NEXT ╱ // 0x1347 @0x4
0x1343…134a at0005 = ╱49╱I╱ // 0x1348 @0x5
0x1343…134a at0006 = EOL // 0x1349 @0x6
0x1343…134a }
0x134a…1350 a0a7 2870 ENDIF
0x134a…1350 LineComalBin {
0x134a…1350 ptr = 0xa0a7 // 0x134a @0x0
0x134a…1350 lno = 0x0b36 // 0x134c @0x2
0x134a…1350 at0004 = ╱9b╱ ENDIF ╱ // 0x134e @0x4
0x134a…1350 at0005 = EOL // 0x134f @0x5
0x134a…1350 }
0x1350…1356 a0ad 2880 ENDPROC
0x1350…1356 LineComalBin {
0x1350…1356 ptr = 0xa0ad // 0x1350 @0x0
0x1350…1356 lno = 0x0b40 // 0x1352 @0x2
0x1350…1356 at0004 = ╱9f╱ ENDPROC ╱ // 0x1354 @0x4
0x1350…1356 at0005 = EOL // 0x1355 @0x5
0x1350…1356 }
0x1356…136a a0c1 2890 PROC PERVERT(I1,I2)
0x1356…136a LineComalBin {
0x1356…136a ptr = 0xa0c1 // 0x1356 @0x0
0x1356…136a lno = 0x0b4a // 0x1358 @0x2
0x1356…136a at0004 = ╱9e╱ PROC ╱ // 0x135a @0x4
0x1356…136a at0005 = ╱50╱P╱ // 0x135b @0x5
0x1356…136a at0006 = ╱45╱E╱ // 0x135c @0x6
0x1356…136a at0007 = ╱52╱R╱ // 0x135d @0x7
0x1356…136a at0008 = ╱56╱V╱ // 0x135e @0x8
0x1356…136a at0009 = ╱45╱E╱ // 0x135f @0x9
0x1356…136a at000a = ╱52╱R╱ // 0x1360 @0xa
0x1356…136a at000b = ╱54╱T╱ // 0x1361 @0xb
0x1356…136a at000c = ╱ed╱(╱ // 0x1362 @0xc
0x1356…136a at000d = ╱49╱I╱ // 0x1363 @0xd
0x1356…136a at000e = ╱31╱1╱ // 0x1364 @0xe
0x1356…136a at000f = ╱ec╱,╱ // 0x1365 @0xf
0x1356…136a at0010 = ╱49╱I╱ // 0x1366 @0x10
0x1356…136a at0011 = ╱32╱2╱ // 0x1367 @0x11
0x1356…136a at0012 = ╱ee╱)╱ // 0x1368 @0x12
0x1356…136a at0013 = EOL // 0x1369 @0x13
0x1356…136a }
0x136a…1373 a0ca 2900 I2=B
0x136a…1373 LineComalBin {
0x136a…1373 ptr = 0xa0ca // 0x136a @0x0
0x136a…1373 lno = 0x0b54 // 0x136c @0x2
0x136a…1373 at0004 = ╱49╱I╱ // 0x136e @0x4
0x136a…1373 at0005 = ╱32╱2╱ // 0x136f @0x5
0x136a…1373 at0006 = ╱dc╱=╱ // 0x1370 @0x6
0x136a…1373 at0007 = ╱42╱B╱ // 0x1371 @0x7
0x136a…1373 at0008 = EOL // 0x1372 @0x8
0x136a…1373 }
0x1373…1385 a0dc 2910 FOR I=E TO LEN(I1$)-E
0x1373…1385 LineComalBin {
0x1373…1385 ptr = 0xa0dc // 0x1373 @0x0
0x1373…1385 lno = 0x0b5e // 0x1375 @0x2
0x1373…1385 at0004 = ╱83╱ FOR ╱ // 0x1377 @0x4
0x1373…1385 at0005 = ╱49╱I╱ // 0x1378 @0x5
0x1373…1385 at0006 = ╱dc╱=╱ // 0x1379 @0x6
0x1373…1385 at0007 = ╱45╱E╱ // 0x137a @0x7
0x1373…1385 at0008 = ╱b7╱ TO ╱ // 0x137b @0x8
0x1373…1385 at0009 = ╱cc╱LEN╱ // 0x137c @0x9
0x1373…1385 at000a = ╱ed╱(╱ // 0x137d @0xa
0x1373…1385 at000b = ╱49╱I╱ // 0x137e @0xb
0x1373…1385 at000c = ╱31╱1╱ // 0x137f @0xc
0x1373…1385 at000d = ╱ef╱$╱ // 0x1380 @0xd
0x1373…1385 at000e = ╱ee╱)╱ // 0x1381 @0xe
0x1373…1385 at000f = ╱e3╱-╱ // 0x1382 @0xf
0x1373…1385 at0010 = ╱45╱E╱ // 0x1383 @0x10
0x1373…1385 at0011 = EOL // 0x1384 @0x11
0x1373…1385 }
0x1385…13c0 a117 2920 IF I1$(I)<>" " AND I1$(I)<>"," THEN I2=10*I2+ORD(I1$(I))-48
0x1385…13c0 LineComalBin {
0x1385…13c0 ptr = 0xa117 // 0x1385 @0x0
0x1385…13c0 lno = 0x0b68 // 0x1387 @0x2
0x1385…13c0 at0004 = ╱82╱ IF ╱ // 0x1389 @0x4
0x1385…13c0 at0005 = ╱49╱I╱ // 0x138a @0x5
0x1385…13c0 at0006 = ╱31╱1╱ // 0x138b @0x6
0x1385…13c0 at0007 = ╱ef╱$╱ // 0x138c @0x7
0x1385…13c0 at0008 = ╱ed╱(╱ // 0x138d @0x8
0x1385…13c0 at0009 = ╱49╱I╱ // 0x138e @0x9
0x1385…13c0 at000a = ╱ee╱)╱ // 0x138f @0xa
0x1385…13c0 at000b = ╱e1╱<>╱ // 0x1390 @0xb
0x1385…13c0 at000c = ╱22╱"╱ // 0x1391 @0xc
0x1385…13c0 at000d = ╱20╱…╱ // 0x1392 @0xd
0x1385…13c0 at000e = ╱22╱"╱ // 0x1393 @0xe
0x1385…13c0 at000f = ╱da╱ AND ╱ // 0x1394 @0xf
0x1385…13c0 at0010 = ╱49╱I╱ // 0x1395 @0x10
0x1385…13c0 at0011 = ╱31╱1╱ // 0x1396 @0x11
0x1385…13c0 at0012 = ╱ef╱$╱ // 0x1397 @0x12
0x1385…13c0 at0013 = ╱ed╱(╱ // 0x1398 @0x13
0x1385…13c0 at0014 = ╱49╱I╱ // 0x1399 @0x14
0x1385…13c0 at0015 = ╱ee╱)╱ // 0x139a @0x15
0x1385…13c0 at0016 = ╱e1╱<>╱ // 0x139b @0x16
0x1385…13c0 at0017 = ╱22╱"╱ // 0x139c @0x17
0x1385…13c0 at0018 = ╱2c╱,╱ // 0x139d @0x18
0x1385…13c0 at0019 = ╱22╱"╱ // 0x139e @0x19
0x1385…13c0 at001a = ╱b6╱ THEN ╱ // 0x139f @0x1a
0x1385…13c0 at001b = ╱49╱I╱ // 0x13a0 @0x1b
0x1385…13c0 at001c = ╱32╱2╱ // 0x13a1 @0x1c
0x1385…13c0 at001d = ╱dc╱=╱ // 0x13a2 @0x1d
0x1385…13c0 at001e = ╱31╱1╱ // 0x13a3 @0x1e
0x1385…13c0 at001f = ╱30╱0╱ // 0x13a4 @0x1f
0x1385…13c0 at0020 = ╱fe0000a004╱ // 0x13a5 @0x20
0x1385…13c0 at0025 = ╱e4╱*╱ // 0x13aa @0x25
0x1385…13c0 at0026 = ╱49╱I╱ // 0x13ab @0x26
0x1385…13c0 at0027 = ╱32╱2╱ // 0x13ac @0x27
0x1385…13c0 at0028 = ╱e2╱+╱ // 0x13ad @0x28
0x1385…13c0 at0029 = ╱cd╱ORD╱ // 0x13ae @0x29
0x1385…13c0 at002a = ╱ed╱(╱ // 0x13af @0x2a
0x1385…13c0 at002b = ╱49╱I╱ // 0x13b0 @0x2b
0x1385…13c0 at002c = ╱31╱1╱ // 0x13b1 @0x2c
0x1385…13c0 at002d = ╱ef╱$╱ // 0x13b2 @0x2d
0x1385…13c0 at002e = ╱ed╱(╱ // 0x13b3 @0x2e
0x1385…13c0 at002f = ╱49╱I╱ // 0x13b4 @0x2f
0x1385…13c0 at0030 = ╱ee╱)╱ // 0x13b5 @0x30
0x1385…13c0 at0031 = ╱ee╱)╱ // 0x13b6 @0x31
0x1385…13c0 at0032 = ╱e3╱-╱ // 0x13b7 @0x32
0x1385…13c0 at0033 = ╱34╱4╱ // 0x13b8 @0x33
0x1385…13c0 at0034 = ╱38╱8╱ // 0x13b9 @0x34
0x1385…13c0 at0035 = ╱fe0000c006╱ // 0x13ba @0x35
0x1385…13c0 at003a = EOL // 0x13bf @0x3a
0x1385…13c0 }
0x13c0…13c7 a11e 2930 NEXT I
0x13c0…13c7 LineComalBin {
0x13c0…13c7 ptr = 0xa11e // 0x13c0 @0x0
0x13c0…13c7 lno = 0x0b72 // 0x13c2 @0x2
0x13c0…13c7 at0004 = ╱84╱ NEXT ╱ // 0x13c4 @0x4
0x13c0…13c7 at0005 = ╱49╱I╱ // 0x13c5 @0x5
0x13c0…13c7 at0006 = EOL // 0x13c6 @0x6
0x13c0…13c7 }
0x13c7…13de a135 2940 IF I1$(I)="-" THEN I2=-I2
0x13c7…13de LineComalBin {
0x13c7…13de ptr = 0xa135 // 0x13c7 @0x0
0x13c7…13de lno = 0x0b7c // 0x13c9 @0x2
0x13c7…13de at0004 = ╱82╱ IF ╱ // 0x13cb @0x4
0x13c7…13de at0005 = ╱49╱I╱ // 0x13cc @0x5
0x13c7…13de at0006 = ╱31╱1╱ // 0x13cd @0x6
0x13c7…13de at0007 = ╱ef╱$╱ // 0x13ce @0x7
0x13c7…13de at0008 = ╱ed╱(╱ // 0x13cf @0x8
0x13c7…13de at0009 = ╱49╱I╱ // 0x13d0 @0x9
0x13c7…13de at000a = ╱ee╱)╱ // 0x13d1 @0xa
0x13c7…13de at000b = ╱dc╱=╱ // 0x13d2 @0xb
0x13c7…13de at000c = ╱22╱"╱ // 0x13d3 @0xc
0x13c7…13de at000d = ╱2d╱-╱ // 0x13d4 @0xd
0x13c7…13de at000e = ╱22╱"╱ // 0x13d5 @0xe
0x13c7…13de at000f = ╱b6╱ THEN ╱ // 0x13d6 @0xf
0x13c7…13de at0010 = ╱49╱I╱ // 0x13d7 @0x10
0x13c7…13de at0011 = ╱32╱2╱ // 0x13d8 @0x11
0x13c7…13de at0012 = ╱dc╱=╱ // 0x13d9 @0x12
0x13c7…13de at0013 = ╱e9╱-╱ // 0x13da @0x13
0x13c7…13de at0014 = ╱49╱I╱ // 0x13db @0x14
0x13c7…13de at0015 = ╱32╱2╱ // 0x13dc @0x15
0x13c7…13de at0016 = EOL // 0x13dd @0x16
0x13c7…13de }
0x13de…13f1 a148 2950 I2=I2/100
0x13de…13f1 LineComalBin {
0x13de…13f1 ptr = 0xa148 // 0x13de @0x0
0x13de…13f1 lno = 0x0b86 // 0x13e0 @0x2
0x13de…13f1 at0004 = ╱49╱I╱ // 0x13e2 @0x4
0x13de…13f1 at0005 = ╱32╱2╱ // 0x13e3 @0x5
0x13de…13f1 at0006 = ╱dc╱=╱ // 0x13e4 @0x6
0x13de…13f1 at0007 = ╱49╱I╱ // 0x13e5 @0x7
0x13de…13f1 at0008 = ╱32╱2╱ // 0x13e6 @0x8
0x13de…13f1 at0009 = ╱e5╱/╱ // 0x13e7 @0x9
0x13de…13f1 at000a = ╱31╱1╱ // 0x13e8 @0xa
0x13de…13f1 at000b = ╱30╱0╱ // 0x13e9 @0xb
0x13de…13f1 at000c = ╱30╱0╱ // 0x13ea @0xc
0x13de…13f1 at000d = ╱fe0000c807╱ // 0x13eb @0xd
0x13de…13f1 at0012 = EOL // 0x13f0 @0x12
0x13de…13f1 }
0x13f1…13f7 a14e 2960 ENDPROC
0x13f1…13f7 LineComalBin {
0x13f1…13f7 ptr = 0xa14e // 0x13f1 @0x0
0x13f1…13f7 lno = 0x0b90 // 0x13f3 @0x2
0x13f1…13f7 at0004 = ╱9f╱ ENDPROC ╱ // 0x13f5 @0x4
0x13f1…13f7 at0005 = EOL // 0x13f6 @0x5
0x13f1…13f7 }
0x13f7…1406 a15d 2970 PROC SKRIVBUND
0x13f7…1406 LineComalBin {
0x13f7…1406 ptr = 0xa15d // 0x13f7 @0x0
0x13f7…1406 lno = 0x0b9a // 0x13f9 @0x2
0x13f7…1406 at0004 = ╱9e╱ PROC ╱ // 0x13fb @0x4
0x13f7…1406 at0005 = ╱53╱S╱ // 0x13fc @0x5
0x13f7…1406 at0006 = ╱4b╱K╱ // 0x13fd @0x6
0x13f7…1406 at0007 = ╱52╱R╱ // 0x13fe @0x7
0x13f7…1406 at0008 = ╱49╱I╱ // 0x13ff @0x8
0x13f7…1406 at0009 = ╱56╱V╱ // 0x1400 @0x9
0x13f7…1406 at000a = ╱42╱B╱ // 0x1401 @0xa
0x13f7…1406 at000b = ╱55╱U╱ // 0x1402 @0xb
0x13f7…1406 at000c = ╱4e╱N╱ // 0x1403 @0xc
0x13f7…1406 at000d = ╱44╱D╱ // 0x1404 @0xd
0x13f7…1406 at000e = EOL // 0x1405 @0xe
0x13f7…1406 }
0x1406…1438 a18f 2980 PAGE$(16,PS+5:7)=D3$(E,7)
0x1406…1438 LineComalBin {
0x1406…1438 ptr = 0xa18f // 0x1406 @0x0
0x1406…1438 lno = 0x0ba4 // 0x1408 @0x2
0x1406…1438 at0004 = ╱50╱P╱ // 0x140a @0x4
0x1406…1438 at0005 = ╱41╱A╱ // 0x140b @0x5
0x1406…1438 at0006 = ╱47╱G╱ // 0x140c @0x6
0x1406…1438 at0007 = ╱45╱E╱ // 0x140d @0x7
0x1406…1438 at0008 = ╱ef╱$╱ // 0x140e @0x8
0x1406…1438 at0009 = ╱ed╱(╱ // 0x140f @0x9
0x1406…1438 at000a = ╱31╱1╱ // 0x1410 @0xa
0x1406…1438 at000b = ╱36╱6╱ // 0x1411 @0xb
0x1406…1438 at000c = ╱fe00008005╱ // 0x1412 @0xc
0x1406…1438 at0011 = ╱ec╱,╱ // 0x1417 @0x11
0x1406…1438 at0012 = ╱50╱P╱ // 0x1418 @0x12
0x1406…1438 at0013 = ╱53╱S╱ // 0x1419 @0x13
0x1406…1438 at0014 = ╱e2╱+╱ // 0x141a @0x14
0x1406…1438 at0015 = ╱35╱5╱ // 0x141b @0x15
0x1406…1438 at0016 = ╱fe0000a003╱ // 0x141c @0x16
0x1406…1438 at001b = ╱f0╱:╱ // 0x1421 @0x1b
0x1406…1438 at001c = ╱37╱7╱ // 0x1422 @0x1c
0x1406…1438 at001d = ╱fe0000e003╱ // 0x1423 @0x1d
0x1406…1438 at0022 = ╱ee╱)╱ // 0x1428 @0x22
0x1406…1438 at0023 = ╱dc╱=╱ // 0x1429 @0x23
0x1406…1438 at0024 = ╱44╱D╱ // 0x142a @0x24
0x1406…1438 at0025 = ╱33╱3╱ // 0x142b @0x25
0x1406…1438 at0026 = ╱ef╱$╱ // 0x142c @0x26
0x1406…1438 at0027 = ╱ed╱(╱ // 0x142d @0x27
0x1406…1438 at0028 = ╱45╱E╱ // 0x142e @0x28
0x1406…1438 at0029 = ╱ec╱,╱ // 0x142f @0x29
0x1406…1438 at002a = ╱37╱7╱ // 0x1430 @0x2a
0x1406…1438 at002b = ╱fe0000e003╱ // 0x1431 @0x2b
0x1406…1438 at0030 = ╱ee╱)╱ // 0x1436 @0x30
0x1406…1438 at0031 = EOL // 0x1437 @0x31
0x1406…1438 }
0x1438…1471 a1c8 2990 PAGE$(17,PS+5:25)=D3$(8,32)
0x1438…1471 LineComalBin {
0x1438…1471 ptr = 0xa1c8 // 0x1438 @0x0
0x1438…1471 lno = 0x0bae // 0x143a @0x2
0x1438…1471 at0004 = ╱50╱P╱ // 0x143c @0x4
0x1438…1471 at0005 = ╱41╱A╱ // 0x143d @0x5
0x1438…1471 at0006 = ╱47╱G╱ // 0x143e @0x6
0x1438…1471 at0007 = ╱45╱E╱ // 0x143f @0x7
0x1438…1471 at0008 = ╱ef╱$╱ // 0x1440 @0x8
0x1438…1471 at0009 = ╱ed╱(╱ // 0x1441 @0x9
0x1438…1471 at000a = ╱31╱1╱ // 0x1442 @0xa
0x1438…1471 at000b = ╱37╱7╱ // 0x1443 @0xb
0x1438…1471 at000c = ╱fe00008805╱ // 0x1444 @0xc
0x1438…1471 at0011 = ╱ec╱,╱ // 0x1449 @0x11
0x1438…1471 at0012 = ╱50╱P╱ // 0x144a @0x12
0x1438…1471 at0013 = ╱53╱S╱ // 0x144b @0x13
0x1438…1471 at0014 = ╱e2╱+╱ // 0x144c @0x14
0x1438…1471 at0015 = ╱35╱5╱ // 0x144d @0x15
0x1438…1471 at0016 = ╱fe0000a003╱ // 0x144e @0x16
0x1438…1471 at001b = ╱f0╱:╱ // 0x1453 @0x1b
0x1438…1471 at001c = ╱32╱2╱ // 0x1454 @0x1c
0x1438…1471 at001d = ╱35╱5╱ // 0x1455 @0x1d
0x1438…1471 at001e = ╱fe0000c805╱ // 0x1456 @0x1e
0x1438…1471 at0023 = ╱ee╱)╱ // 0x145b @0x23
0x1438…1471 at0024 = ╱dc╱=╱ // 0x145c @0x24
0x1438…1471 at0025 = ╱44╱D╱ // 0x145d @0x25
0x1438…1471 at0026 = ╱33╱3╱ // 0x145e @0x26
0x1438…1471 at0027 = ╱ef╱$╱ // 0x145f @0x27
0x1438…1471 at0028 = ╱ed╱(╱ // 0x1460 @0x28
0x1438…1471 at0029 = ╱38╱8╱ // 0x1461 @0x29
0x1438…1471 at002a = ╱fe00008004╱ // 0x1462 @0x2a
0x1438…1471 at002f = ╱ec╱,╱ // 0x1467 @0x2f
0x1438…1471 at0030 = ╱33╱3╱ // 0x1468 @0x30
0x1438…1471 at0031 = ╱32╱2╱ // 0x1469 @0x31
0x1438…1471 at0032 = ╱fe00008006╱ // 0x146a @0x32
0x1438…1471 at0037 = ╱ee╱)╱ // 0x146f @0x37
0x1438…1471 at0038 = EOL // 0x1470 @0x38
0x1438…1471 }
0x1471…14ab a202 3000 PAGE$(18,PS+5:23)=D3$(33,55)
0x1471…14ab LineComalBin {
0x1471…14ab ptr = 0xa202 // 0x1471 @0x0
0x1471…14ab lno = 0x0bb8 // 0x1473 @0x2
0x1471…14ab at0004 = ╱50╱P╱ // 0x1475 @0x4
0x1471…14ab at0005 = ╱41╱A╱ // 0x1476 @0x5
0x1471…14ab at0006 = ╱47╱G╱ // 0x1477 @0x6
0x1471…14ab at0007 = ╱45╱E╱ // 0x1478 @0x7
0x1471…14ab at0008 = ╱ef╱$╱ // 0x1479 @0x8
0x1471…14ab at0009 = ╱ed╱(╱ // 0x147a @0x9
0x1471…14ab at000a = ╱31╱1╱ // 0x147b @0xa
0x1471…14ab at000b = ╱38╱8╱ // 0x147c @0xb
0x1471…14ab at000c = ╱fe00009005╱ // 0x147d @0xc
0x1471…14ab at0011 = ╱ec╱,╱ // 0x1482 @0x11
0x1471…14ab at0012 = ╱50╱P╱ // 0x1483 @0x12
0x1471…14ab at0013 = ╱53╱S╱ // 0x1484 @0x13
0x1471…14ab at0014 = ╱e2╱+╱ // 0x1485 @0x14
0x1471…14ab at0015 = ╱35╱5╱ // 0x1486 @0x15
0x1471…14ab at0016 = ╱fe0000a003╱ // 0x1487 @0x16
0x1471…14ab at001b = ╱f0╱:╱ // 0x148c @0x1b
0x1471…14ab at001c = ╱32╱2╱ // 0x148d @0x1c
0x1471…14ab at001d = ╱33╱3╱ // 0x148e @0x1d
0x1471…14ab at001e = ╱fe0000b805╱ // 0x148f @0x1e
0x1471…14ab at0023 = ╱ee╱)╱ // 0x1494 @0x23
0x1471…14ab at0024 = ╱dc╱=╱ // 0x1495 @0x24
0x1471…14ab at0025 = ╱44╱D╱ // 0x1496 @0x25
0x1471…14ab at0026 = ╱33╱3╱ // 0x1497 @0x26
0x1471…14ab at0027 = ╱ef╱$╱ // 0x1498 @0x27
0x1471…14ab at0028 = ╱ed╱(╱ // 0x1499 @0x28
0x1471…14ab at0029 = ╱33╱3╱ // 0x149a @0x29
0x1471…14ab at002a = ╱33╱3╱ // 0x149b @0x2a
0x1471…14ab at002b = ╱fe00008406╱ // 0x149c @0x2b
0x1471…14ab at0030 = ╱ec╱,╱ // 0x14a1 @0x30
0x1471…14ab at0031 = ╱35╱5╱ // 0x14a2 @0x31
0x1471…14ab at0032 = ╱35╱5╱ // 0x14a3 @0x32
0x1471…14ab at0033 = ╱fe0000dc06╱ // 0x14a4 @0x33
0x1471…14ab at0038 = ╱ee╱)╱ // 0x14a9 @0x38
0x1471…14ab at0039 = EOL // 0x14aa @0x39
0x1471…14ab }
0x14ab…14f6 a24d 3010 PAGE$(19,PS+5:19)=D4$(E,4)+" "+D4$(5,18)
0x14ab…14f6 LineComalBin {
0x14ab…14f6 ptr = 0xa24d // 0x14ab @0x0
0x14ab…14f6 lno = 0x0bc2 // 0x14ad @0x2
0x14ab…14f6 at0004 = ╱50╱P╱ // 0x14af @0x4
0x14ab…14f6 at0005 = ╱41╱A╱ // 0x14b0 @0x5
0x14ab…14f6 at0006 = ╱47╱G╱ // 0x14b1 @0x6
0x14ab…14f6 at0007 = ╱45╱E╱ // 0x14b2 @0x7
0x14ab…14f6 at0008 = ╱ef╱$╱ // 0x14b3 @0x8
0x14ab…14f6 at0009 = ╱ed╱(╱ // 0x14b4 @0x9
0x14ab…14f6 at000a = ╱31╱1╱ // 0x14b5 @0xa
0x14ab…14f6 at000b = ╱39╱9╱ // 0x14b6 @0xb
0x14ab…14f6 at000c = ╱fe00009805╱ // 0x14b7 @0xc
0x14ab…14f6 at0011 = ╱ec╱,╱ // 0x14bc @0x11
0x14ab…14f6 at0012 = ╱50╱P╱ // 0x14bd @0x12
0x14ab…14f6 at0013 = ╱53╱S╱ // 0x14be @0x13
0x14ab…14f6 at0014 = ╱e2╱+╱ // 0x14bf @0x14
0x14ab…14f6 at0015 = ╱35╱5╱ // 0x14c0 @0x15
0x14ab…14f6 at0016 = ╱fe0000a003╱ // 0x14c1 @0x16
0x14ab…14f6 at001b = ╱f0╱:╱ // 0x14c6 @0x1b
0x14ab…14f6 at001c = ╱31╱1╱ // 0x14c7 @0x1c
0x14ab…14f6 at001d = ╱39╱9╱ // 0x14c8 @0x1d
0x14ab…14f6 at001e = ╱fe00009805╱ // 0x14c9 @0x1e
0x14ab…14f6 at0023 = ╱ee╱)╱ // 0x14ce @0x23
0x14ab…14f6 at0024 = ╱dc╱=╱ // 0x14cf @0x24
0x14ab…14f6 at0025 = ╱44╱D╱ // 0x14d0 @0x25
0x14ab…14f6 at0026 = ╱34╱4╱ // 0x14d1 @0x26
0x14ab…14f6 at0027 = ╱ef╱$╱ // 0x14d2 @0x27
0x14ab…14f6 at0028 = ╱ed╱(╱ // 0x14d3 @0x28
0x14ab…14f6 at0029 = ╱45╱E╱ // 0x14d4 @0x29
0x14ab…14f6 at002a = ╱ec╱,╱ // 0x14d5 @0x2a
0x14ab…14f6 at002b = ╱34╱4╱ // 0x14d6 @0x2b
0x14ab…14f6 at002c = ╱fe00008003╱ // 0x14d7 @0x2c
0x14ab…14f6 at0031 = ╱ee╱)╱ // 0x14dc @0x31
0x14ab…14f6 at0032 = ╱f1╱+╱ // 0x14dd @0x32
0x14ab…14f6 at0033 = ╱22╱"╱ // 0x14de @0x33
0x14ab…14f6 at0034 = ╱20╱…╱ // 0x14df @0x34
0x14ab…14f6 at0035 = ╱22╱"╱ // 0x14e0 @0x35
0x14ab…14f6 at0036 = ╱f1╱+╱ // 0x14e1 @0x36
0x14ab…14f6 at0037 = ╱44╱D╱ // 0x14e2 @0x37
0x14ab…14f6 at0038 = ╱34╱4╱ // 0x14e3 @0x38
0x14ab…14f6 at0039 = ╱ef╱$╱ // 0x14e4 @0x39
0x14ab…14f6 at003a = ╱ed╱(╱ // 0x14e5 @0x3a
0x14ab…14f6 at003b = ╱35╱5╱ // 0x14e6 @0x3b
0x14ab…14f6 at003c = ╱fe0000a003╱ // 0x14e7 @0x3c
0x14ab…14f6 at0041 = ╱ec╱,╱ // 0x14ec @0x41
0x14ab…14f6 at0042 = ╱31╱1╱ // 0x14ed @0x42
0x14ab…14f6 at0043 = ╱38╱8╱ // 0x14ee @0x43
0x14ab…14f6 at0044 = ╱fe00009005╱ // 0x14ef @0x44
0x14ab…14f6 at0049 = ╱ee╱)╱ // 0x14f4 @0x49
0x14ab…14f6 at004a = EOL // 0x14f5 @0x4a
0x14ab…14f6 }
0x14f6…1501 a258 3020 IF PS=E THEN
0x14f6…1501 LineComalBin {
0x14f6…1501 ptr = 0xa258 // 0x14f6 @0x0
0x14f6…1501 lno = 0x0bcc // 0x14f8 @0x2
0x14f6…1501 at0004 = ╱9c╱ IF ╱ // 0x14fa @0x4
0x14f6…1501 at0005 = ╱50╱P╱ // 0x14fb @0x5
0x14f6…1501 at0006 = ╱53╱S╱ // 0x14fc @0x6
0x14f6…1501 at0007 = ╱dc╱=╱ // 0x14fd @0x7
0x14f6…1501 at0008 = ╱45╱E╱ // 0x14fe @0x8
0x14f6…1501 at0009 = ╱b6╱ THEN ╱ // 0x14ff @0x9
0x14f6…1501 at000a = EOL // 0x1500 @0xa
0x14f6…1501 }
0x1501…1510 a267 3030 PS=38
0x1501…1510 LineComalBin {
0x1501…1510 ptr = 0xa267 // 0x1501 @0x0
0x1501…1510 lno = 0x0bd6 // 0x1503 @0x2
0x1501…1510 at0004 = ╱50╱P╱ // 0x1505 @0x4
0x1501…1510 at0005 = ╱53╱S╱ // 0x1506 @0x5
0x1501…1510 at0006 = ╱dc╱=╱ // 0x1507 @0x6
0x1501…1510 at0007 = ╱33╱3╱ // 0x1508 @0x7
0x1501…1510 at0008 = ╱38╱8╱ // 0x1509 @0x8
0x1501…1510 at0009 = ╱fe00009806╱ // 0x150a @0x9
0x1501…1510 at000e = EOL // 0x150f @0xe
0x1501…1510 }
0x1510…1516 a26d 3040 ELSE
0x1510…1516 LineComalBin {
0x1510…1516 ptr = 0xa26d // 0x1510 @0x0
0x1510…1516 lno = 0x0be0 // 0x1512 @0x2
0x1510…1516 at0004 = ╱9a╱ ELSE ╱ // 0x1514 @0x4
0x1510…1516 at0005 = EOL // 0x1515 @0x5
0x1510…1516 }
0x1516…1525 a27c 3050 EXEC SKRIVPAGE
0x1516…1525 LineComalBin {
0x1516…1525 ptr = 0xa27c // 0x1516 @0x0
0x1516…1525 lno = 0x0bea // 0x1518 @0x2
0x1516…1525 at0004 = ╱9d╱ EXEC ╱ // 0x151a @0x4
0x1516…1525 at0005 = ╱53╱S╱ // 0x151b @0x5
0x1516…1525 at0006 = ╱4b╱K╱ // 0x151c @0x6
0x1516…1525 at0007 = ╱52╱R╱ // 0x151d @0x7
0x1516…1525 at0008 = ╱49╱I╱ // 0x151e @0x8
0x1516…1525 at0009 = ╱56╱V╱ // 0x151f @0x9
0x1516…1525 at000a = ╱50╱P╱ // 0x1520 @0xa
0x1516…1525 at000b = ╱41╱A╱ // 0x1521 @0xb
0x1516…1525 at000c = ╱47╱G╱ // 0x1522 @0xc
0x1516…1525 at000d = ╱45╱E╱ // 0x1523 @0xd
0x1516…1525 at000e = EOL // 0x1524 @0xe
0x1516…1525 }
0x1525…152e a285 3060 PS=E
0x1525…152e LineComalBin {
0x1525…152e ptr = 0xa285 // 0x1525 @0x0
0x1525…152e lno = 0x0bf4 // 0x1527 @0x2
0x1525…152e at0004 = ╱50╱P╱ // 0x1529 @0x4
0x1525…152e at0005 = ╱53╱S╱ // 0x152a @0x5
0x1525…152e at0006 = ╱dc╱=╱ // 0x152b @0x6
0x1525…152e at0007 = ╱45╱E╱ // 0x152c @0x7
0x1525…152e at0008 = EOL // 0x152d @0x8
0x1525…152e }
0x152e…1534 a28b 3070 ENDIF
0x152e…1534 LineComalBin {
0x152e…1534 ptr = 0xa28b // 0x152e @0x0
0x152e…1534 lno = 0x0bfe // 0x1530 @0x2
0x152e…1534 at0004 = ╱9b╱ ENDIF ╱ // 0x1532 @0x4
0x152e…1534 at0005 = EOL // 0x1533 @0x5
0x152e…1534 }
0x1534…153a a291 3080 ENDPROC
0x1534…153a LineComalBin {
0x1534…153a ptr = 0xa291 // 0x1534 @0x0
0x1534…153a lno = 0x0c08 // 0x1536 @0x2
0x1534…153a at0004 = ╱9f╱ ENDPROC ╱ // 0x1538 @0x4
0x1534…153a at0005 = EOL // 0x1539 @0x5
0x1534…153a }
0x153a…1544 a29b 3085 TAP=W
0x153a…1544 LineComalBin {
0x153a…1544 ptr = 0xa29b // 0x153a @0x0
0x153a…1544 lno = 0x0c0d // 0x153c @0x2
0x153a…1544 at0004 = ╱54╱T╱ // 0x153e @0x4
0x153a…1544 at0005 = ╱41╱A╱ // 0x153f @0x5
0x153a…1544 at0006 = ╱50╱P╱ // 0x1540 @0x6
0x153a…1544 at0007 = ╱dc╱=╱ // 0x1541 @0x7
0x153a…1544 at0008 = ╱57╱W╱ // 0x1542 @0x8
0x153a…1544 at0009 = EOL // 0x1543 @0x9
0x153a…1544 }
0x1544…1553 a2aa 3090 PROC SKRIVPAGE
0x1544…1553 LineComalBin {
0x1544…1553 ptr = 0xa2aa // 0x1544 @0x0
0x1544…1553 lno = 0x0c12 // 0x1546 @0x2
0x1544…1553 at0004 = ╱9e╱ PROC ╱ // 0x1548 @0x4
0x1544…1553 at0005 = ╱53╱S╱ // 0x1549 @0x5
0x1544…1553 at0006 = ╱4b╱K╱ // 0x154a @0x6
0x1544…1553 at0007 = ╱52╱R╱ // 0x154b @0x7
0x1544…1553 at0008 = ╱49╱I╱ // 0x154c @0x8
0x1544…1553 at0009 = ╱56╱V╱ // 0x154d @0x9
0x1544…1553 at000a = ╱50╱P╱ // 0x154e @0xa
0x1544…1553 at000b = ╱41╱A╱ // 0x154f @0xb
0x1544…1553 at000c = ╱47╱G╱ // 0x1550 @0xc
0x1544…1553 at000d = ╱45╱E╱ // 0x1551 @0xd
0x1544…1553 at000e = EOL // 0x1552 @0xe
0x1544…1553 }
0x1553…155e a2b5 3092 LINE=E
0x1553…155e LineComalBin {
0x1553…155e ptr = 0xa2b5 // 0x1553 @0x0
0x1553…155e lno = 0x0c14 // 0x1555 @0x2
0x1553…155e at0004 = ╱4c╱L╱ // 0x1557 @0x4
0x1553…155e at0005 = ╱49╱I╱ // 0x1558 @0x5
0x1553…155e at0006 = ╱4e╱N╱ // 0x1559 @0x6
0x1553…155e at0007 = ╱45╱E╱ // 0x155a @0x7
0x1553…155e at0008 = ╱dc╱=╱ // 0x155b @0x8
0x1553…155e at0009 = ╱45╱E╱ // 0x155c @0x9
0x1553…155e at000a = EOL // 0x155d @0xa
0x1553…155e }
0x155e…1564 a2bb 3094 PRINT
0x155e…1564 LineComalBin {
0x155e…1564 ptr = 0xa2bb // 0x155e @0x0
0x155e…1564 lno = 0x0c16 // 0x1560 @0x2
0x155e…1564 at0004 = ╱92╱ PRINT ╱ // 0x1562 @0x4
0x155e…1564 at0005 = EOL // 0x1563 @0x5
0x155e…1564 }
0x1564…156c a2c3 3096 EXEC SL
0x1564…156c LineComalBin {
0x1564…156c ptr = 0xa2c3 // 0x1564 @0x0
0x1564…156c lno = 0x0c18 // 0x1566 @0x2
0x1564…156c at0004 = ╱9d╱ EXEC ╱ // 0x1568 @0x4
0x1564…156c at0005 = ╱53╱S╱ // 0x1569 @0x5
0x1564…156c at0006 = ╱4c╱L╱ // 0x156a @0x6
0x1564…156c at0007 = EOL // 0x156b @0x7
0x1564…156c }
0x156c…1574 a2cb 3098 EXEC SL
0x156c…1574 LineComalBin {
0x156c…1574 ptr = 0xa2cb // 0x156c @0x0
0x156c…1574 lno = 0x0c1a // 0x156e @0x2
0x156c…1574 at0004 = ╱9d╱ EXEC ╱ // 0x1570 @0x4
0x156c…1574 at0005 = ╱53╱S╱ // 0x1571 @0x5
0x156c…1574 at0006 = ╱4c╱L╱ // 0x1572 @0x6
0x156c…1574 at0007 = EOL // 0x1573 @0x7
0x156c…1574 }
0x1574…157c a2d3 3100 EXEC SL
0x1574…157c LineComalBin {
0x1574…157c ptr = 0xa2d3 // 0x1574 @0x0
0x1574…157c lno = 0x0c1c // 0x1576 @0x2
0x1574…157c at0004 = ╱9d╱ EXEC ╱ // 0x1578 @0x4
0x1574…157c at0005 = ╱53╱S╱ // 0x1579 @0x5
0x1574…157c at0006 = ╱4c╱L╱ // 0x157a @0x6
0x1574…157c at0007 = EOL // 0x157b @0x7
0x1574…157c }
0x157c…1582 a2d9 3102 PRINT
0x157c…1582 LineComalBin {
0x157c…1582 ptr = 0xa2d9 // 0x157c @0x0
0x157c…1582 lno = 0x0c1e // 0x157e @0x2
0x157c…1582 at0004 = ╱92╱ PRINT ╱ // 0x1580 @0x4
0x157c…1582 at0005 = EOL // 0x1581 @0x5
0x157c…1582 }
0x1582…158a a2e1 3104 EXEC SL
0x1582…158a LineComalBin {
0x1582…158a ptr = 0xa2e1 // 0x1582 @0x0
0x1582…158a lno = 0x0c20 // 0x1584 @0x2
0x1582…158a at0004 = ╱9d╱ EXEC ╱ // 0x1586 @0x4
0x1582…158a at0005 = ╱53╱S╱ // 0x1587 @0x5
0x1582…158a at0006 = ╱4c╱L╱ // 0x1588 @0x6
0x1582…158a at0007 = EOL // 0x1589 @0x7
0x1582…158a }
0x158a…1592 a2e9 3106 EXEC SL
0x158a…1592 LineComalBin {
0x158a…1592 ptr = 0xa2e9 // 0x158a @0x0
0x158a…1592 lno = 0x0c22 // 0x158c @0x2
0x158a…1592 at0004 = ╱9d╱ EXEC ╱ // 0x158e @0x4
0x158a…1592 at0005 = ╱53╱S╱ // 0x158f @0x5
0x158a…1592 at0006 = ╱4c╱L╱ // 0x1590 @0x6
0x158a…1592 at0007 = EOL // 0x1591 @0x7
0x158a…1592 }
0x1592…159a a2f1 3108 EXEC SL
0x1592…159a LineComalBin {
0x1592…159a ptr = 0xa2f1 // 0x1592 @0x0
0x1592…159a lno = 0x0c24 // 0x1594 @0x2
0x1592…159a at0004 = ╱9d╱ EXEC ╱ // 0x1596 @0x4
0x1592…159a at0005 = ╱53╱S╱ // 0x1597 @0x5
0x1592…159a at0006 = ╱4c╱L╱ // 0x1598 @0x6
0x1592…159a at0007 = EOL // 0x1599 @0x7
0x1592…159a }
0x159a…15a2 a2f9 3110 EXEC SL
0x159a…15a2 LineComalBin {
0x159a…15a2 ptr = 0xa2f9 // 0x159a @0x0
0x159a…15a2 lno = 0x0c26 // 0x159c @0x2
0x159a…15a2 at0004 = ╱9d╱ EXEC ╱ // 0x159e @0x4
0x159a…15a2 at0005 = ╱53╱S╱ // 0x159f @0x5
0x159a…15a2 at0006 = ╱4c╱L╱ // 0x15a0 @0x6
0x159a…15a2 at0007 = EOL // 0x15a1 @0x7
0x159a…15a2 }
0x15a2…15a8 a2ff 3112 PRINT
0x15a2…15a8 LineComalBin {
0x15a2…15a8 ptr = 0xa2ff // 0x15a2 @0x0
0x15a2…15a8 lno = 0x0c28 // 0x15a4 @0x2
0x15a2…15a8 at0004 = ╱92╱ PRINT ╱ // 0x15a6 @0x4
0x15a2…15a8 at0005 = EOL // 0x15a7 @0x5
0x15a2…15a8 }
0x15a8…15b0 (72,) a307 3114 EXEC SL
0x15a8…15b0 LineComalBin {
0x15a8…15b0 ptr = 0xa307 // 0x15a8 @0x0
0x15a8…15b0 lno = 0x0c2a // 0x15aa @0x2
0x15a8…15b0 at0004 = ╱9d╱ EXEC ╱ // 0x15ac @0x4
0x15a8…15b0 at0005 = ╱53╱S╱ // 0x15ad @0x5
0x15a8…15b0 at0006 = ╱4c╱L╱ // 0x15ae @0x6
0x15a8…15b0 at0007 = EOL // 0x15af @0x7
0x15a8…15b0 }
0x15b0…15b8 a30f 3116 EXEC SL
0x15b0…15b8 LineComalBin {
0x15b0…15b8 ptr = 0xa30f // 0x15b0 @0x0
0x15b0…15b8 lno = 0x0c2c // 0x15b2 @0x2
0x15b0…15b8 at0004 = ╱9d╱ EXEC ╱ // 0x15b4 @0x4
0x15b0…15b8 at0005 = ╱53╱S╱ // 0x15b5 @0x5
0x15b0…15b8 at0006 = ╱4c╱L╱ // 0x15b6 @0x6
0x15b0…15b8 at0007 = EOL // 0x15b7 @0x7
0x15b0…15b8 }
0x15b8…15be a315 3118 PRINT
0x15b8…15be LineComalBin {
0x15b8…15be ptr = 0xa315 // 0x15b8 @0x0
0x15b8…15be lno = 0x0c2e // 0x15ba @0x2
0x15b8…15be at0004 = ╱92╱ PRINT ╱ // 0x15bc @0x4
0x15b8…15be at0005 = EOL // 0x15bd @0x5
0x15b8…15be }
0x15be…15c6 a31d 3120 EXEC SL
0x15be…15c6 LineComalBin {
0x15be…15c6 ptr = 0xa31d // 0x15be @0x0
0x15be…15c6 lno = 0x0c30 // 0x15c0 @0x2
0x15be…15c6 at0004 = ╱9d╱ EXEC ╱ // 0x15c2 @0x4
0x15be…15c6 at0005 = ╱53╱S╱ // 0x15c3 @0x5
0x15be…15c6 at0006 = ╱4c╱L╱ // 0x15c4 @0x6
0x15be…15c6 at0007 = EOL // 0x15c5 @0x7
0x15be…15c6 }
0x15c6…15cc a323 3122 PRINT
0x15c6…15cc LineComalBin {
0x15c6…15cc ptr = 0xa323 // 0x15c6 @0x0
0x15c6…15cc lno = 0x0c32 // 0x15c8 @0x2
0x15c6…15cc at0004 = ╱92╱ PRINT ╱ // 0x15ca @0x4
0x15c6…15cc at0005 = EOL // 0x15cb @0x5
0x15c6…15cc }
0x15cc…15d4 a32b 3124 EXEC SL
0x15cc…15d4 LineComalBin {
0x15cc…15d4 ptr = 0xa32b // 0x15cc @0x0
0x15cc…15d4 lno = 0x0c34 // 0x15ce @0x2
0x15cc…15d4 at0004 = ╱9d╱ EXEC ╱ // 0x15d0 @0x4
0x15cc…15d4 at0005 = ╱53╱S╱ // 0x15d1 @0x5
0x15cc…15d4 at0006 = ╱4c╱L╱ // 0x15d2 @0x6
0x15cc…15d4 at0007 = EOL // 0x15d3 @0x7
0x15cc…15d4 }
0x15d4…15da a331 3126 PRINT
0x15d4…15da LineComalBin {
0x15d4…15da ptr = 0xa331 // 0x15d4 @0x0
0x15d4…15da lno = 0x0c36 // 0x15d6 @0x2
0x15d4…15da at0004 = ╱92╱ PRINT ╱ // 0x15d8 @0x4
0x15d4…15da at0005 = EOL // 0x15d9 @0x5
0x15d4…15da }
0x15da…15e2 a339 3128 EXEC SL
0x15da…15e2 LineComalBin {
0x15da…15e2 ptr = 0xa339 // 0x15da @0x0
0x15da…15e2 lno = 0x0c38 // 0x15dc @0x2
0x15da…15e2 at0004 = ╱9d╱ EXEC ╱ // 0x15de @0x4
0x15da…15e2 at0005 = ╱53╱S╱ // 0x15df @0x5
0x15da…15e2 at0006 = ╱4c╱L╱ // 0x15e0 @0x6
0x15da…15e2 at0007 = EOL // 0x15e1 @0x7
0x15da…15e2 }
0x15e2…15e8 a33f 3130 PRINT
0x15e2…15e8 LineComalBin {
0x15e2…15e8 ptr = 0xa33f // 0x15e2 @0x0
0x15e2…15e8 lno = 0x0c3a // 0x15e4 @0x2
0x15e2…15e8 at0004 = ╱92╱ PRINT ╱ // 0x15e6 @0x4
0x15e2…15e8 at0005 = EOL // 0x15e7 @0x5
0x15e2…15e8 }
0x15e8…15f0 a347 3132 EXEC SL
0x15e8…15f0 LineComalBin {
0x15e8…15f0 ptr = 0xa347 // 0x15e8 @0x0
0x15e8…15f0 lno = 0x0c3c // 0x15ea @0x2
0x15e8…15f0 at0004 = ╱9d╱ EXEC ╱ // 0x15ec @0x4
0x15e8…15f0 at0005 = ╱53╱S╱ // 0x15ed @0x5
0x15e8…15f0 at0006 = ╱4c╱L╱ // 0x15ee @0x6
0x15e8…15f0 at0007 = EOL // 0x15ef @0x7
0x15e8…15f0 }
0x15f0…15f6 a34d 3134 PRINT
0x15f0…15f6 LineComalBin {
0x15f0…15f6 ptr = 0xa34d // 0x15f0 @0x0
0x15f0…15f6 lno = 0x0c3e // 0x15f2 @0x2
0x15f0…15f6 at0004 = ╱92╱ PRINT ╱ // 0x15f4 @0x4
0x15f0…15f6 at0005 = EOL // 0x15f5 @0x5
0x15f0…15f6 }
0x15f6…15fe a355 3136 EXEC SL
0x15f6…15fe LineComalBin {
0x15f6…15fe ptr = 0xa355 // 0x15f6 @0x0
0x15f6…15fe lno = 0x0c40 // 0x15f8 @0x2
0x15f6…15fe at0004 = ╱9d╱ EXEC ╱ // 0x15fa @0x4
0x15f6…15fe at0005 = ╱53╱S╱ // 0x15fb @0x5
0x15f6…15fe at0006 = ╱4c╱L╱ // 0x15fc @0x6
0x15f6…15fe at0007 = EOL // 0x15fd @0x7
0x15f6…15fe }
0x15fe…1604 a35b 3138 PRINT
0x15fe…1604 LineComalBin {
0x15fe…1604 ptr = 0xa35b // 0x15fe @0x0
0x15fe…1604 lno = 0x0c42 // 0x1600 @0x2
0x15fe…1604 at0004 = ╱92╱ PRINT ╱ // 0x1602 @0x4
0x15fe…1604 at0005 = EOL // 0x1603 @0x5
0x15fe…1604 }
0x1604…160c a363 3140 EXEC SL
0x1604…160c LineComalBin {
0x1604…160c ptr = 0xa363 // 0x1604 @0x0
0x1604…160c lno = 0x0c44 // 0x1606 @0x2
0x1604…160c at0004 = ╱9d╱ EXEC ╱ // 0x1608 @0x4
0x1604…160c at0005 = ╱53╱S╱ // 0x1609 @0x5
0x1604…160c at0006 = ╱4c╱L╱ // 0x160a @0x6
0x1604…160c at0007 = EOL // 0x160b @0x7
0x1604…160c }
0x160c…1612 a369 3142 PRINT
0x160c…1612 LineComalBin {
0x160c…1612 ptr = 0xa369 // 0x160c @0x0
0x160c…1612 lno = 0x0c46 // 0x160e @0x2
0x160c…1612 at0004 = ╱92╱ PRINT ╱ // 0x1610 @0x4
0x160c…1612 at0005 = EOL // 0x1611 @0x5
0x160c…1612 }
0x1612…161a a371 3144 EXEC SL
0x1612…161a LineComalBin {
0x1612…161a ptr = 0xa371 // 0x1612 @0x0
0x1612…161a lno = 0x0c48 // 0x1614 @0x2
0x1612…161a at0004 = ╱9d╱ EXEC ╱ // 0x1616 @0x4
0x1612…161a at0005 = ╱53╱S╱ // 0x1617 @0x5
0x1612…161a at0006 = ╱4c╱L╱ // 0x1618 @0x6
0x1612…161a at0007 = EOL // 0x1619 @0x7
0x1612…161a }
0x161a…1622 a379 3146 EXEC SL
0x161a…1622 LineComalBin {
0x161a…1622 ptr = 0xa379 // 0x161a @0x0
0x161a…1622 lno = 0x0c4a // 0x161c @0x2
0x161a…1622 at0004 = ╱9d╱ EXEC ╱ // 0x161e @0x4
0x161a…1622 at0005 = ╱53╱S╱ // 0x161f @0x5
0x161a…1622 at0006 = ╱4c╱L╱ // 0x1620 @0x6
0x161a…1622 at0007 = EOL // 0x1621 @0x7
0x161a…1622 }
0x1622…162a a381 3148 EXEC SL
0x1622…162a LineComalBin {
0x1622…162a ptr = 0xa381 // 0x1622 @0x0
0x1622…162a lno = 0x0c4c // 0x1624 @0x2
0x1622…162a at0004 = ╱9d╱ EXEC ╱ // 0x1626 @0x4
0x1622…162a at0005 = ╱53╱S╱ // 0x1627 @0x5
0x1622…162a at0006 = ╱4c╱L╱ // 0x1628 @0x6
0x1622…162a at0007 = EOL // 0x1629 @0x7
0x1622…162a }
0x162a…1632 a389 3150 EXEC SL
0x162a…1632 LineComalBin {
0x162a…1632 ptr = 0xa389 // 0x162a @0x0
0x162a…1632 lno = 0x0c4e // 0x162c @0x2
0x162a…1632 at0004 = ╱9d╱ EXEC ╱ // 0x162e @0x4
0x162a…1632 at0005 = ╱53╱S╱ // 0x162f @0x5
0x162a…1632 at0006 = ╱4c╱L╱ // 0x1630 @0x6
0x162a…1632 at0007 = EOL // 0x1631 @0x7
0x162a…1632 }
0x1632…1638 a38f 3152 PRINT
0x1632…1638 LineComalBin {
0x1632…1638 ptr = 0xa38f // 0x1632 @0x0
0x1632…1638 lno = 0x0c50 // 0x1634 @0x2
0x1632…1638 at0004 = ╱92╱ PRINT ╱ // 0x1636 @0x4
0x1632…1638 at0005 = EOL // 0x1637 @0x5
0x1632…1638 }
0x1638…163e a395 3154 ;
0x1638…163e LineComalBin {
0x1638…163e ptr = 0xa395 // 0x1638 @0x0
0x1638…163e lno = 0x0c52 // 0x163a @0x2
0x1638…163e at0004 = ╱b2╱ ; ╱ // 0x163c @0x4
0x1638…163e at0005 = EOL // 0x163d @0x5
0x1638…163e }
0x163e…1644 a39b 3156 ;
0x163e…1644 LineComalBin {
0x163e…1644 ptr = 0xa39b // 0x163e @0x0
0x163e…1644 lno = 0x0c54 // 0x1640 @0x2
0x163e…1644 at0004 = ╱b2╱ ; ╱ // 0x1642 @0x4
0x163e…1644 at0005 = EOL // 0x1643 @0x5
0x163e…1644 }
0x1644…164a a3a1 3158 ;
0x1644…164a LineComalBin {
0x1644…164a ptr = 0xa3a1 // 0x1644 @0x0
0x1644…164a lno = 0x0c56 // 0x1646 @0x2
0x1644…164a at0004 = ╱b2╱ ; ╱ // 0x1648 @0x4
0x1644…164a at0005 = EOL // 0x1649 @0x5
0x1644…164a }
0x164a…165b a3b2 3160 FOR I=E TO 19
0x164a…165b LineComalBin {
0x164a…165b ptr = 0xa3b2 // 0x164a @0x0
0x164a…165b lno = 0x0c58 // 0x164c @0x2
0x164a…165b at0004 = ╱83╱ FOR ╱ // 0x164e @0x4
0x164a…165b at0005 = ╱49╱I╱ // 0x164f @0x5
0x164a…165b at0006 = ╱dc╱=╱ // 0x1650 @0x6
0x164a…165b at0007 = ╱45╱E╱ // 0x1651 @0x7
0x164a…165b at0008 = ╱b7╱ TO ╱ // 0x1652 @0x8
0x164a…165b at0009 = ╱31╱1╱ // 0x1653 @0x9
0x164a…165b at000a = ╱39╱9╱ // 0x1654 @0xa
0x164a…165b at000b = ╱fe00009805╱ // 0x1655 @0xb
0x164a…165b at0010 = EOL // 0x165a @0x10
0x164a…165b }
0x165b…1677 a3ce 3162 PAGE$(I)=E9$(E,68)
0x165b…1677 LineComalBin {
0x165b…1677 ptr = 0xa3ce // 0x165b @0x0
0x165b…1677 lno = 0x0c5a // 0x165d @0x2
0x165b…1677 at0004 = ╱50╱P╱ // 0x165f @0x4
0x165b…1677 at0005 = ╱41╱A╱ // 0x1660 @0x5
0x165b…1677 at0006 = ╱47╱G╱ // 0x1661 @0x6
0x165b…1677 at0007 = ╱45╱E╱ // 0x1662 @0x7
0x165b…1677 at0008 = ╱ef╱$╱ // 0x1663 @0x8
0x165b…1677 at0009 = ╱ed╱(╱ // 0x1664 @0x9
0x165b…1677 at000a = ╱49╱I╱ // 0x1665 @0xa
0x165b…1677 at000b = ╱ee╱)╱ // 0x1666 @0xb
0x165b…1677 at000c = ╱dc╱=╱ // 0x1667 @0xc
0x165b…1677 at000d = ╱45╱E╱ // 0x1668 @0xd
0x165b…1677 at000e = ╱39╱9╱ // 0x1669 @0xe
0x165b…1677 at000f = ╱ef╱$╱ // 0x166a @0xf
0x165b…1677 at0010 = ╱ed╱(╱ // 0x166b @0x10
0x165b…1677 at0011 = ╱45╱E╱ // 0x166c @0x11
0x165b…1677 at0012 = ╱ec╱,╱ // 0x166d @0x12
0x165b…1677 at0013 = ╱36╱6╱ // 0x166e @0x13
0x165b…1677 at0014 = ╱38╱8╱ // 0x166f @0x14
0x165b…1677 at0015 = ╱fe00008807╱ // 0x1670 @0x15
0x165b…1677 at001a = ╱ee╱)╱ // 0x1675 @0x1a
0x165b…1677 at001b = EOL // 0x1676 @0x1b
0x165b…1677 }
0x1677…167e a3d5 3164 NEXT I
0x1677…167e LineComalBin {
0x1677…167e ptr = 0xa3d5 // 0x1677 @0x0
0x1677…167e lno = 0x0c5c // 0x1679 @0x2
0x1677…167e at0004 = ╱84╱ NEXT ╱ // 0x167b @0x4
0x1677…167e at0005 = ╱49╱I╱ // 0x167c @0x5
0x1677…167e at0006 = EOL // 0x167d @0x6
0x1677…167e }
0x167e…1684 a3db 3166 ENDPROC
0x167e…1684 LineComalBin {
0x167e…1684 ptr = 0xa3db // 0x167e @0x0
0x167e…1684 lno = 0x0c5e // 0x1680 @0x2
0x167e…1684 at0004 = ╱9f╱ ENDPROC ╱ // 0x1682 @0x4
0x167e…1684 at0005 = EOL // 0x1683 @0x5
0x167e…1684 }
0x1684…168c a3e3 3170 PROC SL
0x1684…168c LineComalBin {
0x1684…168c ptr = 0xa3e3 // 0x1684 @0x0
0x1684…168c lno = 0x0c62 // 0x1686 @0x2
0x1684…168c at0004 = ╱9e╱ PROC ╱ // 0x1688 @0x4
0x1684…168c at0005 = ╱53╱S╱ // 0x1689 @0x5
0x1684…168c at0006 = ╱4c╱L╱ // 0x168a @0x6
0x1684…168c at0007 = EOL // 0x168b @0x7
0x1684…168c }
0x168c…16a4 a3fb 3180 PRINT TAB(TAP);PAGE$(LINE)
0x168c…16a4 LineComalBin {
0x168c…16a4 ptr = 0xa3fb // 0x168c @0x0
0x168c…16a4 lno = 0x0c6c // 0x168e @0x2
0x168c…16a4 at0004 = ╱92╱ PRINT ╱ // 0x1690 @0x4
0x168c…16a4 at0005 = ╱d2╱TAB╱ // 0x1691 @0x5
0x168c…16a4 at0006 = ╱ed╱(╱ // 0x1692 @0x6
0x168c…16a4 at0007 = ╱54╱T╱ // 0x1693 @0x7
0x168c…16a4 at0008 = ╱41╱A╱ // 0x1694 @0x8
0x168c…16a4 at0009 = ╱50╱P╱ // 0x1695 @0x9
0x168c…16a4 at000a = ╱ee╱)╱ // 0x1696 @0xa
0x168c…16a4 at000b = ╱eb╱;╱ // 0x1697 @0xb
0x168c…16a4 at000c = ╱50╱P╱ // 0x1698 @0xc
0x168c…16a4 at000d = ╱41╱A╱ // 0x1699 @0xd
0x168c…16a4 at000e = ╱47╱G╱ // 0x169a @0xe
0x168c…16a4 at000f = ╱45╱E╱ // 0x169b @0xf
0x168c…16a4 at0010 = ╱ef╱$╱ // 0x169c @0x10
0x168c…16a4 at0011 = ╱ed╱(╱ // 0x169d @0x11
0x168c…16a4 at0012 = ╱4c╱L╱ // 0x169e @0x12
0x168c…16a4 at0013 = ╱49╱I╱ // 0x169f @0x13
0x168c…16a4 at0014 = ╱4e╱N╱ // 0x16a0 @0x14
0x168c…16a4 at0015 = ╱45╱E╱ // 0x16a1 @0x15
0x168c…16a4 at0016 = ╱ee╱)╱ // 0x16a2 @0x16
0x168c…16a4 at0017 = EOL // 0x16a3 @0x17
0x168c…16a4 }
0x16a4…16b4 a40b 3190 LINE=LINE+E
0x16a4…16b4 LineComalBin {
0x16a4…16b4 ptr = 0xa40b // 0x16a4 @0x0
0x16a4…16b4 lno = 0x0c76 // 0x16a6 @0x2
0x16a4…16b4 at0004 = ╱4c╱L╱ // 0x16a8 @0x4
0x16a4…16b4 at0005 = ╱49╱I╱ // 0x16a9 @0x5
0x16a4…16b4 at0006 = ╱4e╱N╱ // 0x16aa @0x6
0x16a4…16b4 at0007 = ╱45╱E╱ // 0x16ab @0x7
0x16a4…16b4 at0008 = ╱dc╱=╱ // 0x16ac @0x8
0x16a4…16b4 at0009 = ╱4c╱L╱ // 0x16ad @0x9
0x16a4…16b4 at000a = ╱49╱I╱ // 0x16ae @0xa
0x16a4…16b4 at000b = ╱4e╱N╱ // 0x16af @0xb
0x16a4…16b4 at000c = ╱45╱E╱ // 0x16b0 @0xc
0x16a4…16b4 at000d = ╱e2╱+╱ // 0x16b1 @0xd
0x16a4…16b4 at000e = ╱45╱E╱ // 0x16b2 @0xe
0x16a4…16b4 at000f = EOL // 0x16b3 @0xf
0x16a4…16b4 }
0x16b4…16ba a411 3200 ENDPROC
0x16b4…16ba LineComalBin {
0x16b4…16ba ptr = 0xa411 // 0x16b4 @0x0
0x16b4…16ba lno = 0x0c80 // 0x16b6 @0x2
0x16b4…16ba at0004 = ╱9f╱ ENDPROC ╱ // 0x16b8 @0x4
0x16b4…16ba at0005 = EOL // 0x16b9 @0x5
0x16b4…16ba }
0x16ba…16ca a421 3240 PROC SKRIVHOVED
0x16ba…16ca LineComalBin {
0x16ba…16ca ptr = 0xa421 // 0x16ba @0x0
0x16ba…16ca lno = 0x0ca8 // 0x16bc @0x2
0x16ba…16ca at0004 = ╱9e╱ PROC ╱ // 0x16be @0x4
0x16ba…16ca at0005 = ╱53╱S╱ // 0x16bf @0x5
0x16ba…16ca at0006 = ╱4b╱K╱ // 0x16c0 @0x6
0x16ba…16ca at0007 = ╱52╱R╱ // 0x16c1 @0x7
0x16ba…16ca at0008 = ╱49╱I╱ // 0x16c2 @0x8
0x16ba…16ca at0009 = ╱56╱V╱ // 0x16c3 @0x9
0x16ba…16ca at000a = ╱48╱H╱ // 0x16c4 @0xa
0x16ba…16ca at000b = ╱4f╱O╱ // 0x16c5 @0xb
0x16ba…16ca at000c = ╱56╱V╱ // 0x16c6 @0xc
0x16ba…16ca at000d = ╱45╱E╱ // 0x16c7 @0xd
0x16ba…16ca at000e = ╱44╱D╱ // 0x16c8 @0xe
0x16ba…16ca at000f = EOL // 0x16c9 @0xf
0x16ba…16ca }
0x16ca…16e8 a43f 3250 PAGE$(E,PS+24:G)=ÅR$
0x16ca…16e8 LineComalBin {
0x16ca…16e8 ptr = 0xa43f // 0x16ca @0x0
0x16ca…16e8 lno = 0x0cb2 // 0x16cc @0x2
0x16ca…16e8 at0004 = ╱50╱P╱ // 0x16ce @0x4
0x16ca…16e8 at0005 = ╱41╱A╱ // 0x16cf @0x5
0x16ca…16e8 at0006 = ╱47╱G╱ // 0x16d0 @0x6
0x16ca…16e8 at0007 = ╱45╱E╱ // 0x16d1 @0x7
0x16ca…16e8 at0008 = ╱ef╱$╱ // 0x16d2 @0x8
0x16ca…16e8 at0009 = ╱ed╱(╱ // 0x16d3 @0x9
0x16ca…16e8 at000a = ╱45╱E╱ // 0x16d4 @0xa
0x16ca…16e8 at000b = ╱ec╱,╱ // 0x16d5 @0xb
0x16ca…16e8 at000c = ╱50╱P╱ // 0x16d6 @0xc
0x16ca…16e8 at000d = ╱53╱S╱ // 0x16d7 @0xd
0x16ca…16e8 at000e = ╱e2╱+╱ // 0x16d8 @0xe
0x16ca…16e8 at000f = ╱32╱2╱ // 0x16d9 @0xf
0x16ca…16e8 at0010 = ╱34╱4╱ // 0x16da @0x10
0x16ca…16e8 at0011 = ╱fe0000c005╱ // 0x16db @0x11
0x16ca…16e8 at0016 = ╱f0╱:╱ // 0x16e0 @0x16
0x16ca…16e8 at0017 = ╱47╱G╱ // 0x16e1 @0x17
0x16ca…16e8 at0018 = ╱ee╱)╱ // 0x16e2 @0x18
0x16ca…16e8 at0019 = ╱dc╱=╱ // 0x16e3 @0x19
0x16ca…16e8 at001a = ╱5d╱Å╱ // 0x16e4 @0x1a
0x16ca…16e8 at001b = ╱52╱R╱ // 0x16e5 @0x1b
0x16ca…16e8 at001c = ╱ef╱$╱ // 0x16e6 @0x1c
0x16ca…16e8 at001d = EOL // 0x16e7 @0x1d
0x16ca…16e8 }
0x16e8…1706 a45d 3255 PAGE$(G,PS+24:E)=KV$
0x16e8…1706 LineComalBin {
0x16e8…1706 ptr = 0xa45d // 0x16e8 @0x0
0x16e8…1706 lno = 0x0cb7 // 0x16ea @0x2
0x16e8…1706 at0004 = ╱50╱P╱ // 0x16ec @0x4
0x16e8…1706 at0005 = ╱41╱A╱ // 0x16ed @0x5
0x16e8…1706 at0006 = ╱47╱G╱ // 0x16ee @0x6
0x16e8…1706 at0007 = ╱45╱E╱ // 0x16ef @0x7
0x16e8…1706 at0008 = ╱ef╱$╱ // 0x16f0 @0x8
0x16e8…1706 at0009 = ╱ed╱(╱ // 0x16f1 @0x9
0x16e8…1706 at000a = ╱47╱G╱ // 0x16f2 @0xa
0x16e8…1706 at000b = ╱ec╱,╱ // 0x16f3 @0xb
0x16e8…1706 at000c = ╱50╱P╱ // 0x16f4 @0xc
0x16e8…1706 at000d = ╱53╱S╱ // 0x16f5 @0xd
0x16e8…1706 at000e = ╱e2╱+╱ // 0x16f6 @0xe
0x16e8…1706 at000f = ╱32╱2╱ // 0x16f7 @0xf
0x16e8…1706 at0010 = ╱34╱4╱ // 0x16f8 @0x10
0x16e8…1706 at0011 = ╱fe0000c005╱ // 0x16f9 @0x11
0x16e8…1706 at0016 = ╱f0╱:╱ // 0x16fe @0x16
0x16e8…1706 at0017 = ╱45╱E╱ // 0x16ff @0x17
0x16e8…1706 at0018 = ╱ee╱)╱ // 0x1700 @0x18
0x16e8…1706 at0019 = ╱dc╱=╱ // 0x1701 @0x19
0x16e8…1706 at001a = ╱4b╱K╱ // 0x1702 @0x1a
0x16e8…1706 at001b = ╱56╱V╱ // 0x1703 @0x1b
0x16e8…1706 at001c = ╱ef╱$╱ // 0x1704 @0x1c
0x16e8…1706 at001d = EOL // 0x1705 @0x1d
0x16e8…1706 }
0x1706…171f a476 3260 EXEC CONV(C3$,G6,6)
0x1706…171f LineComalBin {
0x1706…171f ptr = 0xa476 // 0x1706 @0x0
0x1706…171f lno = 0x0cbc // 0x1708 @0x2
0x1706…171f at0004 = ╱9d╱ EXEC ╱ // 0x170a @0x4
0x1706…171f at0005 = ╱43╱C╱ // 0x170b @0x5
0x1706…171f at0006 = ╱4f╱O╱ // 0x170c @0x6
0x1706…171f at0007 = ╱4e╱N╱ // 0x170d @0x7
0x1706…171f at0008 = ╱56╱V╱ // 0x170e @0x8
0x1706…171f at0009 = ╱ed╱(╱ // 0x170f @0x9
0x1706…171f at000a = ╱43╱C╱ // 0x1710 @0xa
0x1706…171f at000b = ╱33╱3╱ // 0x1711 @0xb
0x1706…171f at000c = ╱ef╱$╱ // 0x1712 @0xc
0x1706…171f at000d = ╱ec╱,╱ // 0x1713 @0xd
0x1706…171f at000e = ╱47╱G╱ // 0x1714 @0xe
0x1706…171f at000f = ╱36╱6╱ // 0x1715 @0xf
0x1706…171f at0010 = ╱ec╱,╱ // 0x1716 @0x10
0x1706…171f at0011 = ╱36╱6╱ // 0x1717 @0x11
0x1706…171f at0012 = ╱fe0000c003╱ // 0x1718 @0x12
0x1706…171f at0017 = ╱ee╱)╱ // 0x171d @0x17
0x1706…171f at0018 = EOL // 0x171e @0x18
0x1706…171f }
0x171f…1738 a48f 3265 EXEC CONV(F1$,G7,4)
0x171f…1738 LineComalBin {
0x171f…1738 ptr = 0xa48f // 0x171f @0x0
0x171f…1738 lno = 0x0cc1 // 0x1721 @0x2
0x171f…1738 at0004 = ╱9d╱ EXEC ╱ // 0x1723 @0x4
0x171f…1738 at0005 = ╱43╱C╱ // 0x1724 @0x5
0x171f…1738 at0006 = ╱4f╱O╱ // 0x1725 @0x6
0x171f…1738 at0007 = ╱4e╱N╱ // 0x1726 @0x7
0x171f…1738 at0008 = ╱56╱V╱ // 0x1727 @0x8
0x171f…1738 at0009 = ╱ed╱(╱ // 0x1728 @0x9
0x171f…1738 at000a = ╱46╱F╱ // 0x1729 @0xa
0x171f…1738 at000b = ╱31╱1╱ // 0x172a @0xb
0x171f…1738 at000c = ╱ef╱$╱ // 0x172b @0xc
0x171f…1738 at000d = ╱ec╱,╱ // 0x172c @0xd
0x171f…1738 at000e = ╱47╱G╱ // 0x172d @0xe
0x171f…1738 at000f = ╱37╱7╱ // 0x172e @0xf
0x171f…1738 at0010 = ╱ec╱,╱ // 0x172f @0x10
0x171f…1738 at0011 = ╱34╱4╱ // 0x1730 @0x11
0x171f…1738 at0012 = ╱fe00008003╱ // 0x1731 @0x12
0x171f…1738 at0017 = ╱ee╱)╱ // 0x1736 @0x17
0x171f…1738 at0018 = EOL // 0x1737 @0x18
0x171f…1738 }
0x1738…1748 a49f 3270 C3$=C3$+F1$
0x1738…1748 LineComalBin {
0x1738…1748 ptr = 0xa49f // 0x1738 @0x0
0x1738…1748 lno = 0x0cc6 // 0x173a @0x2
0x1738…1748 at0004 = ╱43╱C╱ // 0x173c @0x4
0x1738…1748 at0005 = ╱33╱3╱ // 0x173d @0x5
0x1738…1748 at0006 = ╱ef╱$╱ // 0x173e @0x6
0x1738…1748 at0007 = ╱dc╱=╱ // 0x173f @0x7
0x1738…1748 at0008 = ╱43╱C╱ // 0x1740 @0x8
0x1738…1748 at0009 = ╱33╱3╱ // 0x1741 @0x9
0x1738…1748 at000a = ╱ef╱$╱ // 0x1742 @0xa
0x1738…1748 at000b = ╱f1╱+╱ // 0x1743 @0xb
0x1738…1748 at000c = ╱46╱F╱ // 0x1744 @0xc
0x1738…1748 at000d = ╱31╱1╱ // 0x1745 @0xd
0x1738…1748 at000e = ╱ef╱$╱ // 0x1746 @0xe
0x1738…1748 at000f = EOL // 0x1747 @0xf
0x1738…1748 }
0x1748…176c a4c3 3275 PAGE$(V,PS+10:10)=C3$
0x1748…176c LineComalBin {
0x1748…176c ptr = 0xa4c3 // 0x1748 @0x0
0x1748…176c lno = 0x0ccb // 0x174a @0x2
0x1748…176c at0004 = ╱50╱P╱ // 0x174c @0x4
0x1748…176c at0005 = ╱41╱A╱ // 0x174d @0x5
0x1748…176c at0006 = ╱47╱G╱ // 0x174e @0x6
0x1748…176c at0007 = ╱45╱E╱ // 0x174f @0x7
0x1748…176c at0008 = ╱ef╱$╱ // 0x1750 @0x8
0x1748…176c at0009 = ╱ed╱(╱ // 0x1751 @0x9
0x1748…176c at000a = ╱56╱V╱ // 0x1752 @0xa
0x1748…176c at000b = ╱ec╱,╱ // 0x1753 @0xb
0x1748…176c at000c = ╱50╱P╱ // 0x1754 @0xc
0x1748…176c at000d = ╱53╱S╱ // 0x1755 @0xd
0x1748…176c at000e = ╱e2╱+╱ // 0x1756 @0xe
0x1748…176c at000f = ╱31╱1╱ // 0x1757 @0xf
0x1748…176c at0010 = ╱30╱0╱ // 0x1758 @0x10
0x1748…176c at0011 = ╱fe0000a004╱ // 0x1759 @0x11
0x1748…176c at0016 = ╱f0╱:╱ // 0x175e @0x16
0x1748…176c at0017 = ╱31╱1╱ // 0x175f @0x17
0x1748…176c at0018 = ╱30╱0╱ // 0x1760 @0x18
0x1748…176c at0019 = ╱fe0000a004╱ // 0x1761 @0x19
0x1748…176c at001e = ╱ee╱)╱ // 0x1766 @0x1e
0x1748…176c at001f = ╱dc╱=╱ // 0x1767 @0x1f
0x1748…176c at0020 = ╱43╱C╱ // 0x1768 @0x20
0x1748…176c at0021 = ╱33╱3╱ // 0x1769 @0x21
0x1748…176c at0022 = ╱ef╱$╱ // 0x176a @0x22
0x1748…176c at0023 = EOL // 0x176b @0x23
0x1748…176c }
0x176c…1785 a4dc 3280 EXEC CONV(C3$,F8,4)
0x176c…1785 LineComalBin {
0x176c…1785 ptr = 0xa4dc // 0x176c @0x0
0x176c…1785 lno = 0x0cd0 // 0x176e @0x2
0x176c…1785 at0004 = ╱9d╱ EXEC ╱ // 0x1770 @0x4
0x176c…1785 at0005 = ╱43╱C╱ // 0x1771 @0x5
0x176c…1785 at0006 = ╱4f╱O╱ // 0x1772 @0x6
0x176c…1785 at0007 = ╱4e╱N╱ // 0x1773 @0x7
0x176c…1785 at0008 = ╱56╱V╱ // 0x1774 @0x8
0x176c…1785 at0009 = ╱ed╱(╱ // 0x1775 @0x9
0x176c…1785 at000a = ╱43╱C╱ // 0x1776 @0xa
0x176c…1785 at000b = ╱33╱3╱ // 0x1777 @0xb
0x176c…1785 at000c = ╱ef╱$╱ // 0x1778 @0xc
0x176c…1785 at000d = ╱ec╱,╱ // 0x1779 @0xd
0x176c…1785 at000e = ╱46╱F╱ // 0x177a @0xe
0x176c…1785 at000f = ╱38╱8╱ // 0x177b @0xf
0x176c…1785 at0010 = ╱ec╱,╱ // 0x177c @0x10
0x176c…1785 at0011 = ╱34╱4╱ // 0x177d @0x11
0x176c…1785 at0012 = ╱fe00008003╱ // 0x177e @0x12
0x176c…1785 at0017 = ╱ee╱)╱ // 0x1783 @0x17
0x176c…1785 at0018 = EOL // 0x1784 @0x18
0x176c…1785 }
0x1785…17ac a503 3285 PAGE$(4,PS+5:4)=C3$
0x1785…17ac LineComalBin {
0x1785…17ac ptr = 0xa503 // 0x1785 @0x0
0x1785…17ac lno = 0x0cd5 // 0x1787 @0x2
0x1785…17ac at0004 = ╱50╱P╱ // 0x1789 @0x4
0x1785…17ac at0005 = ╱41╱A╱ // 0x178a @0x5
0x1785…17ac at0006 = ╱47╱G╱ // 0x178b @0x6
0x1785…17ac at0007 = ╱45╱E╱ // 0x178c @0x7
0x1785…17ac at0008 = ╱ef╱$╱ // 0x178d @0x8
0x1785…17ac at0009 = ╱ed╱(╱ // 0x178e @0x9
0x1785…17ac at000a = ╱34╱4╱ // 0x178f @0xa
0x1785…17ac at000b = ╱fe00008003╱ // 0x1790 @0xb
0x1785…17ac at0010 = ╱ec╱,╱ // 0x1795 @0x10
0x1785…17ac at0011 = ╱50╱P╱ // 0x1796 @0x11
0x1785…17ac at0012 = ╱53╱S╱ // 0x1797 @0x12
0x1785…17ac at0013 = ╱e2╱+╱ // 0x1798 @0x13
0x1785…17ac at0014 = ╱35╱5╱ // 0x1799 @0x14
0x1785…17ac at0015 = ╱fe0000a003╱ // 0x179a @0x15
0x1785…17ac at001a = ╱f0╱:╱ // 0x179f @0x1a
0x1785…17ac at001b = ╱34╱4╱ // 0x17a0 @0x1b
0x1785…17ac at001c = ╱fe00008003╱ // 0x17a1 @0x1c
0x1785…17ac at0021 = ╱ee╱)╱ // 0x17a6 @0x21
0x1785…17ac at0022 = ╱dc╱=╱ // 0x17a7 @0x22
0x1785…17ac at0023 = ╱43╱C╱ // 0x17a8 @0x23
0x1785…17ac at0024 = ╱33╱3╱ // 0x17a9 @0x24
0x1785…17ac at0025 = ╱ef╱$╱ // 0x17aa @0x25
0x1785…17ac at0026 = EOL // 0x17ab @0x26
0x1785…17ac }
0x17ac…17df a536 3290 PAGE$(5,PS+5:25)=D1$(E,25)
0x17ac…17df LineComalBin {
0x17ac…17df ptr = 0xa536 // 0x17ac @0x0
0x17ac…17df lno = 0x0cda // 0x17ae @0x2
0x17ac…17df at0004 = ╱50╱P╱ // 0x17b0 @0x4
0x17ac…17df at0005 = ╱41╱A╱ // 0x17b1 @0x5
0x17ac…17df at0006 = ╱47╱G╱ // 0x17b2 @0x6
0x17ac…17df at0007 = ╱45╱E╱ // 0x17b3 @0x7
0x17ac…17df at0008 = ╱ef╱$╱ // 0x17b4 @0x8
0x17ac…17df at0009 = ╱ed╱(╱ // 0x17b5 @0x9
0x17ac…17df at000a = ╱35╱5╱ // 0x17b6 @0xa
0x17ac…17df at000b = ╱fe0000a003╱ // 0x17b7 @0xb
0x17ac…17df at0010 = ╱ec╱,╱ // 0x17bc @0x10
0x17ac…17df at0011 = ╱50╱P╱ // 0x17bd @0x11
0x17ac…17df at0012 = ╱53╱S╱ // 0x17be @0x12
0x17ac…17df at0013 = ╱e2╱+╱ // 0x17bf @0x13
0x17ac…17df at0014 = ╱35╱5╱ // 0x17c0 @0x14
0x17ac…17df at0015 = ╱fe0000a003╱ // 0x17c1 @0x15
0x17ac…17df at001a = ╱f0╱:╱ // 0x17c6 @0x1a
0x17ac…17df at001b = ╱32╱2╱ // 0x17c7 @0x1b
0x17ac…17df at001c = ╱35╱5╱ // 0x17c8 @0x1c
0x17ac…17df at001d = ╱fe0000c805╱ // 0x17c9 @0x1d
0x17ac…17df at0022 = ╱ee╱)╱ // 0x17ce @0x22
0x17ac…17df at0023 = ╱dc╱=╱ // 0x17cf @0x23
0x17ac…17df at0024 = ╱44╱D╱ // 0x17d0 @0x24
0x17ac…17df at0025 = ╱31╱1╱ // 0x17d1 @0x25
0x17ac…17df at0026 = ╱ef╱$╱ // 0x17d2 @0x26
0x17ac…17df at0027 = ╱ed╱(╱ // 0x17d3 @0x27
0x17ac…17df at0028 = ╱45╱E╱ // 0x17d4 @0x28
0x17ac…17df at0029 = ╱ec╱,╱ // 0x17d5 @0x29
0x17ac…17df at002a = ╱32╱2╱ // 0x17d6 @0x2a
0x17ac…17df at002b = ╱35╱5╱ // 0x17d7 @0x2b
0x17ac…17df at002c = ╱fe0000c805╱ // 0x17d8 @0x2c
0x17ac…17df at0031 = ╱ee╱)╱ // 0x17dd @0x31
0x17ac…17df at0032 = EOL // 0x17de @0x32
0x17ac…17df }
0x17df…1818 a56f 3292 PAGE$(6,PS+5:23)=D1$(26,48)
0x17df…1818 LineComalBin {
0x17df…1818 ptr = 0xa56f // 0x17df @0x0
0x17df…1818 lno = 0x0cdc // 0x17e1 @0x2
0x17df…1818 at0004 = ╱50╱P╱ // 0x17e3 @0x4
0x17df…1818 at0005 = ╱41╱A╱ // 0x17e4 @0x5
0x17df…1818 at0006 = ╱47╱G╱ // 0x17e5 @0x6
0x17df…1818 at0007 = ╱45╱E╱ // 0x17e6 @0x7
0x17df…1818 at0008 = ╱ef╱$╱ // 0x17e7 @0x8
0x17df…1818 at0009 = ╱ed╱(╱ // 0x17e8 @0x9
0x17df…1818 at000a = ╱36╱6╱ // 0x17e9 @0xa
0x17df…1818 at000b = ╱fe0000c003╱ // 0x17ea @0xb
0x17df…1818 at0010 = ╱ec╱,╱ // 0x17ef @0x10
0x17df…1818 at0011 = ╱50╱P╱ // 0x17f0 @0x11
0x17df…1818 at0012 = ╱53╱S╱ // 0x17f1 @0x12
0x17df…1818 at0013 = ╱e2╱+╱ // 0x17f2 @0x13
0x17df…1818 at0014 = ╱35╱5╱ // 0x17f3 @0x14
0x17df…1818 at0015 = ╱fe0000a003╱ // 0x17f4 @0x15
0x17df…1818 at001a = ╱f0╱:╱ // 0x17f9 @0x1a
0x17df…1818 at001b = ╱32╱2╱ // 0x17fa @0x1b
0x17df…1818 at001c = ╱33╱3╱ // 0x17fb @0x1c
0x17df…1818 at001d = ╱fe0000b805╱ // 0x17fc @0x1d
0x17df…1818 at0022 = ╱ee╱)╱ // 0x1801 @0x22
0x17df…1818 at0023 = ╱dc╱=╱ // 0x1802 @0x23
0x17df…1818 at0024 = ╱44╱D╱ // 0x1803 @0x24
0x17df…1818 at0025 = ╱31╱1╱ // 0x1804 @0x25
0x17df…1818 at0026 = ╱ef╱$╱ // 0x1805 @0x26
0x17df…1818 at0027 = ╱ed╱(╱ // 0x1806 @0x27
0x17df…1818 at0028 = ╱32╱2╱ // 0x1807 @0x28
0x17df…1818 at0029 = ╱36╱6╱ // 0x1808 @0x29
0x17df…1818 at002a = ╱fe0000d005╱ // 0x1809 @0x2a
0x17df…1818 at002f = ╱ec╱,╱ // 0x180e @0x2f
0x17df…1818 at0030 = ╱34╱4╱ // 0x180f @0x30
0x17df…1818 at0031 = ╱38╱8╱ // 0x1810 @0x31
0x17df…1818 at0032 = ╱fe0000c006╱ // 0x1811 @0x32
0x17df…1818 at0037 = ╱ee╱)╱ // 0x1816 @0x37
0x17df…1818 at0038 = EOL // 0x1817 @0x38
0x17df…1818 }
0x1818…1862 a5b9 3295 PAGE$(7,PS+5:19)=D2$(E,4)+" "+D2$(5,18)
0x1818…1862 LineComalBin {
0x1818…1862 ptr = 0xa5b9 // 0x1818 @0x0
0x1818…1862 lno = 0x0cdf // 0x181a @0x2
0x1818…1862 at0004 = ╱50╱P╱ // 0x181c @0x4
0x1818…1862 at0005 = ╱41╱A╱ // 0x181d @0x5
0x1818…1862 at0006 = ╱47╱G╱ // 0x181e @0x6
0x1818…1862 at0007 = ╱45╱E╱ // 0x181f @0x7
0x1818…1862 at0008 = ╱ef╱$╱ // 0x1820 @0x8
0x1818…1862 at0009 = ╱ed╱(╱ // 0x1821 @0x9
0x1818…1862 at000a = ╱37╱7╱ // 0x1822 @0xa
0x1818…1862 at000b = ╱fe0000e003╱ // 0x1823 @0xb
0x1818…1862 at0010 = ╱ec╱,╱ // 0x1828 @0x10
0x1818…1862 at0011 = ╱50╱P╱ // 0x1829 @0x11
0x1818…1862 at0012 = ╱53╱S╱ // 0x182a @0x12
0x1818…1862 at0013 = ╱e2╱+╱ // 0x182b @0x13
0x1818…1862 at0014 = ╱35╱5╱ // 0x182c @0x14
0x1818…1862 at0015 = ╱fe0000a003╱ // 0x182d @0x15
0x1818…1862 at001a = ╱f0╱:╱ // 0x1832 @0x1a
0x1818…1862 at001b = ╱31╱1╱ // 0x1833 @0x1b
0x1818…1862 at001c = ╱39╱9╱ // 0x1834 @0x1c
0x1818…1862 at001d = ╱fe00009805╱ // 0x1835 @0x1d
0x1818…1862 at0022 = ╱ee╱)╱ // 0x183a @0x22
0x1818…1862 at0023 = ╱dc╱=╱ // 0x183b @0x23
0x1818…1862 at0024 = ╱44╱D╱ // 0x183c @0x24
0x1818…1862 at0025 = ╱32╱2╱ // 0x183d @0x25
0x1818…1862 at0026 = ╱ef╱$╱ // 0x183e @0x26
0x1818…1862 at0027 = ╱ed╱(╱ // 0x183f @0x27
0x1818…1862 at0028 = ╱45╱E╱ // 0x1840 @0x28
0x1818…1862 at0029 = ╱ec╱,╱ // 0x1841 @0x29
0x1818…1862 at002a = ╱34╱4╱ // 0x1842 @0x2a
0x1818…1862 at002b = ╱fe00008003╱ // 0x1843 @0x2b
0x1818…1862 at0030 = ╱ee╱)╱ // 0x1848 @0x30
0x1818…1862 at0031 = ╱f1╱+╱ // 0x1849 @0x31
0x1818…1862 at0032 = ╱22╱"╱ // 0x184a @0x32
0x1818…1862 at0033 = ╱20╱…╱ // 0x184b @0x33
0x1818…1862 at0034 = ╱22╱"╱ // 0x184c @0x34
0x1818…1862 at0035 = ╱f1╱+╱ // 0x184d @0x35
0x1818…1862 at0036 = ╱44╱D╱ // 0x184e @0x36
0x1818…1862 at0037 = ╱32╱2╱ // 0x184f @0x37
0x1818…1862 at0038 = ╱ef╱$╱ // 0x1850 @0x38
0x1818…1862 at0039 = ╱ed╱(╱ // 0x1851 @0x39
0x1818…1862 at003a = ╱35╱5╱ // 0x1852 @0x3a
0x1818…1862 at003b = ╱fe0000a003╱ // 0x1853 @0x3b
0x1818…1862 at0040 = ╱ec╱,╱ // 0x1858 @0x40
0x1818…1862 at0041 = ╱31╱1╱ // 0x1859 @0x41
0x1818…1862 at0042 = ╱38╱8╱ // 0x185a @0x42
0x1818…1862 at0043 = ╱fe00009005╱ // 0x185b @0x43
0x1818…1862 at0048 = ╱ee╱)╱ // 0x1860 @0x48
0x1818…1862 at0049 = EOL // 0x1861 @0x49
0x1818…1862 }
0x1862…1868 a5bf 3300 ENDPROC
0x1862…1868 LineComalBin {
0x1862…1868 ptr = 0xa5bf // 0x1862 @0x0
0x1862…1868 lno = 0x0ce4 // 0x1864 @0x2
0x1862…1868 at0004 = ╱9f╱ ENDPROC ╱ // 0x1866 @0x4
0x1862…1868 at0005 = EOL // 0x1867 @0x5
0x1862…1868 }
0x1868…1873 a5ca 3440 PROC NÆSTE
0x1868…1873 LineComalBin {
0x1868…1873 ptr = 0xa5ca // 0x1868 @0x0
0x1868…1873 lno = 0x0d70 // 0x186a @0x2
0x1868…1873 at0004 = ╱9e╱ PROC ╱ // 0x186c @0x4
0x1868…1873 at0005 = ╱4e╱N╱ // 0x186d @0x5
0x1868…1873 at0006 = ╱5b╱Æ╱ // 0x186e @0x6
0x1868…1873 at0007 = ╱53╱S╱ // 0x186f @0x7
0x1868…1873 at0008 = ╱54╱T╱ // 0x1870 @0x8
0x1868…1873 at0009 = ╱45╱E╱ // 0x1871 @0x9
0x1868…1873 at000a = EOL // 0x1872 @0xa
0x1868…1873 }
0x1873…1879 a5d0 3450 REPEAT
0x1873…1879 LineComalBin {
0x1873…1879 ptr = 0xa5d0 // 0x1873 @0x0
0x1873…1879 lno = 0x0d7a // 0x1875 @0x2
0x1873…1879 at0004 = ╱97╱ REPEAT ╱ // 0x1877 @0x4
0x1873…1879 at0005 = EOL // 0x1878 @0x5
0x1873…1879 }
0x1879…1885 a5dc 3460 F8=F8+E
0x1879…1885 LineComalBin {
0x1879…1885 ptr = 0xa5dc // 0x1879 @0x0
0x1879…1885 lno = 0x0d84 // 0x187b @0x2
0x1879…1885 at0004 = ╱46╱F╱ // 0x187d @0x4
0x1879…1885 at0005 = ╱38╱8╱ // 0x187e @0x5
0x1879…1885 at0006 = ╱dc╱=╱ // 0x187f @0x6
0x1879…1885 at0007 = ╱46╱F╱ // 0x1880 @0x7
0x1879…1885 at0008 = ╱38╱8╱ // 0x1881 @0x8
0x1879…1885 at0009 = ╱e2╱+╱ // 0x1882 @0x9
0x1879…1885 at000a = ╱45╱E╱ // 0x1883 @0xa
0x1879…1885 at000b = EOL // 0x1884 @0xb
0x1879…1885 }
0x1885…188e a5e5 3470 H1=E
0x1885…188e LineComalBin {
0x1885…188e ptr = 0xa5e5 // 0x1885 @0x0
0x1885…188e lno = 0x0d8e // 0x1887 @0x2
0x1885…188e at0004 = ╱48╱H╱ // 0x1889 @0x4
0x1885…188e at0005 = ╱31╱1╱ // 0x188a @0x5
0x1885…188e at0006 = ╱dc╱=╱ // 0x188b @0x6
0x1885…188e at0007 = ╱45╱E╱ // 0x188c @0x7
0x1885…188e at0008 = EOL // 0x188d @0x8
0x1885…188e }
0x188e…189a a5f1 3480 IF F8<=I9 THEN
0x188e…189a LineComalBin {
0x188e…189a ptr = 0xa5f1 // 0x188e @0x0
0x188e…189a lno = 0x0d98 // 0x1890 @0x2
0x188e…189a at0004 = ╱9c╱ IF ╱ // 0x1892 @0x4
0x188e…189a at0005 = ╱46╱F╱ // 0x1893 @0x5
0x188e…189a at0006 = ╱38╱8╱ // 0x1894 @0x6
0x188e…189a at0007 = ╱df╱<=╱ // 0x1895 @0x7
0x188e…189a at0008 = ╱49╱I╱ // 0x1896 @0x8
0x188e…189a at0009 = ╱39╱9╱ // 0x1897 @0x9
0x188e…189a at000a = ╱b6╱ THEN ╱ // 0x1898 @0xa
0x188e…189a at000b = EOL // 0x1899 @0xb
0x188e…189a }
0x189a…18ac a603 3490 EXEC INLØNMOD(F8)
0x189a…18ac LineComalBin {
0x189a…18ac ptr = 0xa603 // 0x189a @0x0
0x189a…18ac lno = 0x0da2 // 0x189c @0x2
0x189a…18ac at0004 = ╱9d╱ EXEC ╱ // 0x189e @0x4
0x189a…18ac at0005 = ╱49╱I╱ // 0x189f @0x5
0x189a…18ac at0006 = ╱4e╱N╱ // 0x18a0 @0x6
0x189a…18ac at0007 = ╱4c╱L╱ // 0x18a1 @0x7
0x189a…18ac at0008 = ╱5c╱Ø╱ // 0x18a2 @0x8
0x189a…18ac at0009 = ╱4e╱N╱ // 0x18a3 @0x9
0x189a…18ac at000a = ╱4d╱M╱ // 0x18a4 @0xa
0x189a…18ac at000b = ╱4f╱O╱ // 0x18a5 @0xb
0x189a…18ac at000c = ╱44╱D╱ // 0x18a6 @0xc
0x189a…18ac at000d = ╱ed╱(╱ // 0x18a7 @0xd
0x189a…18ac at000e = ╱46╱F╱ // 0x18a8 @0xe
0x189a…18ac at000f = ╱38╱8╱ // 0x18a9 @0xf
0x189a…18ac at0010 = ╱ee╱)╱ // 0x18aa @0x10
0x189a…18ac at0011 = EOL // 0x18ab @0x11
0x189a…18ac }
0x18ac…18c7 a61e 3500 IF A9$<>D2$(21) THEN H1=B
0x18ac…18c7 LineComalBin {
0x18ac…18c7 ptr = 0xa61e // 0x18ac @0x0
0x18ac…18c7 lno = 0x0dac // 0x18ae @0x2
0x18ac…18c7 at0004 = ╱82╱ IF ╱ // 0x18b0 @0x4
0x18ac…18c7 at0005 = ╱41╱A╱ // 0x18b1 @0x5
0x18ac…18c7 at0006 = ╱39╱9╱ // 0x18b2 @0x6
0x18ac…18c7 at0007 = ╱ef╱$╱ // 0x18b3 @0x7
0x18ac…18c7 at0008 = ╱e1╱<>╱ // 0x18b4 @0x8
0x18ac…18c7 at0009 = ╱44╱D╱ // 0x18b5 @0x9
0x18ac…18c7 at000a = ╱32╱2╱ // 0x18b6 @0xa
0x18ac…18c7 at000b = ╱ef╱$╱ // 0x18b7 @0xb
0x18ac…18c7 at000c = ╱ed╱(╱ // 0x18b8 @0xc
0x18ac…18c7 at000d = ╱32╱2╱ // 0x18b9 @0xd
0x18ac…18c7 at000e = ╱31╱1╱ // 0x18ba @0xe
0x18ac…18c7 at000f = ╱fe0000a805╱ // 0x18bb @0xf
0x18ac…18c7 at0014 = ╱ee╱)╱ // 0x18c0 @0x14
0x18ac…18c7 at0015 = ╱b6╱ THEN ╱ // 0x18c1 @0x15
0x18ac…18c7 at0016 = ╱48╱H╱ // 0x18c2 @0x16
0x18ac…18c7 at0017 = ╱31╱1╱ // 0x18c3 @0x17
0x18ac…18c7 at0018 = ╱dc╱=╱ // 0x18c4 @0x18
0x18ac…18c7 at0019 = ╱42╱B╱ // 0x18c5 @0x19
0x18ac…18c7 at001a = EOL // 0x18c6 @0x1a
0x18ac…18c7 }
0x18c7…18f3 a64a 3510 IF B0$="A" AND D2$(24,25)>"89" THEN H1=B
0x18c7…18f3 LineComalBin {
0x18c7…18f3 ptr = 0xa64a // 0x18c7 @0x0
0x18c7…18f3 lno = 0x0db6 // 0x18c9 @0x2
0x18c7…18f3 at0004 = ╱82╱ IF ╱ // 0x18cb @0x4
0x18c7…18f3 at0005 = ╱42╱B╱ // 0x18cc @0x5
0x18c7…18f3 at0006 = ╱30╱0╱ // 0x18cd @0x6
0x18c7…18f3 at0007 = ╱ef╱$╱ // 0x18ce @0x7
0x18c7…18f3 at0008 = ╱dc╱=╱ // 0x18cf @0x8
0x18c7…18f3 at0009 = ╱22╱"╱ // 0x18d0 @0x9
0x18c7…18f3 at000a = ╱41╱A╱ // 0x18d1 @0xa
0x18c7…18f3 at000b = ╱22╱"╱ // 0x18d2 @0xb
0x18c7…18f3 at000c = ╱da╱ AND ╱ // 0x18d3 @0xc
0x18c7…18f3 at000d = ╱44╱D╱ // 0x18d4 @0xd
0x18c7…18f3 at000e = ╱32╱2╱ // 0x18d5 @0xe
0x18c7…18f3 at000f = ╱ef╱$╱ // 0x18d6 @0xf
0x18c7…18f3 at0010 = ╱ed╱(╱ // 0x18d7 @0x10
0x18c7…18f3 at0011 = ╱32╱2╱ // 0x18d8 @0x11
0x18c7…18f3 at0012 = ╱34╱4╱ // 0x18d9 @0x12
0x18c7…18f3 at0013 = ╱fe0000c005╱ // 0x18da @0x13
0x18c7…18f3 at0018 = ╱ec╱,╱ // 0x18df @0x18
0x18c7…18f3 at0019 = ╱32╱2╱ // 0x18e0 @0x19
0x18c7…18f3 at001a = ╱35╱5╱ // 0x18e1 @0x1a
0x18c7…18f3 at001b = ╱fe0000c805╱ // 0x18e2 @0x1b
0x18c7…18f3 at0020 = ╱ee╱)╱ // 0x18e7 @0x20
0x18c7…18f3 at0021 = ╱de╱>╱ // 0x18e8 @0x21
0x18c7…18f3 at0022 = ╱22╱"╱ // 0x18e9 @0x22
0x18c7…18f3 at0023 = ╱38╱8╱ // 0x18ea @0x23
0x18c7…18f3 at0024 = ╱39╱9╱ // 0x18eb @0x24
0x18c7…18f3 at0025 = ╱22╱"╱ // 0x18ec @0x25
0x18c7…18f3 at0026 = ╱b6╱ THEN ╱ // 0x18ed @0x26
0x18c7…18f3 at0027 = ╱48╱H╱ // 0x18ee @0x27
0x18c7…18f3 at0028 = ╱31╱1╱ // 0x18ef @0x28
0x18c7…18f3 at0029 = ╱dc╱=╱ // 0x18f0 @0x29
0x18c7…18f3 at002a = ╱42╱B╱ // 0x18f1 @0x2a
0x18c7…18f3 at002b = EOL // 0x18f2 @0x2b
0x18c7…18f3 }
0x18f3…191f a676 3520 IF B0$="F" AND D2$(24,25)<"90" THEN H1=B
0x18f3…191f LineComalBin {
0x18f3…191f ptr = 0xa676 // 0x18f3 @0x0
0x18f3…191f lno = 0x0dc0 // 0x18f5 @0x2
0x18f3…191f at0004 = ╱82╱ IF ╱ // 0x18f7 @0x4
0x18f3…191f at0005 = ╱42╱B╱ // 0x18f8 @0x5
0x18f3…191f at0006 = ╱30╱0╱ // 0x18f9 @0x6
0x18f3…191f at0007 = ╱ef╱$╱ // 0x18fa @0x7
0x18f3…191f at0008 = ╱dc╱=╱ // 0x18fb @0x8
0x18f3…191f at0009 = ╱22╱"╱ // 0x18fc @0x9
0x18f3…191f at000a = ╱46╱F╱ // 0x18fd @0xa
0x18f3…191f at000b = ╱22╱"╱ // 0x18fe @0xb
0x18f3…191f at000c = ╱da╱ AND ╱ // 0x18ff @0xc
0x18f3…191f at000d = ╱44╱D╱ // 0x1900 @0xd
0x18f3…191f at000e = ╱32╱2╱ // 0x1901 @0xe
0x18f3…191f at000f = ╱ef╱$╱ // 0x1902 @0xf
0x18f3…191f at0010 = ╱ed╱(╱ // 0x1903 @0x10
0x18f3…191f at0011 = ╱32╱2╱ // 0x1904 @0x11
0x18f3…191f at0012 = ╱34╱4╱ // 0x1905 @0x12
0x18f3…191f at0013 = ╱fe0000c005╱ // 0x1906 @0x13
0x18f3…191f at0018 = ╱ec╱,╱ // 0x190b @0x18
0x18f3…191f at0019 = ╱32╱2╱ // 0x190c @0x19
0x18f3…191f at001a = ╱35╱5╱ // 0x190d @0x1a
0x18f3…191f at001b = ╱fe0000c805╱ // 0x190e @0x1b
0x18f3…191f at0020 = ╱ee╱)╱ // 0x1913 @0x20
0x18f3…191f at0021 = ╱dd╱<╱ // 0x1914 @0x21
0x18f3…191f at0022 = ╱22╱"╱ // 0x1915 @0x22
0x18f3…191f at0023 = ╱39╱9╱ // 0x1916 @0x23
0x18f3…191f at0024 = ╱30╱0╱ // 0x1917 @0x24
0x18f3…191f at0025 = ╱22╱"╱ // 0x1918 @0x25
0x18f3…191f at0026 = ╱b6╱ THEN ╱ // 0x1919 @0x26
0x18f3…191f at0027 = ╱48╱H╱ // 0x191a @0x27
0x18f3…191f at0028 = ╱31╱1╱ // 0x191b @0x28
0x18f3…191f at0029 = ╱dc╱=╱ // 0x191c @0x29
0x18f3…191f at002a = ╱42╱B╱ // 0x191d @0x2a
0x18f3…191f at002b = EOL // 0x191e @0x2b
0x18f3…191f }
0x191f…1925 a67c 3530 ENDIF
0x191f…1925 LineComalBin {
0x191f…1925 ptr = 0xa67c // 0x191f @0x0
0x191f…1925 lno = 0x0dca // 0x1921 @0x2
0x191f…1925 at0004 = ╱9b╱ ENDIF ╱ // 0x1923 @0x4
0x191f…1925 at0005 = EOL // 0x1924 @0x5
0x191f…1925 }
0x1925…192f a686 3540 UNTIL H1>B
0x1925…192f LineComalBin {
0x1925…192f ptr = 0xa686 // 0x1925 @0x0
0x1925…192f lno = 0x0dd4 // 0x1927 @0x2
0x1925…192f at0004 = ╱98╱ UNTIL ╱ // 0x1929 @0x4
0x1925…192f at0005 = ╱48╱H╱ // 0x192a @0x5
0x1925…192f at0006 = ╱31╱1╱ // 0x192b @0x6
0x1925…192f at0007 = ╱de╱>╱ // 0x192c @0x7
0x1925…192f at0008 = ╱42╱B╱ // 0x192d @0x8
0x1925…192f at0009 = EOL // 0x192e @0x9
0x1925…192f }
0x192f…1935 a68c 3550 ENDPROC
0x192f…1935 LineComalBin {
0x192f…1935 ptr = 0xa68c // 0x192f @0x0
0x192f…1935 lno = 0x0dde // 0x1931 @0x2
0x192f…1935 at0004 = ╱9f╱ ENDPROC ╱ // 0x1933 @0x4
0x192f…1935 at0005 = EOL // 0x1934 @0x5
0x192f…1935 }
0x1935…1946 a69d 3560 PROC BEREGNFERIE
0x1935…1946 LineComalBin {
0x1935…1946 ptr = 0xa69d // 0x1935 @0x0
0x1935…1946 lno = 0x0de8 // 0x1937 @0x2
0x1935…1946 at0004 = ╱9e╱ PROC ╱ // 0x1939 @0x4
0x1935…1946 at0005 = ╱42╱B╱ // 0x193a @0x5
0x1935…1946 at0006 = ╱45╱E╱ // 0x193b @0x6
0x1935…1946 at0007 = ╱52╱R╱ // 0x193c @0x7
0x1935…1946 at0008 = ╱45╱E╱ // 0x193d @0x8
0x1935…1946 at0009 = ╱47╱G╱ // 0x193e @0x9
0x1935…1946 at000a = ╱4e╱N╱ // 0x193f @0xa
0x1935…1946 at000b = ╱46╱F╱ // 0x1940 @0xb
0x1935…1946 at000c = ╱45╱E╱ // 0x1941 @0xc
0x1935…1946 at000d = ╱52╱R╱ // 0x1942 @0xd
0x1935…1946 at000e = ╱49╱I╱ // 0x1943 @0xe
0x1935…1946 at000f = ╱45╱E╱ // 0x1944 @0xf
0x1935…1946 at0010 = EOL // 0x1945 @0x10
0x1935…1946 }
0x1946…1956 a6ad 3570 EXEC SKRIVHOVED
0x1946…1956 LineComalBin {
0x1946…1956 ptr = 0xa6ad // 0x1946 @0x0
0x1946…1956 lno = 0x0df2 // 0x1948 @0x2
0x1946…1956 at0004 = ╱9d╱ EXEC ╱ // 0x194a @0x4
0x1946…1956 at0005 = ╱53╱S╱ // 0x194b @0x5
0x1946…1956 at0006 = ╱4b╱K╱ // 0x194c @0x6
0x1946…1956 at0007 = ╱52╱R╱ // 0x194d @0x7
0x1946…1956 at0008 = ╱49╱I╱ // 0x194e @0x8
0x1946…1956 at0009 = ╱56╱V╱ // 0x194f @0x9
0x1946…1956 at000a = ╱48╱H╱ // 0x1950 @0xa
0x1946…1956 at000b = ╱4f╱O╱ // 0x1951 @0xb
0x1946…1956 at000c = ╱56╱V╱ // 0x1952 @0xc
0x1946…1956 at000d = ╱45╱E╱ // 0x1953 @0xd
0x1946…1956 at000e = ╱44╱D╱ // 0x1954 @0xe
0x1946…1956 at000f = EOL // 0x1955 @0xf
0x1946…1956 }
0x1956…1962 a6b9 3580 EXEC INDTÆL
0x1956…1962 LineComalBin {
0x1956…1962 ptr = 0xa6b9 // 0x1956 @0x0
0x1956…1962 lno = 0x0dfc // 0x1958 @0x2
0x1956…1962 at0004 = ╱9d╱ EXEC ╱ // 0x195a @0x4
0x1956…1962 at0005 = ╱49╱I╱ // 0x195b @0x5
0x1956…1962 at0006 = ╱4e╱N╱ // 0x195c @0x6
0x1956…1962 at0007 = ╱44╱D╱ // 0x195d @0x7
0x1956…1962 at0008 = ╱54╱T╱ // 0x195e @0x8
0x1956…1962 at0009 = ╱5b╱Æ╱ // 0x195f @0x9
0x1956…1962 at000a = ╱4c╱L╱ // 0x1960 @0xa
0x1956…1962 at000b = EOL // 0x1961 @0xb
0x1956…1962 }
0x1962…196c a6c3 3585 K4=H1
0x1962…196c LineComalBin {
0x1962…196c ptr = 0xa6c3 // 0x1962 @0x0
0x1962…196c lno = 0x0e01 // 0x1964 @0x2
0x1962…196c at0004 = ╱4b╱K╱ // 0x1966 @0x4
0x1962…196c at0005 = ╱34╱4╱ // 0x1967 @0x5
0x1962…196c at0006 = ╱dc╱=╱ // 0x1968 @0x6
0x1962…196c at0007 = ╱48╱H╱ // 0x1969 @0x7
0x1962…196c at0008 = ╱31╱1╱ // 0x196a @0x8
0x1962…196c at0009 = EOL // 0x196b @0x9
0x1962…196c }
0x196c…1985 a6dc 3590 IF A4(K3)>H1 THEN K4=A4(K3)
0x196c…1985 LineComalBin {
0x196c…1985 ptr = 0xa6dc // 0x196c @0x0
0x196c…1985 lno = 0x0e06 // 0x196e @0x2
0x196c…1985 at0004 = ╱82╱ IF ╱ // 0x1970 @0x4
0x196c…1985 at0005 = ╱41╱A╱ // 0x1971 @0x5
0x196c…1985 at0006 = ╱34╱4╱ // 0x1972 @0x6
0x196c…1985 at0007 = ╱ed╱(╱ // 0x1973 @0x7
0x196c…1985 at0008 = ╱4b╱K╱ // 0x1974 @0x8
0x196c…1985 at0009 = ╱33╱3╱ // 0x1975 @0x9
0x196c…1985 at000a = ╱ee╱)╱ // 0x1976 @0xa
0x196c…1985 at000b = ╱de╱>╱ // 0x1977 @0xb
0x196c…1985 at000c = ╱48╱H╱ // 0x1978 @0xc
0x196c…1985 at000d = ╱31╱1╱ // 0x1979 @0xd
0x196c…1985 at000e = ╱b6╱ THEN ╱ // 0x197a @0xe
0x196c…1985 at000f = ╱4b╱K╱ // 0x197b @0xf
0x196c…1985 at0010 = ╱34╱4╱ // 0x197c @0x10
0x196c…1985 at0011 = ╱dc╱=╱ // 0x197d @0x11
0x196c…1985 at0012 = ╱41╱A╱ // 0x197e @0x12
0x196c…1985 at0013 = ╱34╱4╱ // 0x197f @0x13
0x196c…1985 at0014 = ╱ed╱(╱ // 0x1980 @0x14
0x196c…1985 at0015 = ╱4b╱K╱ // 0x1981 @0x15
0x196c…1985 at0016 = ╱33╱3╱ // 0x1982 @0x16
0x196c…1985 at0017 = ╱ee╱)╱ // 0x1983 @0x17
0x196c…1985 at0018 = EOL // 0x1984 @0x18
0x196c…1985 }
0x1985…198f a6e6 3595 K5=H6
0x1985…198f LineComalBin {
0x1985…198f ptr = 0xa6e6 // 0x1985 @0x0
0x1985…198f lno = 0x0e0b // 0x1987 @0x2
0x1985…198f at0004 = ╱4b╱K╱ // 0x1989 @0x4
0x1985…198f at0005 = ╱35╱5╱ // 0x198a @0x5
0x1985…198f at0006 = ╱dc╱=╱ // 0x198b @0x6
0x1985…198f at0007 = ╱48╱H╱ // 0x198c @0x7
0x1985…198f at0008 = ╱36╱6╱ // 0x198d @0x8
0x1985…198f at0009 = EOL // 0x198e @0x9
0x1985…198f }
0x198f…19ad a704 3640 IF A5(K3)<H6 OR H6=B THEN K5=A5(K3)
0x198f…19ad LineComalBin {
0x198f…19ad ptr = 0xa704 // 0x198f @0x0
0x198f…19ad lno = 0x0e38 // 0x1991 @0x2
0x198f…19ad at0004 = ╱82╱ IF ╱ // 0x1993 @0x4
0x198f…19ad at0005 = ╱41╱A╱ // 0x1994 @0x5
0x198f…19ad at0006 = ╱35╱5╱ // 0x1995 @0x6
0x198f…19ad at0007 = ╱ed╱(╱ // 0x1996 @0x7
0x198f…19ad at0008 = ╱4b╱K╱ // 0x1997 @0x8
0x198f…19ad at0009 = ╱33╱3╱ // 0x1998 @0x9
0x198f…19ad at000a = ╱ee╱)╱ // 0x1999 @0xa
0x198f…19ad at000b = ╱dd╱<╱ // 0x199a @0xb
0x198f…19ad at000c = ╱48╱H╱ // 0x199b @0xc
0x198f…19ad at000d = ╱36╱6╱ // 0x199c @0xd
0x198f…19ad at000e = ╱db╱ OR ╱ // 0x199d @0xe
0x198f…19ad at000f = ╱48╱H╱ // 0x199e @0xf
0x198f…19ad at0010 = ╱36╱6╱ // 0x199f @0x10
0x198f…19ad at0011 = ╱dc╱=╱ // 0x19a0 @0x11
0x198f…19ad at0012 = ╱42╱B╱ // 0x19a1 @0x12
0x198f…19ad at0013 = ╱b6╱ THEN ╱ // 0x19a2 @0x13
0x198f…19ad at0014 = ╱4b╱K╱ // 0x19a3 @0x14
0x198f…19ad at0015 = ╱35╱5╱ // 0x19a4 @0x15
0x198f…19ad at0016 = ╱dc╱=╱ // 0x19a5 @0x16
0x198f…19ad at0017 = ╱41╱A╱ // 0x19a6 @0x17
0x198f…19ad at0018 = ╱35╱5╱ // 0x19a7 @0x18
0x198f…19ad at0019 = ╱ed╱(╱ // 0x19a8 @0x19
0x198f…19ad at001a = ╱4b╱K╱ // 0x19a9 @0x1a
0x198f…19ad at001b = ╱33╱3╱ // 0x19aa @0x1b
0x198f…19ad at001c = ╱ee╱)╱ // 0x19ab @0x1c
0x198f…19ad at001d = EOL // 0x19ac @0x1d
0x198f…19ad }
0x19ad…19cc a723 3690 K6=K5 MOD 100-K4 MOD 100
0x19ad…19cc LineComalBin {
0x19ad…19cc ptr = 0xa723 // 0x19ad @0x0
0x19ad…19cc lno = 0x0e6a // 0x19af @0x2
0x19ad…19cc at0004 = ╱4b╱K╱ // 0x19b1 @0x4
0x19ad…19cc at0005 = ╱36╱6╱ // 0x19b2 @0x5
0x19ad…19cc at0006 = ╱dc╱=╱ // 0x19b3 @0x6
0x19ad…19cc at0007 = ╱4b╱K╱ // 0x19b4 @0x7
0x19ad…19cc at0008 = ╱35╱5╱ // 0x19b5 @0x8
0x19ad…19cc at0009 = ╱e8╱ MOD ╱ // 0x19b6 @0x9
0x19ad…19cc at000a = ╱31╱1╱ // 0x19b7 @0xa
0x19ad…19cc at000b = ╱30╱0╱ // 0x19b8 @0xb
0x19ad…19cc at000c = ╱30╱0╱ // 0x19b9 @0xc
0x19ad…19cc at000d = ╱fe0000c807╱ // 0x19ba @0xd
0x19ad…19cc at0012 = ╱e3╱-╱ // 0x19bf @0x12
0x19ad…19cc at0013 = ╱4b╱K╱ // 0x19c0 @0x13
0x19ad…19cc at0014 = ╱34╱4╱ // 0x19c1 @0x14
0x19ad…19cc at0015 = ╱e8╱ MOD ╱ // 0x19c2 @0x15
0x19ad…19cc at0016 = ╱31╱1╱ // 0x19c3 @0x16
0x19ad…19cc at0017 = ╱30╱0╱ // 0x19c4 @0x17
0x19ad…19cc at0018 = ╱30╱0╱ // 0x19c5 @0x18
0x19ad…19cc at0019 = ╱fe0000c807╱ // 0x19c6 @0x19
0x19ad…19cc at001e = EOL // 0x19cb @0x1e
0x19ad…19cc }
0x19cc…1a0a a761 3700 K6=K6+30*(K5 DIV 100 MOD 100-K4 DIV 100 MOD 100)
0x19cc…1a0a LineComalBin {
0x19cc…1a0a ptr = 0xa761 // 0x19cc @0x0
0x19cc…1a0a lno = 0x0e74 // 0x19ce @0x2
0x19cc…1a0a at0004 = ╱4b╱K╱ // 0x19d0 @0x4
0x19cc…1a0a at0005 = ╱36╱6╱ // 0x19d1 @0x5
0x19cc…1a0a at0006 = ╱dc╱=╱ // 0x19d2 @0x6
0x19cc…1a0a at0007 = ╱4b╱K╱ // 0x19d3 @0x7
0x19cc…1a0a at0008 = ╱36╱6╱ // 0x19d4 @0x8
0x19cc…1a0a at0009 = ╱e2╱+╱ // 0x19d5 @0x9
0x19cc…1a0a at000a = ╱33╱3╱ // 0x19d6 @0xa
0x19cc…1a0a at000b = ╱30╱0╱ // 0x19d7 @0xb
0x19cc…1a0a at000c = ╱fe0000f005╱ // 0x19d8 @0xc
0x19cc…1a0a at0011 = ╱e4╱*╱ // 0x19dd @0x11
0x19cc…1a0a at0012 = ╱ed╱(╱ // 0x19de @0x12
0x19cc…1a0a at0013 = ╱4b╱K╱ // 0x19df @0x13
0x19cc…1a0a at0014 = ╱35╱5╱ // 0x19e0 @0x14
0x19cc…1a0a at0015 = ╱e7╱ DIV ╱ // 0x19e1 @0x15
0x19cc…1a0a at0016 = ╱31╱1╱ // 0x19e2 @0x16
0x19cc…1a0a at0017 = ╱30╱0╱ // 0x19e3 @0x17
0x19cc…1a0a at0018 = ╱30╱0╱ // 0x19e4 @0x18
0x19cc…1a0a at0019 = ╱fe0000c807╱ // 0x19e5 @0x19
0x19cc…1a0a at001e = ╱e8╱ MOD ╱ // 0x19ea @0x1e
0x19cc…1a0a at001f = ╱31╱1╱ // 0x19eb @0x1f
0x19cc…1a0a at0020 = ╱30╱0╱ // 0x19ec @0x20
0x19cc…1a0a at0021 = ╱30╱0╱ // 0x19ed @0x21
0x19cc…1a0a at0022 = ╱fe0000c807╱ // 0x19ee @0x22
0x19cc…1a0a at0027 = ╱e3╱-╱ // 0x19f3 @0x27
0x19cc…1a0a at0028 = ╱4b╱K╱ // 0x19f4 @0x28
0x19cc…1a0a at0029 = ╱34╱4╱ // 0x19f5 @0x29
0x19cc…1a0a at002a = ╱e7╱ DIV ╱ // 0x19f6 @0x2a
0x19cc…1a0a at002b = ╱31╱1╱ // 0x19f7 @0x2b
0x19cc…1a0a at002c = ╱30╱0╱ // 0x19f8 @0x2c
0x19cc…1a0a at002d = ╱30╱0╱ // 0x19f9 @0x2d
0x19cc…1a0a at002e = ╱fe0000c807╱ // 0x19fa @0x2e
0x19cc…1a0a at0033 = ╱e8╱ MOD ╱ // 0x19ff @0x33
0x19cc…1a0a at0034 = ╱31╱1╱ // 0x1a00 @0x34
0x19cc…1a0a at0035 = ╱30╱0╱ // 0x1a01 @0x35
0x19cc…1a0a at0036 = ╱30╱0╱ // 0x1a02 @0x36
0x19cc…1a0a at0037 = ╱fe0000c807╱ // 0x1a03 @0x37
0x19cc…1a0a at003c = ╱ee╱)╱ // 0x1a08 @0x3c
0x19cc…1a0a at003d = EOL // 0x1a09 @0x3d
0x19cc…1a0a }
0x1a0a…1a30 a787 3705 K7=INT(G*I7*K6/365+0.5)/G
0x1a0a…1a30 LineComalBin {
0x1a0a…1a30 ptr = 0xa787 // 0x1a0a @0x0
0x1a0a…1a30 lno = 0x0e79 // 0x1a0c @0x2
0x1a0a…1a30 at0004 = ╱4b╱K╱ // 0x1a0e @0x4
0x1a0a…1a30 at0005 = ╱37╱7╱ // 0x1a0f @0x5
0x1a0a…1a30 at0006 = ╱dc╱=╱ // 0x1a10 @0x6
0x1a0a…1a30 at0007 = ╱c6╱INT╱ // 0x1a11 @0x7
0x1a0a…1a30 at0008 = ╱ed╱(╱ // 0x1a12 @0x8
0x1a0a…1a30 at0009 = ╱47╱G╱ // 0x1a13 @0x9
0x1a0a…1a30 at000a = ╱e4╱*╱ // 0x1a14 @0xa
0x1a0a…1a30 at000b = ╱49╱I╱ // 0x1a15 @0xb
0x1a0a…1a30 at000c = ╱37╱7╱ // 0x1a16 @0xc
0x1a0a…1a30 at000d = ╱e4╱*╱ // 0x1a17 @0xd
0x1a0a…1a30 at000e = ╱4b╱K╱ // 0x1a18 @0xe
0x1a0a…1a30 at000f = ╱36╱6╱ // 0x1a19 @0xf
0x1a0a…1a30 at0010 = ╱e5╱/╱ // 0x1a1a @0x10
0x1a0a…1a30 at0011 = ╱33╱3╱ // 0x1a1b @0x11
0x1a0a…1a30 at0012 = ╱36╱6╱ // 0x1a1c @0x12
0x1a0a…1a30 at0013 = ╱35╱5╱ // 0x1a1d @0x13
0x1a0a…1a30 at0014 = ╱fe0080b609╱ // 0x1a1e @0x14
0x1a0a…1a30 at0019 = ╱e2╱+╱ // 0x1a23 @0x19
0x1a0a…1a30 at001a = ╱30╱0╱ // 0x1a24 @0x1a
0x1a0a…1a30 at001b = ╱2e╱.╱ // 0x1a25 @0x1b
0x1a0a…1a30 at001c = ╱35╱5╱ // 0x1a26 @0x1c
0x1a0a…1a30 at001d = ╱fe00008000╱ // 0x1a27 @0x1d
0x1a0a…1a30 at0022 = ╱ee╱)╱ // 0x1a2c @0x22
0x1a0a…1a30 at0023 = ╱e5╱/╱ // 0x1a2d @0x23
0x1a0a…1a30 at0024 = ╱47╱G╱ // 0x1a2e @0x24
0x1a0a…1a30 at0025 = EOL // 0x1a2f @0x25
0x1a0a…1a30 }
0x1a30…1a61 a7b8 3710 K6=K6+365*(K5 DIV 10000-K4 DIV 10000)
0x1a30…1a61 LineComalBin {
0x1a30…1a61 ptr = 0xa7b8 // 0x1a30 @0x0
0x1a30…1a61 lno = 0x0e7e // 0x1a32 @0x2
0x1a30…1a61 at0004 = ╱4b╱K╱ // 0x1a34 @0x4
0x1a30…1a61 at0005 = ╱36╱6╱ // 0x1a35 @0x5
0x1a30…1a61 at0006 = ╱dc╱=╱ // 0x1a36 @0x6
0x1a30…1a61 at0007 = ╱4b╱K╱ // 0x1a37 @0x7
0x1a30…1a61 at0008 = ╱36╱6╱ // 0x1a38 @0x8
0x1a30…1a61 at0009 = ╱e2╱+╱ // 0x1a39 @0x9
0x1a30…1a61 at000a = ╱33╱3╱ // 0x1a3a @0xa
0x1a30…1a61 at000b = ╱36╱6╱ // 0x1a3b @0xb
0x1a30…1a61 at000c = ╱35╱5╱ // 0x1a3c @0xc
0x1a30…1a61 at000d = ╱fe0080b609╱ // 0x1a3d @0xd
0x1a30…1a61 at0012 = ╱e4╱*╱ // 0x1a42 @0x12
0x1a30…1a61 at0013 = ╱ed╱(╱ // 0x1a43 @0x13
0x1a30…1a61 at0014 = ╱4b╱K╱ // 0x1a44 @0x14
0x1a30…1a61 at0015 = ╱35╱5╱ // 0x1a45 @0x15
0x1a30…1a61 at0016 = ╱e7╱ DIV ╱ // 0x1a46 @0x16
0x1a30…1a61 at0017 = ╱31╱1╱ // 0x1a47 @0x17
0x1a30…1a61 at0018 = ╱30╱0╱ // 0x1a48 @0x18
0x1a30…1a61 at0019 = ╱30╱0╱ // 0x1a49 @0x19
0x1a30…1a61 at001a = ╱30╱0╱ // 0x1a4a @0x1a
0x1a30…1a61 at001b = ╱30╱0╱ // 0x1a4b @0x1b
0x1a30…1a61 at001c = ╱fe00409c0e╱ // 0x1a4c @0x1c
0x1a30…1a61 at0021 = ╱e3╱-╱ // 0x1a51 @0x21
0x1a30…1a61 at0022 = ╱4b╱K╱ // 0x1a52 @0x22
0x1a30…1a61 at0023 = ╱34╱4╱ // 0x1a53 @0x23
0x1a30…1a61 at0024 = ╱e7╱ DIV ╱ // 0x1a54 @0x24
0x1a30…1a61 at0025 = ╱31╱1╱ // 0x1a55 @0x25
0x1a30…1a61 at0026 = ╱30╱0╱ // 0x1a56 @0x26
0x1a30…1a61 at0027 = ╱30╱0╱ // 0x1a57 @0x27
0x1a30…1a61 at0028 = ╱30╱0╱ // 0x1a58 @0x28
0x1a30…1a61 at0029 = ╱30╱0╱ // 0x1a59 @0x29
0x1a30…1a61 at002a = ╱fe00409c0e╱ // 0x1a5a @0x2a
0x1a30…1a61 at002f = ╱ee╱)╱ // 0x1a5f @0x2f
0x1a30…1a61 at0030 = EOL // 0x1a60 @0x30
0x1a30…1a61 }
0x1a61…1a73 a7ca 3720 IF A9$="1" THEN K7=B
0x1a61…1a73 LineComalBin {
0x1a61…1a73 ptr = 0xa7ca // 0x1a61 @0x0
0x1a61…1a73 lno = 0x0e88 // 0x1a63 @0x2
0x1a61…1a73 at0004 = ╱82╱ IF ╱ // 0x1a65 @0x4
0x1a61…1a73 at0005 = ╱41╱A╱ // 0x1a66 @0x5
0x1a61…1a73 at0006 = ╱39╱9╱ // 0x1a67 @0x6
0x1a61…1a73 at0007 = ╱ef╱$╱ // 0x1a68 @0x7
0x1a61…1a73 at0008 = ╱dc╱=╱ // 0x1a69 @0x8
0x1a61…1a73 at0009 = ╱22╱"╱ // 0x1a6a @0x9
0x1a61…1a73 at000a = ╱31╱1╱ // 0x1a6b @0xa
0x1a61…1a73 at000b = ╱22╱"╱ // 0x1a6c @0xb
0x1a61…1a73 at000c = ╱b6╱ THEN ╱ // 0x1a6d @0xc
0x1a61…1a73 at000d = ╱4b╱K╱ // 0x1a6e @0xd
0x1a61…1a73 at000e = ╱37╱7╱ // 0x1a6f @0xe
0x1a61…1a73 at000f = ╱dc╱=╱ // 0x1a70 @0xf
0x1a61…1a73 at0010 = ╱42╱B╱ // 0x1a71 @0x10
0x1a61…1a73 at0011 = EOL // 0x1a72 @0x11
0x1a61…1a73 }
0x1a73…1a82 a7d9 3770 EXEC Æ(C3$,K7)
0x1a73…1a82 LineComalBin {
0x1a73…1a82 ptr = 0xa7d9 // 0x1a73 @0x0
0x1a73…1a82 lno = 0x0eba // 0x1a75 @0x2
0x1a73…1a82 at0004 = ╱9d╱ EXEC ╱ // 0x1a77 @0x4
0x1a73…1a82 at0005 = ╱5b╱Æ╱ // 0x1a78 @0x5
0x1a73…1a82 at0006 = ╱ed╱(╱ // 0x1a79 @0x6
0x1a73…1a82 at0007 = ╱43╱C╱ // 0x1a7a @0x7
0x1a73…1a82 at0008 = ╱33╱3╱ // 0x1a7b @0x8
0x1a73…1a82 at0009 = ╱ef╱$╱ // 0x1a7c @0x9
0x1a73…1a82 at000a = ╱ec╱,╱ // 0x1a7d @0xa
0x1a73…1a82 at000b = ╱4b╱K╱ // 0x1a7e @0xb
0x1a73…1a82 at000c = ╱37╱7╱ // 0x1a7f @0xc
0x1a73…1a82 at000d = ╱ee╱)╱ // 0x1a80 @0xd
0x1a73…1a82 at000e = EOL // 0x1a81 @0xe
0x1a73…1a82 }
0x1a82…1a97 a7ee 3800 C4$=C5$(29)
0x1a82…1a97 LineComalBin {
0x1a82…1a97 ptr = 0xa7ee // 0x1a82 @0x0
0x1a82…1a97 lno = 0x0ed8 // 0x1a84 @0x2
0x1a82…1a97 at0004 = ╱43╱C╱ // 0x1a86 @0x4
0x1a82…1a97 at0005 = ╱34╱4╱ // 0x1a87 @0x5
0x1a82…1a97 at0006 = ╱ef╱$╱ // 0x1a88 @0x6
0x1a82…1a97 at0007 = ╱dc╱=╱ // 0x1a89 @0x7
0x1a82…1a97 at0008 = ╱43╱C╱ // 0x1a8a @0x8
0x1a82…1a97 at0009 = ╱35╱5╱ // 0x1a8b @0x9
0x1a82…1a97 at000a = ╱ef╱$╱ // 0x1a8c @0xa
0x1a82…1a97 at000b = ╱ed╱(╱ // 0x1a8d @0xb
0x1a82…1a97 at000c = ╱32╱2╱ // 0x1a8e @0xc
0x1a82…1a97 at000d = ╱39╱9╱ // 0x1a8f @0xd
0x1a82…1a97 at000e = ╱fe0000e805╱ // 0x1a90 @0xe
0x1a82…1a97 at0013 = ╱ee╱)╱ // 0x1a95 @0x13
0x1a82…1a97 at0014 = EOL // 0x1a96 @0x14
0x1a82…1a97 }
0x1a97…1ab2 a809 3810 EXEC C(0,C3$,C4$,F1$)
0x1a97…1ab2 LineComalBin {
0x1a97…1ab2 ptr = 0xa809 // 0x1a97 @0x0
0x1a97…1ab2 lno = 0x0ee2 // 0x1a99 @0x2
0x1a97…1ab2 at0004 = ╱9d╱ EXEC ╱ // 0x1a9b @0x4
0x1a97…1ab2 at0005 = ╱43╱C╱ // 0x1a9c @0x5
0x1a97…1ab2 at0006 = ╱ed╱(╱ // 0x1a9d @0x6
0x1a97…1ab2 at0007 = ╱30╱0╱ // 0x1a9e @0x7
0x1a97…1ab2 at0008 = ╱fe00000000╱ // 0x1a9f @0x8
0x1a97…1ab2 at000d = ╱ec╱,╱ // 0x1aa4 @0xd
0x1a97…1ab2 at000e = ╱43╱C╱ // 0x1aa5 @0xe
0x1a97…1ab2 at000f = ╱33╱3╱ // 0x1aa6 @0xf
0x1a97…1ab2 at0010 = ╱ef╱$╱ // 0x1aa7 @0x10
0x1a97…1ab2 at0011 = ╱ec╱,╱ // 0x1aa8 @0x11
0x1a97…1ab2 at0012 = ╱43╱C╱ // 0x1aa9 @0x12
0x1a97…1ab2 at0013 = ╱34╱4╱ // 0x1aaa @0x13
0x1a97…1ab2 at0014 = ╱ef╱$╱ // 0x1aab @0x14
0x1a97…1ab2 at0015 = ╱ec╱,╱ // 0x1aac @0x15
0x1a97…1ab2 at0016 = ╱46╱F╱ // 0x1aad @0x16
0x1a97…1ab2 at0017 = ╱31╱1╱ // 0x1aae @0x17
0x1a97…1ab2 at0018 = ╱ef╱$╱ // 0x1aaf @0x18
0x1a97…1ab2 at0019 = ╱ee╱)╱ // 0x1ab0 @0x19
0x1a97…1ab2 at001a = EOL // 0x1ab1 @0x1a
0x1a97…1ab2 }
0x1ab2…1ad2 a829 3820 C5$(29)=F1$(G:11)
0x1ab2…1ad2 LineComalBin {
0x1ab2…1ad2 ptr = 0xa829 // 0x1ab2 @0x0
0x1ab2…1ad2 lno = 0x0eec // 0x1ab4 @0x2
0x1ab2…1ad2 at0004 = ╱43╱C╱ // 0x1ab6 @0x4
0x1ab2…1ad2 at0005 = ╱35╱5╱ // 0x1ab7 @0x5
0x1ab2…1ad2 at0006 = ╱ef╱$╱ // 0x1ab8 @0x6
0x1ab2…1ad2 at0007 = ╱ed╱(╱ // 0x1ab9 @0x7
0x1ab2…1ad2 at0008 = ╱32╱2╱ // 0x1aba @0x8
0x1ab2…1ad2 at0009 = ╱39╱9╱ // 0x1abb @0x9
0x1ab2…1ad2 at000a = ╱fe0000e805╱ // 0x1abc @0xa
0x1ab2…1ad2 at000f = ╱ee╱)╱ // 0x1ac1 @0xf
0x1ab2…1ad2 at0010 = ╱dc╱=╱ // 0x1ac2 @0x10
0x1ab2…1ad2 at0011 = ╱46╱F╱ // 0x1ac3 @0x11
0x1ab2…1ad2 at0012 = ╱31╱1╱ // 0x1ac4 @0x12
0x1ab2…1ad2 at0013 = ╱ef╱$╱ // 0x1ac5 @0x13
0x1ab2…1ad2 at0014 = ╱ed╱(╱ // 0x1ac6 @0x14
0x1ab2…1ad2 at0015 = ╱47╱G╱ // 0x1ac7 @0x15
0x1ab2…1ad2 at0016 = ╱f0╱:╱ // 0x1ac8 @0x16
0x1ab2…1ad2 at0017 = ╱31╱1╱ // 0x1ac9 @0x17
0x1ab2…1ad2 at0018 = ╱31╱1╱ // 0x1aca @0x18
0x1ab2…1ad2 at0019 = ╱fe0000b004╱ // 0x1acb @0x19
0x1ab2…1ad2 at001e = ╱ee╱)╱ // 0x1ad0 @0x1e
0x1ab2…1ad2 at001f = EOL // 0x1ad1 @0x1f
0x1ab2…1ad2 }
0x1ad2…1add a834 3830 IF K3=V THEN
0x1ad2…1add LineComalBin {
0x1ad2…1add ptr = 0xa834 // 0x1ad2 @0x0
0x1ad2…1add lno = 0x0ef6 // 0x1ad4 @0x2
0x1ad2…1add at0004 = ╱9c╱ IF ╱ // 0x1ad6 @0x4
0x1ad2…1add at0005 = ╱4b╱K╱ // 0x1ad7 @0x5
0x1ad2…1add at0006 = ╱33╱3╱ // 0x1ad8 @0x6
0x1ad2…1add at0007 = ╱dc╱=╱ // 0x1ad9 @0x7
0x1ad2…1add at0008 = ╱56╱V╱ // 0x1ada @0x8
0x1ad2…1add at0009 = ╱b6╱ THEN ╱ // 0x1adb @0x9
0x1ad2…1add at000a = EOL // 0x1adc @0xa
0x1ad2…1add }
0x1add…1aec a843 3840 EXEC Æ(C3$,I7)
0x1add…1aec LineComalBin {
0x1add…1aec ptr = 0xa843 // 0x1add @0x0
0x1add…1aec lno = 0x0f00 // 0x1adf @0x2
0x1add…1aec at0004 = ╱9d╱ EXEC ╱ // 0x1ae1 @0x4
0x1add…1aec at0005 = ╱5b╱Æ╱ // 0x1ae2 @0x5
0x1add…1aec at0006 = ╱ed╱(╱ // 0x1ae3 @0x6
0x1add…1aec at0007 = ╱43╱C╱ // 0x1ae4 @0x7
0x1add…1aec at0008 = ╱33╱3╱ // 0x1ae5 @0x8
0x1add…1aec at0009 = ╱ef╱$╱ // 0x1ae6 @0x9
0x1add…1aec at000a = ╱ec╱,╱ // 0x1ae7 @0xa
0x1add…1aec at000b = ╱49╱I╱ // 0x1ae8 @0xb
0x1add…1aec at000c = ╱37╱7╱ // 0x1ae9 @0xc
0x1add…1aec at000d = ╱ee╱)╱ // 0x1aea @0xd
0x1add…1aec at000e = EOL // 0x1aeb @0xe
0x1add…1aec }
0x1aec…1b07 a85e 3850 EXEC C(4,F1$,C3$,C4$)
0x1aec…1b07 LineComalBin {
0x1aec…1b07 ptr = 0xa85e // 0x1aec @0x0
0x1aec…1b07 lno = 0x0f0a // 0x1aee @0x2
0x1aec…1b07 at0004 = ╱9d╱ EXEC ╱ // 0x1af0 @0x4
0x1aec…1b07 at0005 = ╱43╱C╱ // 0x1af1 @0x5
0x1aec…1b07 at0006 = ╱ed╱(╱ // 0x1af2 @0x6
0x1aec…1b07 at0007 = ╱34╱4╱ // 0x1af3 @0x7
0x1aec…1b07 at0008 = ╱fe00008003╱ // 0x1af4 @0x8
0x1aec…1b07 at000d = ╱ec╱,╱ // 0x1af9 @0xd
0x1aec…1b07 at000e = ╱46╱F╱ // 0x1afa @0xe
0x1aec…1b07 at000f = ╱31╱1╱ // 0x1afb @0xf
0x1aec…1b07 at0010 = ╱ef╱$╱ // 0x1afc @0x10
0x1aec…1b07 at0011 = ╱ec╱,╱ // 0x1afd @0x11
0x1aec…1b07 at0012 = ╱43╱C╱ // 0x1afe @0x12
0x1aec…1b07 at0013 = ╱33╱3╱ // 0x1aff @0x13
0x1aec…1b07 at0014 = ╱ef╱$╱ // 0x1b00 @0x14
0x1aec…1b07 at0015 = ╱ec╱,╱ // 0x1b01 @0x15
0x1aec…1b07 at0016 = ╱43╱C╱ // 0x1b02 @0x16
0x1aec…1b07 at0017 = ╱34╱4╱ // 0x1b03 @0x17
0x1aec…1b07 at0018 = ╱ef╱$╱ // 0x1b04 @0x18
0x1aec…1b07 at0019 = ╱ee╱)╱ // 0x1b05 @0x19
0x1aec…1b07 at001a = EOL // 0x1b06 @0x1a
0x1aec…1b07 }
0x1b07…1b19 a870 3860 IF SI=G THEN F1$=C3$
0x1b07…1b19 LineComalBin {
0x1b07…1b19 ptr = 0xa870 // 0x1b07 @0x0
0x1b07…1b19 lno = 0x0f14 // 0x1b09 @0x2
0x1b07…1b19 at0004 = ╱82╱ IF ╱ // 0x1b0b @0x4
0x1b07…1b19 at0005 = ╱53╱S╱ // 0x1b0c @0x5
0x1b07…1b19 at0006 = ╱49╱I╱ // 0x1b0d @0x6
0x1b07…1b19 at0007 = ╱dc╱=╱ // 0x1b0e @0x7
0x1b07…1b19 at0008 = ╱47╱G╱ // 0x1b0f @0x8
0x1b07…1b19 at0009 = ╱b6╱ THEN ╱ // 0x1b10 @0x9
0x1b07…1b19 at000a = ╱46╱F╱ // 0x1b11 @0xa
0x1b07…1b19 at000b = ╱31╱1╱ // 0x1b12 @0xb
0x1b07…1b19 at000c = ╱ef╱$╱ // 0x1b13 @0xc
0x1b07…1b19 at000d = ╱dc╱=╱ // 0x1b14 @0xd
0x1b07…1b19 at000e = ╱43╱C╱ // 0x1b15 @0xe
0x1b07…1b19 at000f = ╱33╱3╱ // 0x1b16 @0xf
0x1b07…1b19 at0010 = ╱ef╱$╱ // 0x1b17 @0x10
0x1b07…1b19 at0011 = EOL // 0x1b18 @0x11
0x1b07…1b19 }
0x1b19…1b1f a876 3870 ENDIF
0x1b19…1b1f LineComalBin {
0x1b19…1b1f ptr = 0xa876 // 0x1b19 @0x0
0x1b19…1b1f lno = 0x0f1e // 0x1b1b @0x2
0x1b19…1b1f at0004 = ╱9b╱ ENDIF ╱ // 0x1b1d @0x4
0x1b19…1b1f at0005 = EOL // 0x1b1e @0x5
0x1b19…1b1f }
0x1b1f…1b34 a88b 3873 C4$=C5$(44)
0x1b1f…1b34 LineComalBin {
0x1b1f…1b34 ptr = 0xa88b // 0x1b1f @0x0
0x1b1f…1b34 lno = 0x0f21 // 0x1b21 @0x2
0x1b1f…1b34 at0004 = ╱43╱C╱ // 0x1b23 @0x4
0x1b1f…1b34 at0005 = ╱34╱4╱ // 0x1b24 @0x5
0x1b1f…1b34 at0006 = ╱ef╱$╱ // 0x1b25 @0x6
0x1b1f…1b34 at0007 = ╱dc╱=╱ // 0x1b26 @0x7
0x1b1f…1b34 at0008 = ╱43╱C╱ // 0x1b27 @0x8
0x1b1f…1b34 at0009 = ╱35╱5╱ // 0x1b28 @0x9
0x1b1f…1b34 at000a = ╱ef╱$╱ // 0x1b29 @0xa
0x1b1f…1b34 at000b = ╱ed╱(╱ // 0x1b2a @0xb
0x1b1f…1b34 at000c = ╱34╱4╱ // 0x1b2b @0xc
0x1b1f…1b34 at000d = ╱34╱4╱ // 0x1b2c @0xd
0x1b1f…1b34 at000e = ╱fe0000b006╱ // 0x1b2d @0xe
0x1b1f…1b34 at0013 = ╱ee╱)╱ // 0x1b32 @0x13
0x1b1f…1b34 at0014 = EOL // 0x1b33 @0x14
0x1b1f…1b34 }
0x1b34…1b4f a8a6 3876 EXEC C(0,C4$,F1$,C4$)
0x1b34…1b4f LineComalBin {
0x1b34…1b4f ptr = 0xa8a6 // 0x1b34 @0x0
0x1b34…1b4f lno = 0x0f24 // 0x1b36 @0x2
0x1b34…1b4f at0004 = ╱9d╱ EXEC ╱ // 0x1b38 @0x4
0x1b34…1b4f at0005 = ╱43╱C╱ // 0x1b39 @0x5
0x1b34…1b4f at0006 = ╱ed╱(╱ // 0x1b3a @0x6
0x1b34…1b4f at0007 = ╱30╱0╱ // 0x1b3b @0x7
0x1b34…1b4f at0008 = ╱fe00000000╱ // 0x1b3c @0x8
0x1b34…1b4f at000d = ╱ec╱,╱ // 0x1b41 @0xd
0x1b34…1b4f at000e = ╱43╱C╱ // 0x1b42 @0xe
0x1b34…1b4f at000f = ╱34╱4╱ // 0x1b43 @0xf
0x1b34…1b4f at0010 = ╱ef╱$╱ // 0x1b44 @0x10
0x1b34…1b4f at0011 = ╱ec╱,╱ // 0x1b45 @0x11
0x1b34…1b4f at0012 = ╱46╱F╱ // 0x1b46 @0x12
0x1b34…1b4f at0013 = ╱31╱1╱ // 0x1b47 @0x13
0x1b34…1b4f at0014 = ╱ef╱$╱ // 0x1b48 @0x14
0x1b34…1b4f at0015 = ╱ec╱,╱ // 0x1b49 @0x15
0x1b34…1b4f at0016 = ╱43╱C╱ // 0x1b4a @0x16
0x1b34…1b4f at0017 = ╱34╱4╱ // 0x1b4b @0x17
0x1b34…1b4f at0018 = ╱ef╱$╱ // 0x1b4c @0x18
0x1b34…1b4f at0019 = ╱ee╱)╱ // 0x1b4d @0x19
0x1b34…1b4f at001a = EOL // 0x1b4e @0x1a
0x1b34…1b4f }
0x1b4f…1b6f a8c6 3880 C5$(44)=C4$(G:11)
0x1b4f…1b6f LineComalBin {
0x1b4f…1b6f ptr = 0xa8c6 // 0x1b4f @0x0
0x1b4f…1b6f lno = 0x0f28 // 0x1b51 @0x2
0x1b4f…1b6f at0004 = ╱43╱C╱ // 0x1b53 @0x4
0x1b4f…1b6f at0005 = ╱35╱5╱ // 0x1b54 @0x5
0x1b4f…1b6f at0006 = ╱ef╱$╱ // 0x1b55 @0x6
0x1b4f…1b6f at0007 = ╱ed╱(╱ // 0x1b56 @0x7
0x1b4f…1b6f at0008 = ╱34╱4╱ // 0x1b57 @0x8
0x1b4f…1b6f at0009 = ╱34╱4╱ // 0x1b58 @0x9
0x1b4f…1b6f at000a = ╱fe0000b006╱ // 0x1b59 @0xa
0x1b4f…1b6f at000f = ╱ee╱)╱ // 0x1b5e @0xf
0x1b4f…1b6f at0010 = ╱dc╱=╱ // 0x1b5f @0x10
0x1b4f…1b6f at0011 = ╱43╱C╱ // 0x1b60 @0x11
0x1b4f…1b6f at0012 = ╱34╱4╱ // 0x1b61 @0x12
0x1b4f…1b6f at0013 = ╱ef╱$╱ // 0x1b62 @0x13
0x1b4f…1b6f at0014 = ╱ed╱(╱ // 0x1b63 @0x14
0x1b4f…1b6f at0015 = ╱47╱G╱ // 0x1b64 @0x15
0x1b4f…1b6f at0016 = ╱f0╱:╱ // 0x1b65 @0x16
0x1b4f…1b6f at0017 = ╱31╱1╱ // 0x1b66 @0x17
0x1b4f…1b6f at0018 = ╱31╱1╱ // 0x1b67 @0x18
0x1b4f…1b6f at0019 = ╱fe0000b004╱ // 0x1b68 @0x19
0x1b4f…1b6f at001e = ╱ee╱)╱ // 0x1b6d @0x1e
0x1b4f…1b6f at001f = EOL // 0x1b6e @0x1f
0x1b4f…1b6f }
0x1b6f…1b89 a8e0 3890 IF K4<>A4(K3) OR K5<>A5(K3) THEN
0x1b6f…1b89 LineComalBin {
0x1b6f…1b89 ptr = 0xa8e0 // 0x1b6f @0x0
0x1b6f…1b89 lno = 0x0f32 // 0x1b71 @0x2
0x1b6f…1b89 at0004 = ╱9c╱ IF ╱ // 0x1b73 @0x4
0x1b6f…1b89 at0005 = ╱4b╱K╱ // 0x1b74 @0x5
0x1b6f…1b89 at0006 = ╱34╱4╱ // 0x1b75 @0x6
0x1b6f…1b89 at0007 = ╱e1╱<>╱ // 0x1b76 @0x7
0x1b6f…1b89 at0008 = ╱41╱A╱ // 0x1b77 @0x8
0x1b6f…1b89 at0009 = ╱34╱4╱ // 0x1b78 @0x9
0x1b6f…1b89 at000a = ╱ed╱(╱ // 0x1b79 @0xa
0x1b6f…1b89 at000b = ╱4b╱K╱ // 0x1b7a @0xb
0x1b6f…1b89 at000c = ╱33╱3╱ // 0x1b7b @0xc
0x1b6f…1b89 at000d = ╱ee╱)╱ // 0x1b7c @0xd
0x1b6f…1b89 at000e = ╱db╱ OR ╱ // 0x1b7d @0xe
0x1b6f…1b89 at000f = ╱4b╱K╱ // 0x1b7e @0xf
0x1b6f…1b89 at0010 = ╱35╱5╱ // 0x1b7f @0x10
0x1b6f…1b89 at0011 = ╱e1╱<>╱ // 0x1b80 @0x11
0x1b6f…1b89 at0012 = ╱41╱A╱ // 0x1b81 @0x12
0x1b6f…1b89 at0013 = ╱35╱5╱ // 0x1b82 @0x13
0x1b6f…1b89 at0014 = ╱ed╱(╱ // 0x1b83 @0x14
0x1b6f…1b89 at0015 = ╱4b╱K╱ // 0x1b84 @0x15
0x1b6f…1b89 at0016 = ╱33╱3╱ // 0x1b85 @0x16
0x1b6f…1b89 at0017 = ╱ee╱)╱ // 0x1b86 @0x17
0x1b6f…1b89 at0018 = ╱b6╱ THEN ╱ // 0x1b87 @0x18
0x1b6f…1b89 at0019 = EOL // 0x1b88 @0x19
0x1b6f…1b89 }
0x1b89…1b9f a8f6 3910 EXEC CONVDATE(C4$,K4)
0x1b89…1b9f LineComalBin {
0x1b89…1b9f ptr = 0xa8f6 // 0x1b89 @0x0
0x1b89…1b9f lno = 0x0f46 // 0x1b8b @0x2
0x1b89…1b9f at0004 = ╱9d╱ EXEC ╱ // 0x1b8d @0x4
0x1b89…1b9f at0005 = ╱43╱C╱ // 0x1b8e @0x5
0x1b89…1b9f at0006 = ╱4f╱O╱ // 0x1b8f @0x6
0x1b89…1b9f at0007 = ╱4e╱N╱ // 0x1b90 @0x7
0x1b89…1b9f at0008 = ╱56╱V╱ // 0x1b91 @0x8
0x1b89…1b9f at0009 = ╱44╱D╱ // 0x1b92 @0x9
0x1b89…1b9f at000a = ╱41╱A╱ // 0x1b93 @0xa
0x1b89…1b9f at000b = ╱54╱T╱ // 0x1b94 @0xb
0x1b89…1b9f at000c = ╱45╱E╱ // 0x1b95 @0xc
0x1b89…1b9f at000d = ╱ed╱(╱ // 0x1b96 @0xd
0x1b89…1b9f at000e = ╱43╱C╱ // 0x1b97 @0xe
0x1b89…1b9f at000f = ╱34╱4╱ // 0x1b98 @0xf
0x1b89…1b9f at0010 = ╱ef╱$╱ // 0x1b99 @0x10
0x1b89…1b9f at0011 = ╱ec╱,╱ // 0x1b9a @0x11
0x1b89…1b9f at0012 = ╱4b╱K╱ // 0x1b9b @0x12
0x1b89…1b9f at0013 = ╱34╱4╱ // 0x1b9c @0x13
0x1b89…1b9f at0014 = ╱ee╱)╱ // 0x1b9d @0x14
0x1b89…1b9f at0015 = EOL // 0x1b9e @0x15
0x1b89…1b9f }
0x1b9f…1bc1 a918 3920 PAGE$(W,PS+5:6)=C4$
0x1b9f…1bc1 LineComalBin {
0x1b9f…1bc1 ptr = 0xa918 // 0x1b9f @0x0
0x1b9f…1bc1 lno = 0x0f50 // 0x1ba1 @0x2
0x1b9f…1bc1 at0004 = ╱50╱P╱ // 0x1ba3 @0x4
0x1b9f…1bc1 at0005 = ╱41╱A╱ // 0x1ba4 @0x5
0x1b9f…1bc1 at0006 = ╱47╱G╱ // 0x1ba5 @0x6
0x1b9f…1bc1 at0007 = ╱45╱E╱ // 0x1ba6 @0x7
0x1b9f…1bc1 at0008 = ╱ef╱$╱ // 0x1ba7 @0x8
0x1b9f…1bc1 at0009 = ╱ed╱(╱ // 0x1ba8 @0x9
0x1b9f…1bc1 at000a = ╱57╱W╱ // 0x1ba9 @0xa
0x1b9f…1bc1 at000b = ╱ec╱,╱ // 0x1baa @0xb
0x1b9f…1bc1 at000c = ╱50╱P╱ // 0x1bab @0xc
0x1b9f…1bc1 at000d = ╱53╱S╱ // 0x1bac @0xd
0x1b9f…1bc1 at000e = ╱e2╱+╱ // 0x1bad @0xe
0x1b9f…1bc1 at000f = ╱35╱5╱ // 0x1bae @0xf
0x1b9f…1bc1 at0010 = ╱fe0000a003╱ // 0x1baf @0x10
0x1b9f…1bc1 at0015 = ╱f0╱:╱ // 0x1bb4 @0x15
0x1b9f…1bc1 at0016 = ╱36╱6╱ // 0x1bb5 @0x16
0x1b9f…1bc1 at0017 = ╱fe0000c003╱ // 0x1bb6 @0x17
0x1b9f…1bc1 at001c = ╱ee╱)╱ // 0x1bbb @0x1c
0x1b9f…1bc1 at001d = ╱dc╱=╱ // 0x1bbc @0x1d
0x1b9f…1bc1 at001e = ╱43╱C╱ // 0x1bbd @0x1e
0x1b9f…1bc1 at001f = ╱34╱4╱ // 0x1bbe @0x1f
0x1b9f…1bc1 at0020 = ╱ef╱$╱ // 0x1bbf @0x20
0x1b9f…1bc1 at0021 = EOL // 0x1bc0 @0x21
0x1b9f…1bc1 }
0x1bc1…1bd7 a92e 3930 EXEC CONVDATE(C4$,K5)
0x1bc1…1bd7 LineComalBin {
0x1bc1…1bd7 ptr = 0xa92e // 0x1bc1 @0x0
0x1bc1…1bd7 lno = 0x0f5a // 0x1bc3 @0x2
0x1bc1…1bd7 at0004 = ╱9d╱ EXEC ╱ // 0x1bc5 @0x4
0x1bc1…1bd7 at0005 = ╱43╱C╱ // 0x1bc6 @0x5
0x1bc1…1bd7 at0006 = ╱4f╱O╱ // 0x1bc7 @0x6
0x1bc1…1bd7 at0007 = ╱4e╱N╱ // 0x1bc8 @0x7
0x1bc1…1bd7 at0008 = ╱56╱V╱ // 0x1bc9 @0x8
0x1bc1…1bd7 at0009 = ╱44╱D╱ // 0x1bca @0x9
0x1bc1…1bd7 at000a = ╱41╱A╱ // 0x1bcb @0xa
0x1bc1…1bd7 at000b = ╱54╱T╱ // 0x1bcc @0xb
0x1bc1…1bd7 at000c = ╱45╱E╱ // 0x1bcd @0xc
0x1bc1…1bd7 at000d = ╱ed╱(╱ // 0x1bce @0xd
0x1bc1…1bd7 at000e = ╱43╱C╱ // 0x1bcf @0xe
0x1bc1…1bd7 at000f = ╱34╱4╱ // 0x1bd0 @0xf
0x1bc1…1bd7 at0010 = ╱ef╱$╱ // 0x1bd1 @0x10
0x1bc1…1bd7 at0011 = ╱ec╱,╱ // 0x1bd2 @0x11
0x1bc1…1bd7 at0012 = ╱4b╱K╱ // 0x1bd3 @0x12
0x1bc1…1bd7 at0013 = ╱35╱5╱ // 0x1bd4 @0x13
0x1bc1…1bd7 at0014 = ╱ee╱)╱ // 0x1bd5 @0x14
0x1bc1…1bd7 at0015 = EOL // 0x1bd6 @0x15
0x1bc1…1bd7 }
0x1bd7…1bfa a951 3940 PAGE$(W,PS+14:6)=C4$
0x1bd7…1bfa LineComalBin {
0x1bd7…1bfa ptr = 0xa951 // 0x1bd7 @0x0
0x1bd7…1bfa lno = 0x0f64 // 0x1bd9 @0x2
0x1bd7…1bfa at0004 = ╱50╱P╱ // 0x1bdb @0x4
0x1bd7…1bfa at0005 = ╱41╱A╱ // 0x1bdc @0x5
0x1bd7…1bfa at0006 = ╱47╱G╱ // 0x1bdd @0x6
0x1bd7…1bfa at0007 = ╱45╱E╱ // 0x1bde @0x7
0x1bd7…1bfa at0008 = ╱ef╱$╱ // 0x1bdf @0x8
0x1bd7…1bfa at0009 = ╱ed╱(╱ // 0x1be0 @0x9
0x1bd7…1bfa at000a = ╱57╱W╱ // 0x1be1 @0xa
0x1bd7…1bfa at000b = ╱ec╱,╱ // 0x1be2 @0xb
0x1bd7…1bfa at000c = ╱50╱P╱ // 0x1be3 @0xc
0x1bd7…1bfa at000d = ╱53╱S╱ // 0x1be4 @0xd
0x1bd7…1bfa at000e = ╱e2╱+╱ // 0x1be5 @0xe
0x1bd7…1bfa at000f = ╱31╱1╱ // 0x1be6 @0xf
0x1bd7…1bfa at0010 = ╱34╱4╱ // 0x1be7 @0x10
0x1bd7…1bfa at0011 = ╱fe0000e004╱ // 0x1be8 @0x11
0x1bd7…1bfa at0016 = ╱f0╱:╱ // 0x1bed @0x16
0x1bd7…1bfa at0017 = ╱36╱6╱ // 0x1bee @0x17
0x1bd7…1bfa at0018 = ╱fe0000c003╱ // 0x1bef @0x18
0x1bd7…1bfa at001d = ╱ee╱)╱ // 0x1bf4 @0x1d
0x1bd7…1bfa at001e = ╱dc╱=╱ // 0x1bf5 @0x1e
0x1bd7…1bfa at001f = ╱43╱C╱ // 0x1bf6 @0x1f
0x1bd7…1bfa at0020 = ╱34╱4╱ // 0x1bf7 @0x20
0x1bd7…1bfa at0021 = ╱ef╱$╱ // 0x1bf8 @0x21
0x1bd7…1bfa at0022 = EOL // 0x1bf9 @0x22
0x1bd7…1bfa }
0x1bfa…1c00 a957 3945 ELSE
0x1bfa…1c00 LineComalBin {
0x1bfa…1c00 ptr = 0xa957 // 0x1bfa @0x0
0x1bfa…1c00 lno = 0x0f69 // 0x1bfc @0x2
0x1bfa…1c00 at0004 = ╱9a╱ ELSE ╱ // 0x1bfe @0x4
0x1bfa…1c00 at0005 = EOL // 0x1bff @0x5
0x1bfa…1c00 }
0x1c00…1c24 a97b 3950 PAGE$(8,PS+22:G)="**"
0x1c00…1c24 LineComalBin {
0x1c00…1c24 ptr = 0xa97b // 0x1c00 @0x0
0x1c00…1c24 lno = 0x0f6e // 0x1c02 @0x2
0x1c00…1c24 at0004 = ╱50╱P╱ // 0x1c04 @0x4
0x1c00…1c24 at0005 = ╱41╱A╱ // 0x1c05 @0x5
0x1c00…1c24 at0006 = ╱47╱G╱ // 0x1c06 @0x6
0x1c00…1c24 at0007 = ╱45╱E╱ // 0x1c07 @0x7
0x1c00…1c24 at0008 = ╱ef╱$╱ // 0x1c08 @0x8
0x1c00…1c24 at0009 = ╱ed╱(╱ // 0x1c09 @0x9
0x1c00…1c24 at000a = ╱38╱8╱ // 0x1c0a @0xa
0x1c00…1c24 at000b = ╱fe00008004╱ // 0x1c0b @0xb
0x1c00…1c24 at0010 = ╱ec╱,╱ // 0x1c10 @0x10
0x1c00…1c24 at0011 = ╱50╱P╱ // 0x1c11 @0x11
0x1c00…1c24 at0012 = ╱53╱S╱ // 0x1c12 @0x12
0x1c00…1c24 at0013 = ╱e2╱+╱ // 0x1c13 @0x13
0x1c00…1c24 at0014 = ╱32╱2╱ // 0x1c14 @0x14
0x1c00…1c24 at0015 = ╱32╱2╱ // 0x1c15 @0x15
0x1c00…1c24 at0016 = ╱fe0000b005╱ // 0x1c16 @0x16
0x1c00…1c24 at001b = ╱f0╱:╱ // 0x1c1b @0x1b
0x1c00…1c24 at001c = ╱47╱G╱ // 0x1c1c @0x1c
0x1c00…1c24 at001d = ╱ee╱)╱ // 0x1c1d @0x1d
0x1c00…1c24 at001e = ╱dc╱=╱ // 0x1c1e @0x1e
0x1c00…1c24 at001f = ╱22╱"╱ // 0x1c1f @0x1f
0x1c00…1c24 at0020 = ╱2a╱*╱ // 0x1c20 @0x20
0x1c00…1c24 at0021 = ╱2a╱*╱ // 0x1c21 @0x21
0x1c00…1c24 at0022 = ╱22╱"╱ // 0x1c22 @0x22
0x1c00…1c24 at0023 = EOL // 0x1c23 @0x23
0x1c00…1c24 }
0x1c24…1c2a a981 3960 ENDIF
0x1c24…1c2a LineComalBin {
0x1c24…1c2a ptr = 0xa981 // 0x1c24 @0x0
0x1c24…1c2a lno = 0x0f78 // 0x1c26 @0x2
0x1c24…1c2a at0004 = ╱9b╱ ENDIF ╱ // 0x1c28 @0x4
0x1c24…1c2a at0005 = EOL // 0x1c29 @0x5
0x1c24…1c2a }
0x1c2a…1c61 a9b8 3990 IF C5$(16,11)="+" THEN C5$(16,11)=" "
0x1c2a…1c61 LineComalBin {
0x1c2a…1c61 ptr = 0xa9b8 // 0x1c2a @0x0
0x1c2a…1c61 lno = 0x0f96 // 0x1c2c @0x2
0x1c2a…1c61 at0004 = ╱82╱ IF ╱ // 0x1c2e @0x4
0x1c2a…1c61 at0005 = ╱43╱C╱ // 0x1c2f @0x5
0x1c2a…1c61 at0006 = ╱35╱5╱ // 0x1c30 @0x6
0x1c2a…1c61 at0007 = ╱ef╱$╱ // 0x1c31 @0x7
0x1c2a…1c61 at0008 = ╱ed╱(╱ // 0x1c32 @0x8
0x1c2a…1c61 at0009 = ╱31╱1╱ // 0x1c33 @0x9
0x1c2a…1c61 at000a = ╱36╱6╱ // 0x1c34 @0xa
0x1c2a…1c61 at000b = ╱fe00008005╱ // 0x1c35 @0xb
0x1c2a…1c61 at0010 = ╱ec╱,╱ // 0x1c3a @0x10
0x1c2a…1c61 at0011 = ╱31╱1╱ // 0x1c3b @0x11
0x1c2a…1c61 at0012 = ╱31╱1╱ // 0x1c3c @0x12
0x1c2a…1c61 at0013 = ╱fe0000b004╱ // 0x1c3d @0x13
0x1c2a…1c61 at0018 = ╱ee╱)╱ // 0x1c42 @0x18
0x1c2a…1c61 at0019 = ╱dc╱=╱ // 0x1c43 @0x19
0x1c2a…1c61 at001a = ╱22╱"╱ // 0x1c44 @0x1a
0x1c2a…1c61 at001b = ╱2b╱+╱ // 0x1c45 @0x1b
0x1c2a…1c61 at001c = ╱22╱"╱ // 0x1c46 @0x1c
0x1c2a…1c61 at001d = ╱b6╱ THEN ╱ // 0x1c47 @0x1d
0x1c2a…1c61 at001e = ╱43╱C╱ // 0x1c48 @0x1e
0x1c2a…1c61 at001f = ╱35╱5╱ // 0x1c49 @0x1f
0x1c2a…1c61 at0020 = ╱ef╱$╱ // 0x1c4a @0x20
0x1c2a…1c61 at0021 = ╱ed╱(╱ // 0x1c4b @0x21
0x1c2a…1c61 at0022 = ╱31╱1╱ // 0x1c4c @0x22
0x1c2a…1c61 at0023 = ╱36╱6╱ // 0x1c4d @0x23
0x1c2a…1c61 at0024 = ╱fe00008005╱ // 0x1c4e @0x24
0x1c2a…1c61 at0029 = ╱ec╱,╱ // 0x1c53 @0x29
0x1c2a…1c61 at002a = ╱31╱1╱ // 0x1c54 @0x2a
0x1c2a…1c61 at002b = ╱31╱1╱ // 0x1c55 @0x2b
0x1c2a…1c61 at002c = ╱fe0000b004╱ // 0x1c56 @0x2c
0x1c2a…1c61 at0031 = ╱ee╱)╱ // 0x1c5b @0x31
0x1c2a…1c61 at0032 = ╱dc╱=╱ // 0x1c5c @0x32
0x1c2a…1c61 at0033 = ╱22╱"╱ // 0x1c5d @0x33
0x1c2a…1c61 at0034 = ╱20╱…╱ // 0x1c5e @0x34
0x1c2a…1c61 at0035 = ╱22╱"╱ // 0x1c5f @0x35
0x1c2a…1c61 at0036 = EOL // 0x1c60 @0x36
0x1c2a…1c61 }
0x1c61…1c94 a9eb 4000 PAGE$(10,PS+20:11)=C5$(16)
0x1c61…1c94 LineComalBin {
0x1c61…1c94 ptr = 0xa9eb // 0x1c61 @0x0
0x1c61…1c94 lno = 0x0fa0 // 0x1c63 @0x2
0x1c61…1c94 at0004 = ╱50╱P╱ // 0x1c65 @0x4
0x1c61…1c94 at0005 = ╱41╱A╱ // 0x1c66 @0x5
0x1c61…1c94 at0006 = ╱47╱G╱ // 0x1c67 @0x6
0x1c61…1c94 at0007 = ╱45╱E╱ // 0x1c68 @0x7
0x1c61…1c94 at0008 = ╱ef╱$╱ // 0x1c69 @0x8
0x1c61…1c94 at0009 = ╱ed╱(╱ // 0x1c6a @0x9
0x1c61…1c94 at000a = ╱31╱1╱ // 0x1c6b @0xa
0x1c61…1c94 at000b = ╱30╱0╱ // 0x1c6c @0xb
0x1c61…1c94 at000c = ╱fe0000a004╱ // 0x1c6d @0xc
0x1c61…1c94 at0011 = ╱ec╱,╱ // 0x1c72 @0x11
0x1c61…1c94 at0012 = ╱50╱P╱ // 0x1c73 @0x12
0x1c61…1c94 at0013 = ╱53╱S╱ // 0x1c74 @0x13
0x1c61…1c94 at0014 = ╱e2╱+╱ // 0x1c75 @0x14
0x1c61…1c94 at0015 = ╱32╱2╱ // 0x1c76 @0x15
0x1c61…1c94 at0016 = ╱30╱0╱ // 0x1c77 @0x16
0x1c61…1c94 at0017 = ╱fe0000a005╱ // 0x1c78 @0x17
0x1c61…1c94 at001c = ╱f0╱:╱ // 0x1c7d @0x1c
0x1c61…1c94 at001d = ╱31╱1╱ // 0x1c7e @0x1d
0x1c61…1c94 at001e = ╱31╱1╱ // 0x1c7f @0x1e
0x1c61…1c94 at001f = ╱fe0000b004╱ // 0x1c80 @0x1f
0x1c61…1c94 at0024 = ╱ee╱)╱ // 0x1c85 @0x24
0x1c61…1c94 at0025 = ╱dc╱=╱ // 0x1c86 @0x25
0x1c61…1c94 at0026 = ╱43╱C╱ // 0x1c87 @0x26
0x1c61…1c94 at0027 = ╱35╱5╱ // 0x1c88 @0x27
0x1c61…1c94 at0028 = ╱ef╱$╱ // 0x1c89 @0x28
0x1c61…1c94 at0029 = ╱ed╱(╱ // 0x1c8a @0x29
0x1c61…1c94 at002a = ╱31╱1╱ // 0x1c8b @0x2a
0x1c61…1c94 at002b = ╱36╱6╱ // 0x1c8c @0x2b
0x1c61…1c94 at002c = ╱fe00008005╱ // 0x1c8d @0x2c
0x1c61…1c94 at0031 = ╱ee╱)╱ // 0x1c92 @0x31
0x1c61…1c94 at0032 = EOL // 0x1c93 @0x32
0x1c61…1c94 }
0x1c94…1cb4 aa0b 4010 C5$(16)=B3$(G:11)
0x1c94…1cb4 LineComalBin {
0x1c94…1cb4 ptr = 0xaa0b // 0x1c94 @0x0
0x1c94…1cb4 lno = 0x0faa // 0x1c96 @0x2
0x1c94…1cb4 at0004 = ╱43╱C╱ // 0x1c98 @0x4
0x1c94…1cb4 at0005 = ╱35╱5╱ // 0x1c99 @0x5
0x1c94…1cb4 at0006 = ╱ef╱$╱ // 0x1c9a @0x6
0x1c94…1cb4 at0007 = ╱ed╱(╱ // 0x1c9b @0x7
0x1c94…1cb4 at0008 = ╱31╱1╱ // 0x1c9c @0x8
0x1c94…1cb4 at0009 = ╱36╱6╱ // 0x1c9d @0x9
0x1c94…1cb4 at000a = ╱fe00008005╱ // 0x1c9e @0xa
0x1c94…1cb4 at000f = ╱ee╱)╱ // 0x1ca3 @0xf
0x1c94…1cb4 at0010 = ╱dc╱=╱ // 0x1ca4 @0x10
0x1c94…1cb4 at0011 = ╱42╱B╱ // 0x1ca5 @0x11
0x1c94…1cb4 at0012 = ╱33╱3╱ // 0x1ca6 @0x12
0x1c94…1cb4 at0013 = ╱ef╱$╱ // 0x1ca7 @0x13
0x1c94…1cb4 at0014 = ╱ed╱(╱ // 0x1ca8 @0x14
0x1c94…1cb4 at0015 = ╱47╱G╱ // 0x1ca9 @0x15
0x1c94…1cb4 at0016 = ╱f0╱:╱ // 0x1caa @0x16
0x1c94…1cb4 at0017 = ╱31╱1╱ // 0x1cab @0x17
0x1c94…1cb4 at0018 = ╱31╱1╱ // 0x1cac @0x18
0x1c94…1cb4 at0019 = ╱fe0000b004╱ // 0x1cad @0x19
0x1c94…1cb4 at001e = ╱ee╱)╱ // 0x1cb2 @0x1e
0x1c94…1cb4 at001f = EOL // 0x1cb3 @0x1f
0x1c94…1cb4 }
0x1cb4…1cd1 aa28 4025 EXEC OP(8,C5$(20))
0x1cb4…1cd1 LineComalBin {
0x1cb4…1cd1 ptr = 0xaa28 // 0x1cb4 @0x0
0x1cb4…1cd1 lno = 0x0fb9 // 0x1cb6 @0x2
0x1cb4…1cd1 at0004 = ╱9d╱ EXEC ╱ // 0x1cb8 @0x4
0x1cb4…1cd1 at0005 = ╱4f╱O╱ // 0x1cb9 @0x5
0x1cb4…1cd1 at0006 = ╱50╱P╱ // 0x1cba @0x6
0x1cb4…1cd1 at0007 = ╱ed╱(╱ // 0x1cbb @0x7
0x1cb4…1cd1 at0008 = ╱38╱8╱ // 0x1cbc @0x8
0x1cb4…1cd1 at0009 = ╱fe00008004╱ // 0x1cbd @0x9
0x1cb4…1cd1 at000e = ╱ec╱,╱ // 0x1cc2 @0xe
0x1cb4…1cd1 at000f = ╱43╱C╱ // 0x1cc3 @0xf
0x1cb4…1cd1 at0010 = ╱35╱5╱ // 0x1cc4 @0x10
0x1cb4…1cd1 at0011 = ╱ef╱$╱ // 0x1cc5 @0x11
0x1cb4…1cd1 at0012 = ╱ed╱(╱ // 0x1cc6 @0x12
0x1cb4…1cd1 at0013 = ╱32╱2╱ // 0x1cc7 @0x13
0x1cb4…1cd1 at0014 = ╱30╱0╱ // 0x1cc8 @0x14
0x1cb4…1cd1 at0015 = ╱fe0000a005╱ // 0x1cc9 @0x15
0x1cb4…1cd1 at001a = ╱ee╱)╱ // 0x1cce @0x1a
0x1cb4…1cd1 at001b = ╱ee╱)╱ // 0x1ccf @0x1b
0x1cb4…1cd1 at001c = EOL // 0x1cd0 @0x1c
0x1cb4…1cd1 }
0x1cd1…1cf6 aa4d 4030 PAGE$(11,PS+15:G)="16"
0x1cd1…1cf6 LineComalBin {
0x1cd1…1cf6 ptr = 0xaa4d // 0x1cd1 @0x0
0x1cd1…1cf6 lno = 0x0fbe // 0x1cd3 @0x2
0x1cd1…1cf6 at0004 = ╱50╱P╱ // 0x1cd5 @0x4
0x1cd1…1cf6 at0005 = ╱41╱A╱ // 0x1cd6 @0x5
0x1cd1…1cf6 at0006 = ╱47╱G╱ // 0x1cd7 @0x6
0x1cd1…1cf6 at0007 = ╱45╱E╱ // 0x1cd8 @0x7
0x1cd1…1cf6 at0008 = ╱ef╱$╱ // 0x1cd9 @0x8
0x1cd1…1cf6 at0009 = ╱ed╱(╱ // 0x1cda @0x9
0x1cd1…1cf6 at000a = ╱31╱1╱ // 0x1cdb @0xa
0x1cd1…1cf6 at000b = ╱31╱1╱ // 0x1cdc @0xb
0x1cd1…1cf6 at000c = ╱fe0000b004╱ // 0x1cdd @0xc
0x1cd1…1cf6 at0011 = ╱ec╱,╱ // 0x1ce2 @0x11
0x1cd1…1cf6 at0012 = ╱50╱P╱ // 0x1ce3 @0x12
0x1cd1…1cf6 at0013 = ╱53╱S╱ // 0x1ce4 @0x13
0x1cd1…1cf6 at0014 = ╱e2╱+╱ // 0x1ce5 @0x14
0x1cd1…1cf6 at0015 = ╱31╱1╱ // 0x1ce6 @0x15
0x1cd1…1cf6 at0016 = ╱35╱5╱ // 0x1ce7 @0x16
0x1cd1…1cf6 at0017 = ╱fe0000f004╱ // 0x1ce8 @0x17
0x1cd1…1cf6 at001c = ╱f0╱:╱ // 0x1ced @0x1c
0x1cd1…1cf6 at001d = ╱47╱G╱ // 0x1cee @0x1d
0x1cd1…1cf6 at001e = ╱ee╱)╱ // 0x1cef @0x1e
0x1cd1…1cf6 at001f = ╱dc╱=╱ // 0x1cf0 @0x1f
0x1cd1…1cf6 at0020 = ╱22╱"╱ // 0x1cf1 @0x20
0x1cd1…1cf6 at0021 = ╱31╱1╱ // 0x1cf2 @0x21
0x1cd1…1cf6 at0022 = ╱36╱6╱ // 0x1cf3 @0x22
0x1cd1…1cf6 at0023 = ╱22╱"╱ // 0x1cf4 @0x23
0x1cd1…1cf6 at0024 = EOL // 0x1cf5 @0x24
0x1cd1…1cf6 }
0x1cf6…1d29 aa80 4040 PAGE$(11,PS+20:11)=C5$(20)
0x1cf6…1d29 LineComalBin {
0x1cf6…1d29 ptr = 0xaa80 // 0x1cf6 @0x0
0x1cf6…1d29 lno = 0x0fc8 // 0x1cf8 @0x2
0x1cf6…1d29 at0004 = ╱50╱P╱ // 0x1cfa @0x4
0x1cf6…1d29 at0005 = ╱41╱A╱ // 0x1cfb @0x5
0x1cf6…1d29 at0006 = ╱47╱G╱ // 0x1cfc @0x6
0x1cf6…1d29 at0007 = ╱45╱E╱ // 0x1cfd @0x7
0x1cf6…1d29 at0008 = ╱ef╱$╱ // 0x1cfe @0x8
0x1cf6…1d29 at0009 = ╱ed╱(╱ // 0x1cff @0x9
0x1cf6…1d29 at000a = ╱31╱1╱ // 0x1d00 @0xa
0x1cf6…1d29 at000b = ╱31╱1╱ // 0x1d01 @0xb
0x1cf6…1d29 at000c = ╱fe0000b004╱ // 0x1d02 @0xc
0x1cf6…1d29 at0011 = ╱ec╱,╱ // 0x1d07 @0x11
0x1cf6…1d29 at0012 = ╱50╱P╱ // 0x1d08 @0x12
0x1cf6…1d29 at0013 = ╱53╱S╱ // 0x1d09 @0x13
0x1cf6…1d29 at0014 = ╱e2╱+╱ // 0x1d0a @0x14
0x1cf6…1d29 at0015 = ╱32╱2╱ // 0x1d0b @0x15
0x1cf6…1d29 at0016 = ╱30╱0╱ // 0x1d0c @0x16
0x1cf6…1d29 at0017 = ╱fe0000a005╱ // 0x1d0d @0x17
0x1cf6…1d29 at001c = ╱f0╱:╱ // 0x1d12 @0x1c
0x1cf6…1d29 at001d = ╱31╱1╱ // 0x1d13 @0x1d
0x1cf6…1d29 at001e = ╱31╱1╱ // 0x1d14 @0x1e
0x1cf6…1d29 at001f = ╱fe0000b004╱ // 0x1d15 @0x1f
0x1cf6…1d29 at0024 = ╱ee╱)╱ // 0x1d1a @0x24
0x1cf6…1d29 at0025 = ╱dc╱=╱ // 0x1d1b @0x25
0x1cf6…1d29 at0026 = ╱43╱C╱ // 0x1d1c @0x26
0x1cf6…1d29 at0027 = ╱35╱5╱ // 0x1d1d @0x27
0x1cf6…1d29 at0028 = ╱ef╱$╱ // 0x1d1e @0x28
0x1cf6…1d29 at0029 = ╱ed╱(╱ // 0x1d1f @0x29
0x1cf6…1d29 at002a = ╱32╱2╱ // 0x1d20 @0x2a
0x1cf6…1d29 at002b = ╱30╱0╱ // 0x1d21 @0x2b
0x1cf6…1d29 at002c = ╱fe0000a005╱ // 0x1d22 @0x2c
0x1cf6…1d29 at0031 = ╱ee╱)╱ // 0x1d27 @0x31
0x1cf6…1d29 at0032 = EOL // 0x1d28 @0x32
0x1cf6…1d29 }
0x1d29…1d46 aa9d 4055 EXEC OP(9,C5$(17))
0x1d29…1d46 LineComalBin {
0x1d29…1d46 ptr = 0xaa9d // 0x1d29 @0x0
0x1d29…1d46 lno = 0x0fd7 // 0x1d2b @0x2
0x1d29…1d46 at0004 = ╱9d╱ EXEC ╱ // 0x1d2d @0x4
0x1d29…1d46 at0005 = ╱4f╱O╱ // 0x1d2e @0x5
0x1d29…1d46 at0006 = ╱50╱P╱ // 0x1d2f @0x6
0x1d29…1d46 at0007 = ╱ed╱(╱ // 0x1d30 @0x7
0x1d29…1d46 at0008 = ╱39╱9╱ // 0x1d31 @0x8
0x1d29…1d46 at0009 = ╱fe00009004╱ // 0x1d32 @0x9
0x1d29…1d46 at000e = ╱ec╱,╱ // 0x1d37 @0xe
0x1d29…1d46 at000f = ╱43╱C╱ // 0x1d38 @0xf
0x1d29…1d46 at0010 = ╱35╱5╱ // 0x1d39 @0x10
0x1d29…1d46 at0011 = ╱ef╱$╱ // 0x1d3a @0x11
0x1d29…1d46 at0012 = ╱ed╱(╱ // 0x1d3b @0x12
0x1d29…1d46 at0013 = ╱31╱1╱ // 0x1d3c @0x13
0x1d29…1d46 at0014 = ╱37╱7╱ // 0x1d3d @0x14
0x1d29…1d46 at0015 = ╱fe00008805╱ // 0x1d3e @0x15
0x1d29…1d46 at001a = ╱ee╱)╱ // 0x1d43 @0x1a
0x1d29…1d46 at001b = ╱ee╱)╱ // 0x1d44 @0x1b
0x1d29…1d46 at001c = EOL // 0x1d45 @0x1c
0x1d29…1d46 }
0x1d46…1d79 aad0 4060 PAGE$(12,PS+20:11)=C5$(17)
0x1d46…1d79 LineComalBin {
0x1d46…1d79 ptr = 0xaad0 // 0x1d46 @0x0
0x1d46…1d79 lno = 0x0fdc // 0x1d48 @0x2
0x1d46…1d79 at0004 = ╱50╱P╱ // 0x1d4a @0x4
0x1d46…1d79 at0005 = ╱41╱A╱ // 0x1d4b @0x5
0x1d46…1d79 at0006 = ╱47╱G╱ // 0x1d4c @0x6
0x1d46…1d79 at0007 = ╱45╱E╱ // 0x1d4d @0x7
0x1d46…1d79 at0008 = ╱ef╱$╱ // 0x1d4e @0x8
0x1d46…1d79 at0009 = ╱ed╱(╱ // 0x1d4f @0x9
0x1d46…1d79 at000a = ╱31╱1╱ // 0x1d50 @0xa
0x1d46…1d79 at000b = ╱32╱2╱ // 0x1d51 @0xb
0x1d46…1d79 at000c = ╱fe0000c004╱ // 0x1d52 @0xc
0x1d46…1d79 at0011 = ╱ec╱,╱ // 0x1d57 @0x11
0x1d46…1d79 at0012 = ╱50╱P╱ // 0x1d58 @0x12
0x1d46…1d79 at0013 = ╱53╱S╱ // 0x1d59 @0x13
0x1d46…1d79 at0014 = ╱e2╱+╱ // 0x1d5a @0x14
0x1d46…1d79 at0015 = ╱32╱2╱ // 0x1d5b @0x15
0x1d46…1d79 at0016 = ╱30╱0╱ // 0x1d5c @0x16
0x1d46…1d79 at0017 = ╱fe0000a005╱ // 0x1d5d @0x17
0x1d46…1d79 at001c = ╱f0╱:╱ // 0x1d62 @0x1c
0x1d46…1d79 at001d = ╱31╱1╱ // 0x1d63 @0x1d
0x1d46…1d79 at001e = ╱31╱1╱ // 0x1d64 @0x1e
0x1d46…1d79 at001f = ╱fe0000b004╱ // 0x1d65 @0x1f
0x1d46…1d79 at0024 = ╱ee╱)╱ // 0x1d6a @0x24
0x1d46…1d79 at0025 = ╱dc╱=╱ // 0x1d6b @0x25
0x1d46…1d79 at0026 = ╱43╱C╱ // 0x1d6c @0x26
0x1d46…1d79 at0027 = ╱35╱5╱ // 0x1d6d @0x27
0x1d46…1d79 at0028 = ╱ef╱$╱ // 0x1d6e @0x28
0x1d46…1d79 at0029 = ╱ed╱(╱ // 0x1d6f @0x29
0x1d46…1d79 at002a = ╱31╱1╱ // 0x1d70 @0x2a
0x1d46…1d79 at002b = ╱37╱7╱ // 0x1d71 @0x2b
0x1d46…1d79 at002c = ╱fe00008805╱ // 0x1d72 @0x2c
0x1d46…1d79 at0031 = ╱ee╱)╱ // 0x1d77 @0x31
0x1d46…1d79 at0032 = EOL // 0x1d78 @0x32
0x1d46…1d79 }
0x1d79…1dba ab11 4070 IF PAGE$(12,PS+30)="+" THEN PAGE$(12,PS+30)=" "
0x1d79…1dba LineComalBin {
0x1d79…1dba ptr = 0xab11 // 0x1d79 @0x0
0x1d79…1dba lno = 0x0fe6 // 0x1d7b @0x2
0x1d79…1dba at0004 = ╱82╱ IF ╱ // 0x1d7d @0x4
0x1d79…1dba at0005 = ╱50╱P╱ // 0x1d7e @0x5
0x1d79…1dba at0006 = ╱41╱A╱ // 0x1d7f @0x6
0x1d79…1dba at0007 = ╱47╱G╱ // 0x1d80 @0x7
0x1d79…1dba at0008 = ╱45╱E╱ // 0x1d81 @0x8
0x1d79…1dba at0009 = ╱ef╱$╱ // 0x1d82 @0x9
0x1d79…1dba at000a = ╱ed╱(╱ // 0x1d83 @0xa
0x1d79…1dba at000b = ╱31╱1╱ // 0x1d84 @0xb
0x1d79…1dba at000c = ╱32╱2╱ // 0x1d85 @0xc
0x1d79…1dba at000d = ╱fe0000c004╱ // 0x1d86 @0xd
0x1d79…1dba at0012 = ╱ec╱,╱ // 0x1d8b @0x12
0x1d79…1dba at0013 = ╱50╱P╱ // 0x1d8c @0x13
0x1d79…1dba at0014 = ╱53╱S╱ // 0x1d8d @0x14
0x1d79…1dba at0015 = ╱e2╱+╱ // 0x1d8e @0x15
0x1d79…1dba at0016 = ╱33╱3╱ // 0x1d8f @0x16
0x1d79…1dba at0017 = ╱30╱0╱ // 0x1d90 @0x17
0x1d79…1dba at0018 = ╱fe0000f005╱ // 0x1d91 @0x18
0x1d79…1dba at001d = ╱ee╱)╱ // 0x1d96 @0x1d
0x1d79…1dba at001e = ╱dc╱=╱ // 0x1d97 @0x1e
0x1d79…1dba at001f = ╱22╱"╱ // 0x1d98 @0x1f
0x1d79…1dba at0020 = ╱2b╱+╱ // 0x1d99 @0x20
0x1d79…1dba at0021 = ╱22╱"╱ // 0x1d9a @0x21
0x1d79…1dba at0022 = ╱b6╱ THEN ╱ // 0x1d9b @0x22
0x1d79…1dba at0023 = ╱50╱P╱ // 0x1d9c @0x23
0x1d79…1dba at0024 = ╱41╱A╱ // 0x1d9d @0x24
0x1d79…1dba at0025 = ╱47╱G╱ // 0x1d9e @0x25
0x1d79…1dba at0026 = ╱45╱E╱ // 0x1d9f @0x26
0x1d79…1dba at0027 = ╱ef╱$╱ // 0x1da0 @0x27
0x1d79…1dba at0028 = ╱ed╱(╱ // 0x1da1 @0x28
0x1d79…1dba at0029 = ╱31╱1╱ // 0x1da2 @0x29
0x1d79…1dba at002a = ╱32╱2╱ // 0x1da3 @0x2a
0x1d79…1dba at002b = ╱fe0000c004╱ // 0x1da4 @0x2b
0x1d79…1dba at0030 = ╱ec╱,╱ // 0x1da9 @0x30
0x1d79…1dba at0031 = ╱50╱P╱ // 0x1daa @0x31
0x1d79…1dba at0032 = ╱53╱S╱ // 0x1dab @0x32
0x1d79…1dba at0033 = ╱e2╱+╱ // 0x1dac @0x33
0x1d79…1dba at0034 = ╱33╱3╱ // 0x1dad @0x34
0x1d79…1dba at0035 = ╱30╱0╱ // 0x1dae @0x35
0x1d79…1dba at0036 = ╱fe0000f005╱ // 0x1daf @0x36
0x1d79…1dba at003b = ╱ee╱)╱ // 0x1db4 @0x3b
0x1d79…1dba at003c = ╱dc╱=╱ // 0x1db5 @0x3c
0x1d79…1dba at003d = ╱22╱"╱ // 0x1db6 @0x3d
0x1d79…1dba at003e = ╱20╱…╱ // 0x1db7 @0x3e
0x1d79…1dba at003f = ╱22╱"╱ // 0x1db8 @0x3f
0x1d79…1dba at0040 = EOL // 0x1db9 @0x40
0x1d79…1dba }
0x1dba…1dc5 ab1c 4080 IF H0>B THEN
0x1dba…1dc5 LineComalBin {
0x1dba…1dc5 ptr = 0xab1c // 0x1dba @0x0
0x1dba…1dc5 lno = 0x0ff0 // 0x1dbc @0x2
0x1dba…1dc5 at0004 = ╱9c╱ IF ╱ // 0x1dbe @0x4
0x1dba…1dc5 at0005 = ╱48╱H╱ // 0x1dbf @0x5
0x1dba…1dc5 at0006 = ╱30╱0╱ // 0x1dc0 @0x6
0x1dba…1dc5 at0007 = ╱de╱>╱ // 0x1dc1 @0x7
0x1dba…1dc5 at0008 = ╱42╱B╱ // 0x1dc2 @0x8
0x1dba…1dc5 at0009 = ╱b6╱ THEN ╱ // 0x1dc3 @0x9
0x1dba…1dc5 at000a = EOL // 0x1dc4 @0xa
0x1dba…1dc5 }
0x1dc5…1dd4 ab2b 4090 EXEC Æ(C3$,H0)
0x1dc5…1dd4 LineComalBin {
0x1dc5…1dd4 ptr = 0xab2b // 0x1dc5 @0x0
0x1dc5…1dd4 lno = 0x0ffa // 0x1dc7 @0x2
0x1dc5…1dd4 at0004 = ╱9d╱ EXEC ╱ // 0x1dc9 @0x4
0x1dc5…1dd4 at0005 = ╱5b╱Æ╱ // 0x1dca @0x5
0x1dc5…1dd4 at0006 = ╱ed╱(╱ // 0x1dcb @0x6
0x1dc5…1dd4 at0007 = ╱43╱C╱ // 0x1dcc @0x7
0x1dc5…1dd4 at0008 = ╱33╱3╱ // 0x1dcd @0x8
0x1dc5…1dd4 at0009 = ╱ef╱$╱ // 0x1dce @0x9
0x1dc5…1dd4 at000a = ╱ec╱,╱ // 0x1dcf @0xa
0x1dc5…1dd4 at000b = ╱48╱H╱ // 0x1dd0 @0xb
0x1dc5…1dd4 at000c = ╱30╱0╱ // 0x1dd1 @0xc
0x1dc5…1dd4 at000d = ╱ee╱)╱ // 0x1dd2 @0xd
0x1dc5…1dd4 at000e = EOL // 0x1dd3 @0xe
0x1dc5…1dd4 }
0x1dd4…1dda ab31 4100 ELSE
0x1dd4…1dda LineComalBin {
0x1dd4…1dda ptr = 0xab31 // 0x1dd4 @0x0
0x1dd4…1dda lno = 0x1004 // 0x1dd6 @0x2
0x1dd4…1dda at0004 = ╱9a╱ ELSE ╱ // 0x1dd8 @0x4
0x1dd4…1dda at0005 = EOL // 0x1dd9 @0x5
0x1dd4…1dda }
0x1dda…1df8 ab4f 4110 K8=INT(G9*12/365)
0x1dda…1df8 LineComalBin {
0x1dda…1df8 ptr = 0xab4f // 0x1dda @0x0
0x1dda…1df8 lno = 0x100e // 0x1ddc @0x2
0x1dda…1df8 at0004 = ╱4b╱K╱ // 0x1dde @0x4
0x1dda…1df8 at0005 = ╱38╱8╱ // 0x1ddf @0x5
0x1dda…1df8 at0006 = ╱dc╱=╱ // 0x1de0 @0x6
0x1dda…1df8 at0007 = ╱c6╱INT╱ // 0x1de1 @0x7
0x1dda…1df8 at0008 = ╱ed╱(╱ // 0x1de2 @0x8
0x1dda…1df8 at0009 = ╱47╱G╱ // 0x1de3 @0x9
0x1dda…1df8 at000a = ╱39╱9╱ // 0x1de4 @0xa
0x1dda…1df8 at000b = ╱e4╱*╱ // 0x1de5 @0xb
0x1dda…1df8 at000c = ╱31╱1╱ // 0x1de6 @0xc
0x1dda…1df8 at000d = ╱32╱2╱ // 0x1de7 @0xd
0x1dda…1df8 at000e = ╱fe0000c004╱ // 0x1de8 @0xe
0x1dda…1df8 at0013 = ╱e5╱/╱ // 0x1ded @0x13
0x1dda…1df8 at0014 = ╱33╱3╱ // 0x1dee @0x14
0x1dda…1df8 at0015 = ╱36╱6╱ // 0x1def @0x15
0x1dda…1df8 at0016 = ╱35╱5╱ // 0x1df0 @0x16
0x1dda…1df8 at0017 = ╱fe0080b609╱ // 0x1df1 @0x17
0x1dda…1df8 at001c = ╱ee╱)╱ // 0x1df6 @0x1c
0x1dda…1df8 at001d = EOL // 0x1df7 @0x1d
0x1dda…1df8 }
0x1df8…1e07 ab5e 4120 EXEC Æ(C4$,K8)
0x1df8…1e07 LineComalBin {
0x1df8…1e07 ptr = 0xab5e // 0x1df8 @0x0
0x1df8…1e07 lno = 0x1018 // 0x1dfa @0x2
0x1df8…1e07 at0004 = ╱9d╱ EXEC ╱ // 0x1dfc @0x4
0x1df8…1e07 at0005 = ╱5b╱Æ╱ // 0x1dfd @0x5
0x1df8…1e07 at0006 = ╱ed╱(╱ // 0x1dfe @0x6
0x1df8…1e07 at0007 = ╱43╱C╱ // 0x1dff @0x7
0x1df8…1e07 at0008 = ╱34╱4╱ // 0x1e00 @0x8
0x1df8…1e07 at0009 = ╱ef╱$╱ // 0x1e01 @0x9
0x1df8…1e07 at000a = ╱ec╱,╱ // 0x1e02 @0xa
0x1df8…1e07 at000b = ╱4b╱K╱ // 0x1e03 @0xb
0x1df8…1e07 at000c = ╱38╱8╱ // 0x1e04 @0xc
0x1df8…1e07 at000d = ╱ee╱)╱ // 0x1e05 @0xd
0x1df8…1e07 at000e = EOL // 0x1e06 @0xe
0x1df8…1e07 }
0x1e07…1e1c ab73 4125 F1$=C5$(29)
0x1e07…1e1c LineComalBin {
0x1e07…1e1c ptr = 0xab73 // 0x1e07 @0x0
0x1e07…1e1c lno = 0x101d // 0x1e09 @0x2
0x1e07…1e1c at0004 = ╱46╱F╱ // 0x1e0b @0x4
0x1e07…1e1c at0005 = ╱31╱1╱ // 0x1e0c @0x5
0x1e07…1e1c at0006 = ╱ef╱$╱ // 0x1e0d @0x6
0x1e07…1e1c at0007 = ╱dc╱=╱ // 0x1e0e @0x7
0x1e07…1e1c at0008 = ╱43╱C╱ // 0x1e0f @0x8
0x1e07…1e1c at0009 = ╱35╱5╱ // 0x1e10 @0x9
0x1e07…1e1c at000a = ╱ef╱$╱ // 0x1e11 @0xa
0x1e07…1e1c at000b = ╱ed╱(╱ // 0x1e12 @0xb
0x1e07…1e1c at000c = ╱32╱2╱ // 0x1e13 @0xc
0x1e07…1e1c at000d = ╱39╱9╱ // 0x1e14 @0xd
0x1e07…1e1c at000e = ╱fe0000e805╱ // 0x1e15 @0xe
0x1e07…1e1c at0013 = ╱ee╱)╱ // 0x1e1a @0x13
0x1e07…1e1c at0014 = EOL // 0x1e1b @0x14
0x1e07…1e1c }
0x1e1c…1e37 ab8e 4130 EXEC C(2,F1$,C4$,C3$)
0x1e1c…1e37 LineComalBin {
0x1e1c…1e37 ptr = 0xab8e // 0x1e1c @0x0
0x1e1c…1e37 lno = 0x1022 // 0x1e1e @0x2
0x1e1c…1e37 at0004 = ╱9d╱ EXEC ╱ // 0x1e20 @0x4
0x1e1c…1e37 at0005 = ╱43╱C╱ // 0x1e21 @0x5
0x1e1c…1e37 at0006 = ╱ed╱(╱ // 0x1e22 @0x6
0x1e1c…1e37 at0007 = ╱32╱2╱ // 0x1e23 @0x7
0x1e1c…1e37 at0008 = ╱fe00008002╱ // 0x1e24 @0x8
0x1e1c…1e37 at000d = ╱ec╱,╱ // 0x1e29 @0xd
0x1e1c…1e37 at000e = ╱46╱F╱ // 0x1e2a @0xe
0x1e1c…1e37 at000f = ╱31╱1╱ // 0x1e2b @0xf
0x1e1c…1e37 at0010 = ╱ef╱$╱ // 0x1e2c @0x10
0x1e1c…1e37 at0011 = ╱ec╱,╱ // 0x1e2d @0x11
0x1e1c…1e37 at0012 = ╱43╱C╱ // 0x1e2e @0x12
0x1e1c…1e37 at0013 = ╱34╱4╱ // 0x1e2f @0x13
0x1e1c…1e37 at0014 = ╱ef╱$╱ // 0x1e30 @0x14
0x1e1c…1e37 at0015 = ╱ec╱,╱ // 0x1e31 @0x15
0x1e1c…1e37 at0016 = ╱43╱C╱ // 0x1e32 @0x16
0x1e1c…1e37 at0017 = ╱33╱3╱ // 0x1e33 @0x17
0x1e1c…1e37 at0018 = ╱ef╱$╱ // 0x1e34 @0x18
0x1e1c…1e37 at0019 = ╱ee╱)╱ // 0x1e35 @0x19
0x1e1c…1e37 at001a = EOL // 0x1e36 @0x1a
0x1e1c…1e37 }
0x1e37…1e3d ab94 4140 ENDIF
0x1e37…1e3d LineComalBin {
0x1e37…1e3d ptr = 0xab94 // 0x1e37 @0x0
0x1e37…1e3d lno = 0x102c // 0x1e39 @0x2
0x1e37…1e3d at0004 = ╱9b╱ ENDIF ╱ // 0x1e3b @0x4
0x1e37…1e3d at0005 = EOL // 0x1e3c @0x5
0x1e37…1e3d }
0x1e3d…1e9b abf2 4150 B1$=C5$(20);C4$=C5$(17);C5$(20)=B3$(G:11);C5$(17)=B3$(G:11)
0x1e3d…1e9b LineComalBin {
0x1e3d…1e9b ptr = 0xabf2 // 0x1e3d @0x0
0x1e3d…1e9b lno = 0x1036 // 0x1e3f @0x2
0x1e3d…1e9b at0004 = ╱42╱B╱ // 0x1e41 @0x4
0x1e3d…1e9b at0005 = ╱31╱1╱ // 0x1e42 @0x5
0x1e3d…1e9b at0006 = ╱ef╱$╱ // 0x1e43 @0x6
0x1e3d…1e9b at0007 = ╱dc╱=╱ // 0x1e44 @0x7
0x1e3d…1e9b at0008 = ╱43╱C╱ // 0x1e45 @0x8
0x1e3d…1e9b at0009 = ╱35╱5╱ // 0x1e46 @0x9
0x1e3d…1e9b at000a = ╱ef╱$╱ // 0x1e47 @0xa
0x1e3d…1e9b at000b = ╱ed╱(╱ // 0x1e48 @0xb
0x1e3d…1e9b at000c = ╱32╱2╱ // 0x1e49 @0xc
0x1e3d…1e9b at000d = ╱30╱0╱ // 0x1e4a @0xd
0x1e3d…1e9b at000e = ╱fe0000a005╱ // 0x1e4b @0xe
0x1e3d…1e9b at0013 = ╱ee╱)╱ // 0x1e50 @0x13
0x1e3d…1e9b at0014 = ╱eb╱;╱ // 0x1e51 @0x14
0x1e3d…1e9b at0015 = ╱43╱C╱ // 0x1e52 @0x15
0x1e3d…1e9b at0016 = ╱34╱4╱ // 0x1e53 @0x16
0x1e3d…1e9b at0017 = ╱ef╱$╱ // 0x1e54 @0x17
0x1e3d…1e9b at0018 = ╱dc╱=╱ // 0x1e55 @0x18
0x1e3d…1e9b at0019 = ╱43╱C╱ // 0x1e56 @0x19
0x1e3d…1e9b at001a = ╱35╱5╱ // 0x1e57 @0x1a
0x1e3d…1e9b at001b = ╱ef╱$╱ // 0x1e58 @0x1b
0x1e3d…1e9b at001c = ╱ed╱(╱ // 0x1e59 @0x1c
0x1e3d…1e9b at001d = ╱31╱1╱ // 0x1e5a @0x1d
0x1e3d…1e9b at001e = ╱37╱7╱ // 0x1e5b @0x1e
0x1e3d…1e9b at001f = ╱fe00008805╱ // 0x1e5c @0x1f
0x1e3d…1e9b at0024 = ╱ee╱)╱ // 0x1e61 @0x24
0x1e3d…1e9b at0025 = ╱eb╱;╱ // 0x1e62 @0x25
0x1e3d…1e9b at0026 = ╱43╱C╱ // 0x1e63 @0x26
0x1e3d…1e9b at0027 = ╱35╱5╱ // 0x1e64 @0x27
0x1e3d…1e9b at0028 = ╱ef╱$╱ // 0x1e65 @0x28
0x1e3d…1e9b at0029 = ╱ed╱(╱ // 0x1e66 @0x29
0x1e3d…1e9b at002a = ╱32╱2╱ // 0x1e67 @0x2a
0x1e3d…1e9b at002b = ╱30╱0╱ // 0x1e68 @0x2b
0x1e3d…1e9b at002c = ╱fe0000a005╱ // 0x1e69 @0x2c
0x1e3d…1e9b at0031 = ╱ee╱)╱ // 0x1e6e @0x31
0x1e3d…1e9b at0032 = ╱dc╱=╱ // 0x1e6f @0x32
0x1e3d…1e9b at0033 = ╱42╱B╱ // 0x1e70 @0x33
0x1e3d…1e9b at0034 = ╱33╱3╱ // 0x1e71 @0x34
0x1e3d…1e9b at0035 = ╱ef╱$╱ // 0x1e72 @0x35
0x1e3d…1e9b at0036 = ╱ed╱(╱ // 0x1e73 @0x36
0x1e3d…1e9b at0037 = ╱47╱G╱ // 0x1e74 @0x37
0x1e3d…1e9b at0038 = ╱f0╱:╱ // 0x1e75 @0x38
0x1e3d…1e9b at0039 = ╱31╱1╱ // 0x1e76 @0x39
0x1e3d…1e9b at003a = ╱31╱1╱ // 0x1e77 @0x3a
0x1e3d…1e9b at003b = ╱fe0000b004╱ // 0x1e78 @0x3b
0x1e3d…1e9b at0040 = ╱ee╱)╱ // 0x1e7d @0x40
0x1e3d…1e9b at0041 = ╱eb╱;╱ // 0x1e7e @0x41
0x1e3d…1e9b at0042 = ╱43╱C╱ // 0x1e7f @0x42
0x1e3d…1e9b at0043 = ╱35╱5╱ // 0x1e80 @0x43
0x1e3d…1e9b at0044 = ╱ef╱$╱ // 0x1e81 @0x44
0x1e3d…1e9b at0045 = ╱ed╱(╱ // 0x1e82 @0x45
0x1e3d…1e9b at0046 = ╱31╱1╱ // 0x1e83 @0x46
0x1e3d…1e9b at0047 = ╱37╱7╱ // 0x1e84 @0x47
0x1e3d…1e9b at0048 = ╱fe00008805╱ // 0x1e85 @0x48
0x1e3d…1e9b at004d = ╱ee╱)╱ // 0x1e8a @0x4d
0x1e3d…1e9b at004e = ╱dc╱=╱ // 0x1e8b @0x4e
0x1e3d…1e9b at004f = ╱42╱B╱ // 0x1e8c @0x4f
0x1e3d…1e9b at0050 = ╱33╱3╱ // 0x1e8d @0x50
0x1e3d…1e9b at0051 = ╱ef╱$╱ // 0x1e8e @0x51
0x1e3d…1e9b at0052 = ╱ed╱(╱ // 0x1e8f @0x52
0x1e3d…1e9b at0053 = ╱47╱G╱ // 0x1e90 @0x53
0x1e3d…1e9b at0054 = ╱f0╱:╱ // 0x1e91 @0x54
0x1e3d…1e9b at0055 = ╱31╱1╱ // 0x1e92 @0x55
0x1e3d…1e9b at0056 = ╱31╱1╱ // 0x1e93 @0x56
0x1e3d…1e9b at0057 = ╱fe0000b004╱ // 0x1e94 @0x57
0x1e3d…1e9b at005c = ╱ee╱)╱ // 0x1e99 @0x5c
0x1e3d…1e9b at005d = EOL // 0x1e9a @0x5d
0x1e3d…1e9b }
0x1e9b…1eb9 ac10 4160 C5$(29)=C5$(20)
0x1e9b…1eb9 LineComalBin {
0x1e9b…1eb9 ptr = 0xac10 // 0x1e9b @0x0
0x1e9b…1eb9 lno = 0x1040 // 0x1e9d @0x2
0x1e9b…1eb9 at0004 = ╱43╱C╱ // 0x1e9f @0x4
0x1e9b…1eb9 at0005 = ╱35╱5╱ // 0x1ea0 @0x5
0x1e9b…1eb9 at0006 = ╱ef╱$╱ // 0x1ea1 @0x6
0x1e9b…1eb9 at0007 = ╱ed╱(╱ // 0x1ea2 @0x7
0x1e9b…1eb9 at0008 = ╱32╱2╱ // 0x1ea3 @0x8
0x1e9b…1eb9 at0009 = ╱39╱9╱ // 0x1ea4 @0x9
0x1e9b…1eb9 at000a = ╱fe0000e805╱ // 0x1ea5 @0xa
0x1e9b…1eb9 at000f = ╱ee╱)╱ // 0x1eaa @0xf
0x1e9b…1eb9 at0010 = ╱dc╱=╱ // 0x1eab @0x10
0x1e9b…1eb9 at0011 = ╱43╱C╱ // 0x1eac @0x11
0x1e9b…1eb9 at0012 = ╱35╱5╱ // 0x1ead @0x12
0x1e9b…1eb9 at0013 = ╱ef╱$╱ // 0x1eae @0x13
0x1e9b…1eb9 at0014 = ╱ed╱(╱ // 0x1eaf @0x14
0x1e9b…1eb9 at0015 = ╱32╱2╱ // 0x1eb0 @0x15
0x1e9b…1eb9 at0016 = ╱30╱0╱ // 0x1eb1 @0x16
0x1e9b…1eb9 at0017 = ╱fe0000a005╱ // 0x1eb2 @0x17
0x1e9b…1eb9 at001c = ╱ee╱)╱ // 0x1eb7 @0x1c
0x1e9b…1eb9 at001d = EOL // 0x1eb8 @0x1d
0x1e9b…1eb9 }
0x1eb9…1ed4 ac2b 4190 EXEC C(0,B1$,C4$,B1$)
0x1eb9…1ed4 LineComalBin {
0x1eb9…1ed4 ptr = 0xac2b // 0x1eb9 @0x0
0x1eb9…1ed4 lno = 0x105e // 0x1ebb @0x2
0x1eb9…1ed4 at0004 = ╱9d╱ EXEC ╱ // 0x1ebd @0x4
0x1eb9…1ed4 at0005 = ╱43╱C╱ // 0x1ebe @0x5
0x1eb9…1ed4 at0006 = ╱ed╱(╱ // 0x1ebf @0x6
0x1eb9…1ed4 at0007 = ╱30╱0╱ // 0x1ec0 @0x7
0x1eb9…1ed4 at0008 = ╱fe00000000╱ // 0x1ec1 @0x8
0x1eb9…1ed4 at000d = ╱ec╱,╱ // 0x1ec6 @0xd
0x1eb9…1ed4 at000e = ╱42╱B╱ // 0x1ec7 @0xe
0x1eb9…1ed4 at000f = ╱31╱1╱ // 0x1ec8 @0xf
0x1eb9…1ed4 at0010 = ╱ef╱$╱ // 0x1ec9 @0x10
0x1eb9…1ed4 at0011 = ╱ec╱,╱ // 0x1eca @0x11
0x1eb9…1ed4 at0012 = ╱43╱C╱ // 0x1ecb @0x12
0x1eb9…1ed4 at0013 = ╱34╱4╱ // 0x1ecc @0x13
0x1eb9…1ed4 at0014 = ╱ef╱$╱ // 0x1ecd @0x14
0x1eb9…1ed4 at0015 = ╱ec╱,╱ // 0x1ece @0x15
0x1eb9…1ed4 at0016 = ╱42╱B╱ // 0x1ecf @0x16
0x1eb9…1ed4 at0017 = ╱31╱1╱ // 0x1ed0 @0x17
0x1eb9…1ed4 at0018 = ╱ef╱$╱ // 0x1ed1 @0x18
0x1eb9…1ed4 at0019 = ╱ee╱)╱ // 0x1ed2 @0x19
0x1eb9…1ed4 at001a = EOL // 0x1ed3 @0x1a
0x1eb9…1ed4 }
0x1ed4…1eec ac43 4200 EXEC OPTÆL(34,B1$)
0x1ed4…1eec LineComalBin {
0x1ed4…1eec ptr = 0xac43 // 0x1ed4 @0x0
0x1ed4…1eec lno = 0x1068 // 0x1ed6 @0x2
0x1ed4…1eec at0004 = ╱9d╱ EXEC ╱ // 0x1ed8 @0x4
0x1ed4…1eec at0005 = ╱4f╱O╱ // 0x1ed9 @0x5
0x1ed4…1eec at0006 = ╱50╱P╱ // 0x1eda @0x6
0x1ed4…1eec at0007 = ╱54╱T╱ // 0x1edb @0x7
0x1ed4…1eec at0008 = ╱5b╱Æ╱ // 0x1edc @0x8
0x1ed4…1eec at0009 = ╱4c╱L╱ // 0x1edd @0x9
0x1ed4…1eec at000a = ╱ed╱(╱ // 0x1ede @0xa
0x1ed4…1eec at000b = ╱33╱3╱ // 0x1edf @0xb
0x1ed4…1eec at000c = ╱34╱4╱ // 0x1ee0 @0xc
0x1ed4…1eec at000d = ╱fe00008806╱ // 0x1ee1 @0xd
0x1ed4…1eec at0012 = ╱ec╱,╱ // 0x1ee6 @0x12
0x1ed4…1eec at0013 = ╱42╱B╱ // 0x1ee7 @0x13
0x1ed4…1eec at0014 = ╱31╱1╱ // 0x1ee8 @0x14
0x1ed4…1eec at0015 = ╱ef╱$╱ // 0x1ee9 @0x15
0x1ed4…1eec at0016 = ╱ee╱)╱ // 0x1eea @0x16
0x1ed4…1eec at0017 = EOL // 0x1eeb @0x17
0x1ed4…1eec }
0x1eec…1f21 ac78 4250 PAGE$(13,PS+20:11)=B1$(G:11)
0x1eec…1f21 LineComalBin {
0x1eec…1f21 ptr = 0xac78 // 0x1eec @0x0
0x1eec…1f21 lno = 0x109a // 0x1eee @0x2
0x1eec…1f21 at0004 = ╱50╱P╱ // 0x1ef0 @0x4
0x1eec…1f21 at0005 = ╱41╱A╱ // 0x1ef1 @0x5
0x1eec…1f21 at0006 = ╱47╱G╱ // 0x1ef2 @0x6
0x1eec…1f21 at0007 = ╱45╱E╱ // 0x1ef3 @0x7
0x1eec…1f21 at0008 = ╱ef╱$╱ // 0x1ef4 @0x8
0x1eec…1f21 at0009 = ╱ed╱(╱ // 0x1ef5 @0x9
0x1eec…1f21 at000a = ╱31╱1╱ // 0x1ef6 @0xa
0x1eec…1f21 at000b = ╱33╱3╱ // 0x1ef7 @0xb
0x1eec…1f21 at000c = ╱fe0000d004╱ // 0x1ef8 @0xc
0x1eec…1f21 at0011 = ╱ec╱,╱ // 0x1efd @0x11
0x1eec…1f21 at0012 = ╱50╱P╱ // 0x1efe @0x12
0x1eec…1f21 at0013 = ╱53╱S╱ // 0x1eff @0x13
0x1eec…1f21 at0014 = ╱e2╱+╱ // 0x1f00 @0x14
0x1eec…1f21 at0015 = ╱32╱2╱ // 0x1f01 @0x15
0x1eec…1f21 at0016 = ╱30╱0╱ // 0x1f02 @0x16
0x1eec…1f21 at0017 = ╱fe0000a005╱ // 0x1f03 @0x17
0x1eec…1f21 at001c = ╱f0╱:╱ // 0x1f08 @0x1c
0x1eec…1f21 at001d = ╱31╱1╱ // 0x1f09 @0x1d
0x1eec…1f21 at001e = ╱31╱1╱ // 0x1f0a @0x1e
0x1eec…1f21 at001f = ╱fe0000b004╱ // 0x1f0b @0x1f
0x1eec…1f21 at0024 = ╱ee╱)╱ // 0x1f10 @0x24
0x1eec…1f21 at0025 = ╱dc╱=╱ // 0x1f11 @0x25
0x1eec…1f21 at0026 = ╱42╱B╱ // 0x1f12 @0x26
0x1eec…1f21 at0027 = ╱31╱1╱ // 0x1f13 @0x27
0x1eec…1f21 at0028 = ╱ef╱$╱ // 0x1f14 @0x28
0x1eec…1f21 at0029 = ╱ed╱(╱ // 0x1f15 @0x29
0x1eec…1f21 at002a = ╱47╱G╱ // 0x1f16 @0x2a
0x1eec…1f21 at002b = ╱f0╱:╱ // 0x1f17 @0x2b
0x1eec…1f21 at002c = ╱31╱1╱ // 0x1f18 @0x2c
0x1eec…1f21 at002d = ╱31╱1╱ // 0x1f19 @0x2d
0x1eec…1f21 at002e = ╱fe0000b004╱ // 0x1f1a @0x2e
0x1eec…1f21 at0033 = ╱ee╱)╱ // 0x1f1f @0x33
0x1eec…1f21 at0034 = EOL // 0x1f20 @0x34
0x1eec…1f21 }
0x1f21…1f3c ac93 4260 EXEC C(4,B1$,C3$,C4$)
0x1f21…1f3c LineComalBin {
0x1f21…1f3c ptr = 0xac93 // 0x1f21 @0x0
0x1f21…1f3c lno = 0x10a4 // 0x1f23 @0x2
0x1f21…1f3c at0004 = ╱9d╱ EXEC ╱ // 0x1f25 @0x4
0x1f21…1f3c at0005 = ╱43╱C╱ // 0x1f26 @0x5
0x1f21…1f3c at0006 = ╱ed╱(╱ // 0x1f27 @0x6
0x1f21…1f3c at0007 = ╱34╱4╱ // 0x1f28 @0x7
0x1f21…1f3c at0008 = ╱fe00008003╱ // 0x1f29 @0x8
0x1f21…1f3c at000d = ╱ec╱,╱ // 0x1f2e @0xd
0x1f21…1f3c at000e = ╱42╱B╱ // 0x1f2f @0xe
0x1f21…1f3c at000f = ╱31╱1╱ // 0x1f30 @0xf
0x1f21…1f3c at0010 = ╱ef╱$╱ // 0x1f31 @0x10
0x1f21…1f3c at0011 = ╱ec╱,╱ // 0x1f32 @0x11
0x1f21…1f3c at0012 = ╱43╱C╱ // 0x1f33 @0x12
0x1f21…1f3c at0013 = ╱33╱3╱ // 0x1f34 @0x13
0x1f21…1f3c at0014 = ╱ef╱$╱ // 0x1f35 @0x14
0x1f21…1f3c at0015 = ╱ec╱,╱ // 0x1f36 @0x15
0x1f21…1f3c at0016 = ╱43╱C╱ // 0x1f37 @0x16
0x1f21…1f3c at0017 = ╱34╱4╱ // 0x1f38 @0x17
0x1f21…1f3c at0018 = ╱ef╱$╱ // 0x1f39 @0x18
0x1f21…1f3c at0019 = ╱ee╱)╱ // 0x1f3a @0x19
0x1f21…1f3c at001a = EOL // 0x1f3b @0x1a
0x1f21…1f3c }
0x1f3c…1f69 acc0 4280 PAGE$(14,PS:10)=C3$(V:10)
0x1f3c…1f69 LineComalBin {
0x1f3c…1f69 ptr = 0xacc0 // 0x1f3c @0x0
0x1f3c…1f69 lno = 0x10b8 // 0x1f3e @0x2
0x1f3c…1f69 at0004 = ╱50╱P╱ // 0x1f40 @0x4
0x1f3c…1f69 at0005 = ╱41╱A╱ // 0x1f41 @0x5
0x1f3c…1f69 at0006 = ╱47╱G╱ // 0x1f42 @0x6
0x1f3c…1f69 at0007 = ╱45╱E╱ // 0x1f43 @0x7
0x1f3c…1f69 at0008 = ╱ef╱$╱ // 0x1f44 @0x8
0x1f3c…1f69 at0009 = ╱ed╱(╱ // 0x1f45 @0x9
0x1f3c…1f69 at000a = ╱31╱1╱ // 0x1f46 @0xa
0x1f3c…1f69 at000b = ╱34╱4╱ // 0x1f47 @0xb
0x1f3c…1f69 at000c = ╱fe0000e004╱ // 0x1f48 @0xc
0x1f3c…1f69 at0011 = ╱ec╱,╱ // 0x1f4d @0x11
0x1f3c…1f69 at0012 = ╱50╱P╱ // 0x1f4e @0x12
0x1f3c…1f69 at0013 = ╱53╱S╱ // 0x1f4f @0x13
0x1f3c…1f69 at0014 = ╱f0╱:╱ // 0x1f50 @0x14
0x1f3c…1f69 at0015 = ╱31╱1╱ // 0x1f51 @0x15
0x1f3c…1f69 at0016 = ╱30╱0╱ // 0x1f52 @0x16
0x1f3c…1f69 at0017 = ╱fe0000a004╱ // 0x1f53 @0x17
0x1f3c…1f69 at001c = ╱ee╱)╱ // 0x1f58 @0x1c
0x1f3c…1f69 at001d = ╱dc╱=╱ // 0x1f59 @0x1d
0x1f3c…1f69 at001e = ╱43╱C╱ // 0x1f5a @0x1e
0x1f3c…1f69 at001f = ╱33╱3╱ // 0x1f5b @0x1f
0x1f3c…1f69 at0020 = ╱ef╱$╱ // 0x1f5c @0x20
0x1f3c…1f69 at0021 = ╱ed╱(╱ // 0x1f5d @0x21
0x1f3c…1f69 at0022 = ╱56╱V╱ // 0x1f5e @0x22
0x1f3c…1f69 at0023 = ╱f0╱:╱ // 0x1f5f @0x23
0x1f3c…1f69 at0024 = ╱31╱1╱ // 0x1f60 @0x24
0x1f3c…1f69 at0025 = ╱30╱0╱ // 0x1f61 @0x25
0x1f3c…1f69 at0026 = ╱fe0000a004╱ // 0x1f62 @0x26
0x1f3c…1f69 at002b = ╱ee╱)╱ // 0x1f67 @0x2b
0x1f3c…1f69 at002c = EOL // 0x1f68 @0x2c
0x1f3c…1f69 }
0x1f69…1f9e acf5 4285 IF PAGE$(14,PS+W)="+" THEN PAGE$(14,PS+W)=" "
0x1f69…1f9e LineComalBin {
0x1f69…1f9e ptr = 0xacf5 // 0x1f69 @0x0
0x1f69…1f9e lno = 0x10bd // 0x1f6b @0x2
0x1f69…1f9e at0004 = ╱82╱ IF ╱ // 0x1f6d @0x4
0x1f69…1f9e at0005 = ╱50╱P╱ // 0x1f6e @0x5
0x1f69…1f9e at0006 = ╱41╱A╱ // 0x1f6f @0x6
0x1f69…1f9e at0007 = ╱47╱G╱ // 0x1f70 @0x7
0x1f69…1f9e at0008 = ╱45╱E╱ // 0x1f71 @0x8
0x1f69…1f9e at0009 = ╱ef╱$╱ // 0x1f72 @0x9
0x1f69…1f9e at000a = ╱ed╱(╱ // 0x1f73 @0xa
0x1f69…1f9e at000b = ╱31╱1╱ // 0x1f74 @0xb
0x1f69…1f9e at000c = ╱34╱4╱ // 0x1f75 @0xc
0x1f69…1f9e at000d = ╱fe0000e004╱ // 0x1f76 @0xd
0x1f69…1f9e at0012 = ╱ec╱,╱ // 0x1f7b @0x12
0x1f69…1f9e at0013 = ╱50╱P╱ // 0x1f7c @0x13
0x1f69…1f9e at0014 = ╱53╱S╱ // 0x1f7d @0x14
0x1f69…1f9e at0015 = ╱e2╱+╱ // 0x1f7e @0x15
0x1f69…1f9e at0016 = ╱57╱W╱ // 0x1f7f @0x16
0x1f69…1f9e at0017 = ╱ee╱)╱ // 0x1f80 @0x17
0x1f69…1f9e at0018 = ╱dc╱=╱ // 0x1f81 @0x18
0x1f69…1f9e at0019 = ╱22╱"╱ // 0x1f82 @0x19
0x1f69…1f9e at001a = ╱2b╱+╱ // 0x1f83 @0x1a
0x1f69…1f9e at001b = ╱22╱"╱ // 0x1f84 @0x1b
0x1f69…1f9e at001c = ╱b6╱ THEN ╱ // 0x1f85 @0x1c
0x1f69…1f9e at001d = ╱50╱P╱ // 0x1f86 @0x1d
0x1f69…1f9e at001e = ╱41╱A╱ // 0x1f87 @0x1e
0x1f69…1f9e at001f = ╱47╱G╱ // 0x1f88 @0x1f
0x1f69…1f9e at0020 = ╱45╱E╱ // 0x1f89 @0x20
0x1f69…1f9e at0021 = ╱ef╱$╱ // 0x1f8a @0x21
0x1f69…1f9e at0022 = ╱ed╱(╱ // 0x1f8b @0x22
0x1f69…1f9e at0023 = ╱31╱1╱ // 0x1f8c @0x23
0x1f69…1f9e at0024 = ╱34╱4╱ // 0x1f8d @0x24
0x1f69…1f9e at0025 = ╱fe0000e004╱ // 0x1f8e @0x25
0x1f69…1f9e at002a = ╱ec╱,╱ // 0x1f93 @0x2a
0x1f69…1f9e at002b = ╱50╱P╱ // 0x1f94 @0x2b
0x1f69…1f9e at002c = ╱53╱S╱ // 0x1f95 @0x2c
0x1f69…1f9e at002d = ╱e2╱+╱ // 0x1f96 @0x2d
0x1f69…1f9e at002e = ╱57╱W╱ // 0x1f97 @0x2e
0x1f69…1f9e at002f = ╱ee╱)╱ // 0x1f98 @0x2f
0x1f69…1f9e at0030 = ╱dc╱=╱ // 0x1f99 @0x30
0x1f69…1f9e at0031 = ╱22╱"╱ // 0x1f9a @0x31
0x1f69…1f9e at0032 = ╱20╱…╱ // 0x1f9b @0x32
0x1f69…1f9e at0033 = ╱22╱"╱ // 0x1f9c @0x33
0x1f69…1f9e at0034 = EOL // 0x1f9d @0x34
0x1f69…1f9e }
0x1f9e…1fa9 ad00 4290 IF SI=G THEN
0x1f9e…1fa9 LineComalBin {
0x1f9e…1fa9 ptr = 0xad00 // 0x1f9e @0x0
0x1f9e…1fa9 lno = 0x10c2 // 0x1fa0 @0x2
0x1f9e…1fa9 at0004 = ╱9c╱ IF ╱ // 0x1fa2 @0x4
0x1f9e…1fa9 at0005 = ╱53╱S╱ // 0x1fa3 @0x5
0x1f9e…1fa9 at0006 = ╱49╱I╱ // 0x1fa4 @0x6
0x1f9e…1fa9 at0007 = ╱dc╱=╱ // 0x1fa5 @0x7
0x1f9e…1fa9 at0008 = ╱47╱G╱ // 0x1fa6 @0x8
0x1f9e…1fa9 at0009 = ╱b6╱ THEN ╱ // 0x1fa7 @0x9
0x1f9e…1fa9 at000a = EOL // 0x1fa8 @0xa
0x1f9e…1fa9 }
0x1fa9…1fc4 ad1b 4300 EXEC C(1,B1$,C3$,C4$)
0x1fa9…1fc4 LineComalBin {
0x1fa9…1fc4 ptr = 0xad1b // 0x1fa9 @0x0
0x1fa9…1fc4 lno = 0x10cc // 0x1fab @0x2
0x1fa9…1fc4 at0004 = ╱9d╱ EXEC ╱ // 0x1fad @0x4
0x1fa9…1fc4 at0005 = ╱43╱C╱ // 0x1fae @0x5
0x1fa9…1fc4 at0006 = ╱ed╱(╱ // 0x1faf @0x6
0x1fa9…1fc4 at0007 = ╱31╱1╱ // 0x1fb0 @0x7
0x1fa9…1fc4 at0008 = ╱fe00008001╱ // 0x1fb1 @0x8
0x1fa9…1fc4 at000d = ╱ec╱,╱ // 0x1fb6 @0xd
0x1fa9…1fc4 at000e = ╱42╱B╱ // 0x1fb7 @0xe
0x1fa9…1fc4 at000f = ╱31╱1╱ // 0x1fb8 @0xf
0x1fa9…1fc4 at0010 = ╱ef╱$╱ // 0x1fb9 @0x10
0x1fa9…1fc4 at0011 = ╱ec╱,╱ // 0x1fba @0x11
0x1fa9…1fc4 at0012 = ╱43╱C╱ // 0x1fbb @0x12
0x1fa9…1fc4 at0013 = ╱33╱3╱ // 0x1fbc @0x13
0x1fa9…1fc4 at0014 = ╱ef╱$╱ // 0x1fbd @0x14
0x1fa9…1fc4 at0015 = ╱ec╱,╱ // 0x1fbe @0x15
0x1fa9…1fc4 at0016 = ╱43╱C╱ // 0x1fbf @0x16
0x1fa9…1fc4 at0017 = ╱34╱4╱ // 0x1fc0 @0x17
0x1fa9…1fc4 at0018 = ╱ef╱$╱ // 0x1fc1 @0x18
0x1fa9…1fc4 at0019 = ╱ee╱)╱ // 0x1fc2 @0x19
0x1fa9…1fc4 at001a = EOL // 0x1fc3 @0x1a
0x1fa9…1fc4 }
0x1fc4…1fcd ad24 4310 H0=B
0x1fc4…1fcd LineComalBin {
0x1fc4…1fcd ptr = 0xad24 // 0x1fc4 @0x0
0x1fc4…1fcd lno = 0x10d6 // 0x1fc6 @0x2
0x1fc4…1fcd at0004 = ╱48╱H╱ // 0x1fc8 @0x4
0x1fc4…1fcd at0005 = ╱30╱0╱ // 0x1fc9 @0x5
0x1fc4…1fcd at0006 = ╱dc╱=╱ // 0x1fca @0x6
0x1fc4…1fcd at0007 = ╱42╱B╱ // 0x1fcb @0x7
0x1fc4…1fcd at0008 = EOL // 0x1fcc @0x8
0x1fc4…1fcd }
0x1fcd…1fdc ad33 4320 EXEC Æ(C3$,G8)
0x1fcd…1fdc LineComalBin {
0x1fcd…1fdc ptr = 0xad33 // 0x1fcd @0x0
0x1fcd…1fdc lno = 0x10e0 // 0x1fcf @0x2
0x1fcd…1fdc at0004 = ╱9d╱ EXEC ╱ // 0x1fd1 @0x4
0x1fcd…1fdc at0005 = ╱5b╱Æ╱ // 0x1fd2 @0x5
0x1fcd…1fdc at0006 = ╱ed╱(╱ // 0x1fd3 @0x6
0x1fcd…1fdc at0007 = ╱43╱C╱ // 0x1fd4 @0x7
0x1fcd…1fdc at0008 = ╱33╱3╱ // 0x1fd5 @0x8
0x1fcd…1fdc at0009 = ╱ef╱$╱ // 0x1fd6 @0x9
0x1fcd…1fdc at000a = ╱ec╱,╱ // 0x1fd7 @0xa
0x1fcd…1fdc at000b = ╱47╱G╱ // 0x1fd8 @0xb
0x1fcd…1fdc at000c = ╱38╱8╱ // 0x1fd9 @0xc
0x1fcd…1fdc at000d = ╱ee╱)╱ // 0x1fda @0xd
0x1fcd…1fdc at000e = EOL // 0x1fdb @0xe
0x1fcd…1fdc }
0x1fdc…1ff1 ad48 4335 C3$(12)="-"
0x1fdc…1ff1 LineComalBin {
0x1fdc…1ff1 ptr = 0xad48 // 0x1fdc @0x0
0x1fdc…1ff1 lno = 0x10ef // 0x1fde @0x2
0x1fdc…1ff1 at0004 = ╱43╱C╱ // 0x1fe0 @0x4
0x1fdc…1ff1 at0005 = ╱33╱3╱ // 0x1fe1 @0x5
0x1fdc…1ff1 at0006 = ╱ef╱$╱ // 0x1fe2 @0x6
0x1fdc…1ff1 at0007 = ╱ed╱(╱ // 0x1fe3 @0x7
0x1fdc…1ff1 at0008 = ╱31╱1╱ // 0x1fe4 @0x8
0x1fdc…1ff1 at0009 = ╱32╱2╱ // 0x1fe5 @0x9
0x1fdc…1ff1 at000a = ╱fe0000c004╱ // 0x1fe6 @0xa
0x1fdc…1ff1 at000f = ╱ee╱)╱ // 0x1feb @0xf
0x1fdc…1ff1 at0010 = ╱dc╱=╱ // 0x1fec @0x10
0x1fdc…1ff1 at0011 = ╱22╱"╱ // 0x1fed @0x11
0x1fdc…1ff1 at0012 = ╱2d╱-╱ // 0x1fee @0x12
0x1fdc…1ff1 at0013 = ╱22╱"╱ // 0x1fef @0x13
0x1fdc…1ff1 at0014 = EOL // 0x1ff0 @0x14
0x1fdc…1ff1 }
0x1ff1…200c ad63 4340 EXEC C(2,C4$,C3$,B2$)
0x1ff1…200c LineComalBin {
0x1ff1…200c ptr = 0xad63 // 0x1ff1 @0x0
0x1ff1…200c lno = 0x10f4 // 0x1ff3 @0x2
0x1ff1…200c at0004 = ╱9d╱ EXEC ╱ // 0x1ff5 @0x4
0x1ff1…200c at0005 = ╱43╱C╱ // 0x1ff6 @0x5
0x1ff1…200c at0006 = ╱ed╱(╱ // 0x1ff7 @0x6
0x1ff1…200c at0007 = ╱32╱2╱ // 0x1ff8 @0x7
0x1ff1…200c at0008 = ╱fe00008002╱ // 0x1ff9 @0x8
0x1ff1…200c at000d = ╱ec╱,╱ // 0x1ffe @0xd
0x1ff1…200c at000e = ╱43╱C╱ // 0x1fff @0xe
0x1ff1…200c at000f = ╱34╱4╱ // 0x2000 @0xf
0x1ff1…200c at0010 = ╱ef╱$╱ // 0x2001 @0x10
0x1ff1…200c at0011 = ╱ec╱,╱ // 0x2002 @0x11
0x1ff1…200c at0012 = ╱43╱C╱ // 0x2003 @0x12
0x1ff1…200c at0013 = ╱33╱3╱ // 0x2004 @0x13
0x1ff1…200c at0014 = ╱ef╱$╱ // 0x2005 @0x14
0x1ff1…200c at0015 = ╱ec╱,╱ // 0x2006 @0x15
0x1ff1…200c at0016 = ╱42╱B╱ // 0x2007 @0x16
0x1ff1…200c at0017 = ╱32╱2╱ // 0x2008 @0x17
0x1ff1…200c at0018 = ╱ef╱$╱ // 0x2009 @0x18
0x1ff1…200c at0019 = ╱ee╱)╱ // 0x200a @0x19
0x1ff1…200c at001a = EOL // 0x200b @0x1a
0x1ff1…200c }
0x200c…2027 ad7e 4350 EXEC C(3,B2$,B4$,B2$)
0x200c…2027 LineComalBin {
0x200c…2027 ptr = 0xad7e // 0x200c @0x0
0x200c…2027 lno = 0x10fe // 0x200e @0x2
0x200c…2027 at0004 = ╱9d╱ EXEC ╱ // 0x2010 @0x4
0x200c…2027 at0005 = ╱43╱C╱ // 0x2011 @0x5
0x200c…2027 at0006 = ╱ed╱(╱ // 0x2012 @0x6
0x200c…2027 at0007 = ╱33╱3╱ // 0x2013 @0x7
0x200c…2027 at0008 = ╱fe0000c002╱ // 0x2014 @0x8
0x200c…2027 at000d = ╱ec╱,╱ // 0x2019 @0xd
0x200c…2027 at000e = ╱42╱B╱ // 0x201a @0xe
0x200c…2027 at000f = ╱32╱2╱ // 0x201b @0xf
0x200c…2027 at0010 = ╱ef╱$╱ // 0x201c @0x10
0x200c…2027 at0011 = ╱ec╱,╱ // 0x201d @0x11
0x200c…2027 at0012 = ╱42╱B╱ // 0x201e @0x12
0x200c…2027 at0013 = ╱34╱4╱ // 0x201f @0x13
0x200c…2027 at0014 = ╱ef╱$╱ // 0x2020 @0x14
0x200c…2027 at0015 = ╱ec╱,╱ // 0x2021 @0x15
0x200c…2027 at0016 = ╱42╱B╱ // 0x2022 @0x16
0x200c…2027 at0017 = ╱32╱2╱ // 0x2023 @0x17
0x200c…2027 at0018 = ╱ef╱$╱ // 0x2024 @0x18
0x200c…2027 at0019 = ╱ee╱)╱ // 0x2025 @0x19
0x200c…2027 at001a = EOL // 0x2026 @0x1a
0x200c…2027 }
0x2027…2045 ad9c 4355 B2$(10,11)="00"
0x2027…2045 LineComalBin {
0x2027…2045 ptr = 0xad9c // 0x2027 @0x0
0x2027…2045 lno = 0x1103 // 0x2029 @0x2
0x2027…2045 at0004 = ╱42╱B╱ // 0x202b @0x4
0x2027…2045 at0005 = ╱32╱2╱ // 0x202c @0x5
0x2027…2045 at0006 = ╱ef╱$╱ // 0x202d @0x6
0x2027…2045 at0007 = ╱ed╱(╱ // 0x202e @0x7
0x2027…2045 at0008 = ╱31╱1╱ // 0x202f @0x8
0x2027…2045 at0009 = ╱30╱0╱ // 0x2030 @0x9
0x2027…2045 at000a = ╱fe0000a004╱ // 0x2031 @0xa
0x2027…2045 at000f = ╱ec╱,╱ // 0x2036 @0xf
0x2027…2045 at0010 = ╱31╱1╱ // 0x2037 @0x10
0x2027…2045 at0011 = ╱31╱1╱ // 0x2038 @0x11
0x2027…2045 at0012 = ╱fe0000b004╱ // 0x2039 @0x12
0x2027…2045 at0017 = ╱ee╱)╱ // 0x203e @0x17
0x2027…2045 at0018 = ╱dc╱=╱ // 0x203f @0x18
0x2027…2045 at0019 = ╱22╱"╱ // 0x2040 @0x19
0x2027…2045 at001a = ╱30╱0╱ // 0x2041 @0x1a
0x2027…2045 at001b = ╱30╱0╱ // 0x2042 @0x1b
0x2027…2045 at001c = ╱22╱"╱ // 0x2043 @0x1c
0x2027…2045 at001d = EOL // 0x2044 @0x1d
0x2027…2045 }
0x2045…2060 adb7 4360 EXEC C(0,B1$,B2$,C0$)
0x2045…2060 LineComalBin {
0x2045…2060 ptr = 0xadb7 // 0x2045 @0x0
0x2045…2060 lno = 0x1108 // 0x2047 @0x2
0x2045…2060 at0004 = ╱9d╱ EXEC ╱ // 0x2049 @0x4
0x2045…2060 at0005 = ╱43╱C╱ // 0x204a @0x5
0x2045…2060 at0006 = ╱ed╱(╱ // 0x204b @0x6
0x2045…2060 at0007 = ╱30╱0╱ // 0x204c @0x7
0x2045…2060 at0008 = ╱fe00000000╱ // 0x204d @0x8
0x2045…2060 at000d = ╱ec╱,╱ // 0x2052 @0xd
0x2045…2060 at000e = ╱42╱B╱ // 0x2053 @0xe
0x2045…2060 at000f = ╱31╱1╱ // 0x2054 @0xf
0x2045…2060 at0010 = ╱ef╱$╱ // 0x2055 @0x10
0x2045…2060 at0011 = ╱ec╱,╱ // 0x2056 @0x11
0x2045…2060 at0012 = ╱42╱B╱ // 0x2057 @0x12
0x2045…2060 at0013 = ╱32╱2╱ // 0x2058 @0x13
0x2045…2060 at0014 = ╱ef╱$╱ // 0x2059 @0x14
0x2045…2060 at0015 = ╱ec╱,╱ // 0x205a @0x15
0x2045…2060 at0016 = ╱43╱C╱ // 0x205b @0x16
0x2045…2060 at0017 = ╱30╱0╱ // 0x205c @0x17
0x2045…2060 at0018 = ╱ef╱$╱ // 0x205d @0x18
0x2045…2060 at0019 = ╱ee╱)╱ // 0x205e @0x19
0x2045…2060 at001a = EOL // 0x205f @0x1a
0x2045…2060 }
0x2060…2066 adbd 4370 ELSE
0x2060…2066 LineComalBin {
0x2060…2066 ptr = 0xadbd // 0x2060 @0x0
0x2060…2066 lno = 0x1112 // 0x2062 @0x2
0x2060…2066 at0004 = ╱9a╱ ELSE ╱ // 0x2064 @0x4
0x2060…2066 at0005 = EOL // 0x2065 @0x5
0x2060…2066 }
0x2066…2072 adc9 4380 B2$=B3$
0x2066…2072 LineComalBin {
0x2066…2072 ptr = 0xadc9 // 0x2066 @0x0
0x2066…2072 lno = 0x111c // 0x2068 @0x2
0x2066…2072 at0004 = ╱42╱B╱ // 0x206a @0x4
0x2066…2072 at0005 = ╱32╱2╱ // 0x206b @0x5
0x2066…2072 at0006 = ╱ef╱$╱ // 0x206c @0x6
0x2066…2072 at0007 = ╱dc╱=╱ // 0x206d @0x7
0x2066…2072 at0008 = ╱42╱B╱ // 0x206e @0x8
0x2066…2072 at0009 = ╱33╱3╱ // 0x206f @0x9
0x2066…2072 at000a = ╱ef╱$╱ // 0x2070 @0xa
0x2066…2072 at000b = EOL // 0x2071 @0xb
0x2066…2072 }
0x2072…207e add5 4390 C0$=B1$
0x2072…207e LineComalBin {
0x2072…207e ptr = 0xadd5 // 0x2072 @0x0
0x2072…207e lno = 0x1126 // 0x2074 @0x2
0x2072…207e at0004 = ╱43╱C╱ // 0x2076 @0x4
0x2072…207e at0005 = ╱30╱0╱ // 0x2077 @0x5
0x2072…207e at0006 = ╱ef╱$╱ // 0x2078 @0x6
0x2072…207e at0007 = ╱dc╱=╱ // 0x2079 @0x7
0x2072…207e at0008 = ╱42╱B╱ // 0x207a @0x8
0x2072…207e at0009 = ╱31╱1╱ // 0x207b @0x9
0x2072…207e at000a = ╱ef╱$╱ // 0x207c @0xa
0x2072…207e at000b = EOL // 0x207d @0xb
0x2072…207e }
0x207e…2089 ade0 4400 IF H0>B THEN
0x207e…2089 LineComalBin {
0x207e…2089 ptr = 0xade0 // 0x207e @0x0
0x207e…2089 lno = 0x1130 // 0x2080 @0x2
0x207e…2089 at0004 = ╱9c╱ IF ╱ // 0x2082 @0x4
0x207e…2089 at0005 = ╱48╱H╱ // 0x2083 @0x5
0x207e…2089 at0006 = ╱30╱0╱ // 0x2084 @0x6
0x207e…2089 at0007 = ╱de╱>╱ // 0x2085 @0x7
0x207e…2089 at0008 = ╱42╱B╱ // 0x2086 @0x8
0x207e…2089 at0009 = ╱b6╱ THEN ╱ // 0x2087 @0x9
0x207e…2089 at000a = EOL // 0x2088 @0xa
0x207e…2089 }
0x2089…20a4 adfb 4410 EXEC C(1,C3$,B1$,C3$)
0x2089…20a4 LineComalBin {
0x2089…20a4 ptr = 0xadfb // 0x2089 @0x0
0x2089…20a4 lno = 0x113a // 0x208b @0x2
0x2089…20a4 at0004 = ╱9d╱ EXEC ╱ // 0x208d @0x4
0x2089…20a4 at0005 = ╱43╱C╱ // 0x208e @0x5
0x2089…20a4 at0006 = ╱ed╱(╱ // 0x208f @0x6
0x2089…20a4 at0007 = ╱31╱1╱ // 0x2090 @0x7
0x2089…20a4 at0008 = ╱fe00008001╱ // 0x2091 @0x8
0x2089…20a4 at000d = ╱ec╱,╱ // 0x2096 @0xd
0x2089…20a4 at000e = ╱43╱C╱ // 0x2097 @0xe
0x2089…20a4 at000f = ╱33╱3╱ // 0x2098 @0xf
0x2089…20a4 at0010 = ╱ef╱$╱ // 0x2099 @0x10
0x2089…20a4 at0011 = ╱ec╱,╱ // 0x209a @0x11
0x2089…20a4 at0012 = ╱42╱B╱ // 0x209b @0x12
0x2089…20a4 at0013 = ╱31╱1╱ // 0x209c @0x13
0x2089…20a4 at0014 = ╱ef╱$╱ // 0x209d @0x14
0x2089…20a4 at0015 = ╱ec╱,╱ // 0x209e @0x15
0x2089…20a4 at0016 = ╱43╱C╱ // 0x209f @0x16
0x2089…20a4 at0017 = ╱33╱3╱ // 0x20a0 @0x17
0x2089…20a4 at0018 = ╱ef╱$╱ // 0x20a1 @0x18
0x2089…20a4 at0019 = ╱ee╱)╱ // 0x20a2 @0x19
0x2089…20a4 at001a = EOL // 0x20a3 @0x1a
0x2089…20a4 }
0x20a4…20b9 ae10 4420 EXEC PERVERT(C3$,H0)
0x20a4…20b9 LineComalBin {
0x20a4…20b9 ptr = 0xae10 // 0x20a4 @0x0
0x20a4…20b9 lno = 0x1144 // 0x20a6 @0x2
0x20a4…20b9 at0004 = ╱9d╱ EXEC ╱ // 0x20a8 @0x4
0x20a4…20b9 at0005 = ╱50╱P╱ // 0x20a9 @0x5
0x20a4…20b9 at0006 = ╱45╱E╱ // 0x20aa @0x6
0x20a4…20b9 at0007 = ╱52╱R╱ // 0x20ab @0x7
0x20a4…20b9 at0008 = ╱56╱V╱ // 0x20ac @0x8
0x20a4…20b9 at0009 = ╱45╱E╱ // 0x20ad @0x9
0x20a4…20b9 at000a = ╱52╱R╱ // 0x20ae @0xa
0x20a4…20b9 at000b = ╱54╱T╱ // 0x20af @0xb
0x20a4…20b9 at000c = ╱ed╱(╱ // 0x20b0 @0xc
0x20a4…20b9 at000d = ╱43╱C╱ // 0x20b1 @0xd
0x20a4…20b9 at000e = ╱33╱3╱ // 0x20b2 @0xe
0x20a4…20b9 at000f = ╱ef╱$╱ // 0x20b3 @0xf
0x20a4…20b9 at0010 = ╱ec╱,╱ // 0x20b4 @0x10
0x20a4…20b9 at0011 = ╱48╱H╱ // 0x20b5 @0x11
0x20a4…20b9 at0012 = ╱30╱0╱ // 0x20b6 @0x12
0x20a4…20b9 at0013 = ╱ee╱)╱ // 0x20b7 @0x13
0x20a4…20b9 at0014 = EOL // 0x20b8 @0x14
0x20a4…20b9 }
0x20b9…20bf ae16 4430 ENDIF
0x20b9…20bf LineComalBin {
0x20b9…20bf ptr = 0xae16 // 0x20b9 @0x0
0x20b9…20bf lno = 0x114e // 0x20bb @0x2
0x20b9…20bf at0004 = ╱9b╱ ENDIF ╱ // 0x20bd @0x4
0x20b9…20bf at0005 = EOL // 0x20be @0x5
0x20b9…20bf }
0x20bf…20c5 ae1c 4440 ENDIF
0x20bf…20c5 LineComalBin {
0x20bf…20c5 ptr = 0xae1c // 0x20bf @0x0
0x20bf…20c5 lno = 0x1158 // 0x20c1 @0x2
0x20bf…20c5 at0004 = ╱9b╱ ENDIF ╱ // 0x20c3 @0x4
0x20bf…20c5 at0005 = EOL // 0x20c4 @0x5
0x20bf…20c5 }
0x20c5…20dd ae34 4441 EXEC OPTÆL(40,B2$)
0x20c5…20dd LineComalBin {
0x20c5…20dd ptr = 0xae34 // 0x20c5 @0x0
0x20c5…20dd lno = 0x1159 // 0x20c7 @0x2
0x20c5…20dd at0004 = ╱9d╱ EXEC ╱ // 0x20c9 @0x4
0x20c5…20dd at0005 = ╱4f╱O╱ // 0x20ca @0x5
0x20c5…20dd at0006 = ╱50╱P╱ // 0x20cb @0x6
0x20c5…20dd at0007 = ╱54╱T╱ // 0x20cc @0x7
0x20c5…20dd at0008 = ╱5b╱Æ╱ // 0x20cd @0x8
0x20c5…20dd at0009 = ╱4c╱L╱ // 0x20ce @0x9
0x20c5…20dd at000a = ╱ed╱(╱ // 0x20cf @0xa
0x20c5…20dd at000b = ╱34╱4╱ // 0x20d0 @0xb
0x20c5…20dd at000c = ╱30╱0╱ // 0x20d1 @0xc
0x20c5…20dd at000d = ╱fe0000a006╱ // 0x20d2 @0xd
0x20c5…20dd at0012 = ╱ec╱,╱ // 0x20d7 @0x12
0x20c5…20dd at0013 = ╱42╱B╱ // 0x20d8 @0x13
0x20c5…20dd at0014 = ╱32╱2╱ // 0x20d9 @0x14
0x20c5…20dd at0015 = ╱ef╱$╱ // 0x20da @0x15
0x20c5…20dd at0016 = ╱ee╱)╱ // 0x20db @0x16
0x20c5…20dd at0017 = EOL // 0x20dc @0x17
0x20c5…20dd }
0x20dd…20f2 ae49 4442 EXEC OP(10,B2$)
0x20dd…20f2 LineComalBin {
0x20dd…20f2 ptr = 0xae49 // 0x20dd @0x0
0x20dd…20f2 lno = 0x115a // 0x20df @0x2
0x20dd…20f2 at0004 = ╱9d╱ EXEC ╱ // 0x20e1 @0x4
0x20dd…20f2 at0005 = ╱4f╱O╱ // 0x20e2 @0x5
0x20dd…20f2 at0006 = ╱50╱P╱ // 0x20e3 @0x6
0x20dd…20f2 at0007 = ╱ed╱(╱ // 0x20e4 @0x7
0x20dd…20f2 at0008 = ╱31╱1╱ // 0x20e5 @0x8
0x20dd…20f2 at0009 = ╱30╱0╱ // 0x20e6 @0x9
0x20dd…20f2 at000a = ╱fe0000a004╱ // 0x20e7 @0xa
0x20dd…20f2 at000f = ╱ec╱,╱ // 0x20ec @0xf
0x20dd…20f2 at0010 = ╱42╱B╱ // 0x20ed @0x10
0x20dd…20f2 at0011 = ╱32╱2╱ // 0x20ee @0x11
0x20dd…20f2 at0012 = ╱ef╱$╱ // 0x20ef @0x12
0x20dd…20f2 at0013 = ╱ee╱)╱ // 0x20f0 @0x13
0x20dd…20f2 at0014 = EOL // 0x20f1 @0x14
0x20dd…20f2 }
0x20f2…2127 ae7e 4470 PAGE$(14,PS+20:11)=B2$(G:11)
0x20f2…2127 LineComalBin {
0x20f2…2127 ptr = 0xae7e // 0x20f2 @0x0
0x20f2…2127 lno = 0x1176 // 0x20f4 @0x2
0x20f2…2127 at0004 = ╱50╱P╱ // 0x20f6 @0x4
0x20f2…2127 at0005 = ╱41╱A╱ // 0x20f7 @0x5
0x20f2…2127 at0006 = ╱47╱G╱ // 0x20f8 @0x6
0x20f2…2127 at0007 = ╱45╱E╱ // 0x20f9 @0x7
0x20f2…2127 at0008 = ╱ef╱$╱ // 0x20fa @0x8
0x20f2…2127 at0009 = ╱ed╱(╱ // 0x20fb @0x9
0x20f2…2127 at000a = ╱31╱1╱ // 0x20fc @0xa
0x20f2…2127 at000b = ╱34╱4╱ // 0x20fd @0xb
0x20f2…2127 at000c = ╱fe0000e004╱ // 0x20fe @0xc
0x20f2…2127 at0011 = ╱ec╱,╱ // 0x2103 @0x11
0x20f2…2127 at0012 = ╱50╱P╱ // 0x2104 @0x12
0x20f2…2127 at0013 = ╱53╱S╱ // 0x2105 @0x13
0x20f2…2127 at0014 = ╱e2╱+╱ // 0x2106 @0x14
0x20f2…2127 at0015 = ╱32╱2╱ // 0x2107 @0x15
0x20f2…2127 at0016 = ╱30╱0╱ // 0x2108 @0x16
0x20f2…2127 at0017 = ╱fe0000a005╱ // 0x2109 @0x17
0x20f2…2127 at001c = ╱f0╱:╱ // 0x210e @0x1c
0x20f2…2127 at001d = ╱31╱1╱ // 0x210f @0x1d
0x20f2…2127 at001e = ╱31╱1╱ // 0x2110 @0x1e
0x20f2…2127 at001f = ╱fe0000b004╱ // 0x2111 @0x1f
0x20f2…2127 at0024 = ╱ee╱)╱ // 0x2116 @0x24
0x20f2…2127 at0025 = ╱dc╱=╱ // 0x2117 @0x25
0x20f2…2127 at0026 = ╱42╱B╱ // 0x2118 @0x26
0x20f2…2127 at0027 = ╱32╱2╱ // 0x2119 @0x27
0x20f2…2127 at0028 = ╱ef╱$╱ // 0x211a @0x28
0x20f2…2127 at0029 = ╱ed╱(╱ // 0x211b @0x29
0x20f2…2127 at002a = ╱47╱G╱ // 0x211c @0x2a
0x20f2…2127 at002b = ╱f0╱:╱ // 0x211d @0x2b
0x20f2…2127 at002c = ╱31╱1╱ // 0x211e @0x2c
0x20f2…2127 at002d = ╱31╱1╱ // 0x211f @0x2d
0x20f2…2127 at002e = ╱fe0000b004╱ // 0x2120 @0x2e
0x20f2…2127 at0033 = ╱ee╱)╱ // 0x2125 @0x33
0x20f2…2127 at0034 = EOL // 0x2126 @0x34
0x20f2…2127 }
0x2127…215c aeb3 4480 PAGE$(15,PS+20:11)=C0$(G:11)
0x2127…215c LineComalBin {
0x2127…215c ptr = 0xaeb3 // 0x2127 @0x0
0x2127…215c lno = 0x1180 // 0x2129 @0x2
0x2127…215c at0004 = ╱50╱P╱ // 0x212b @0x4
0x2127…215c at0005 = ╱41╱A╱ // 0x212c @0x5
0x2127…215c at0006 = ╱47╱G╱ // 0x212d @0x6
0x2127…215c at0007 = ╱45╱E╱ // 0x212e @0x7
0x2127…215c at0008 = ╱ef╱$╱ // 0x212f @0x8
0x2127…215c at0009 = ╱ed╱(╱ // 0x2130 @0x9
0x2127…215c at000a = ╱31╱1╱ // 0x2131 @0xa
0x2127…215c at000b = ╱35╱5╱ // 0x2132 @0xb
0x2127…215c at000c = ╱fe0000f004╱ // 0x2133 @0xc
0x2127…215c at0011 = ╱ec╱,╱ // 0x2138 @0x11
0x2127…215c at0012 = ╱50╱P╱ // 0x2139 @0x12
0x2127…215c at0013 = ╱53╱S╱ // 0x213a @0x13
0x2127…215c at0014 = ╱e2╱+╱ // 0x213b @0x14
0x2127…215c at0015 = ╱32╱2╱ // 0x213c @0x15
0x2127…215c at0016 = ╱30╱0╱ // 0x213d @0x16
0x2127…215c at0017 = ╱fe0000a005╱ // 0x213e @0x17
0x2127…215c at001c = ╱f0╱:╱ // 0x2143 @0x1c
0x2127…215c at001d = ╱31╱1╱ // 0x2144 @0x1d
0x2127…215c at001e = ╱31╱1╱ // 0x2145 @0x1e
0x2127…215c at001f = ╱fe0000b004╱ // 0x2146 @0x1f
0x2127…215c at0024 = ╱ee╱)╱ // 0x214b @0x24
0x2127…215c at0025 = ╱dc╱=╱ // 0x214c @0x25
0x2127…215c at0026 = ╱43╱C╱ // 0x214d @0x26
0x2127…215c at0027 = ╱30╱0╱ // 0x214e @0x27
0x2127…215c at0028 = ╱ef╱$╱ // 0x214f @0x28
0x2127…215c at0029 = ╱ed╱(╱ // 0x2150 @0x29
0x2127…215c at002a = ╱47╱G╱ // 0x2151 @0x2a
0x2127…215c at002b = ╱f0╱:╱ // 0x2152 @0x2b
0x2127…215c at002c = ╱31╱1╱ // 0x2153 @0x2c
0x2127…215c at002d = ╱31╱1╱ // 0x2154 @0x2d
0x2127…215c at002e = ╱fe0000b004╱ // 0x2155 @0x2e
0x2127…215c at0033 = ╱ee╱)╱ // 0x215a @0x33
0x2127…215c at0034 = EOL // 0x215b @0x34
0x2127…215c }
0x215c…2162 aeb9 4520 ENDPROC
0x215c…2162 LineComalBin {
0x215c…2162 ptr = 0xaeb9 // 0x215c @0x0
0x215c…2162 lno = 0x11a8 // 0x215e @0x2
0x215c…2162 at0004 = ╱9f╱ ENDPROC ╱ // 0x2160 @0x4
0x215c…2162 at0005 = EOL // 0x2161 @0x5
0x215c…2162 }
0x2162…2170 aec7 4530 PROC BEREGNSH
0x2162…2170 LineComalBin {
0x2162…2170 ptr = 0xaec7 // 0x2162 @0x0
0x2162…2170 lno = 0x11b2 // 0x2164 @0x2
0x2162…2170 at0004 = ╱9e╱ PROC ╱ // 0x2166 @0x4
0x2162…2170 at0005 = ╱42╱B╱ // 0x2167 @0x5
0x2162…2170 at0006 = ╱45╱E╱ // 0x2168 @0x6
0x2162…2170 at0007 = ╱52╱R╱ // 0x2169 @0x7
0x2162…2170 at0008 = ╱45╱E╱ // 0x216a @0x8
0x2162…2170 at0009 = ╱47╱G╱ // 0x216b @0x9
0x2162…2170 at000a = ╱4e╱N╱ // 0x216c @0xa
0x2162…2170 at000b = ╱53╱S╱ // 0x216d @0xb
0x2162…2170 at000c = ╱48╱H╱ // 0x216e @0xc
0x2162…2170 at000d = EOL // 0x216f @0xd
0x2162…2170 }
0x2170…218e aee5 4635 EXEC OP(11,C5$(23))
0x2170…218e LineComalBin {
0x2170…218e ptr = 0xaee5 // 0x2170 @0x0
0x2170…218e lno = 0x121b // 0x2172 @0x2
0x2170…218e at0004 = ╱9d╱ EXEC ╱ // 0x2174 @0x4
0x2170…218e at0005 = ╱4f╱O╱ // 0x2175 @0x5
0x2170…218e at0006 = ╱50╱P╱ // 0x2176 @0x6
0x2170…218e at0007 = ╱ed╱(╱ // 0x2177 @0x7
0x2170…218e at0008 = ╱31╱1╱ // 0x2178 @0x8
0x2170…218e at0009 = ╱31╱1╱ // 0x2179 @0x9
0x2170…218e at000a = ╱fe0000b004╱ // 0x217a @0xa
0x2170…218e at000f = ╱ec╱,╱ // 0x217f @0xf
0x2170…218e at0010 = ╱43╱C╱ // 0x2180 @0x10
0x2170…218e at0011 = ╱35╱5╱ // 0x2181 @0x11
0x2170…218e at0012 = ╱ef╱$╱ // 0x2182 @0x12
0x2170…218e at0013 = ╱ed╱(╱ // 0x2183 @0x13
0x2170…218e at0014 = ╱32╱2╱ // 0x2184 @0x14
0x2170…218e at0015 = ╱33╱3╱ // 0x2185 @0x15
0x2170…218e at0016 = ╱fe0000b805╱ // 0x2186 @0x16
0x2170…218e at001b = ╱ee╱)╱ // 0x218b @0x1b
0x2170…218e at001c = ╱ee╱)╱ // 0x218c @0x1c
0x2170…218e at001d = EOL // 0x218d @0x1d
0x2170…218e }
0x218e…21bf af16 4660 C3$=C5$(23);C5$(23)=B3$(G:11)
0x218e…21bf LineComalBin {
0x218e…21bf ptr = 0xaf16 // 0x218e @0x0
0x218e…21bf lno = 0x1234 // 0x2190 @0x2
0x218e…21bf at0004 = ╱43╱C╱ // 0x2192 @0x4
0x218e…21bf at0005 = ╱33╱3╱ // 0x2193 @0x5
0x218e…21bf at0006 = ╱ef╱$╱ // 0x2194 @0x6
0x218e…21bf at0007 = ╱dc╱=╱ // 0x2195 @0x7
0x218e…21bf at0008 = ╱43╱C╱ // 0x2196 @0x8
0x218e…21bf at0009 = ╱35╱5╱ // 0x2197 @0x9
0x218e…21bf at000a = ╱ef╱$╱ // 0x2198 @0xa
0x218e…21bf at000b = ╱ed╱(╱ // 0x2199 @0xb
0x218e…21bf at000c = ╱32╱2╱ // 0x219a @0xc
0x218e…21bf at000d = ╱33╱3╱ // 0x219b @0xd
0x218e…21bf at000e = ╱fe0000b805╱ // 0x219c @0xe
0x218e…21bf at0013 = ╱ee╱)╱ // 0x21a1 @0x13
0x218e…21bf at0014 = ╱eb╱;╱ // 0x21a2 @0x14
0x218e…21bf at0015 = ╱43╱C╱ // 0x21a3 @0x15
0x218e…21bf at0016 = ╱35╱5╱ // 0x21a4 @0x16
0x218e…21bf at0017 = ╱ef╱$╱ // 0x21a5 @0x17
0x218e…21bf at0018 = ╱ed╱(╱ // 0x21a6 @0x18
0x218e…21bf at0019 = ╱32╱2╱ // 0x21a7 @0x19
0x218e…21bf at001a = ╱33╱3╱ // 0x21a8 @0x1a
0x218e…21bf at001b = ╱fe0000b805╱ // 0x21a9 @0x1b
0x218e…21bf at0020 = ╱ee╱)╱ // 0x21ae @0x20
0x218e…21bf at0021 = ╱dc╱=╱ // 0x21af @0x21
0x218e…21bf at0022 = ╱42╱B╱ // 0x21b0 @0x22
0x218e…21bf at0023 = ╱33╱3╱ // 0x21b1 @0x23
0x218e…21bf at0024 = ╱ef╱$╱ // 0x21b2 @0x24
0x218e…21bf at0025 = ╱ed╱(╱ // 0x21b3 @0x25
0x218e…21bf at0026 = ╱47╱G╱ // 0x21b4 @0x26
0x218e…21bf at0027 = ╱f0╱:╱ // 0x21b5 @0x27
0x218e…21bf at0028 = ╱31╱1╱ // 0x21b6 @0x28
0x218e…21bf at0029 = ╱31╱1╱ // 0x21b7 @0x29
0x218e…21bf at002a = ╱fe0000b004╱ // 0x21b8 @0x2a
0x218e…21bf at002f = ╱ee╱)╱ // 0x21bd @0x2f
0x218e…21bf at0030 = EOL // 0x21be @0x30
0x218e…21bf }
0x21bf…21d8 af2f 4670 C4$=" "+C5$(26)
0x21bf…21d8 LineComalBin {
0x21bf…21d8 ptr = 0xaf2f // 0x21bf @0x0
0x21bf…21d8 lno = 0x123e // 0x21c1 @0x2
0x21bf…21d8 at0004 = ╱43╱C╱ // 0x21c3 @0x4
0x21bf…21d8 at0005 = ╱34╱4╱ // 0x21c4 @0x5
0x21bf…21d8 at0006 = ╱ef╱$╱ // 0x21c5 @0x6
0x21bf…21d8 at0007 = ╱dc╱=╱ // 0x21c6 @0x7
0x21bf…21d8 at0008 = ╱22╱"╱ // 0x21c7 @0x8
0x21bf…21d8 at0009 = ╱20╱…╱ // 0x21c8 @0x9
0x21bf…21d8 at000a = ╱22╱"╱ // 0x21c9 @0xa
0x21bf…21d8 at000b = ╱f1╱+╱ // 0x21ca @0xb
0x21bf…21d8 at000c = ╱43╱C╱ // 0x21cb @0xc
0x21bf…21d8 at000d = ╱35╱5╱ // 0x21cc @0xd
0x21bf…21d8 at000e = ╱ef╱$╱ // 0x21cd @0xe
0x21bf…21d8 at000f = ╱ed╱(╱ // 0x21ce @0xf
0x21bf…21d8 at0010 = ╱32╱2╱ // 0x21cf @0x10
0x21bf…21d8 at0011 = ╱36╱6╱ // 0x21d0 @0x11
0x21bf…21d8 at0012 = ╱fe0000d005╱ // 0x21d1 @0x12
0x21bf…21d8 at0017 = ╱ee╱)╱ // 0x21d6 @0x17
0x21bf…21d8 at0018 = EOL // 0x21d7 @0x18
0x21bf…21d8 }
0x21d8…2205 af5c 4675 IF C4$(12)="+" THEN EXEC C(1,B3$,C4$,C4$)
0x21d8…2205 LineComalBin {
0x21d8…2205 ptr = 0xaf5c // 0x21d8 @0x0
0x21d8…2205 lno = 0x1243 // 0x21da @0x2
0x21d8…2205 at0004 = ╱82╱ IF ╱ // 0x21dc @0x4
0x21d8…2205 at0005 = ╱43╱C╱ // 0x21dd @0x5
0x21d8…2205 at0006 = ╱34╱4╱ // 0x21de @0x6
0x21d8…2205 at0007 = ╱ef╱$╱ // 0x21df @0x7
0x21d8…2205 at0008 = ╱ed╱(╱ // 0x21e0 @0x8
0x21d8…2205 at0009 = ╱31╱1╱ // 0x21e1 @0x9
0x21d8…2205 at000a = ╱32╱2╱ // 0x21e2 @0xa
0x21d8…2205 at000b = ╱fe0000c004╱ // 0x21e3 @0xb
0x21d8…2205 at0010 = ╱ee╱)╱ // 0x21e8 @0x10
0x21d8…2205 at0011 = ╱dc╱=╱ // 0x21e9 @0x11
0x21d8…2205 at0012 = ╱22╱"╱ // 0x21ea @0x12
0x21d8…2205 at0013 = ╱2b╱+╱ // 0x21eb @0x13
0x21d8…2205 at0014 = ╱22╱"╱ // 0x21ec @0x14
0x21d8…2205 at0015 = ╱b6╱ THEN ╱ // 0x21ed @0x15
0x21d8…2205 at0016 = ╱9d╱ EXEC ╱ // 0x21ee @0x16
0x21d8…2205 at0017 = ╱43╱C╱ // 0x21ef @0x17
0x21d8…2205 at0018 = ╱ed╱(╱ // 0x21f0 @0x18
0x21d8…2205 at0019 = ╱31╱1╱ // 0x21f1 @0x19
0x21d8…2205 at001a = ╱fe00008001╱ // 0x21f2 @0x1a
0x21d8…2205 at001f = ╱ec╱,╱ // 0x21f7 @0x1f
0x21d8…2205 at0020 = ╱42╱B╱ // 0x21f8 @0x20
0x21d8…2205 at0021 = ╱33╱3╱ // 0x21f9 @0x21
0x21d8…2205 at0022 = ╱ef╱$╱ // 0x21fa @0x22
0x21d8…2205 at0023 = ╱ec╱,╱ // 0x21fb @0x23
0x21d8…2205 at0024 = ╱43╱C╱ // 0x21fc @0x24
0x21d8…2205 at0025 = ╱34╱4╱ // 0x21fd @0x25
0x21d8…2205 at0026 = ╱ef╱$╱ // 0x21fe @0x26
0x21d8…2205 at0027 = ╱ec╱,╱ // 0x21ff @0x27
0x21d8…2205 at0028 = ╱43╱C╱ // 0x2200 @0x28
0x21d8…2205 at0029 = ╱34╱4╱ // 0x2201 @0x29
0x21d8…2205 at002a = ╱ef╱$╱ // 0x2202 @0x2a
0x21d8…2205 at002b = ╱ee╱)╱ // 0x2203 @0x2b
0x21d8…2205 at002c = EOL // 0x2204 @0x2c
0x21d8…2205 }
0x2205…221a af71 4685 EXEC OP(12,C4$)
0x2205…221a LineComalBin {
0x2205…221a ptr = 0xaf71 // 0x2205 @0x0
0x2205…221a lno = 0x124d // 0x2207 @0x2
0x2205…221a at0004 = ╱9d╱ EXEC ╱ // 0x2209 @0x4
0x2205…221a at0005 = ╱4f╱O╱ // 0x220a @0x5
0x2205…221a at0006 = ╱50╱P╱ // 0x220b @0x6
0x2205…221a at0007 = ╱ed╱(╱ // 0x220c @0x7
0x2205…221a at0008 = ╱31╱1╱ // 0x220d @0x8
0x2205…221a at0009 = ╱32╱2╱ // 0x220e @0x9
0x2205…221a at000a = ╱fe0000c004╱ // 0x220f @0xa
0x2205…221a at000f = ╱ec╱,╱ // 0x2214 @0xf
0x2205…221a at0010 = ╱43╱C╱ // 0x2215 @0x10
0x2205…221a at0011 = ╱34╱4╱ // 0x2216 @0x11
0x2205…221a at0012 = ╱ef╱$╱ // 0x2217 @0x12
0x2205…221a at0013 = ╱ee╱)╱ // 0x2218 @0x13
0x2205…221a at0014 = EOL // 0x2219 @0x14
0x2205…221a }
0x221a…223a af91 4710 C5$(26)=B3$(G:11)
0x221a…223a LineComalBin {
0x221a…223a ptr = 0xaf91 // 0x221a @0x0
0x221a…223a lno = 0x1266 // 0x221c @0x2
0x221a…223a at0004 = ╱43╱C╱ // 0x221e @0x4
0x221a…223a at0005 = ╱35╱5╱ // 0x221f @0x5
0x221a…223a at0006 = ╱ef╱$╱ // 0x2220 @0x6
0x221a…223a at0007 = ╱ed╱(╱ // 0x2221 @0x7
0x221a…223a at0008 = ╱32╱2╱ // 0x2222 @0x8
0x221a…223a at0009 = ╱36╱6╱ // 0x2223 @0x9
0x221a…223a at000a = ╱fe0000d005╱ // 0x2224 @0xa
0x221a…223a at000f = ╱ee╱)╱ // 0x2229 @0xf
0x221a…223a at0010 = ╱dc╱=╱ // 0x222a @0x10
0x221a…223a at0011 = ╱42╱B╱ // 0x222b @0x11
0x221a…223a at0012 = ╱33╱3╱ // 0x222c @0x12
0x221a…223a at0013 = ╱ef╱$╱ // 0x222d @0x13
0x221a…223a at0014 = ╱ed╱(╱ // 0x222e @0x14
0x221a…223a at0015 = ╱47╱G╱ // 0x222f @0x15
0x221a…223a at0016 = ╱f0╱:╱ // 0x2230 @0x16
0x221a…223a at0017 = ╱31╱1╱ // 0x2231 @0x17
0x221a…223a at0018 = ╱31╱1╱ // 0x2232 @0x18
0x221a…223a at0019 = ╱fe0000b004╱ // 0x2233 @0x19
0x221a…223a at001e = ╱ee╱)╱ // 0x2238 @0x1e
0x221a…223a at001f = EOL // 0x2239 @0x1f
0x221a…223a }
0x223a…2255 afac 4720 EXEC C(0,C3$,C4$,B1$)
0x223a…2255 LineComalBin {
0x223a…2255 ptr = 0xafac // 0x223a @0x0
0x223a…2255 lno = 0x1270 // 0x223c @0x2
0x223a…2255 at0004 = ╱9d╱ EXEC ╱ // 0x223e @0x4
0x223a…2255 at0005 = ╱43╱C╱ // 0x223f @0x5
0x223a…2255 at0006 = ╱ed╱(╱ // 0x2240 @0x6
0x223a…2255 at0007 = ╱30╱0╱ // 0x2241 @0x7
0x223a…2255 at0008 = ╱fe00000000╱ // 0x2242 @0x8
0x223a…2255 at000d = ╱ec╱,╱ // 0x2247 @0xd
0x223a…2255 at000e = ╱43╱C╱ // 0x2248 @0xe
0x223a…2255 at000f = ╱33╱3╱ // 0x2249 @0xf
0x223a…2255 at0010 = ╱ef╱$╱ // 0x224a @0x10
0x223a…2255 at0011 = ╱ec╱,╱ // 0x224b @0x11
0x223a…2255 at0012 = ╱43╱C╱ // 0x224c @0x12
0x223a…2255 at0013 = ╱34╱4╱ // 0x224d @0x13
0x223a…2255 at0014 = ╱ef╱$╱ // 0x224e @0x14
0x223a…2255 at0015 = ╱ec╱,╱ // 0x224f @0x15
0x223a…2255 at0016 = ╱42╱B╱ // 0x2250 @0x16
0x223a…2255 at0017 = ╱31╱1╱ // 0x2251 @0x17
0x223a…2255 at0018 = ╱ef╱$╱ // 0x2252 @0x18
0x223a…2255 at0019 = ╱ee╱)╱ // 0x2253 @0x19
0x223a…2255 at001a = EOL // 0x2254 @0x1a
0x223a…2255 }
0x2255…226d afc4 4730 EXEC OPTÆL(34,B1$)
0x2255…226d LineComalBin {
0x2255…226d ptr = 0xafc4 // 0x2255 @0x0
0x2255…226d lno = 0x127a // 0x2257 @0x2
0x2255…226d at0004 = ╱9d╱ EXEC ╱ // 0x2259 @0x4
0x2255…226d at0005 = ╱4f╱O╱ // 0x225a @0x5
0x2255…226d at0006 = ╱50╱P╱ // 0x225b @0x6
0x2255…226d at0007 = ╱54╱T╱ // 0x225c @0x7
0x2255…226d at0008 = ╱5b╱Æ╱ // 0x225d @0x8
0x2255…226d at0009 = ╱4c╱L╱ // 0x225e @0x9
0x2255…226d at000a = ╱ed╱(╱ // 0x225f @0xa
0x2255…226d at000b = ╱33╱3╱ // 0x2260 @0xb
0x2255…226d at000c = ╱34╱4╱ // 0x2261 @0xc
0x2255…226d at000d = ╱fe00008806╱ // 0x2262 @0xd
0x2255…226d at0012 = ╱ec╱,╱ // 0x2267 @0x12
0x2255…226d at0013 = ╱42╱B╱ // 0x2268 @0x13
0x2255…226d at0014 = ╱31╱1╱ // 0x2269 @0x14
0x2255…226d at0015 = ╱ef╱$╱ // 0x226a @0x15
0x2255…226d at0016 = ╱ee╱)╱ // 0x226b @0x16
0x2255…226d at0017 = EOL // 0x226c @0x17
0x2255…226d }
0x226d…227c afd3 4780 EXEC Æ(C3$,G8)
0x226d…227c LineComalBin {
0x226d…227c ptr = 0xafd3 // 0x226d @0x0
0x226d…227c lno = 0x12ac // 0x226f @0x2
0x226d…227c at0004 = ╱9d╱ EXEC ╱ // 0x2271 @0x4
0x226d…227c at0005 = ╱5b╱Æ╱ // 0x2272 @0x5
0x226d…227c at0006 = ╱ed╱(╱ // 0x2273 @0x6
0x226d…227c at0007 = ╱43╱C╱ // 0x2274 @0x7
0x226d…227c at0008 = ╱33╱3╱ // 0x2275 @0x8
0x226d…227c at0009 = ╱ef╱$╱ // 0x2276 @0x9
0x226d…227c at000a = ╱ec╱,╱ // 0x2277 @0xa
0x226d…227c at000b = ╱47╱G╱ // 0x2278 @0xb
0x226d…227c at000c = ╱38╱8╱ // 0x2279 @0xc
0x226d…227c at000d = ╱ee╱)╱ // 0x227a @0xd
0x226d…227c at000e = EOL // 0x227b @0xe
0x226d…227c }
0x227c…22b4 b00b 4782 PAGE$(14,PS+10:5)=C3$(6:5)
0x227c…22b4 LineComalBin {
0x227c…22b4 ptr = 0xb00b // 0x227c @0x0
0x227c…22b4 lno = 0x12ae // 0x227e @0x2
0x227c…22b4 at0004 = ╱50╱P╱ // 0x2280 @0x4
0x227c…22b4 at0005 = ╱41╱A╱ // 0x2281 @0x5
0x227c…22b4 at0006 = ╱47╱G╱ // 0x2282 @0x6
0x227c…22b4 at0007 = ╱45╱E╱ // 0x2283 @0x7
0x227c…22b4 at0008 = ╱ef╱$╱ // 0x2284 @0x8
0x227c…22b4 at0009 = ╱ed╱(╱ // 0x2285 @0x9
0x227c…22b4 at000a = ╱31╱1╱ // 0x2286 @0xa
0x227c…22b4 at000b = ╱34╱4╱ // 0x2287 @0xb
0x227c…22b4 at000c = ╱fe0000e004╱ // 0x2288 @0xc
0x227c…22b4 at0011 = ╱ec╱,╱ // 0x228d @0x11
0x227c…22b4 at0012 = ╱50╱P╱ // 0x228e @0x12
0x227c…22b4 at0013 = ╱53╱S╱ // 0x228f @0x13
0x227c…22b4 at0014 = ╱e2╱+╱ // 0x2290 @0x14
0x227c…22b4 at0015 = ╱31╱1╱ // 0x2291 @0x15
0x227c…22b4 at0016 = ╱30╱0╱ // 0x2292 @0x16
0x227c…22b4 at0017 = ╱fe0000a004╱ // 0x2293 @0x17
0x227c…22b4 at001c = ╱f0╱:╱ // 0x2298 @0x1c
0x227c…22b4 at001d = ╱35╱5╱ // 0x2299 @0x1d
0x227c…22b4 at001e = ╱fe0000a003╱ // 0x229a @0x1e
0x227c…22b4 at0023 = ╱ee╱)╱ // 0x229f @0x23
0x227c…22b4 at0024 = ╱dc╱=╱ // 0x22a0 @0x24
0x227c…22b4 at0025 = ╱43╱C╱ // 0x22a1 @0x25
0x227c…22b4 at0026 = ╱33╱3╱ // 0x22a2 @0x26
0x227c…22b4 at0027 = ╱ef╱$╱ // 0x22a3 @0x27
0x227c…22b4 at0028 = ╱ed╱(╱ // 0x22a4 @0x28
0x227c…22b4 at0029 = ╱36╱6╱ // 0x22a5 @0x29
0x227c…22b4 at002a = ╱fe0000c003╱ // 0x22a6 @0x2a
0x227c…22b4 at002f = ╱f0╱:╱ // 0x22ab @0x2f
0x227c…22b4 at0030 = ╱35╱5╱ // 0x22ac @0x30
0x227c…22b4 at0031 = ╱fe0000a003╱ // 0x22ad @0x31
0x227c…22b4 at0036 = ╱ee╱)╱ // 0x22b2 @0x36
0x227c…22b4 at0037 = EOL // 0x22b3 @0x37
0x227c…22b4 }
0x22b4…22c9 b020 4785 C3$(12)="-"
0x22b4…22c9 LineComalBin {
0x22b4…22c9 ptr = 0xb020 // 0x22b4 @0x0
0x22b4…22c9 lno = 0x12b1 // 0x22b6 @0x2
0x22b4…22c9 at0004 = ╱43╱C╱ // 0x22b8 @0x4
0x22b4…22c9 at0005 = ╱33╱3╱ // 0x22b9 @0x5
0x22b4…22c9 at0006 = ╱ef╱$╱ // 0x22ba @0x6
0x22b4…22c9 at0007 = ╱ed╱(╱ // 0x22bb @0x7
0x22b4…22c9 at0008 = ╱31╱1╱ // 0x22bc @0x8
0x22b4…22c9 at0009 = ╱32╱2╱ // 0x22bd @0x9
0x22b4…22c9 at000a = ╱fe0000c004╱ // 0x22be @0xa
0x22b4…22c9 at000f = ╱ee╱)╱ // 0x22c3 @0xf
0x22b4…22c9 at0010 = ╱dc╱=╱ // 0x22c4 @0x10
0x22b4…22c9 at0011 = ╱22╱"╱ // 0x22c5 @0x11
0x22b4…22c9 at0012 = ╱2d╱-╱ // 0x22c6 @0x12
0x22b4…22c9 at0013 = ╱22╱"╱ // 0x22c7 @0x13
0x22b4…22c9 at0014 = EOL // 0x22c8 @0x14
0x22b4…22c9 }
0x22c9…22e0 b037 4790 IF B1$(12)="+" THEN
0x22c9…22e0 LineComalBin {
0x22c9…22e0 ptr = 0xb037 // 0x22c9 @0x0
0x22c9…22e0 lno = 0x12b6 // 0x22cb @0x2
0x22c9…22e0 at0004 = ╱9c╱ IF ╱ // 0x22cd @0x4
0x22c9…22e0 at0005 = ╱42╱B╱ // 0x22ce @0x5
0x22c9…22e0 at0006 = ╱31╱1╱ // 0x22cf @0x6
0x22c9…22e0 at0007 = ╱ef╱$╱ // 0x22d0 @0x7
0x22c9…22e0 at0008 = ╱ed╱(╱ // 0x22d1 @0x8
0x22c9…22e0 at0009 = ╱31╱1╱ // 0x22d2 @0x9
0x22c9…22e0 at000a = ╱32╱2╱ // 0x22d3 @0xa
0x22c9…22e0 at000b = ╱fe0000c004╱ // 0x22d4 @0xb
0x22c9…22e0 at0010 = ╱ee╱)╱ // 0x22d9 @0x10
0x22c9…22e0 at0011 = ╱dc╱=╱ // 0x22da @0x11
0x22c9…22e0 at0012 = ╱22╱"╱ // 0x22db @0x12
0x22c9…22e0 at0013 = ╱2b╱+╱ // 0x22dc @0x13
0x22c9…22e0 at0014 = ╱22╱"╱ // 0x22dd @0x14
0x22c9…22e0 at0015 = ╱b6╱ THEN ╱ // 0x22de @0x15
0x22c9…22e0 at0016 = EOL // 0x22df @0x16
0x22c9…22e0 }
0x22e0…22fb b052 4810 EXEC C(2,C3$,B1$,C1$)
0x22e0…22fb LineComalBin {
0x22e0…22fb ptr = 0xb052 // 0x22e0 @0x0
0x22e0…22fb lno = 0x12ca // 0x22e2 @0x2
0x22e0…22fb at0004 = ╱9d╱ EXEC ╱ // 0x22e4 @0x4
0x22e0…22fb at0005 = ╱43╱C╱ // 0x22e5 @0x5
0x22e0…22fb at0006 = ╱ed╱(╱ // 0x22e6 @0x6
0x22e0…22fb at0007 = ╱32╱2╱ // 0x22e7 @0x7
0x22e0…22fb at0008 = ╱fe00008002╱ // 0x22e8 @0x8
0x22e0…22fb at000d = ╱ec╱,╱ // 0x22ed @0xd
0x22e0…22fb at000e = ╱43╱C╱ // 0x22ee @0xe
0x22e0…22fb at000f = ╱33╱3╱ // 0x22ef @0xf
0x22e0…22fb at0010 = ╱ef╱$╱ // 0x22f0 @0x10
0x22e0…22fb at0011 = ╱ec╱,╱ // 0x22f1 @0x11
0x22e0…22fb at0012 = ╱42╱B╱ // 0x22f2 @0x12
0x22e0…22fb at0013 = ╱31╱1╱ // 0x22f3 @0x13
0x22e0…22fb at0014 = ╱ef╱$╱ // 0x22f4 @0x14
0x22e0…22fb at0015 = ╱ec╱,╱ // 0x22f5 @0x15
0x22e0…22fb at0016 = ╱43╱C╱ // 0x22f6 @0x16
0x22e0…22fb at0017 = ╱31╱1╱ // 0x22f7 @0x17
0x22e0…22fb at0018 = ╱ef╱$╱ // 0x22f8 @0x18
0x22e0…22fb at0019 = ╱ee╱)╱ // 0x22f9 @0x19
0x22e0…22fb at001a = EOL // 0x22fa @0x1a
0x22e0…22fb }
0x22fb…2316 b06d 4820 EXEC C(3,C1$,B4$,C1$)
0x22fb…2316 LineComalBin {
0x22fb…2316 ptr = 0xb06d // 0x22fb @0x0
0x22fb…2316 lno = 0x12d4 // 0x22fd @0x2
0x22fb…2316 at0004 = ╱9d╱ EXEC ╱ // 0x22ff @0x4
0x22fb…2316 at0005 = ╱43╱C╱ // 0x2300 @0x5
0x22fb…2316 at0006 = ╱ed╱(╱ // 0x2301 @0x6
0x22fb…2316 at0007 = ╱33╱3╱ // 0x2302 @0x7
0x22fb…2316 at0008 = ╱fe0000c002╱ // 0x2303 @0x8
0x22fb…2316 at000d = ╱ec╱,╱ // 0x2308 @0xd
0x22fb…2316 at000e = ╱43╱C╱ // 0x2309 @0xe
0x22fb…2316 at000f = ╱31╱1╱ // 0x230a @0xf
0x22fb…2316 at0010 = ╱ef╱$╱ // 0x230b @0x10
0x22fb…2316 at0011 = ╱ec╱,╱ // 0x230c @0x11
0x22fb…2316 at0012 = ╱42╱B╱ // 0x230d @0x12
0x22fb…2316 at0013 = ╱34╱4╱ // 0x230e @0x13
0x22fb…2316 at0014 = ╱ef╱$╱ // 0x230f @0x14
0x22fb…2316 at0015 = ╱ec╱,╱ // 0x2310 @0x15
0x22fb…2316 at0016 = ╱43╱C╱ // 0x2311 @0x16
0x22fb…2316 at0017 = ╱31╱1╱ // 0x2312 @0x17
0x22fb…2316 at0018 = ╱ef╱$╱ // 0x2313 @0x18
0x22fb…2316 at0019 = ╱ee╱)╱ // 0x2314 @0x19
0x22fb…2316 at001a = EOL // 0x2315 @0x1a
0x22fb…2316 }
0x2316…2334 b08b 4830 C1$(10,11)="00"
0x2316…2334 LineComalBin {
0x2316…2334 ptr = 0xb08b // 0x2316 @0x0
0x2316…2334 lno = 0x12de // 0x2318 @0x2
0x2316…2334 at0004 = ╱43╱C╱ // 0x231a @0x4
0x2316…2334 at0005 = ╱31╱1╱ // 0x231b @0x5
0x2316…2334 at0006 = ╱ef╱$╱ // 0x231c @0x6
0x2316…2334 at0007 = ╱ed╱(╱ // 0x231d @0x7
0x2316…2334 at0008 = ╱31╱1╱ // 0x231e @0x8
0x2316…2334 at0009 = ╱30╱0╱ // 0x231f @0x9
0x2316…2334 at000a = ╱fe0000a004╱ // 0x2320 @0xa
0x2316…2334 at000f = ╱ec╱,╱ // 0x2325 @0xf
0x2316…2334 at0010 = ╱31╱1╱ // 0x2326 @0x10
0x2316…2334 at0011 = ╱31╱1╱ // 0x2327 @0x11
0x2316…2334 at0012 = ╱fe0000b004╱ // 0x2328 @0x12
0x2316…2334 at0017 = ╱ee╱)╱ // 0x232d @0x17
0x2316…2334 at0018 = ╱dc╱=╱ // 0x232e @0x18
0x2316…2334 at0019 = ╱22╱"╱ // 0x232f @0x19
0x2316…2334 at001a = ╱30╱0╱ // 0x2330 @0x1a
0x2316…2334 at001b = ╱30╱0╱ // 0x2331 @0x1b
0x2316…2334 at001c = ╱22╱"╱ // 0x2332 @0x1c
0x2316…2334 at001d = EOL // 0x2333 @0x1d
0x2316…2334 }
0x2334…234c b0a3 4840 EXEC OPTÆL(40,C1$)
0x2334…234c LineComalBin {
0x2334…234c ptr = 0xb0a3 // 0x2334 @0x0
0x2334…234c lno = 0x12e8 // 0x2336 @0x2
0x2334…234c at0004 = ╱9d╱ EXEC ╱ // 0x2338 @0x4
0x2334…234c at0005 = ╱4f╱O╱ // 0x2339 @0x5
0x2334…234c at0006 = ╱50╱P╱ // 0x233a @0x6
0x2334…234c at0007 = ╱54╱T╱ // 0x233b @0x7
0x2334…234c at0008 = ╱5b╱Æ╱ // 0x233c @0x8
0x2334…234c at0009 = ╱4c╱L╱ // 0x233d @0x9
0x2334…234c at000a = ╱ed╱(╱ // 0x233e @0xa
0x2334…234c at000b = ╱34╱4╱ // 0x233f @0xb
0x2334…234c at000c = ╱30╱0╱ // 0x2340 @0xc
0x2334…234c at000d = ╱fe0000a006╱ // 0x2341 @0xd
0x2334…234c at0012 = ╱ec╱,╱ // 0x2346 @0x12
0x2334…234c at0013 = ╱43╱C╱ // 0x2347 @0x13
0x2334…234c at0014 = ╱31╱1╱ // 0x2348 @0x14
0x2334…234c at0015 = ╱ef╱$╱ // 0x2349 @0x15
0x2334…234c at0016 = ╱ee╱)╱ // 0x234a @0x16
0x2334…234c at0017 = EOL // 0x234b @0x17
0x2334…234c }
0x234c…2352 b0a9 4860 ELSE
0x234c…2352 LineComalBin {
0x234c…2352 ptr = 0xb0a9 // 0x234c @0x0
0x234c…2352 lno = 0x12fc // 0x234e @0x2
0x234c…2352 at0004 = ╱9a╱ ELSE ╱ // 0x2350 @0x4
0x234c…2352 at0005 = EOL // 0x2351 @0x5
0x234c…2352 }
0x2352…235e b0b5 4880 C1$=B3$
0x2352…235e LineComalBin {
0x2352…235e ptr = 0xb0b5 // 0x2352 @0x0
0x2352…235e lno = 0x1310 // 0x2354 @0x2
0x2352…235e at0004 = ╱43╱C╱ // 0x2356 @0x4
0x2352…235e at0005 = ╱31╱1╱ // 0x2357 @0x5
0x2352…235e at0006 = ╱ef╱$╱ // 0x2358 @0x6
0x2352…235e at0007 = ╱dc╱=╱ // 0x2359 @0x7
0x2352…235e at0008 = ╱42╱B╱ // 0x235a @0x8
0x2352…235e at0009 = ╱33╱3╱ // 0x235b @0x9
0x2352…235e at000a = ╱ef╱$╱ // 0x235c @0xa
0x2352…235e at000b = EOL // 0x235d @0xb
0x2352…235e }
0x235e…2364 b0bb 4890 ENDIF
0x235e…2364 LineComalBin {
0x235e…2364 ptr = 0xb0bb // 0x235e @0x0
0x235e…2364 lno = 0x131a // 0x2360 @0x2
0x235e…2364 at0004 = ╱9b╱ ENDIF ╱ // 0x2362 @0x4
0x235e…2364 at0005 = EOL // 0x2363 @0x5
0x235e…2364 }
0x2364…238e b0e5 4892 F1$=PAGE$(11,PS+20:11)
0x2364…238e LineComalBin {
0x2364…238e ptr = 0xb0e5 // 0x2364 @0x0
0x2364…238e lno = 0x131c // 0x2366 @0x2
0x2364…238e at0004 = ╱46╱F╱ // 0x2368 @0x4
0x2364…238e at0005 = ╱31╱1╱ // 0x2369 @0x5
0x2364…238e at0006 = ╱ef╱$╱ // 0x236a @0x6
0x2364…238e at0007 = ╱dc╱=╱ // 0x236b @0x7
0x2364…238e at0008 = ╱50╱P╱ // 0x236c @0x8
0x2364…238e at0009 = ╱41╱A╱ // 0x236d @0x9
0x2364…238e at000a = ╱47╱G╱ // 0x236e @0xa
0x2364…238e at000b = ╱45╱E╱ // 0x236f @0xb
0x2364…238e at000c = ╱ef╱$╱ // 0x2370 @0xc
0x2364…238e at000d = ╱ed╱(╱ // 0x2371 @0xd
0x2364…238e at000e = ╱31╱1╱ // 0x2372 @0xe
0x2364…238e at000f = ╱31╱1╱ // 0x2373 @0xf
0x2364…238e at0010 = ╱fe0000b004╱ // 0x2374 @0x10
0x2364…238e at0015 = ╱ec╱,╱ // 0x2379 @0x15
0x2364…238e at0016 = ╱50╱P╱ // 0x237a @0x16
0x2364…238e at0017 = ╱53╱S╱ // 0x237b @0x17
0x2364…238e at0018 = ╱e2╱+╱ // 0x237c @0x18
0x2364…238e at0019 = ╱32╱2╱ // 0x237d @0x19
0x2364…238e at001a = ╱30╱0╱ // 0x237e @0x1a
0x2364…238e at001b = ╱fe0000a005╱ // 0x237f @0x1b
0x2364…238e at0020 = ╱f0╱:╱ // 0x2384 @0x20
0x2364…238e at0021 = ╱31╱1╱ // 0x2385 @0x21
0x2364…238e at0022 = ╱31╱1╱ // 0x2386 @0x22
0x2364…238e at0023 = ╱fe0000b004╱ // 0x2387 @0x23
0x2364…238e at0028 = ╱ee╱)╱ // 0x238c @0x28
0x2364…238e at0029 = EOL // 0x238d @0x29
0x2364…238e }
0x238e…23a9 b100 4894 EXEC C(0,F1$,B1$,F1$)
0x238e…23a9 LineComalBin {
0x238e…23a9 ptr = 0xb100 // 0x238e @0x0
0x238e…23a9 lno = 0x131e // 0x2390 @0x2
0x238e…23a9 at0004 = ╱9d╱ EXEC ╱ // 0x2392 @0x4
0x238e…23a9 at0005 = ╱43╱C╱ // 0x2393 @0x5
0x238e…23a9 at0006 = ╱ed╱(╱ // 0x2394 @0x6
0x238e…23a9 at0007 = ╱30╱0╱ // 0x2395 @0x7
0x238e…23a9 at0008 = ╱fe00000000╱ // 0x2396 @0x8
0x238e…23a9 at000d = ╱ec╱,╱ // 0x239b @0xd
0x238e…23a9 at000e = ╱46╱F╱ // 0x239c @0xe
0x238e…23a9 at000f = ╱31╱1╱ // 0x239d @0xf
0x238e…23a9 at0010 = ╱ef╱$╱ // 0x239e @0x10
0x238e…23a9 at0011 = ╱ec╱,╱ // 0x239f @0x11
0x238e…23a9 at0012 = ╱42╱B╱ // 0x23a0 @0x12
0x238e…23a9 at0013 = ╱31╱1╱ // 0x23a1 @0x13
0x238e…23a9 at0014 = ╱ef╱$╱ // 0x23a2 @0x14
0x238e…23a9 at0015 = ╱ec╱,╱ // 0x23a3 @0x15
0x238e…23a9 at0016 = ╱46╱F╱ // 0x23a4 @0x16
0x238e…23a9 at0017 = ╱31╱1╱ // 0x23a5 @0x17
0x238e…23a9 at0018 = ╱ef╱$╱ // 0x23a6 @0x18
0x238e…23a9 at0019 = ╱ee╱)╱ // 0x23a7 @0x19
0x238e…23a9 at001a = EOL // 0x23a8 @0x1a
0x238e…23a9 }
0x23a9…23d0 b127 4896 IF F1$(12)="+" THEN F1$(12)=" "
0x23a9…23d0 LineComalBin {
0x23a9…23d0 ptr = 0xb127 // 0x23a9 @0x0
0x23a9…23d0 lno = 0x1320 // 0x23ab @0x2
0x23a9…23d0 at0004 = ╱82╱ IF ╱ // 0x23ad @0x4
0x23a9…23d0 at0005 = ╱46╱F╱ // 0x23ae @0x5
0x23a9…23d0 at0006 = ╱31╱1╱ // 0x23af @0x6
0x23a9…23d0 at0007 = ╱ef╱$╱ // 0x23b0 @0x7
0x23a9…23d0 at0008 = ╱ed╱(╱ // 0x23b1 @0x8
0x23a9…23d0 at0009 = ╱31╱1╱ // 0x23b2 @0x9
0x23a9…23d0 at000a = ╱32╱2╱ // 0x23b3 @0xa
0x23a9…23d0 at000b = ╱fe0000c004╱ // 0x23b4 @0xb
0x23a9…23d0 at0010 = ╱ee╱)╱ // 0x23b9 @0x10
0x23a9…23d0 at0011 = ╱dc╱=╱ // 0x23ba @0x11
0x23a9…23d0 at0012 = ╱22╱"╱ // 0x23bb @0x12
0x23a9…23d0 at0013 = ╱2b╱+╱ // 0x23bc @0x13
0x23a9…23d0 at0014 = ╱22╱"╱ // 0x23bd @0x14
0x23a9…23d0 at0015 = ╱b6╱ THEN ╱ // 0x23be @0x15
0x23a9…23d0 at0016 = ╱46╱F╱ // 0x23bf @0x16
0x23a9…23d0 at0017 = ╱31╱1╱ // 0x23c0 @0x17
0x23a9…23d0 at0018 = ╱ef╱$╱ // 0x23c1 @0x18
0x23a9…23d0 at0019 = ╱ed╱(╱ // 0x23c2 @0x19
0x23a9…23d0 at001a = ╱31╱1╱ // 0x23c3 @0x1a
0x23a9…23d0 at001b = ╱32╱2╱ // 0x23c4 @0x1b
0x23a9…23d0 at001c = ╱fe0000c004╱ // 0x23c5 @0x1c
0x23a9…23d0 at0021 = ╱ee╱)╱ // 0x23ca @0x21
0x23a9…23d0 at0022 = ╱dc╱=╱ // 0x23cb @0x22
0x23a9…23d0 at0023 = ╱22╱"╱ // 0x23cc @0x23
0x23a9…23d0 at0024 = ╱20╱…╱ // 0x23cd @0x24
0x23a9…23d0 at0025 = ╱22╱"╱ // 0x23ce @0x25
0x23a9…23d0 at0026 = EOL // 0x23cf @0x26
0x23a9…23d0 }
0x23d0…2405 b15c 4898 PAGE$(11,PS+20:11)=F1$(G:11)
0x23d0…2405 LineComalBin {
0x23d0…2405 ptr = 0xb15c // 0x23d0 @0x0
0x23d0…2405 lno = 0x1322 // 0x23d2 @0x2
0x23d0…2405 at0004 = ╱50╱P╱ // 0x23d4 @0x4
0x23d0…2405 at0005 = ╱41╱A╱ // 0x23d5 @0x5
0x23d0…2405 at0006 = ╱47╱G╱ // 0x23d6 @0x6
0x23d0…2405 at0007 = ╱45╱E╱ // 0x23d7 @0x7
0x23d0…2405 at0008 = ╱ef╱$╱ // 0x23d8 @0x8
0x23d0…2405 at0009 = ╱ed╱(╱ // 0x23d9 @0x9
0x23d0…2405 at000a = ╱31╱1╱ // 0x23da @0xa
0x23d0…2405 at000b = ╱31╱1╱ // 0x23db @0xb
0x23d0…2405 at000c = ╱fe0000b004╱ // 0x23dc @0xc
0x23d0…2405 at0011 = ╱ec╱,╱ // 0x23e1 @0x11
0x23d0…2405 at0012 = ╱50╱P╱ // 0x23e2 @0x12
0x23d0…2405 at0013 = ╱53╱S╱ // 0x23e3 @0x13
0x23d0…2405 at0014 = ╱e2╱+╱ // 0x23e4 @0x14
0x23d0…2405 at0015 = ╱32╱2╱ // 0x23e5 @0x15
0x23d0…2405 at0016 = ╱30╱0╱ // 0x23e6 @0x16
0x23d0…2405 at0017 = ╱fe0000a005╱ // 0x23e7 @0x17
0x23d0…2405 at001c = ╱f0╱:╱ // 0x23ec @0x1c
0x23d0…2405 at001d = ╱31╱1╱ // 0x23ed @0x1d
0x23d0…2405 at001e = ╱31╱1╱ // 0x23ee @0x1e
0x23d0…2405 at001f = ╱fe0000b004╱ // 0x23ef @0x1f
0x23d0…2405 at0024 = ╱ee╱)╱ // 0x23f4 @0x24
0x23d0…2405 at0025 = ╱dc╱=╱ // 0x23f5 @0x25
0x23d0…2405 at0026 = ╱46╱F╱ // 0x23f6 @0x26
0x23d0…2405 at0027 = ╱31╱1╱ // 0x23f7 @0x27
0x23d0…2405 at0028 = ╱ef╱$╱ // 0x23f8 @0x28
0x23d0…2405 at0029 = ╱ed╱(╱ // 0x23f9 @0x29
0x23d0…2405 at002a = ╱47╱G╱ // 0x23fa @0x2a
0x23d0…2405 at002b = ╱f0╱:╱ // 0x23fb @0x2b
0x23d0…2405 at002c = ╱31╱1╱ // 0x23fc @0x2c
0x23d0…2405 at002d = ╱31╱1╱ // 0x23fd @0x2d
0x23d0…2405 at002e = ╱fe0000b004╱ // 0x23fe @0x2e
0x23d0…2405 at0033 = ╱ee╱)╱ // 0x2403 @0x33
0x23d0…2405 at0034 = EOL // 0x2404 @0x34
0x23d0…2405 }
0x2405…242f b186 4900 F1$=PAGE$(13,PS+20:11)
0x2405…242f LineComalBin {
0x2405…242f ptr = 0xb186 // 0x2405 @0x0
0x2405…242f lno = 0x1324 // 0x2407 @0x2
0x2405…242f at0004 = ╱46╱F╱ // 0x2409 @0x4
0x2405…242f at0005 = ╱31╱1╱ // 0x240a @0x5
0x2405…242f at0006 = ╱ef╱$╱ // 0x240b @0x6
0x2405…242f at0007 = ╱dc╱=╱ // 0x240c @0x7
0x2405…242f at0008 = ╱50╱P╱ // 0x240d @0x8
0x2405…242f at0009 = ╱41╱A╱ // 0x240e @0x9
0x2405…242f at000a = ╱47╱G╱ // 0x240f @0xa
0x2405…242f at000b = ╱45╱E╱ // 0x2410 @0xb
0x2405…242f at000c = ╱ef╱$╱ // 0x2411 @0xc
0x2405…242f at000d = ╱ed╱(╱ // 0x2412 @0xd
0x2405…242f at000e = ╱31╱1╱ // 0x2413 @0xe
0x2405…242f at000f = ╱33╱3╱ // 0x2414 @0xf
0x2405…242f at0010 = ╱fe0000d004╱ // 0x2415 @0x10
0x2405…242f at0015 = ╱ec╱,╱ // 0x241a @0x15
0x2405…242f at0016 = ╱50╱P╱ // 0x241b @0x16
0x2405…242f at0017 = ╱53╱S╱ // 0x241c @0x17
0x2405…242f at0018 = ╱e2╱+╱ // 0x241d @0x18
0x2405…242f at0019 = ╱32╱2╱ // 0x241e @0x19
0x2405…242f at001a = ╱30╱0╱ // 0x241f @0x1a
0x2405…242f at001b = ╱fe0000a005╱ // 0x2420 @0x1b
0x2405…242f at0020 = ╱f0╱:╱ // 0x2425 @0x20
0x2405…242f at0021 = ╱31╱1╱ // 0x2426 @0x21
0x2405…242f at0022 = ╱31╱1╱ // 0x2427 @0x22
0x2405…242f at0023 = ╱fe0000b004╱ // 0x2428 @0x23
0x2405…242f at0028 = ╱ee╱)╱ // 0x242d @0x28
0x2405…242f at0029 = EOL // 0x242e @0x29
0x2405…242f }
0x242f…244a b1a1 4902 EXEC C(0,F1$,B1$,F1$)
0x242f…244a LineComalBin {
0x242f…244a ptr = 0xb1a1 // 0x242f @0x0
0x242f…244a lno = 0x1326 // 0x2431 @0x2
0x242f…244a at0004 = ╱9d╱ EXEC ╱ // 0x2433 @0x4
0x242f…244a at0005 = ╱43╱C╱ // 0x2434 @0x5
0x242f…244a at0006 = ╱ed╱(╱ // 0x2435 @0x6
0x242f…244a at0007 = ╱30╱0╱ // 0x2436 @0x7
0x242f…244a at0008 = ╱fe00000000╱ // 0x2437 @0x8
0x242f…244a at000d = ╱ec╱,╱ // 0x243c @0xd
0x242f…244a at000e = ╱46╱F╱ // 0x243d @0xe
0x242f…244a at000f = ╱31╱1╱ // 0x243e @0xf
0x242f…244a at0010 = ╱ef╱$╱ // 0x243f @0x10
0x242f…244a at0011 = ╱ec╱,╱ // 0x2440 @0x11
0x242f…244a at0012 = ╱42╱B╱ // 0x2441 @0x12
0x242f…244a at0013 = ╱31╱1╱ // 0x2442 @0x13
0x242f…244a at0014 = ╱ef╱$╱ // 0x2443 @0x14
0x242f…244a at0015 = ╱ec╱,╱ // 0x2444 @0x15
0x242f…244a at0016 = ╱46╱F╱ // 0x2445 @0x16
0x242f…244a at0017 = ╱31╱1╱ // 0x2446 @0x17
0x242f…244a at0018 = ╱ef╱$╱ // 0x2447 @0x18
0x242f…244a at0019 = ╱ee╱)╱ // 0x2448 @0x19
0x242f…244a at001a = EOL // 0x2449 @0x1a
0x242f…244a }
0x244a…2471 b1c8 4904 IF F1$(12)="+" THEN F1$(12)=" "
0x244a…2471 LineComalBin {
0x244a…2471 ptr = 0xb1c8 // 0x244a @0x0
0x244a…2471 lno = 0x1328 // 0x244c @0x2
0x244a…2471 at0004 = ╱82╱ IF ╱ // 0x244e @0x4
0x244a…2471 at0005 = ╱46╱F╱ // 0x244f @0x5
0x244a…2471 at0006 = ╱31╱1╱ // 0x2450 @0x6
0x244a…2471 at0007 = ╱ef╱$╱ // 0x2451 @0x7
0x244a…2471 at0008 = ╱ed╱(╱ // 0x2452 @0x8
0x244a…2471 at0009 = ╱31╱1╱ // 0x2453 @0x9
0x244a…2471 at000a = ╱32╱2╱ // 0x2454 @0xa
0x244a…2471 at000b = ╱fe0000c004╱ // 0x2455 @0xb
0x244a…2471 at0010 = ╱ee╱)╱ // 0x245a @0x10
0x244a…2471 at0011 = ╱dc╱=╱ // 0x245b @0x11
0x244a…2471 at0012 = ╱22╱"╱ // 0x245c @0x12
0x244a…2471 at0013 = ╱2b╱+╱ // 0x245d @0x13
0x244a…2471 at0014 = ╱22╱"╱ // 0x245e @0x14
0x244a…2471 at0015 = ╱b6╱ THEN ╱ // 0x245f @0x15
0x244a…2471 at0016 = ╱46╱F╱ // 0x2460 @0x16
0x244a…2471 at0017 = ╱31╱1╱ // 0x2461 @0x17
0x244a…2471 at0018 = ╱ef╱$╱ // 0x2462 @0x18
0x244a…2471 at0019 = ╱ed╱(╱ // 0x2463 @0x19
0x244a…2471 at001a = ╱31╱1╱ // 0x2464 @0x1a
0x244a…2471 at001b = ╱32╱2╱ // 0x2465 @0x1b
0x244a…2471 at001c = ╱fe0000c004╱ // 0x2466 @0x1c
0x244a…2471 at0021 = ╱ee╱)╱ // 0x246b @0x21
0x244a…2471 at0022 = ╱dc╱=╱ // 0x246c @0x22
0x244a…2471 at0023 = ╱22╱"╱ // 0x246d @0x23
0x244a…2471 at0024 = ╱20╱…╱ // 0x246e @0x24
0x244a…2471 at0025 = ╱22╱"╱ // 0x246f @0x25
0x244a…2471 at0026 = EOL // 0x2470 @0x26
0x244a…2471 }
0x2471…24a6 b1fd 4906 PAGE$(13,PS+20:11)=F1$(G:11)
0x2471…24a6 LineComalBin {
0x2471…24a6 ptr = 0xb1fd // 0x2471 @0x0
0x2471…24a6 lno = 0x132a // 0x2473 @0x2
0x2471…24a6 at0004 = ╱50╱P╱ // 0x2475 @0x4
0x2471…24a6 at0005 = ╱41╱A╱ // 0x2476 @0x5
0x2471…24a6 at0006 = ╱47╱G╱ // 0x2477 @0x6
0x2471…24a6 at0007 = ╱45╱E╱ // 0x2478 @0x7
0x2471…24a6 at0008 = ╱ef╱$╱ // 0x2479 @0x8
0x2471…24a6 at0009 = ╱ed╱(╱ // 0x247a @0x9
0x2471…24a6 at000a = ╱31╱1╱ // 0x247b @0xa
0x2471…24a6 at000b = ╱33╱3╱ // 0x247c @0xb
0x2471…24a6 at000c = ╱fe0000d004╱ // 0x247d @0xc
0x2471…24a6 at0011 = ╱ec╱,╱ // 0x2482 @0x11
0x2471…24a6 at0012 = ╱50╱P╱ // 0x2483 @0x12
0x2471…24a6 at0013 = ╱53╱S╱ // 0x2484 @0x13
0x2471…24a6 at0014 = ╱e2╱+╱ // 0x2485 @0x14
0x2471…24a6 at0015 = ╱32╱2╱ // 0x2486 @0x15
0x2471…24a6 at0016 = ╱30╱0╱ // 0x2487 @0x16
0x2471…24a6 at0017 = ╱fe0000a005╱ // 0x2488 @0x17
0x2471…24a6 at001c = ╱f0╱:╱ // 0x248d @0x1c
0x2471…24a6 at001d = ╱31╱1╱ // 0x248e @0x1d
0x2471…24a6 at001e = ╱31╱1╱ // 0x248f @0x1e
0x2471…24a6 at001f = ╱fe0000b004╱ // 0x2490 @0x1f
0x2471…24a6 at0024 = ╱ee╱)╱ // 0x2495 @0x24
0x2471…24a6 at0025 = ╱dc╱=╱ // 0x2496 @0x25
0x2471…24a6 at0026 = ╱46╱F╱ // 0x2497 @0x26
0x2471…24a6 at0027 = ╱31╱1╱ // 0x2498 @0x27
0x2471…24a6 at0028 = ╱ef╱$╱ // 0x2499 @0x28
0x2471…24a6 at0029 = ╱ed╱(╱ // 0x249a @0x29
0x2471…24a6 at002a = ╱47╱G╱ // 0x249b @0x2a
0x2471…24a6 at002b = ╱f0╱:╱ // 0x249c @0x2b
0x2471…24a6 at002c = ╱31╱1╱ // 0x249d @0x2c
0x2471…24a6 at002d = ╱31╱1╱ // 0x249e @0x2d
0x2471…24a6 at002e = ╱fe0000b004╱ // 0x249f @0x2e
0x2471…24a6 at0033 = ╱ee╱)╱ // 0x24a4 @0x33
0x2471…24a6 at0034 = EOL // 0x24a5 @0x34
0x2471…24a6 }
0x24a6…24bb b212 4915 EXEC OP(13,C1$)
0x24a6…24bb LineComalBin {
0x24a6…24bb ptr = 0xb212 // 0x24a6 @0x0
0x24a6…24bb lno = 0x1333 // 0x24a8 @0x2
0x24a6…24bb at0004 = ╱9d╱ EXEC ╱ // 0x24aa @0x4
0x24a6…24bb at0005 = ╱4f╱O╱ // 0x24ab @0x5
0x24a6…24bb at0006 = ╱50╱P╱ // 0x24ac @0x6
0x24a6…24bb at0007 = ╱ed╱(╱ // 0x24ad @0x7
0x24a6…24bb at0008 = ╱31╱1╱ // 0x24ae @0x8
0x24a6…24bb at0009 = ╱33╱3╱ // 0x24af @0x9
0x24a6…24bb at000a = ╱fe0000d004╱ // 0x24b0 @0xa
0x24a6…24bb at000f = ╱ec╱,╱ // 0x24b5 @0xf
0x24a6…24bb at0010 = ╱43╱C╱ // 0x24b6 @0x10
0x24a6…24bb at0011 = ╱31╱1╱ // 0x24b7 @0x11
0x24a6…24bb at0012 = ╱ef╱$╱ // 0x24b8 @0x12
0x24a6…24bb at0013 = ╱ee╱)╱ // 0x24b9 @0x13
0x24a6…24bb at0014 = EOL // 0x24ba @0x14
0x24a6…24bb }
0x24bb…24e5 b23c 4920 F1$=PAGE$(14,PS+20:11)
0x24bb…24e5 LineComalBin {
0x24bb…24e5 ptr = 0xb23c // 0x24bb @0x0
0x24bb…24e5 lno = 0x1338 // 0x24bd @0x2
0x24bb…24e5 at0004 = ╱46╱F╱ // 0x24bf @0x4
0x24bb…24e5 at0005 = ╱31╱1╱ // 0x24c0 @0x5
0x24bb…24e5 at0006 = ╱ef╱$╱ // 0x24c1 @0x6
0x24bb…24e5 at0007 = ╱dc╱=╱ // 0x24c2 @0x7
0x24bb…24e5 at0008 = ╱50╱P╱ // 0x24c3 @0x8
0x24bb…24e5 at0009 = ╱41╱A╱ // 0x24c4 @0x9
0x24bb…24e5 at000a = ╱47╱G╱ // 0x24c5 @0xa
0x24bb…24e5 at000b = ╱45╱E╱ // 0x24c6 @0xb
0x24bb…24e5 at000c = ╱ef╱$╱ // 0x24c7 @0xc
0x24bb…24e5 at000d = ╱ed╱(╱ // 0x24c8 @0xd
0x24bb…24e5 at000e = ╱31╱1╱ // 0x24c9 @0xe
0x24bb…24e5 at000f = ╱34╱4╱ // 0x24ca @0xf
0x24bb…24e5 at0010 = ╱fe0000e004╱ // 0x24cb @0x10
0x24bb…24e5 at0015 = ╱ec╱,╱ // 0x24d0 @0x15
0x24bb…24e5 at0016 = ╱50╱P╱ // 0x24d1 @0x16
0x24bb…24e5 at0017 = ╱53╱S╱ // 0x24d2 @0x17
0x24bb…24e5 at0018 = ╱e2╱+╱ // 0x24d3 @0x18
0x24bb…24e5 at0019 = ╱32╱2╱ // 0x24d4 @0x19
0x24bb…24e5 at001a = ╱30╱0╱ // 0x24d5 @0x1a
0x24bb…24e5 at001b = ╱fe0000a005╱ // 0x24d6 @0x1b
0x24bb…24e5 at0020 = ╱f0╱:╱ // 0x24db @0x20
0x24bb…24e5 at0021 = ╱31╱1╱ // 0x24dc @0x21
0x24bb…24e5 at0022 = ╱31╱1╱ // 0x24dd @0x22
0x24bb…24e5 at0023 = ╱fe0000b004╱ // 0x24de @0x23
0x24bb…24e5 at0028 = ╱ee╱)╱ // 0x24e3 @0x28
0x24bb…24e5 at0029 = EOL // 0x24e4 @0x29
0x24bb…24e5 }
0x24e5…2500 b257 4922 EXEC C(0,F1$,C1$,F1$)
0x24e5…2500 LineComalBin {
0x24e5…2500 ptr = 0xb257 // 0x24e5 @0x0
0x24e5…2500 lno = 0x133a // 0x24e7 @0x2
0x24e5…2500 at0004 = ╱9d╱ EXEC ╱ // 0x24e9 @0x4
0x24e5…2500 at0005 = ╱43╱C╱ // 0x24ea @0x5
0x24e5…2500 at0006 = ╱ed╱(╱ // 0x24eb @0x6
0x24e5…2500 at0007 = ╱30╱0╱ // 0x24ec @0x7
0x24e5…2500 at0008 = ╱fe00000000╱ // 0x24ed @0x8
0x24e5…2500 at000d = ╱ec╱,╱ // 0x24f2 @0xd
0x24e5…2500 at000e = ╱46╱F╱ // 0x24f3 @0xe
0x24e5…2500 at000f = ╱31╱1╱ // 0x24f4 @0xf
0x24e5…2500 at0010 = ╱ef╱$╱ // 0x24f5 @0x10
0x24e5…2500 at0011 = ╱ec╱,╱ // 0x24f6 @0x11
0x24e5…2500 at0012 = ╱43╱C╱ // 0x24f7 @0x12
0x24e5…2500 at0013 = ╱31╱1╱ // 0x24f8 @0x13
0x24e5…2500 at0014 = ╱ef╱$╱ // 0x24f9 @0x14
0x24e5…2500 at0015 = ╱ec╱,╱ // 0x24fa @0x15
0x24e5…2500 at0016 = ╱46╱F╱ // 0x24fb @0x16
0x24e5…2500 at0017 = ╱31╱1╱ // 0x24fc @0x17
0x24e5…2500 at0018 = ╱ef╱$╱ // 0x24fd @0x18
0x24e5…2500 at0019 = ╱ee╱)╱ // 0x24fe @0x19
0x24e5…2500 at001a = EOL // 0x24ff @0x1a
0x24e5…2500 }
0x2500…2527 b27e 4924 IF F1$(12)="+" THEN F1$(12)=" "
0x2500…2527 LineComalBin {
0x2500…2527 ptr = 0xb27e // 0x2500 @0x0
0x2500…2527 lno = 0x133c // 0x2502 @0x2
0x2500…2527 at0004 = ╱82╱ IF ╱ // 0x2504 @0x4
0x2500…2527 at0005 = ╱46╱F╱ // 0x2505 @0x5
0x2500…2527 at0006 = ╱31╱1╱ // 0x2506 @0x6
0x2500…2527 at0007 = ╱ef╱$╱ // 0x2507 @0x7
0x2500…2527 at0008 = ╱ed╱(╱ // 0x2508 @0x8
0x2500…2527 at0009 = ╱31╱1╱ // 0x2509 @0x9
0x2500…2527 at000a = ╱32╱2╱ // 0x250a @0xa
0x2500…2527 at000b = ╱fe0000c004╱ // 0x250b @0xb
0x2500…2527 at0010 = ╱ee╱)╱ // 0x2510 @0x10
0x2500…2527 at0011 = ╱dc╱=╱ // 0x2511 @0x11
0x2500…2527 at0012 = ╱22╱"╱ // 0x2512 @0x12
0x2500…2527 at0013 = ╱2b╱+╱ // 0x2513 @0x13
0x2500…2527 at0014 = ╱22╱"╱ // 0x2514 @0x14
0x2500…2527 at0015 = ╱b6╱ THEN ╱ // 0x2515 @0x15
0x2500…2527 at0016 = ╱46╱F╱ // 0x2516 @0x16
0x2500…2527 at0017 = ╱31╱1╱ // 0x2517 @0x17
0x2500…2527 at0018 = ╱ef╱$╱ // 0x2518 @0x18
0x2500…2527 at0019 = ╱ed╱(╱ // 0x2519 @0x19
0x2500…2527 at001a = ╱31╱1╱ // 0x251a @0x1a
0x2500…2527 at001b = ╱32╱2╱ // 0x251b @0x1b
0x2500…2527 at001c = ╱fe0000c004╱ // 0x251c @0x1c
0x2500…2527 at0021 = ╱ee╱)╱ // 0x2521 @0x21
0x2500…2527 at0022 = ╱dc╱=╱ // 0x2522 @0x22
0x2500…2527 at0023 = ╱22╱"╱ // 0x2523 @0x23
0x2500…2527 at0024 = ╱20╱…╱ // 0x2524 @0x24
0x2500…2527 at0025 = ╱22╱"╱ // 0x2525 @0x25
0x2500…2527 at0026 = EOL // 0x2526 @0x26
0x2500…2527 }
0x2527…255c b2b3 4926 PAGE$(14,PS+20:11)=F1$(G:11)
0x2527…255c LineComalBin {
0x2527…255c ptr = 0xb2b3 // 0x2527 @0x0
0x2527…255c lno = 0x133e // 0x2529 @0x2
0x2527…255c at0004 = ╱50╱P╱ // 0x252b @0x4
0x2527…255c at0005 = ╱41╱A╱ // 0x252c @0x5
0x2527…255c at0006 = ╱47╱G╱ // 0x252d @0x6
0x2527…255c at0007 = ╱45╱E╱ // 0x252e @0x7
0x2527…255c at0008 = ╱ef╱$╱ // 0x252f @0x8
0x2527…255c at0009 = ╱ed╱(╱ // 0x2530 @0x9
0x2527…255c at000a = ╱31╱1╱ // 0x2531 @0xa
0x2527…255c at000b = ╱34╱4╱ // 0x2532 @0xb
0x2527…255c at000c = ╱fe0000e004╱ // 0x2533 @0xc
0x2527…255c at0011 = ╱ec╱,╱ // 0x2538 @0x11
0x2527…255c at0012 = ╱50╱P╱ // 0x2539 @0x12
0x2527…255c at0013 = ╱53╱S╱ // 0x253a @0x13
0x2527…255c at0014 = ╱e2╱+╱ // 0x253b @0x14
0x2527…255c at0015 = ╱32╱2╱ // 0x253c @0x15
0x2527…255c at0016 = ╱30╱0╱ // 0x253d @0x16
0x2527…255c at0017 = ╱fe0000a005╱ // 0x253e @0x17
0x2527…255c at001c = ╱f0╱:╱ // 0x2543 @0x1c
0x2527…255c at001d = ╱31╱1╱ // 0x2544 @0x1d
0x2527…255c at001e = ╱31╱1╱ // 0x2545 @0x1e
0x2527…255c at001f = ╱fe0000b004╱ // 0x2546 @0x1f
0x2527…255c at0024 = ╱ee╱)╱ // 0x254b @0x24
0x2527…255c at0025 = ╱dc╱=╱ // 0x254c @0x25
0x2527…255c at0026 = ╱46╱F╱ // 0x254d @0x26
0x2527…255c at0027 = ╱31╱1╱ // 0x254e @0x27
0x2527…255c at0028 = ╱ef╱$╱ // 0x254f @0x28
0x2527…255c at0029 = ╱ed╱(╱ // 0x2550 @0x29
0x2527…255c at002a = ╱47╱G╱ // 0x2551 @0x2a
0x2527…255c at002b = ╱f0╱:╱ // 0x2552 @0x2b
0x2527…255c at002c = ╱31╱1╱ // 0x2553 @0x2c
0x2527…255c at002d = ╱31╱1╱ // 0x2554 @0x2d
0x2527…255c at002e = ╱fe0000b004╱ // 0x2555 @0x2e
0x2527…255c at0033 = ╱ee╱)╱ // 0x255a @0x33
0x2527…255c at0034 = EOL // 0x255b @0x34
0x2527…255c }
0x255c…2577 b2ce 4950 EXEC C(0,C1$,B1$,C2$)
0x255c…2577 LineComalBin {
0x255c…2577 ptr = 0xb2ce // 0x255c @0x0
0x255c…2577 lno = 0x1356 // 0x255e @0x2
0x255c…2577 at0004 = ╱9d╱ EXEC ╱ // 0x2560 @0x4
0x255c…2577 at0005 = ╱43╱C╱ // 0x2561 @0x5
0x255c…2577 at0006 = ╱ed╱(╱ // 0x2562 @0x6
0x255c…2577 at0007 = ╱30╱0╱ // 0x2563 @0x7
0x255c…2577 at0008 = ╱fe00000000╱ // 0x2564 @0x8
0x255c…2577 at000d = ╱ec╱,╱ // 0x2569 @0xd
0x255c…2577 at000e = ╱43╱C╱ // 0x256a @0xe
0x255c…2577 at000f = ╱31╱1╱ // 0x256b @0xf
0x255c…2577 at0010 = ╱ef╱$╱ // 0x256c @0x10
0x255c…2577 at0011 = ╱ec╱,╱ // 0x256d @0x11
0x255c…2577 at0012 = ╱42╱B╱ // 0x256e @0x12
0x255c…2577 at0013 = ╱31╱1╱ // 0x256f @0x13
0x255c…2577 at0014 = ╱ef╱$╱ // 0x2570 @0x14
0x255c…2577 at0015 = ╱ec╱,╱ // 0x2571 @0x15
0x255c…2577 at0016 = ╱43╱C╱ // 0x2572 @0x16
0x255c…2577 at0017 = ╱32╱2╱ // 0x2573 @0x17
0x255c…2577 at0018 = ╱ef╱$╱ // 0x2574 @0x18
0x255c…2577 at0019 = ╱ee╱)╱ // 0x2575 @0x19
0x255c…2577 at001a = EOL // 0x2576 @0x1a
0x255c…2577 }
0x2577…25a1 b2f8 4960 F1$=PAGE$(15,PS+20:11)
0x2577…25a1 LineComalBin {
0x2577…25a1 ptr = 0xb2f8 // 0x2577 @0x0
0x2577…25a1 lno = 0x1360 // 0x2579 @0x2
0x2577…25a1 at0004 = ╱46╱F╱ // 0x257b @0x4
0x2577…25a1 at0005 = ╱31╱1╱ // 0x257c @0x5
0x2577…25a1 at0006 = ╱ef╱$╱ // 0x257d @0x6
0x2577…25a1 at0007 = ╱dc╱=╱ // 0x257e @0x7
0x2577…25a1 at0008 = ╱50╱P╱ // 0x257f @0x8
0x2577…25a1 at0009 = ╱41╱A╱ // 0x2580 @0x9
0x2577…25a1 at000a = ╱47╱G╱ // 0x2581 @0xa
0x2577…25a1 at000b = ╱45╱E╱ // 0x2582 @0xb
0x2577…25a1 at000c = ╱ef╱$╱ // 0x2583 @0xc
0x2577…25a1 at000d = ╱ed╱(╱ // 0x2584 @0xd
0x2577…25a1 at000e = ╱31╱1╱ // 0x2585 @0xe
0x2577…25a1 at000f = ╱35╱5╱ // 0x2586 @0xf
0x2577…25a1 at0010 = ╱fe0000f004╱ // 0x2587 @0x10
0x2577…25a1 at0015 = ╱ec╱,╱ // 0x258c @0x15
0x2577…25a1 at0016 = ╱50╱P╱ // 0x258d @0x16
0x2577…25a1 at0017 = ╱53╱S╱ // 0x258e @0x17
0x2577…25a1 at0018 = ╱e2╱+╱ // 0x258f @0x18
0x2577…25a1 at0019 = ╱32╱2╱ // 0x2590 @0x19
0x2577…25a1 at001a = ╱30╱0╱ // 0x2591 @0x1a
0x2577…25a1 at001b = ╱fe0000a005╱ // 0x2592 @0x1b
0x2577…25a1 at0020 = ╱f0╱:╱ // 0x2597 @0x20
0x2577…25a1 at0021 = ╱31╱1╱ // 0x2598 @0x21
0x2577…25a1 at0022 = ╱31╱1╱ // 0x2599 @0x22
0x2577…25a1 at0023 = ╱fe0000b004╱ // 0x259a @0x23
0x2577…25a1 at0028 = ╱ee╱)╱ // 0x259f @0x28
0x2577…25a1 at0029 = EOL // 0x25a0 @0x29
0x2577…25a1 }
0x25a1…25bc b313 4962 EXEC C(0,F1$,C2$,F1$)
0x25a1…25bc LineComalBin {
0x25a1…25bc ptr = 0xb313 // 0x25a1 @0x0
0x25a1…25bc lno = 0x1362 // 0x25a3 @0x2
0x25a1…25bc at0004 = ╱9d╱ EXEC ╱ // 0x25a5 @0x4
0x25a1…25bc at0005 = ╱43╱C╱ // 0x25a6 @0x5
0x25a1…25bc at0006 = ╱ed╱(╱ // 0x25a7 @0x6
0x25a1…25bc at0007 = ╱30╱0╱ // 0x25a8 @0x7
0x25a1…25bc at0008 = ╱fe00000000╱ // 0x25a9 @0x8
0x25a1…25bc at000d = ╱ec╱,╱ // 0x25ae @0xd
0x25a1…25bc at000e = ╱46╱F╱ // 0x25af @0xe
0x25a1…25bc at000f = ╱31╱1╱ // 0x25b0 @0xf
0x25a1…25bc at0010 = ╱ef╱$╱ // 0x25b1 @0x10
0x25a1…25bc at0011 = ╱ec╱,╱ // 0x25b2 @0x11
0x25a1…25bc at0012 = ╱43╱C╱ // 0x25b3 @0x12
0x25a1…25bc at0013 = ╱32╱2╱ // 0x25b4 @0x13
0x25a1…25bc at0014 = ╱ef╱$╱ // 0x25b5 @0x14
0x25a1…25bc at0015 = ╱ec╱,╱ // 0x25b6 @0x15
0x25a1…25bc at0016 = ╱46╱F╱ // 0x25b7 @0x16
0x25a1…25bc at0017 = ╱31╱1╱ // 0x25b8 @0x17
0x25a1…25bc at0018 = ╱ef╱$╱ // 0x25b9 @0x18
0x25a1…25bc at0019 = ╱ee╱)╱ // 0x25ba @0x19
0x25a1…25bc at001a = EOL // 0x25bb @0x1a
0x25a1…25bc }
0x25bc…25e3 b33a 4964 IF F1$(12)="+" THEN F1$(12)=" "
0x25bc…25e3 LineComalBin {
0x25bc…25e3 ptr = 0xb33a // 0x25bc @0x0
0x25bc…25e3 lno = 0x1364 // 0x25be @0x2
0x25bc…25e3 at0004 = ╱82╱ IF ╱ // 0x25c0 @0x4
0x25bc…25e3 at0005 = ╱46╱F╱ // 0x25c1 @0x5
0x25bc…25e3 at0006 = ╱31╱1╱ // 0x25c2 @0x6
0x25bc…25e3 at0007 = ╱ef╱$╱ // 0x25c3 @0x7
0x25bc…25e3 at0008 = ╱ed╱(╱ // 0x25c4 @0x8
0x25bc…25e3 at0009 = ╱31╱1╱ // 0x25c5 @0x9
0x25bc…25e3 at000a = ╱32╱2╱ // 0x25c6 @0xa
0x25bc…25e3 at000b = ╱fe0000c004╱ // 0x25c7 @0xb
0x25bc…25e3 at0010 = ╱ee╱)╱ // 0x25cc @0x10
0x25bc…25e3 at0011 = ╱dc╱=╱ // 0x25cd @0x11
0x25bc…25e3 at0012 = ╱22╱"╱ // 0x25ce @0x12
0x25bc…25e3 at0013 = ╱2b╱+╱ // 0x25cf @0x13
0x25bc…25e3 at0014 = ╱22╱"╱ // 0x25d0 @0x14
0x25bc…25e3 at0015 = ╱b6╱ THEN ╱ // 0x25d1 @0x15
0x25bc…25e3 at0016 = ╱46╱F╱ // 0x25d2 @0x16
0x25bc…25e3 at0017 = ╱31╱1╱ // 0x25d3 @0x17
0x25bc…25e3 at0018 = ╱ef╱$╱ // 0x25d4 @0x18
0x25bc…25e3 at0019 = ╱ed╱(╱ // 0x25d5 @0x19
0x25bc…25e3 at001a = ╱31╱1╱ // 0x25d6 @0x1a
0x25bc…25e3 at001b = ╱32╱2╱ // 0x25d7 @0x1b
0x25bc…25e3 at001c = ╱fe0000c004╱ // 0x25d8 @0x1c
0x25bc…25e3 at0021 = ╱ee╱)╱ // 0x25dd @0x21
0x25bc…25e3 at0022 = ╱dc╱=╱ // 0x25de @0x22
0x25bc…25e3 at0023 = ╱22╱"╱ // 0x25df @0x23
0x25bc…25e3 at0024 = ╱20╱…╱ // 0x25e0 @0x24
0x25bc…25e3 at0025 = ╱22╱"╱ // 0x25e1 @0x25
0x25bc…25e3 at0026 = EOL // 0x25e2 @0x26
0x25bc…25e3 }
0x25e3…2618 b36f 4966 PAGE$(15,PS+20:11)=F1$(G:11)
0x25e3…2618 LineComalBin {
0x25e3…2618 ptr = 0xb36f // 0x25e3 @0x0
0x25e3…2618 lno = 0x1366 // 0x25e5 @0x2
0x25e3…2618 at0004 = ╱50╱P╱ // 0x25e7 @0x4
0x25e3…2618 at0005 = ╱41╱A╱ // 0x25e8 @0x5
0x25e3…2618 at0006 = ╱47╱G╱ // 0x25e9 @0x6
0x25e3…2618 at0007 = ╱45╱E╱ // 0x25ea @0x7
0x25e3…2618 at0008 = ╱ef╱$╱ // 0x25eb @0x8
0x25e3…2618 at0009 = ╱ed╱(╱ // 0x25ec @0x9
0x25e3…2618 at000a = ╱31╱1╱ // 0x25ed @0xa
0x25e3…2618 at000b = ╱35╱5╱ // 0x25ee @0xb
0x25e3…2618 at000c = ╱fe0000f004╱ // 0x25ef @0xc
0x25e3…2618 at0011 = ╱ec╱,╱ // 0x25f4 @0x11
0x25e3…2618 at0012 = ╱50╱P╱ // 0x25f5 @0x12
0x25e3…2618 at0013 = ╱53╱S╱ // 0x25f6 @0x13
0x25e3…2618 at0014 = ╱e2╱+╱ // 0x25f7 @0x14
0x25e3…2618 at0015 = ╱32╱2╱ // 0x25f8 @0x15
0x25e3…2618 at0016 = ╱30╱0╱ // 0x25f9 @0x16
0x25e3…2618 at0017 = ╱fe0000a005╱ // 0x25fa @0x17
0x25e3…2618 at001c = ╱f0╱:╱ // 0x25ff @0x1c
0x25e3…2618 at001d = ╱31╱1╱ // 0x2600 @0x1d
0x25e3…2618 at001e = ╱31╱1╱ // 0x2601 @0x1e
0x25e3…2618 at001f = ╱fe0000b004╱ // 0x2602 @0x1f
0x25e3…2618 at0024 = ╱ee╱)╱ // 0x2607 @0x24
0x25e3…2618 at0025 = ╱dc╱=╱ // 0x2608 @0x25
0x25e3…2618 at0026 = ╱46╱F╱ // 0x2609 @0x26
0x25e3…2618 at0027 = ╱31╱1╱ // 0x260a @0x27
0x25e3…2618 at0028 = ╱ef╱$╱ // 0x260b @0x28
0x25e3…2618 at0029 = ╱ed╱(╱ // 0x260c @0x29
0x25e3…2618 at002a = ╱47╱G╱ // 0x260d @0x2a
0x25e3…2618 at002b = ╱f0╱:╱ // 0x260e @0x2b
0x25e3…2618 at002c = ╱31╱1╱ // 0x260f @0x2c
0x25e3…2618 at002d = ╱31╱1╱ // 0x2610 @0x2d
0x25e3…2618 at002e = ╱fe0000b004╱ // 0x2611 @0x2e
0x25e3…2618 at0033 = ╱ee╱)╱ // 0x2616 @0x33
0x25e3…2618 at0034 = EOL // 0x2617 @0x34
0x25e3…2618 }
0x2618…261e b375 5000 ENDPROC
0x2618…261e LineComalBin {
0x2618…261e ptr = 0xb375 // 0x2618 @0x0
0x2618…261e lno = 0x1388 // 0x261a @0x2
0x2618…261e at0004 = ╱9f╱ ENDPROC ╱ // 0x261c @0x4
0x2618…261e at0005 = EOL // 0x261d @0x5
0x2618…261e }
0x261e…2631 b388 8181 D8$="P641220:"
0x261e…2631 LineComalBin {
0x261e…2631 ptr = 0xb388 // 0x261e @0x0
0x261e…2631 lno = 0x1ff5 // 0x2620 @0x2
0x261e…2631 at0004 = ╱44╱D╱ // 0x2622 @0x4
0x261e…2631 at0005 = ╱38╱8╱ // 0x2623 @0x5
0x261e…2631 at0006 = ╱ef╱$╱ // 0x2624 @0x6
0x261e…2631 at0007 = ╱dc╱=╱ // 0x2625 @0x7
0x261e…2631 at0008 = ╱22╱"╱ // 0x2626 @0x8
0x261e…2631 at0009 = ╱50╱P╱ // 0x2627 @0x9
0x261e…2631 at000a = ╱36╱6╱ // 0x2628 @0xa
0x261e…2631 at000b = ╱34╱4╱ // 0x2629 @0xb
0x261e…2631 at000c = ╱31╱1╱ // 0x262a @0xc
0x261e…2631 at000d = ╱32╱2╱ // 0x262b @0xd
0x261e…2631 at000e = ╱32╱2╱ // 0x262c @0xe
0x261e…2631 at000f = ╱30╱0╱ // 0x262d @0xf
0x261e…2631 at0010 = ╱3a╱:╱ // 0x262e @0x10
0x261e…2631 at0011 = ╱22╱"╱ // 0x262f @0x11
0x261e…2631 at0012 = EOL // 0x2630 @0x12
0x261e…2631 }
0x2631…2644 b39b 8182 E1$="P641210:"
0x2631…2644 LineComalBin {
0x2631…2644 ptr = 0xb39b // 0x2631 @0x0
0x2631…2644 lno = 0x1ff6 // 0x2633 @0x2
0x2631…2644 at0004 = ╱45╱E╱ // 0x2635 @0x4
0x2631…2644 at0005 = ╱31╱1╱ // 0x2636 @0x5
0x2631…2644 at0006 = ╱ef╱$╱ // 0x2637 @0x6
0x2631…2644 at0007 = ╱dc╱=╱ // 0x2638 @0x7
0x2631…2644 at0008 = ╱22╱"╱ // 0x2639 @0x8
0x2631…2644 at0009 = ╱50╱P╱ // 0x263a @0x9
0x2631…2644 at000a = ╱36╱6╱ // 0x263b @0xa
0x2631…2644 at000b = ╱34╱4╱ // 0x263c @0xb
0x2631…2644 at000c = ╱31╱1╱ // 0x263d @0xc
0x2631…2644 at000d = ╱32╱2╱ // 0x263e @0xd
0x2631…2644 at000e = ╱31╱1╱ // 0x263f @0xe
0x2631…2644 at000f = ╱30╱0╱ // 0x2640 @0xf
0x2631…2644 at0010 = ╱3a╱:╱ // 0x2641 @0x10
0x2631…2644 at0011 = ╱22╱"╱ // 0x2642 @0x11
0x2631…2644 at0012 = EOL // 0x2643 @0x12
0x2631…2644 }
0x2644…265b b3b2 8190 C9$=D8$+"VIRKKART"
0x2644…265b LineComalBin {
0x2644…265b ptr = 0xb3b2 // 0x2644 @0x0
0x2644…265b lno = 0x1ffe // 0x2646 @0x2
0x2644…265b at0004 = ╱43╱C╱ // 0x2648 @0x4
0x2644…265b at0005 = ╱39╱9╱ // 0x2649 @0x5
0x2644…265b at0006 = ╱ef╱$╱ // 0x264a @0x6
0x2644…265b at0007 = ╱dc╱=╱ // 0x264b @0x7
0x2644…265b at0008 = ╱44╱D╱ // 0x264c @0x8
0x2644…265b at0009 = ╱38╱8╱ // 0x264d @0x9
0x2644…265b at000a = ╱ef╱$╱ // 0x264e @0xa
0x2644…265b at000b = ╱f1╱+╱ // 0x264f @0xb
0x2644…265b at000c = ╱22╱"╱ // 0x2650 @0xc
0x2644…265b at000d = ╱56╱V╱ // 0x2651 @0xd
0x2644…265b at000e = ╱49╱I╱ // 0x2652 @0xe
0x2644…265b at000f = ╱52╱R╱ // 0x2653 @0xf
0x2644…265b at0010 = ╱4b╱K╱ // 0x2654 @0x10
0x2644…265b at0011 = ╱4b╱K╱ // 0x2655 @0x11
0x2644…265b at0012 = ╱41╱A╱ // 0x2656 @0x12
0x2644…265b at0013 = ╱52╱R╱ // 0x2657 @0x13
0x2644…265b at0014 = ╱54╱T╱ // 0x2658 @0x14
0x2644…265b at0015 = ╱22╱"╱ // 0x2659 @0x15
0x2644…265b at0016 = EOL // 0x265a @0x16
0x2644…265b }
0x265b…2668 b3bf 8200 EXEC INDVIRK
0x265b…2668 LineComalBin {
0x265b…2668 ptr = 0xb3bf // 0x265b @0x0
0x265b…2668 lno = 0x2008 // 0x265d @0x2
0x265b…2668 at0004 = ╱9d╱ EXEC ╱ // 0x265f @0x4
0x265b…2668 at0005 = ╱49╱I╱ // 0x2660 @0x5
0x265b…2668 at0006 = ╱4e╱N╱ // 0x2661 @0x6
0x265b…2668 at0007 = ╱44╱D╱ // 0x2662 @0x7
0x265b…2668 at0008 = ╱56╱V╱ // 0x2663 @0x8
0x265b…2668 at0009 = ╱49╱I╱ // 0x2664 @0x9
0x265b…2668 at000a = ╱52╱R╱ // 0x2665 @0xa
0x265b…2668 at000b = ╱4b╱K╱ // 0x2666 @0xb
0x265b…2668 at000c = EOL // 0x2667 @0xc
0x265b…2668 }
0x2668…2671 b3c8 8210 CLOSE C9$
0x2668…2671 LineComalBin {
0x2668…2671 ptr = 0xb3c8 // 0x2668 @0x0
0x2668…2671 lno = 0x2012 // 0x266a @0x2
0x2668…2671 at0004 = ╱a8╱ CLOSE ╱ // 0x266c @0x4
0x2668…2671 at0005 = ╱43╱C╱ // 0x266d @0x5
0x2668…2671 at0006 = ╱39╱9╱ // 0x266e @0x6
0x2668…2671 at0007 = ╱ef╱$╱ // 0x266f @0x7
0x2668…2671 at0008 = EOL // 0x2670 @0x8
0x2668…2671 }
0x2671…2688 b3df 8220 C9$=D8$+"LØNMODRG"
0x2671…2688 LineComalBin {
0x2671…2688 ptr = 0xb3df // 0x2671 @0x0
0x2671…2688 lno = 0x201c // 0x2673 @0x2
0x2671…2688 at0004 = ╱43╱C╱ // 0x2675 @0x4
0x2671…2688 at0005 = ╱39╱9╱ // 0x2676 @0x5
0x2671…2688 at0006 = ╱ef╱$╱ // 0x2677 @0x6
0x2671…2688 at0007 = ╱dc╱=╱ // 0x2678 @0x7
0x2671…2688 at0008 = ╱44╱D╱ // 0x2679 @0x8
0x2671…2688 at0009 = ╱38╱8╱ // 0x267a @0x9
0x2671…2688 at000a = ╱ef╱$╱ // 0x267b @0xa
0x2671…2688 at000b = ╱f1╱+╱ // 0x267c @0xb
0x2671…2688 at000c = ╱22╱"╱ // 0x267d @0xc
0x2671…2688 at000d = ╱4c╱L╱ // 0x267e @0xd
0x2671…2688 at000e = ╱5c╱Ø╱ // 0x267f @0xe
0x2671…2688 at000f = ╱4e╱N╱ // 0x2680 @0xf
0x2671…2688 at0010 = ╱4d╱M╱ // 0x2681 @0x10
0x2671…2688 at0011 = ╱4f╱O╱ // 0x2682 @0x11
0x2671…2688 at0012 = ╱44╱D╱ // 0x2683 @0x12
0x2671…2688 at0013 = ╱52╱R╱ // 0x2684 @0x13
0x2671…2688 at0014 = ╱47╱G╱ // 0x2685 @0x14
0x2671…2688 at0015 = ╱22╱"╱ // 0x2686 @0x15
0x2671…2688 at0016 = EOL // 0x2687 @0x16
0x2671…2688 }
0x2688…2693 b3ea 8230 OPEN C9$,W
0x2688…2693 LineComalBin {
0x2688…2693 ptr = 0xb3ea // 0x2688 @0x0
0x2688…2693 lno = 0x2026 // 0x268a @0x2
0x2688…2693 at0004 = ╱a7╱ OPEN ╱ // 0x268c @0x4
0x2688…2693 at0005 = ╱43╱C╱ // 0x268d @0x5
0x2688…2693 at0006 = ╱39╱9╱ // 0x268e @0x6
0x2688…2693 at0007 = ╱ef╱$╱ // 0x268f @0x7
0x2688…2693 at0008 = ╱ec╱,╱ // 0x2690 @0x8
0x2688…2693 at0009 = ╱57╱W╱ // 0x2691 @0x9
0x2688…2693 at000a = EOL // 0x2692 @0xa
0x2688…2693 }
0x2693…26aa b401 8260 D0$=D8$+"TÆLLEREG"
0x2693…26aa LineComalBin {
0x2693…26aa ptr = 0xb401 // 0x2693 @0x0
0x2693…26aa lno = 0x2044 // 0x2695 @0x2
0x2693…26aa at0004 = ╱44╱D╱ // 0x2697 @0x4
0x2693…26aa at0005 = ╱30╱0╱ // 0x2698 @0x5
0x2693…26aa at0006 = ╱ef╱$╱ // 0x2699 @0x6
0x2693…26aa at0007 = ╱dc╱=╱ // 0x269a @0x7
0x2693…26aa at0008 = ╱44╱D╱ // 0x269b @0x8
0x2693…26aa at0009 = ╱38╱8╱ // 0x269c @0x9
0x2693…26aa at000a = ╱ef╱$╱ // 0x269d @0xa
0x2693…26aa at000b = ╱f1╱+╱ // 0x269e @0xb
0x2693…26aa at000c = ╱22╱"╱ // 0x269f @0xc
0x2693…26aa at000d = ╱54╱T╱ // 0x26a0 @0xd
0x2693…26aa at000e = ╱5b╱Æ╱ // 0x26a1 @0xe
0x2693…26aa at000f = ╱4c╱L╱ // 0x26a2 @0xf
0x2693…26aa at0010 = ╱4c╱L╱ // 0x26a3 @0x10
0x2693…26aa at0011 = ╱45╱E╱ // 0x26a4 @0x11
0x2693…26aa at0012 = ╱52╱R╱ // 0x26a5 @0x12
0x2693…26aa at0013 = ╱45╱E╱ // 0x26a6 @0x13
0x2693…26aa at0014 = ╱47╱G╱ // 0x26a7 @0x14
0x2693…26aa at0015 = ╱22╱"╱ // 0x26a8 @0x15
0x2693…26aa at0016 = EOL // 0x26a9 @0x16
0x2693…26aa }
0x26aa…26b5 b40c 8270 OPEN D0$,W
0x26aa…26b5 LineComalBin {
0x26aa…26b5 ptr = 0xb40c // 0x26aa @0x0
0x26aa…26b5 lno = 0x204e // 0x26ac @0x2
0x26aa…26b5 at0004 = ╱a7╱ OPEN ╱ // 0x26ae @0x4
0x26aa…26b5 at0005 = ╱44╱D╱ // 0x26af @0x5
0x26aa…26b5 at0006 = ╱30╱0╱ // 0x26b0 @0x6
0x26aa…26b5 at0007 = ╱ef╱$╱ // 0x26b1 @0x7
0x26aa…26b5 at0008 = ╱ec╱,╱ // 0x26b2 @0x8
0x26aa…26b5 at0009 = ╱57╱W╱ // 0x26b3 @0x9
0x26aa…26b5 at000a = EOL // 0x26b4 @0xa
0x26aa…26b5 }
0x26b5…26cb b422 8291 D9$=E1$+"LØNJOUR"
0x26b5…26cb LineComalBin {
0x26b5…26cb ptr = 0xb422 // 0x26b5 @0x0
0x26b5…26cb lno = 0x2063 // 0x26b7 @0x2
0x26b5…26cb at0004 = ╱44╱D╱ // 0x26b9 @0x4
0x26b5…26cb at0005 = ╱39╱9╱ // 0x26ba @0x5
0x26b5…26cb at0006 = ╱ef╱$╱ // 0x26bb @0x6
0x26b5…26cb at0007 = ╱dc╱=╱ // 0x26bc @0x7
0x26b5…26cb at0008 = ╱45╱E╱ // 0x26bd @0x8
0x26b5…26cb at0009 = ╱31╱1╱ // 0x26be @0x9
0x26b5…26cb at000a = ╱ef╱$╱ // 0x26bf @0xa
0x26b5…26cb at000b = ╱f1╱+╱ // 0x26c0 @0xb
0x26b5…26cb at000c = ╱22╱"╱ // 0x26c1 @0xc
0x26b5…26cb at000d = ╱4c╱L╱ // 0x26c2 @0xd
0x26b5…26cb at000e = ╱5c╱Ø╱ // 0x26c3 @0xe
0x26b5…26cb at000f = ╱4e╱N╱ // 0x26c4 @0xf
0x26b5…26cb at0010 = ╱4a╱J╱ // 0x26c5 @0x10
0x26b5…26cb at0011 = ╱4f╱O╱ // 0x26c6 @0x11
0x26b5…26cb at0012 = ╱55╱U╱ // 0x26c7 @0x12
0x26b5…26cb at0013 = ╱52╱R╱ // 0x26c8 @0x13
0x26b5…26cb at0014 = ╱22╱"╱ // 0x26c9 @0x14
0x26b5…26cb at0015 = EOL // 0x26ca @0x15
0x26b5…26cb }
0x26cb…26d6 b42d 8292 OPEN D9$,W
0x26cb…26d6 LineComalBin {
0x26cb…26d6 ptr = 0xb42d // 0x26cb @0x0
0x26cb…26d6 lno = 0x2064 // 0x26cd @0x2
0x26cb…26d6 at0004 = ╱a7╱ OPEN ╱ // 0x26cf @0x4
0x26cb…26d6 at0005 = ╱44╱D╱ // 0x26d0 @0x5
0x26cb…26d6 at0006 = ╱39╱9╱ // 0x26d1 @0x6
0x26cb…26d6 at0007 = ╱ef╱$╱ // 0x26d2 @0x7
0x26cb…26d6 at0008 = ╱ec╱,╱ // 0x26d3 @0x8
0x26cb…26d6 at0009 = ╱57╱W╱ // 0x26d4 @0x9
0x26cb…26d6 at000a = EOL // 0x26d5 @0xa
0x26cb…26d6 }
0x26d6…26e5 b43c 8300 EXEC SKRIVPICT
0x26d6…26e5 LineComalBin {
0x26d6…26e5 ptr = 0xb43c // 0x26d6 @0x0
0x26d6…26e5 lno = 0x206c // 0x26d8 @0x2
0x26d6…26e5 at0004 = ╱9d╱ EXEC ╱ // 0x26da @0x4
0x26d6…26e5 at0005 = ╱53╱S╱ // 0x26db @0x5
0x26d6…26e5 at0006 = ╱4b╱K╱ // 0x26dc @0x6
0x26d6…26e5 at0007 = ╱52╱R╱ // 0x26dd @0x7
0x26d6…26e5 at0008 = ╱49╱I╱ // 0x26de @0x8
0x26d6…26e5 at0009 = ╱56╱V╱ // 0x26df @0x9
0x26d6…26e5 at000a = ╱50╱P╱ // 0x26e0 @0xa
0x26d6…26e5 at000b = ╱49╱I╱ // 0x26e1 @0xb
0x26d6…26e5 at000c = ╱43╱C╱ // 0x26e2 @0xc
0x26d6…26e5 at000d = ╱54╱T╱ // 0x26e3 @0xd
0x26d6…26e5 at000e = EOL // 0x26e4 @0xe
0x26d6…26e5 }
0x26e5…26fb b452 8310 FOR J=4 TO 18
0x26e5…26fb LineComalBin {
0x26e5…26fb ptr = 0xb452 // 0x26e5 @0x0
0x26e5…26fb lno = 0x2076 // 0x26e7 @0x2
0x26e5…26fb at0004 = ╱83╱ FOR ╱ // 0x26e9 @0x4
0x26e5…26fb at0005 = ╱4a╱J╱ // 0x26ea @0x5
0x26e5…26fb at0006 = ╱dc╱=╱ // 0x26eb @0x6
0x26e5…26fb at0007 = ╱34╱4╱ // 0x26ec @0x7
0x26e5…26fb at0008 = ╱fe00008003╱ // 0x26ed @0x8
0x26e5…26fb at000d = ╱b7╱ TO ╱ // 0x26f2 @0xd
0x26e5…26fb at000e = ╱31╱1╱ // 0x26f3 @0xe
0x26e5…26fb at000f = ╱38╱8╱ // 0x26f4 @0xf
0x26e5…26fb at0010 = ╱fe00009005╱ // 0x26f5 @0x10
0x26e5…26fb at0015 = EOL // 0x26fa @0x15
0x26e5…26fb }
0x26fb…2713 b46a 8320 IF J=7 THEN J=10
0x26fb…2713 LineComalBin {
0x26fb…2713 ptr = 0xb46a // 0x26fb @0x0
0x26fb…2713 lno = 0x2080 // 0x26fd @0x2
0x26fb…2713 at0004 = ╱82╱ IF ╱ // 0x26ff @0x4
0x26fb…2713 at0005 = ╱4a╱J╱ // 0x2700 @0x5
0x26fb…2713 at0006 = ╱dc╱=╱ // 0x2701 @0x6
0x26fb…2713 at0007 = ╱37╱7╱ // 0x2702 @0x7
0x26fb…2713 at0008 = ╱fe0000e003╱ // 0x2703 @0x8
0x26fb…2713 at000d = ╱b6╱ THEN ╱ // 0x2708 @0xd
0x26fb…2713 at000e = ╱4a╱J╱ // 0x2709 @0xe
0x26fb…2713 at000f = ╱dc╱=╱ // 0x270a @0xf
0x26fb…2713 at0010 = ╱31╱1╱ // 0x270b @0x10
0x26fb…2713 at0011 = ╱30╱0╱ // 0x270c @0x11
0x26fb…2713 at0012 = ╱fe0000a004╱ // 0x270d @0x12
0x26fb…2713 at0017 = EOL // 0x2712 @0x17
0x26fb…2713 }
0x2713…2721 b478 8330 EXEC INOPL(J)
0x2713…2721 LineComalBin {
0x2713…2721 ptr = 0xb478 // 0x2713 @0x0
0x2713…2721 lno = 0x208a // 0x2715 @0x2
0x2713…2721 at0004 = ╱9d╱ EXEC ╱ // 0x2717 @0x4
0x2713…2721 at0005 = ╱49╱I╱ // 0x2718 @0x5
0x2713…2721 at0006 = ╱4e╱N╱ // 0x2719 @0x6
0x2713…2721 at0007 = ╱4f╱O╱ // 0x271a @0x7
0x2713…2721 at0008 = ╱50╱P╱ // 0x271b @0x8
0x2713…2721 at0009 = ╱4c╱L╱ // 0x271c @0x9
0x2713…2721 at000a = ╱ed╱(╱ // 0x271d @0xa
0x2713…2721 at000b = ╱4a╱J╱ // 0x271e @0xb
0x2713…2721 at000c = ╱ee╱)╱ // 0x271f @0xc
0x2713…2721 at000d = EOL // 0x2720 @0xd
0x2713…2721 }
0x2721…2728 b47f 8340 NEXT J
0x2721…2728 LineComalBin {
0x2721…2728 ptr = 0xb47f // 0x2721 @0x0
0x2721…2728 lno = 0x2094 // 0x2723 @0x2
0x2721…2728 at0004 = ╱84╱ NEXT ╱ // 0x2725 @0x4
0x2721…2728 at0005 = ╱4a╱J╱ // 0x2726 @0x5
0x2721…2728 at0006 = EOL // 0x2727 @0x6
0x2721…2728 }
0x2728…2734 b48b 8343 ÅR$=" "
0x2728…2734 LineComalBin {
0x2728…2734 ptr = 0xb48b // 0x2728 @0x0
0x2728…2734 lno = 0x2097 // 0x272a @0x2
0x2728…2734 at0004 = ╱5d╱Å╱ // 0x272c @0x4
0x2728…2734 at0005 = ╱52╱R╱ // 0x272d @0x5
0x2728…2734 at0006 = ╱ef╱$╱ // 0x272e @0x6
0x2728…2734 at0007 = ╱dc╱=╱ // 0x272f @0x7
0x2728…2734 at0008 = ╱22╱"╱ // 0x2730 @0x8
0x2728…2734 at0009 = ╱20╱…╱ // 0x2731 @0x9
0x2728…2734 at000a = ╱22╱"╱ // 0x2732 @0xa
0x2728…2734 at000b = EOL // 0x2733 @0xb
0x2728…2734 }
0x2734…2764 b4bb 8345 EDIT "Monter BKL's ferieopgørelser, RETURN",ÅR$
0x2734…2764 LineComalBin {
0x2734…2764 ptr = 0xb4bb // 0x2734 @0x0
0x2734…2764 lno = 0x2099 // 0x2736 @0x2
0x2734…2764 at0004 = ╱b1╱ EDIT ╱ // 0x2738 @0x4
0x2734…2764 at0005 = ╱22╱"╱ // 0x2739 @0x5
0x2734…2764 at0006 = ╱4d╱M╱ // 0x273a @0x6
0x2734…2764 at0007 = ╱6f╱o╱ // 0x273b @0x7
0x2734…2764 at0008 = ╱6e╱n╱ // 0x273c @0x8
0x2734…2764 at0009 = ╱74╱t╱ // 0x273d @0x9
0x2734…2764 at000a = ╱65╱e╱ // 0x273e @0xa
0x2734…2764 at000b = ╱72╱r╱ // 0x273f @0xb
0x2734…2764 at000c = ╱20╱…╱ // 0x2740 @0xc
0x2734…2764 at000d = ╱42╱B╱ // 0x2741 @0xd
0x2734…2764 at000e = ╱4b╱K╱ // 0x2742 @0xe
0x2734…2764 at000f = ╱4c╱L╱ // 0x2743 @0xf
0x2734…2764 at0010 = ╱27╱'╱ // 0x2744 @0x10
0x2734…2764 at0011 = ╱73╱s╱ // 0x2745 @0x11
0x2734…2764 at0012 = ╱20╱…╱ // 0x2746 @0x12
0x2734…2764 at0013 = ╱66╱f╱ // 0x2747 @0x13
0x2734…2764 at0014 = ╱65╱e╱ // 0x2748 @0x14
0x2734…2764 at0015 = ╱72╱r╱ // 0x2749 @0x15
0x2734…2764 at0016 = ╱69╱i╱ // 0x274a @0x16
0x2734…2764 at0017 = ╱65╱e╱ // 0x274b @0x17
0x2734…2764 at0018 = ╱6f╱o╱ // 0x274c @0x18
0x2734…2764 at0019 = ╱70╱p╱ // 0x274d @0x19
0x2734…2764 at001a = ╱67╱g╱ // 0x274e @0x1a
0x2734…2764 at001b = ╱7c╱ø╱ // 0x274f @0x1b
0x2734…2764 at001c = ╱72╱r╱ // 0x2750 @0x1c
0x2734…2764 at001d = ╱65╱e╱ // 0x2751 @0x1d
0x2734…2764 at001e = ╱6c╱l╱ // 0x2752 @0x1e
0x2734…2764 at001f = ╱73╱s╱ // 0x2753 @0x1f
0x2734…2764 at0020 = ╱65╱e╱ // 0x2754 @0x20
0x2734…2764 at0021 = ╱72╱r╱ // 0x2755 @0x21
0x2734…2764 at0022 = ╱2c╱,╱ // 0x2756 @0x22
0x2734…2764 at0023 = ╱20╱…╱ // 0x2757 @0x23
0x2734…2764 at0024 = ╱52╱R╱ // 0x2758 @0x24
0x2734…2764 at0025 = ╱45╱E╱ // 0x2759 @0x25
0x2734…2764 at0026 = ╱54╱T╱ // 0x275a @0x26
0x2734…2764 at0027 = ╱55╱U╱ // 0x275b @0x27
0x2734…2764 at0028 = ╱52╱R╱ // 0x275c @0x28
0x2734…2764 at0029 = ╱4e╱N╱ // 0x275d @0x29
0x2734…2764 at002a = ╱22╱"╱ // 0x275e @0x2a
0x2734…2764 at002b = ╱ec╱,╱ // 0x275f @0x2b
0x2734…2764 at002c = ╱5d╱Å╱ // 0x2760 @0x2c
0x2734…2764 at002d = ╱52╱R╱ // 0x2761 @0x2d
0x2734…2764 at002e = ╱ef╱$╱ // 0x2762 @0x2e
0x2734…2764 at002f = EOL // 0x2763 @0x2f
0x2734…2764 }
0x2764…276d b4c4 8350 PS=E
0x2764…276d LineComalBin {
0x2764…276d ptr = 0xb4c4 // 0x2764 @0x0
0x2764…276d lno = 0x209e // 0x2766 @0x2
0x2764…276d at0004 = ╱50╱P╱ // 0x2768 @0x4
0x2764…276d at0005 = ╱53╱S╱ // 0x2769 @0x5
0x2764…276d at0006 = ╱dc╱=╱ // 0x276a @0x6
0x2764…276d at0007 = ╱45╱E╱ // 0x276b @0x7
0x2764…276d at0008 = EOL // 0x276c @0x8
0x2764…276d }
0x276d…277a b4d1 8355 ÅR$="82"
0x276d…277a LineComalBin {
0x276d…277a ptr = 0xb4d1 // 0x276d @0x0
0x276d…277a lno = 0x20a3 // 0x276f @0x2
0x276d…277a at0004 = ╱5d╱Å╱ // 0x2771 @0x4
0x276d…277a at0005 = ╱52╱R╱ // 0x2772 @0x5
0x276d…277a at0006 = ╱ef╱$╱ // 0x2773 @0x6
0x276d…277a at0007 = ╱dc╱=╱ // 0x2774 @0x7
0x276d…277a at0008 = ╱22╱"╱ // 0x2775 @0x8
0x276d…277a at0009 = ╱38╱8╱ // 0x2776 @0x9
0x276d…277a at000a = ╱32╱2╱ // 0x2777 @0xa
0x276d…277a at000b = ╱22╱"╱ // 0x2778 @0xb
0x276d…277a at000c = EOL // 0x2779 @0xc
0x276d…277a }
0x277a…2786 b4dd 8356 KV$="1"
0x277a…2786 LineComalBin {
0x277a…2786 ptr = 0xb4dd // 0x277a @0x0
0x277a…2786 lno = 0x20a4 // 0x277c @0x2
0x277a…2786 at0004 = ╱4b╱K╱ // 0x277e @0x4
0x277a…2786 at0005 = ╱56╱V╱ // 0x277f @0x5
0x277a…2786 at0006 = ╱ef╱$╱ // 0x2780 @0x6
0x277a…2786 at0007 = ╱dc╱=╱ // 0x2781 @0x7
0x277a…2786 at0008 = ╱22╱"╱ // 0x2782 @0x8
0x277a…2786 at0009 = ╱31╱1╱ // 0x2783 @0x9
0x277a…2786 at000a = ╱22╱"╱ // 0x2784 @0xa
0x277a…2786 at000b = EOL // 0x2785 @0xb
0x277a…2786 }
0x2786…2795 b4ec 8357 EDIT "År ",ÅR$
0x2786…2795 LineComalBin {
0x2786…2795 ptr = 0xb4ec // 0x2786 @0x0
0x2786…2795 lno = 0x20a5 // 0x2788 @0x2
0x2786…2795 at0004 = ╱b1╱ EDIT ╱ // 0x278a @0x4
0x2786…2795 at0005 = ╱22╱"╱ // 0x278b @0x5
0x2786…2795 at0006 = ╱5d╱Å╱ // 0x278c @0x6
0x2786…2795 at0007 = ╱72╱r╱ // 0x278d @0x7
0x2786…2795 at0008 = ╱20╱…╱ // 0x278e @0x8
0x2786…2795 at0009 = ╱22╱"╱ // 0x278f @0x9
0x2786…2795 at000a = ╱ec╱,╱ // 0x2790 @0xa
0x2786…2795 at000b = ╱5d╱Å╱ // 0x2791 @0xb
0x2786…2795 at000c = ╱52╱R╱ // 0x2792 @0xc
0x2786…2795 at000d = ╱ef╱$╱ // 0x2793 @0xd
0x2786…2795 at000e = EOL // 0x2794 @0xe
0x2786…2795 }
0x2795…27a9 b500 8358 EDIT "Kvartal ",KV$
0x2795…27a9 LineComalBin {
0x2795…27a9 ptr = 0xb500 // 0x2795 @0x0
0x2795…27a9 lno = 0x20a6 // 0x2797 @0x2
0x2795…27a9 at0004 = ╱b1╱ EDIT ╱ // 0x2799 @0x4
0x2795…27a9 at0005 = ╱22╱"╱ // 0x279a @0x5
0x2795…27a9 at0006 = ╱4b╱K╱ // 0x279b @0x6
0x2795…27a9 at0007 = ╱76╱v╱ // 0x279c @0x7
0x2795…27a9 at0008 = ╱61╱a╱ // 0x279d @0x8
0x2795…27a9 at0009 = ╱72╱r╱ // 0x279e @0x9
0x2795…27a9 at000a = ╱74╱t╱ // 0x279f @0xa
0x2795…27a9 at000b = ╱61╱a╱ // 0x27a0 @0xb
0x2795…27a9 at000c = ╱6c╱l╱ // 0x27a1 @0xc
0x2795…27a9 at000d = ╱20╱…╱ // 0x27a2 @0xd
0x2795…27a9 at000e = ╱22╱"╱ // 0x27a3 @0xe
0x2795…27a9 at000f = ╱ec╱,╱ // 0x27a4 @0xf
0x2795…27a9 at0010 = ╱4b╱K╱ // 0x27a5 @0x10
0x2795…27a9 at0011 = ╱56╱V╱ // 0x27a6 @0x11
0x2795…27a9 at0012 = ╱ef╱$╱ // 0x27a7 @0x12
0x2795…27a9 at0013 = EOL // 0x27a8 @0x13
0x2795…27a9 }
0x27a9…27b2 b509 8360 F8=B
0x27a9…27b2 LineComalBin {
0x27a9…27b2 ptr = 0xb509 // 0x27a9 @0x0
0x27a9…27b2 lno = 0x20a8 // 0x27ab @0x2
0x27a9…27b2 at0004 = ╱46╱F╱ // 0x27ad @0x4
0x27a9…27b2 at0005 = ╱38╱8╱ // 0x27ae @0x5
0x27a9…27b2 at0006 = ╱dc╱=╱ // 0x27af @0x6
0x27a9…27b2 at0007 = ╱42╱B╱ // 0x27b0 @0x7
0x27a9…27b2 at0008 = EOL // 0x27b1 @0x8
0x27a9…27b2 }
0x27b2…27c5 b51c 8365 A7$="00-00-00"
0x27b2…27c5 LineComalBin {
0x27b2…27c5 ptr = 0xb51c // 0x27b2 @0x0
0x27b2…27c5 lno = 0x20ad // 0x27b4 @0x2
0x27b2…27c5 at0004 = ╱41╱A╱ // 0x27b6 @0x4
0x27b2…27c5 at0005 = ╱37╱7╱ // 0x27b7 @0x5
0x27b2…27c5 at0006 = ╱ef╱$╱ // 0x27b8 @0x6
0x27b2…27c5 at0007 = ╱dc╱=╱ // 0x27b9 @0x7
0x27b2…27c5 at0008 = ╱22╱"╱ // 0x27ba @0x8
0x27b2…27c5 at0009 = ╱30╱0╱ // 0x27bb @0x9
0x27b2…27c5 at000a = ╱30╱0╱ // 0x27bc @0xa
0x27b2…27c5 at000b = ╱2d╱-╱ // 0x27bd @0xb
0x27b2…27c5 at000c = ╱30╱0╱ // 0x27be @0xc
0x27b2…27c5 at000d = ╱30╱0╱ // 0x27bf @0xd
0x27b2…27c5 at000e = ╱2d╱-╱ // 0x27c0 @0xe
0x27b2…27c5 at000f = ╱30╱0╱ // 0x27c1 @0xf
0x27b2…27c5 at0010 = ╱30╱0╱ // 0x27c2 @0x10
0x27b2…27c5 at0011 = ╱22╱"╱ // 0x27c3 @0x11
0x27b2…27c5 at0012 = EOL // 0x27c4 @0x12
0x27b2…27c5 }
0x27c5…27d1 b528 8366 A8$=A7$
0x27c5…27d1 LineComalBin {
0x27c5…27d1 ptr = 0xb528 // 0x27c5 @0x0
0x27c5…27d1 lno = 0x20ae // 0x27c7 @0x2
0x27c5…27d1 at0004 = ╱41╱A╱ // 0x27c9 @0x4
0x27c5…27d1 at0005 = ╱38╱8╱ // 0x27ca @0x5
0x27c5…27d1 at0006 = ╱ef╱$╱ // 0x27cb @0x6
0x27c5…27d1 at0007 = ╱dc╱=╱ // 0x27cc @0x7
0x27c5…27d1 at0008 = ╱41╱A╱ // 0x27cd @0x8
0x27c5…27d1 at0009 = ╱37╱7╱ // 0x27ce @0x9
0x27c5…27d1 at000a = ╱ef╱$╱ // 0x27cf @0xa
0x27c5…27d1 at000b = EOL // 0x27d0 @0xb
0x27c5…27d1 }
0x27d1…27dd b534 8370 F0$=E9$
0x27d1…27dd LineComalBin {
0x27d1…27dd ptr = 0xb534 // 0x27d1 @0x0
0x27d1…27dd lno = 0x20b2 // 0x27d3 @0x2
0x27d1…27dd at0004 = ╱46╱F╱ // 0x27d5 @0x4
0x27d1…27dd at0005 = ╱30╱0╱ // 0x27d6 @0x5
0x27d1…27dd at0006 = ╱ef╱$╱ // 0x27d7 @0x6
0x27d1…27dd at0007 = ╱dc╱=╱ // 0x27d8 @0x7
0x27d1…27dd at0008 = ╱45╱E╱ // 0x27d9 @0x8
0x27d1…27dd at0009 = ╱39╱9╱ // 0x27da @0x9
0x27d1…27dd at000a = ╱ef╱$╱ // 0x27db @0xa
0x27d1…27dd at000b = EOL // 0x27dc @0xb
0x27d1…27dd }
0x27dd…27f6 b54d 8372 PUT D9$:A7$,A8$,A9$,B0$
0x27dd…27f6 LineComalBin {
0x27dd…27f6 ptr = 0xb54d // 0x27dd @0x0
0x27dd…27f6 lno = 0x20b4 // 0x27df @0x2
0x27dd…27f6 at0004 = ╱aa╱ PUT ╱ // 0x27e1 @0x4
0x27dd…27f6 at0005 = ╱44╱D╱ // 0x27e2 @0x5
0x27dd…27f6 at0006 = ╱39╱9╱ // 0x27e3 @0x6
0x27dd…27f6 at0007 = ╱ef╱$╱ // 0x27e4 @0x7
0x27dd…27f6 at0008 = ╱f0╱:╱ // 0x27e5 @0x8
0x27dd…27f6 at0009 = ╱41╱A╱ // 0x27e6 @0x9
0x27dd…27f6 at000a = ╱37╱7╱ // 0x27e7 @0xa
0x27dd…27f6 at000b = ╱ef╱$╱ // 0x27e8 @0xb
0x27dd…27f6 at000c = ╱ec╱,╱ // 0x27e9 @0xc
0x27dd…27f6 at000d = ╱41╱A╱ // 0x27ea @0xd
0x27dd…27f6 at000e = ╱38╱8╱ // 0x27eb @0xe
0x27dd…27f6 at000f = ╱ef╱$╱ // 0x27ec @0xf
0x27dd…27f6 at0010 = ╱ec╱,╱ // 0x27ed @0x10
0x27dd…27f6 at0011 = ╱41╱A╱ // 0x27ee @0x11
0x27dd…27f6 at0012 = ╱39╱9╱ // 0x27ef @0x12
0x27dd…27f6 at0013 = ╱ef╱$╱ // 0x27f0 @0x13
0x27dd…27f6 at0014 = ╱ec╱,╱ // 0x27f1 @0x14
0x27dd…27f6 at0015 = ╱42╱B╱ // 0x27f2 @0x15
0x27dd…27f6 at0016 = ╱30╱0╱ // 0x27f3 @0x16
0x27dd…27f6 at0017 = ╱ef╱$╱ // 0x27f4 @0x17
0x27dd…27f6 at0018 = EOL // 0x27f5 @0x18
0x27dd…27f6 }
0x27f6…27fd b554 8380 OUTPUT P
0x27f6…27fd LineComalBin {
0x27f6…27fd ptr = 0xb554 // 0x27f6 @0x0
0x27f6…27fd lno = 0x20bc // 0x27f8 @0x2
0x27f6…27fd at0004 = ╱a5╱ OUTPUT ╱ // 0x27fa @0x4
0x27f6…27fd at0005 = ╱50╱P╱ // 0x27fb @0x5
0x27f6…27fd at0006 = EOL // 0x27fc @0x6
0x27f6…27fd }
0x27fd…2803 b55a 8390 REPEAT
0x27fd…2803 LineComalBin {
0x27fd…2803 ptr = 0xb55a // 0x27fd @0x0
0x27fd…2803 lno = 0x20c6 // 0x27ff @0x2
0x27fd…2803 at0004 = ╱97╱ REPEAT ╱ // 0x2801 @0x4
0x27fd…2803 at0005 = EOL // 0x2802 @0x5
0x27fd…2803 }
0x2803…280e b565 8400 EXEC NÆSTE
0x2803…280e LineComalBin {
0x2803…280e ptr = 0xb565 // 0x2803 @0x0
0x2803…280e lno = 0x20d0 // 0x2805 @0x2
0x2803…280e at0004 = ╱9d╱ EXEC ╱ // 0x2807 @0x4
0x2803…280e at0005 = ╱4e╱N╱ // 0x2808 @0x5
0x2803…280e at0006 = ╱5b╱Æ╱ // 0x2809 @0x6
0x2803…280e at0007 = ╱53╱S╱ // 0x280a @0x7
0x2803…280e at0008 = ╱54╱T╱ // 0x280b @0x8
0x2803…280e at0009 = ╱45╱E╱ // 0x280c @0x9
0x2803…280e at000a = EOL // 0x280d @0xa
0x2803…280e }
0x280e…281a b571 8410 L3,K9=B
0x280e…281a LineComalBin {
0x280e…281a ptr = 0xb571 // 0x280e @0x0
0x280e…281a lno = 0x20da // 0x2810 @0x2
0x280e…281a at0004 = ╱4c╱L╱ // 0x2812 @0x4
0x280e…281a at0005 = ╱33╱3╱ // 0x2813 @0x5
0x280e…281a at0006 = ╱ec╱,╱ // 0x2814 @0x6
0x280e…281a at0007 = ╱4b╱K╱ // 0x2815 @0x7
0x280e…281a at0008 = ╱39╱9╱ // 0x2816 @0x8
0x280e…281a at0009 = ╱dc╱=╱ // 0x2817 @0x9
0x280e…281a at000a = ╱42╱B╱ // 0x2818 @0xa
0x280e…281a at000b = EOL // 0x2819 @0xb
0x280e…281a }
0x281a…2826 b57d 8420 IF F8<=I9 THEN
0x281a…2826 LineComalBin {
0x281a…2826 ptr = 0xb57d // 0x281a @0x0
0x281a…2826 lno = 0x20e4 // 0x281c @0x2
0x281a…2826 at0004 = ╱9c╱ IF ╱ // 0x281e @0x4
0x281a…2826 at0005 = ╱46╱F╱ // 0x281f @0x5
0x281a…2826 at0006 = ╱38╱8╱ // 0x2820 @0x6
0x281a…2826 at0007 = ╱df╱<=╱ // 0x2821 @0x7
0x281a…2826 at0008 = ╱49╱I╱ // 0x2822 @0x8
0x281a…2826 at0009 = ╱39╱9╱ // 0x2823 @0x9
0x281a…2826 at000a = ╱b6╱ THEN ╱ // 0x2824 @0xa
0x281a…2826 at000b = EOL // 0x2825 @0xb
0x281a…2826 }
0x2826…2831 b588 8540 IF E4=E THEN
0x2826…2831 LineComalBin {
0x2826…2831 ptr = 0xb588 // 0x2826 @0x0
0x2826…2831 lno = 0x215c // 0x2828 @0x2
0x2826…2831 at0004 = ╱9c╱ IF ╱ // 0x282a @0x4
0x2826…2831 at0005 = ╱45╱E╱ // 0x282b @0x5
0x2826…2831 at0006 = ╱34╱4╱ // 0x282c @0x6
0x2826…2831 at0007 = ╱dc╱=╱ // 0x282d @0x7
0x2826…2831 at0008 = ╱45╱E╱ // 0x282e @0x8
0x2826…2831 at0009 = ╱b6╱ THEN ╱ // 0x282f @0x9
0x2826…2831 at000a = EOL // 0x2830 @0xa
0x2826…2831 }
0x2831…2850 b5a7 8550 K3=ORD(D2$(22))-48
0x2831…2850 LineComalBin {
0x2831…2850 ptr = 0xb5a7 // 0x2831 @0x0
0x2831…2850 lno = 0x2166 // 0x2833 @0x2
0x2831…2850 at0004 = ╱4b╱K╱ // 0x2835 @0x4
0x2831…2850 at0005 = ╱33╱3╱ // 0x2836 @0x5
0x2831…2850 at0006 = ╱dc╱=╱ // 0x2837 @0x6
0x2831…2850 at0007 = ╱cd╱ORD╱ // 0x2838 @0x7
0x2831…2850 at0008 = ╱ed╱(╱ // 0x2839 @0x8
0x2831…2850 at0009 = ╱44╱D╱ // 0x283a @0x9
0x2831…2850 at000a = ╱32╱2╱ // 0x283b @0xa
0x2831…2850 at000b = ╱ef╱$╱ // 0x283c @0xb
0x2831…2850 at000c = ╱ed╱(╱ // 0x283d @0xc
0x2831…2850 at000d = ╱32╱2╱ // 0x283e @0xd
0x2831…2850 at000e = ╱32╱2╱ // 0x283f @0xe
0x2831…2850 at000f = ╱fe0000b005╱ // 0x2840 @0xf
0x2831…2850 at0014 = ╱ee╱)╱ // 0x2845 @0x14
0x2831…2850 at0015 = ╱ee╱)╱ // 0x2846 @0x15
0x2831…2850 at0016 = ╱e3╱-╱ // 0x2847 @0x16
0x2831…2850 at0017 = ╱34╱4╱ // 0x2848 @0x17
0x2831…2850 at0018 = ╱38╱8╱ // 0x2849 @0x18
0x2831…2850 at0019 = ╱fe0000c006╱ // 0x284a @0x19
0x2831…2850 at001e = EOL // 0x284f @0x1e
0x2831…2850 }
0x2850…2860 b5b7 8560 IF K3<4 THEN
0x2850…2860 LineComalBin {
0x2850…2860 ptr = 0xb5b7 // 0x2850 @0x0
0x2850…2860 lno = 0x2170 // 0x2852 @0x2
0x2850…2860 at0004 = ╱9c╱ IF ╱ // 0x2854 @0x4
0x2850…2860 at0005 = ╱4b╱K╱ // 0x2855 @0x5
0x2850…2860 at0006 = ╱33╱3╱ // 0x2856 @0x6
0x2850…2860 at0007 = ╱dd╱<╱ // 0x2857 @0x7
0x2850…2860 at0008 = ╱34╱4╱ // 0x2858 @0x8
0x2850…2860 at0009 = ╱fe00008003╱ // 0x2859 @0x9
0x2850…2860 at000e = ╱b6╱ THEN ╱ // 0x285e @0xe
0x2850…2860 at000f = EOL // 0x285f @0xf
0x2850…2860 }
0x2860…287a b5d1 8570 IF A2(K3)=F8 OR A2(K3)=-E THEN
0x2860…287a LineComalBin {
0x2860…287a ptr = 0xb5d1 // 0x2860 @0x0
0x2860…287a lno = 0x217a // 0x2862 @0x2
0x2860…287a at0004 = ╱9c╱ IF ╱ // 0x2864 @0x4
0x2860…287a at0005 = ╱41╱A╱ // 0x2865 @0x5
0x2860…287a at0006 = ╱32╱2╱ // 0x2866 @0x6
0x2860…287a at0007 = ╱ed╱(╱ // 0x2867 @0x7
0x2860…287a at0008 = ╱4b╱K╱ // 0x2868 @0x8
0x2860…287a at0009 = ╱33╱3╱ // 0x2869 @0x9
0x2860…287a at000a = ╱ee╱)╱ // 0x286a @0xa
0x2860…287a at000b = ╱dc╱=╱ // 0x286b @0xb
0x2860…287a at000c = ╱46╱F╱ // 0x286c @0xc
0x2860…287a at000d = ╱38╱8╱ // 0x286d @0xd
0x2860…287a at000e = ╱db╱ OR ╱ // 0x286e @0xe
0x2860…287a at000f = ╱41╱A╱ // 0x286f @0xf
0x2860…287a at0010 = ╱32╱2╱ // 0x2870 @0x10
0x2860…287a at0011 = ╱ed╱(╱ // 0x2871 @0x11
0x2860…287a at0012 = ╱4b╱K╱ // 0x2872 @0x12
0x2860…287a at0013 = ╱33╱3╱ // 0x2873 @0x13
0x2860…287a at0014 = ╱ee╱)╱ // 0x2874 @0x14
0x2860…287a at0015 = ╱dc╱=╱ // 0x2875 @0x15
0x2860…287a at0016 = ╱e9╱-╱ // 0x2876 @0x16
0x2860…287a at0017 = ╱45╱E╱ // 0x2877 @0x17
0x2860…287a at0018 = ╱b6╱ THEN ╱ // 0x2878 @0x18
0x2860…287a at0019 = EOL // 0x2879 @0x19
0x2860…287a }
0x287a…288b b5e2 8580 EXEC BEREGNFERIE
0x287a…288b LineComalBin {
0x287a…288b ptr = 0xb5e2 // 0x287a @0x0
0x287a…288b lno = 0x2184 // 0x287c @0x2
0x287a…288b at0004 = ╱9d╱ EXEC ╱ // 0x287e @0x4
0x287a…288b at0005 = ╱42╱B╱ // 0x287f @0x5
0x287a…288b at0006 = ╱45╱E╱ // 0x2880 @0x6
0x287a…288b at0007 = ╱52╱R╱ // 0x2881 @0x7
0x287a…288b at0008 = ╱45╱E╱ // 0x2882 @0x8
0x287a…288b at0009 = ╱47╱G╱ // 0x2883 @0x9
0x287a…288b at000a = ╱4e╱N╱ // 0x2884 @0xa
0x287a…288b at000b = ╱46╱F╱ // 0x2885 @0xb
0x287a…288b at000c = ╱45╱E╱ // 0x2886 @0xc
0x287a…288b at000d = ╱52╱R╱ // 0x2887 @0xd
0x287a…288b at000e = ╱49╱I╱ // 0x2888 @0xe
0x287a…288b at000f = ╱45╱E╱ // 0x2889 @0xf
0x287a…288b at0010 = EOL // 0x288a @0x10
0x287a…288b }
0x288b…2899 b5f0 8585 EXEC BEREGNSH
0x288b…2899 LineComalBin {
0x288b…2899 ptr = 0xb5f0 // 0x288b @0x0
0x288b…2899 lno = 0x2189 // 0x288d @0x2
0x288b…2899 at0004 = ╱9d╱ EXEC ╱ // 0x288f @0x4
0x288b…2899 at0005 = ╱42╱B╱ // 0x2890 @0x5
0x288b…2899 at0006 = ╱45╱E╱ // 0x2891 @0x6
0x288b…2899 at0007 = ╱52╱R╱ // 0x2892 @0x7
0x288b…2899 at0008 = ╱45╱E╱ // 0x2893 @0x8
0x288b…2899 at0009 = ╱47╱G╱ // 0x2894 @0x9
0x288b…2899 at000a = ╱4e╱N╱ // 0x2895 @0xa
0x288b…2899 at000b = ╱53╱S╱ // 0x2896 @0xb
0x288b…2899 at000c = ╱48╱H╱ // 0x2897 @0xc
0x288b…2899 at000d = EOL // 0x2898 @0xd
0x288b…2899 }
0x2899…28a2 b5f9 8590 K9=E
0x2899…28a2 LineComalBin {
0x2899…28a2 ptr = 0xb5f9 // 0x2899 @0x0
0x2899…28a2 lno = 0x218e // 0x289b @0x2
0x2899…28a2 at0004 = ╱4b╱K╱ // 0x289d @0x4
0x2899…28a2 at0005 = ╱39╱9╱ // 0x289e @0x5
0x2899…28a2 at0006 = ╱dc╱=╱ // 0x289f @0x6
0x2899…28a2 at0007 = ╱45╱E╱ // 0x28a0 @0x7
0x2899…28a2 at0008 = EOL // 0x28a1 @0x8
0x2899…28a2 }
0x28a2…28a8 b5ff 8600 ENDIF
0x28a2…28a8 LineComalBin {
0x28a2…28a8 ptr = 0xb5ff // 0x28a2 @0x0
0x28a2…28a8 lno = 0x2198 // 0x28a4 @0x2
0x28a2…28a8 at0004 = ╱9b╱ ENDIF ╱ // 0x28a6 @0x4
0x28a2…28a8 at0005 = EOL // 0x28a7 @0x5
0x28a2…28a8 }
0x28a8…28ae b605 8610 ENDIF
0x28a8…28ae LineComalBin {
0x28a8…28ae ptr = 0xb605 // 0x28a8 @0x0
0x28a8…28ae lno = 0x21a2 // 0x28aa @0x2
0x28a8…28ae at0004 = ╱9b╱ ENDIF ╱ // 0x28ac @0x4
0x28a8…28ae at0005 = EOL // 0x28ad @0x5
0x28a8…28ae }
0x28ae…28b4 b60b 8620 ENDIF
0x28ae…28b4 LineComalBin {
0x28ae…28b4 ptr = 0xb60b // 0x28ae @0x0
0x28ae…28b4 lno = 0x21ac // 0x28b0 @0x2
0x28ae…28b4 at0004 = ╱9b╱ ENDIF ╱ // 0x28b2 @0x4
0x28ae…28b4 at0005 = EOL // 0x28b3 @0x5
0x28ae…28b4 }
0x28b4…28bf b616 8815 IF K9>B THEN
0x28b4…28bf LineComalBin {
0x28b4…28bf ptr = 0xb616 // 0x28b4 @0x0
0x28b4…28bf lno = 0x226f // 0x28b6 @0x2
0x28b4…28bf at0004 = ╱9c╱ IF ╱ // 0x28b8 @0x4
0x28b4…28bf at0005 = ╱4b╱K╱ // 0x28b9 @0x5
0x28b4…28bf at0006 = ╱39╱9╱ // 0x28ba @0x6
0x28b4…28bf at0007 = ╱de╱>╱ // 0x28bb @0x7
0x28b4…28bf at0008 = ╱42╱B╱ // 0x28bc @0x8
0x28b4…28bf at0009 = ╱b6╱ THEN ╱ // 0x28bd @0x9
0x28b4…28bf at000a = EOL // 0x28be @0xa
0x28b4…28bf }
0x28bf…28ce b625 8820 EXEC SKRIVBUND
0x28bf…28ce LineComalBin {
0x28bf…28ce ptr = 0xb625 // 0x28bf @0x0
0x28bf…28ce lno = 0x2274 // 0x28c1 @0x2
0x28bf…28ce at0004 = ╱9d╱ EXEC ╱ // 0x28c3 @0x4
0x28bf…28ce at0005 = ╱53╱S╱ // 0x28c4 @0x5
0x28bf…28ce at0006 = ╱4b╱K╱ // 0x28c5 @0x6
0x28bf…28ce at0007 = ╱52╱R╱ // 0x28c6 @0x7
0x28bf…28ce at0008 = ╱49╱I╱ // 0x28c7 @0x8
0x28bf…28ce at0009 = ╱56╱V╱ // 0x28c8 @0x9
0x28bf…28ce at000a = ╱42╱B╱ // 0x28c9 @0xa
0x28bf…28ce at000b = ╱55╱U╱ // 0x28ca @0xb
0x28bf…28ce at000c = ╱4e╱N╱ // 0x28cb @0xc
0x28bf…28ce at000d = ╱44╱D╱ // 0x28cc @0xd
0x28bf…28ce at000e = EOL // 0x28cd @0xe
0x28bf…28ce }
0x28ce…28e0 b637 8830 EXEC UDLØNMOD(F8)
0x28ce…28e0 LineComalBin {
0x28ce…28e0 ptr = 0xb637 // 0x28ce @0x0
0x28ce…28e0 lno = 0x227e // 0x28d0 @0x2
0x28ce…28e0 at0004 = ╱9d╱ EXEC ╱ // 0x28d2 @0x4
0x28ce…28e0 at0005 = ╱55╱U╱ // 0x28d3 @0x5
0x28ce…28e0 at0006 = ╱44╱D╱ // 0x28d4 @0x6
0x28ce…28e0 at0007 = ╱4c╱L╱ // 0x28d5 @0x7
0x28ce…28e0 at0008 = ╱5c╱Ø╱ // 0x28d6 @0x8
0x28ce…28e0 at0009 = ╱4e╱N╱ // 0x28d7 @0x9
0x28ce…28e0 at000a = ╱4d╱M╱ // 0x28d8 @0xa
0x28ce…28e0 at000b = ╱4f╱O╱ // 0x28d9 @0xb
0x28ce…28e0 at000c = ╱44╱D╱ // 0x28da @0xc
0x28ce…28e0 at000d = ╱ed╱(╱ // 0x28db @0xd
0x28ce…28e0 at000e = ╱46╱F╱ // 0x28dc @0xe
0x28ce…28e0 at000f = ╱38╱8╱ // 0x28dd @0xf
0x28ce…28e0 at0010 = ╱ee╱)╱ // 0x28de @0x10
0x28ce…28e0 at0011 = EOL // 0x28df @0x11
0x28ce…28e0 }
0x28e0…28eb b642 8840 EXEC UDTÆL
0x28e0…28eb LineComalBin {
0x28e0…28eb ptr = 0xb642 // 0x28e0 @0x0
0x28e0…28eb lno = 0x2288 // 0x28e2 @0x2
0x28e0…28eb at0004 = ╱9d╱ EXEC ╱ // 0x28e4 @0x4
0x28e0…28eb at0005 = ╱55╱U╱ // 0x28e5 @0x5
0x28e0…28eb at0006 = ╱44╱D╱ // 0x28e6 @0x6
0x28e0…28eb at0007 = ╱54╱T╱ // 0x28e7 @0x7
0x28e0…28eb at0008 = ╱5b╱Æ╱ // 0x28e8 @0x8
0x28e0…28eb at0009 = ╱4c╱L╱ // 0x28e9 @0x9
0x28e0…28eb at000a = EOL // 0x28ea @0xa
0x28e0…28eb }
0x28eb…28f1 b648 8845 ENDIF
0x28eb…28f1 LineComalBin {
0x28eb…28f1 ptr = 0xb648 // 0x28eb @0x0
0x28eb…28f1 lno = 0x228d // 0x28ed @0x2
0x28eb…28f1 at0004 = ╱9b╱ ENDIF ╱ // 0x28ef @0x4
0x28eb…28f1 at0005 = EOL // 0x28f0 @0x5
0x28eb…28f1 }
0x28f1…28f7 b64e 8850 ENDIF
0x28f1…28f7 LineComalBin {
0x28f1…28f7 ptr = 0xb64e // 0x28f1 @0x0
0x28f1…28f7 lno = 0x2292 // 0x28f3 @0x2
0x28f1…28f7 at0004 = ╱9b╱ ENDIF ╱ // 0x28f5 @0x4
0x28f1…28f7 at0005 = EOL // 0x28f6 @0x5
0x28f1…28f7 }
0x28f7…2902 b659 8860 UNTIL F8=>I9
0x28f7…2902 LineComalBin {
0x28f7…2902 ptr = 0xb659 // 0x28f7 @0x0
0x28f7…2902 lno = 0x229c // 0x28f9 @0x2
0x28f7…2902 at0004 = ╱98╱ UNTIL ╱ // 0x28fb @0x4
0x28f7…2902 at0005 = ╱46╱F╱ // 0x28fc @0x5
0x28f7…2902 at0006 = ╱38╱8╱ // 0x28fd @0x6
0x28f7…2902 at0007 = ╱e0╱=>╱ // 0x28fe @0x7
0x28f7…2902 at0008 = ╱49╱I╱ // 0x28ff @0x8
0x28f7…2902 at0009 = ╱39╱9╱ // 0x2900 @0x9
0x28f7…2902 at000a = EOL // 0x2901 @0xa
0x28f7…2902 }
0x2902…2944 b69b 8862 PUT D9$:E2$(E),E2$(G),E2$(V),E2$(4),E2$(5),E2$(6)
0x2902…2944 LineComalBin {
0x2902…2944 ptr = 0xb69b // 0x2902 @0x0
0x2902…2944 lno = 0x229e // 0x2904 @0x2
0x2902…2944 at0004 = ╱aa╱ PUT ╱ // 0x2906 @0x4
0x2902…2944 at0005 = ╱44╱D╱ // 0x2907 @0x5
0x2902…2944 at0006 = ╱39╱9╱ // 0x2908 @0x6
0x2902…2944 at0007 = ╱ef╱$╱ // 0x2909 @0x7
0x2902…2944 at0008 = ╱f0╱:╱ // 0x290a @0x8
0x2902…2944 at0009 = ╱45╱E╱ // 0x290b @0x9
0x2902…2944 at000a = ╱32╱2╱ // 0x290c @0xa
0x2902…2944 at000b = ╱ef╱$╱ // 0x290d @0xb
0x2902…2944 at000c = ╱ed╱(╱ // 0x290e @0xc
0x2902…2944 at000d = ╱45╱E╱ // 0x290f @0xd
0x2902…2944 at000e = ╱ee╱)╱ // 0x2910 @0xe
0x2902…2944 at000f = ╱ec╱,╱ // 0x2911 @0xf
0x2902…2944 at0010 = ╱45╱E╱ // 0x2912 @0x10
0x2902…2944 at0011 = ╱32╱2╱ // 0x2913 @0x11
0x2902…2944 at0012 = ╱ef╱$╱ // 0x2914 @0x12
0x2902…2944 at0013 = ╱ed╱(╱ // 0x2915 @0x13
0x2902…2944 at0014 = ╱47╱G╱ // 0x2916 @0x14
0x2902…2944 at0015 = ╱ee╱)╱ // 0x2917 @0x15
0x2902…2944 at0016 = ╱ec╱,╱ // 0x2918 @0x16
0x2902…2944 at0017 = ╱45╱E╱ // 0x2919 @0x17
0x2902…2944 at0018 = ╱32╱2╱ // 0x291a @0x18
0x2902…2944 at0019 = ╱ef╱$╱ // 0x291b @0x19
0x2902…2944 at001a = ╱ed╱(╱ // 0x291c @0x1a
0x2902…2944 at001b = ╱56╱V╱ // 0x291d @0x1b
0x2902…2944 at001c = ╱ee╱)╱ // 0x291e @0x1c
0x2902…2944 at001d = ╱ec╱,╱ // 0x291f @0x1d
0x2902…2944 at001e = ╱45╱E╱ // 0x2920 @0x1e
0x2902…2944 at001f = ╱32╱2╱ // 0x2921 @0x1f
0x2902…2944 at0020 = ╱ef╱$╱ // 0x2922 @0x20
0x2902…2944 at0021 = ╱ed╱(╱ // 0x2923 @0x21
0x2902…2944 at0022 = ╱34╱4╱ // 0x2924 @0x22
0x2902…2944 at0023 = ╱fe00008003╱ // 0x2925 @0x23
0x2902…2944 at0028 = ╱ee╱)╱ // 0x292a @0x28
0x2902…2944 at0029 = ╱ec╱,╱ // 0x292b @0x29
0x2902…2944 at002a = ╱45╱E╱ // 0x292c @0x2a
0x2902…2944 at002b = ╱32╱2╱ // 0x292d @0x2b
0x2902…2944 at002c = ╱ef╱$╱ // 0x292e @0x2c
0x2902…2944 at002d = ╱ed╱(╱ // 0x292f @0x2d
0x2902…2944 at002e = ╱35╱5╱ // 0x2930 @0x2e
0x2902…2944 at002f = ╱fe0000a003╱ // 0x2931 @0x2f
0x2902…2944 at0034 = ╱ee╱)╱ // 0x2936 @0x34
0x2902…2944 at0035 = ╱ec╱,╱ // 0x2937 @0x35
0x2902…2944 at0036 = ╱45╱E╱ // 0x2938 @0x36
0x2902…2944 at0037 = ╱32╱2╱ // 0x2939 @0x37
0x2902…2944 at0038 = ╱ef╱$╱ // 0x293a @0x38
0x2902…2944 at0039 = ╱ed╱(╱ // 0x293b @0x39
0x2902…2944 at003a = ╱36╱6╱ // 0x293c @0x3a
0x2902…2944 at003b = ╱fe0000c003╱ // 0x293d @0x3b
0x2902…2944 at0040 = ╱ee╱)╱ // 0x2942 @0x40
0x2902…2944 at0041 = EOL // 0x2943 @0x41
0x2902…2944 }
0x2944…2993 b6ea 8864 PUT D9$:E2$(7),E2$(8),E2$(W),E2$(10),E2$(11),E2$(12)
0x2944…2993 LineComalBin {
0x2944…2993 ptr = 0xb6ea // 0x2944 @0x0
0x2944…2993 lno = 0x22a0 // 0x2946 @0x2
0x2944…2993 at0004 = ╱aa╱ PUT ╱ // 0x2948 @0x4
0x2944…2993 at0005 = ╱44╱D╱ // 0x2949 @0x5
0x2944…2993 at0006 = ╱39╱9╱ // 0x294a @0x6
0x2944…2993 at0007 = ╱ef╱$╱ // 0x294b @0x7
0x2944…2993 at0008 = ╱f0╱:╱ // 0x294c @0x8
0x2944…2993 at0009 = ╱45╱E╱ // 0x294d @0x9
0x2944…2993 at000a = ╱32╱2╱ // 0x294e @0xa
0x2944…2993 at000b = ╱ef╱$╱ // 0x294f @0xb
0x2944…2993 at000c = ╱ed╱(╱ // 0x2950 @0xc
0x2944…2993 at000d = ╱37╱7╱ // 0x2951 @0xd
0x2944…2993 at000e = ╱fe0000e003╱ // 0x2952 @0xe
0x2944…2993 at0013 = ╱ee╱)╱ // 0x2957 @0x13
0x2944…2993 at0014 = ╱ec╱,╱ // 0x2958 @0x14
0x2944…2993 at0015 = ╱45╱E╱ // 0x2959 @0x15
0x2944…2993 at0016 = ╱32╱2╱ // 0x295a @0x16
0x2944…2993 at0017 = ╱ef╱$╱ // 0x295b @0x17
0x2944…2993 at0018 = ╱ed╱(╱ // 0x295c @0x18
0x2944…2993 at0019 = ╱38╱8╱ // 0x295d @0x19
0x2944…2993 at001a = ╱fe00008004╱ // 0x295e @0x1a
0x2944…2993 at001f = ╱ee╱)╱ // 0x2963 @0x1f
0x2944…2993 at0020 = ╱ec╱,╱ // 0x2964 @0x20
0x2944…2993 at0021 = ╱45╱E╱ // 0x2965 @0x21
0x2944…2993 at0022 = ╱32╱2╱ // 0x2966 @0x22
0x2944…2993 at0023 = ╱ef╱$╱ // 0x2967 @0x23
0x2944…2993 at0024 = ╱ed╱(╱ // 0x2968 @0x24
0x2944…2993 at0025 = ╱57╱W╱ // 0x2969 @0x25
0x2944…2993 at0026 = ╱ee╱)╱ // 0x296a @0x26
0x2944…2993 at0027 = ╱ec╱,╱ // 0x296b @0x27
0x2944…2993 at0028 = ╱45╱E╱ // 0x296c @0x28
0x2944…2993 at0029 = ╱32╱2╱ // 0x296d @0x29
0x2944…2993 at002a = ╱ef╱$╱ // 0x296e @0x2a
0x2944…2993 at002b = ╱ed╱(╱ // 0x296f @0x2b
0x2944…2993 at002c = ╱31╱1╱ // 0x2970 @0x2c
0x2944…2993 at002d = ╱30╱0╱ // 0x2971 @0x2d
0x2944…2993 at002e = ╱fe0000a004╱ // 0x2972 @0x2e
0x2944…2993 at0033 = ╱ee╱)╱ // 0x2977 @0x33
0x2944…2993 at0034 = ╱ec╱,╱ // 0x2978 @0x34
0x2944…2993 at0035 = ╱45╱E╱ // 0x2979 @0x35
0x2944…2993 at0036 = ╱32╱2╱ // 0x297a @0x36
0x2944…2993 at0037 = ╱ef╱$╱ // 0x297b @0x37
0x2944…2993 at0038 = ╱ed╱(╱ // 0x297c @0x38
0x2944…2993 at0039 = ╱31╱1╱ // 0x297d @0x39
0x2944…2993 at003a = ╱31╱1╱ // 0x297e @0x3a
0x2944…2993 at003b = ╱fe0000b004╱ // 0x297f @0x3b
0x2944…2993 at0040 = ╱ee╱)╱ // 0x2984 @0x40
0x2944…2993 at0041 = ╱ec╱,╱ // 0x2985 @0x41
0x2944…2993 at0042 = ╱45╱E╱ // 0x2986 @0x42
0x2944…2993 at0043 = ╱32╱2╱ // 0x2987 @0x43
0x2944…2993 at0044 = ╱ef╱$╱ // 0x2988 @0x44
0x2944…2993 at0045 = ╱ed╱(╱ // 0x2989 @0x45
0x2944…2993 at0046 = ╱31╱1╱ // 0x298a @0x46
0x2944…2993 at0047 = ╱32╱2╱ // 0x298b @0x47
0x2944…2993 at0048 = ╱fe0000c004╱ // 0x298c @0x48
0x2944…2993 at004d = ╱ee╱)╱ // 0x2991 @0x4d
0x2944…2993 at004e = EOL // 0x2992 @0x4e
0x2944…2993 }
0x2993…29d0 b727 8866 PUT D9$:E2$(13),E2$(14),E2$(15),E2$(16)
0x2993…29d0 LineComalBin {
0x2993…29d0 ptr = 0xb727 // 0x2993 @0x0
0x2993…29d0 lno = 0x22a2 // 0x2995 @0x2
0x2993…29d0 at0004 = ╱aa╱ PUT ╱ // 0x2997 @0x4
0x2993…29d0 at0005 = ╱44╱D╱ // 0x2998 @0x5
0x2993…29d0 at0006 = ╱39╱9╱ // 0x2999 @0x6
0x2993…29d0 at0007 = ╱ef╱$╱ // 0x299a @0x7
0x2993…29d0 at0008 = ╱f0╱:╱ // 0x299b @0x8
0x2993…29d0 at0009 = ╱45╱E╱ // 0x299c @0x9
0x2993…29d0 at000a = ╱32╱2╱ // 0x299d @0xa
0x2993…29d0 at000b = ╱ef╱$╱ // 0x299e @0xb
0x2993…29d0 at000c = ╱ed╱(╱ // 0x299f @0xc
0x2993…29d0 at000d = ╱31╱1╱ // 0x29a0 @0xd
0x2993…29d0 at000e = ╱33╱3╱ // 0x29a1 @0xe
0x2993…29d0 at000f = ╱fe0000d004╱ // 0x29a2 @0xf
0x2993…29d0 at0014 = ╱ee╱)╱ // 0x29a7 @0x14
0x2993…29d0 at0015 = ╱ec╱,╱ // 0x29a8 @0x15
0x2993…29d0 at0016 = ╱45╱E╱ // 0x29a9 @0x16
0x2993…29d0 at0017 = ╱32╱2╱ // 0x29aa @0x17
0x2993…29d0 at0018 = ╱ef╱$╱ // 0x29ab @0x18
0x2993…29d0 at0019 = ╱ed╱(╱ // 0x29ac @0x19
0x2993…29d0 at001a = ╱31╱1╱ // 0x29ad @0x1a
0x2993…29d0 at001b = ╱34╱4╱ // 0x29ae @0x1b
0x2993…29d0 at001c = ╱fe0000e004╱ // 0x29af @0x1c
0x2993…29d0 at0021 = ╱ee╱)╱ // 0x29b4 @0x21
0x2993…29d0 at0022 = ╱ec╱,╱ // 0x29b5 @0x22
0x2993…29d0 at0023 = ╱45╱E╱ // 0x29b6 @0x23
0x2993…29d0 at0024 = ╱32╱2╱ // 0x29b7 @0x24
0x2993…29d0 at0025 = ╱ef╱$╱ // 0x29b8 @0x25
0x2993…29d0 at0026 = ╱ed╱(╱ // 0x29b9 @0x26
0x2993…29d0 at0027 = ╱31╱1╱ // 0x29ba @0x27
0x2993…29d0 at0028 = ╱35╱5╱ // 0x29bb @0x28
0x2993…29d0 at0029 = ╱fe0000f004╱ // 0x29bc @0x29
0x2993…29d0 at002e = ╱ee╱)╱ // 0x29c1 @0x2e
0x2993…29d0 at002f = ╱ec╱,╱ // 0x29c2 @0x2f
0x2993…29d0 at0030 = ╱45╱E╱ // 0x29c3 @0x30
0x2993…29d0 at0031 = ╱32╱2╱ // 0x29c4 @0x31
0x2993…29d0 at0032 = ╱ef╱$╱ // 0x29c5 @0x32
0x2993…29d0 at0033 = ╱ed╱(╱ // 0x29c6 @0x33
0x2993…29d0 at0034 = ╱31╱1╱ // 0x29c7 @0x34
0x2993…29d0 at0035 = ╱36╱6╱ // 0x29c8 @0x35
0x2993…29d0 at0036 = ╱fe00008005╱ // 0x29c9 @0x36
0x2993…29d0 at003b = ╱ee╱)╱ // 0x29ce @0x3b
0x2993…29d0 at003c = EOL // 0x29cf @0x3c
0x2993…29d0 }
0x29d0…29e5 b73c 8869 IF PS>E THEN EXEC SKRIVPAGE
0x29d0…29e5 LineComalBin {
0x29d0…29e5 ptr = 0xb73c // 0x29d0 @0x0
0x29d0…29e5 lno = 0x22a5 // 0x29d2 @0x2
0x29d0…29e5 at0004 = ╱82╱ IF ╱ // 0x29d4 @0x4
0x29d0…29e5 at0005 = ╱50╱P╱ // 0x29d5 @0x5
0x29d0…29e5 at0006 = ╱53╱S╱ // 0x29d6 @0x6
0x29d0…29e5 at0007 = ╱de╱>╱ // 0x29d7 @0x7
0x29d0…29e5 at0008 = ╱45╱E╱ // 0x29d8 @0x8
0x29d0…29e5 at0009 = ╱b6╱ THEN ╱ // 0x29d9 @0x9
0x29d0…29e5 at000a = ╱9d╱ EXEC ╱ // 0x29da @0xa
0x29d0…29e5 at000b = ╱53╱S╱ // 0x29db @0xb
0x29d0…29e5 at000c = ╱4b╱K╱ // 0x29dc @0xc
0x29d0…29e5 at000d = ╱52╱R╱ // 0x29dd @0xd
0x29d0…29e5 at000e = ╱49╱I╱ // 0x29de @0xe
0x29d0…29e5 at000f = ╱56╱V╱ // 0x29df @0xf
0x29d0…29e5 at0010 = ╱50╱P╱ // 0x29e0 @0x10
0x29d0…29e5 at0011 = ╱41╱A╱ // 0x29e1 @0x11
0x29d0…29e5 at0012 = ╱47╱G╱ // 0x29e2 @0x12
0x29d0…29e5 at0013 = ╱45╱E╱ // 0x29e3 @0x13
0x29d0…29e5 at0014 = EOL // 0x29e4 @0x14
0x29d0…29e5 }
0x29e5…29eb b742 8870 CLOSE
0x29e5…29eb LineComalBin {
0x29e5…29eb ptr = 0xb742 // 0x29e5 @0x0
0x29e5…29eb lno = 0x22a6 // 0x29e7 @0x2
0x29e5…29eb at0004 = ╱a8╱ CLOSE ╱ // 0x29e9 @0x4
0x29e5…29eb at0005 = EOL // 0x29ea @0x5
0x29e5…29eb }
0x29eb…29f2 b749 8875 OUTPUT T
0x29eb…29f2 LineComalBin {
0x29eb…29f2 ptr = 0xb749 // 0x29eb @0x0
0x29eb…29f2 lno = 0x22ab // 0x29ed @0x2
0x29eb…29f2 at0004 = ╱a5╱ OUTPUT ╱ // 0x29ef @0x4
0x29eb…29f2 at0005 = ╱54╱T╱ // 0x29f0 @0x5
0x29eb…29f2 at0006 = EOL // 0x29f1 @0x6
0x29eb…29f2 }
0x29f2…2a17 b76e 8877 EDIT "Monter listepapir, RETURN",E9$
0x29f2…2a17 LineComalBin {
0x29f2…2a17 ptr = 0xb76e // 0x29f2 @0x0
0x29f2…2a17 lno = 0x22ad // 0x29f4 @0x2
0x29f2…2a17 at0004 = ╱b1╱ EDIT ╱ // 0x29f6 @0x4
0x29f2…2a17 at0005 = ╱22╱"╱ // 0x29f7 @0x5
0x29f2…2a17 at0006 = ╱4d╱M╱ // 0x29f8 @0x6
0x29f2…2a17 at0007 = ╱6f╱o╱ // 0x29f9 @0x7
0x29f2…2a17 at0008 = ╱6e╱n╱ // 0x29fa @0x8
0x29f2…2a17 at0009 = ╱74╱t╱ // 0x29fb @0x9
0x29f2…2a17 at000a = ╱65╱e╱ // 0x29fc @0xa
0x29f2…2a17 at000b = ╱72╱r╱ // 0x29fd @0xb
0x29f2…2a17 at000c = ╱20╱…╱ // 0x29fe @0xc
0x29f2…2a17 at000d = ╱6c╱l╱ // 0x29ff @0xd
0x29f2…2a17 at000e = ╱69╱i╱ // 0x2a00 @0xe
0x29f2…2a17 at000f = ╱73╱s╱ // 0x2a01 @0xf
0x29f2…2a17 at0010 = ╱74╱t╱ // 0x2a02 @0x10
0x29f2…2a17 at0011 = ╱65╱e╱ // 0x2a03 @0x11
0x29f2…2a17 at0012 = ╱70╱p╱ // 0x2a04 @0x12
0x29f2…2a17 at0013 = ╱61╱a╱ // 0x2a05 @0x13
0x29f2…2a17 at0014 = ╱70╱p╱ // 0x2a06 @0x14
0x29f2…2a17 at0015 = ╱69╱i╱ // 0x2a07 @0x15
0x29f2…2a17 at0016 = ╱72╱r╱ // 0x2a08 @0x16
0x29f2…2a17 at0017 = ╱2c╱,╱ // 0x2a09 @0x17
0x29f2…2a17 at0018 = ╱20╱…╱ // 0x2a0a @0x18
0x29f2…2a17 at0019 = ╱52╱R╱ // 0x2a0b @0x19
0x29f2…2a17 at001a = ╱45╱E╱ // 0x2a0c @0x1a
0x29f2…2a17 at001b = ╱54╱T╱ // 0x2a0d @0x1b
0x29f2…2a17 at001c = ╱55╱U╱ // 0x2a0e @0x1c
0x29f2…2a17 at001d = ╱52╱R╱ // 0x2a0f @0x1d
0x29f2…2a17 at001e = ╱4e╱N╱ // 0x2a10 @0x1e
0x29f2…2a17 at001f = ╱22╱"╱ // 0x2a11 @0x1f
0x29f2…2a17 at0020 = ╱ec╱,╱ // 0x2a12 @0x20
0x29f2…2a17 at0021 = ╱45╱E╱ // 0x2a13 @0x21
0x29f2…2a17 at0022 = ╱39╱9╱ // 0x2a14 @0x22
0x29f2…2a17 at0023 = ╱ef╱$╱ // 0x2a15 @0x23
0x29f2…2a17 at0024 = EOL // 0x2a16 @0x24
0x29f2…2a17 }
0x2a17…2a2e 0000 8880 CHAIN "P641210:JOURNAL"
0x2a17…2a2e LineComalBin {
0x2a17…2a2e ptr = 0x0000 // 0x2a17 @0x0
0x2a17…2a2e lno = 0x22b0 // 0x2a19 @0x2
0x2a17…2a2e at0004 = ╱ac╱ CHAIN ╱ // 0x2a1b @0x4
0x2a17…2a2e at0005 = ╱22╱"╱ // 0x2a1c @0x5
0x2a17…2a2e at0006 = ╱50╱P╱ // 0x2a1d @0x6
0x2a17…2a2e at0007 = ╱36╱6╱ // 0x2a1e @0x7
0x2a17…2a2e at0008 = ╱34╱4╱ // 0x2a1f @0x8
0x2a17…2a2e at0009 = ╱31╱1╱ // 0x2a20 @0x9
0x2a17…2a2e at000a = ╱32╱2╱ // 0x2a21 @0xa
0x2a17…2a2e at000b = ╱31╱1╱ // 0x2a22 @0xb
0x2a17…2a2e at000c = ╱30╱0╱ // 0x2a23 @0xc
0x2a17…2a2e at000d = ╱3a╱:╱ // 0x2a24 @0xd
0x2a17…2a2e at000e = ╱4a╱J╱ // 0x2a25 @0xe
0x2a17…2a2e at000f = ╱4f╱O╱ // 0x2a26 @0xf
0x2a17…2a2e at0010 = ╱55╱U╱ // 0x2a27 @0x10
0x2a17…2a2e at0011 = ╱52╱R╱ // 0x2a28 @0x11
0x2a17…2a2e at0012 = ╱4e╱N╱ // 0x2a29 @0x12
0x2a17…2a2e at0013 = ╱41╱A╱ // 0x2a2a @0x13
0x2a17…2a2e at0014 = ╱4c╱L╱ // 0x2a2b @0x14
0x2a17…2a2e at0015 = ╱22╱"╱ // 0x2a2c @0x15
0x2a17…2a2e at0016 = EOL // 0x2a2d @0x16
0x2a17…2a2e }
0x2a2e…2a40 57 8d 5a 00 42 dc 30 fe 00 00 00 00 eb 45 dc 31 fe 00 ┆W Z B 0 E 1 ┆
0x2a40…2a5f 00 80 01 eb 47 dc 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 ┆ G 2 V 3 W 9 ┆
0x2a5f…2a65 (141,) 57 8d 85 b7 10 00 ┆W ┆