00000000: 8B 4B B1 4B 31 AF 4B B3 B2 4B 32 A7 53 B2 53 32 |.K.K1.K..K2.S.S2|
00000010: 00 E9 25 0C 12 8B 4B B1 4B 32 AF 4B B3 B2 4B 33 |..%...K.K2.K..K3|
00000020: A7 53 B2 53 33 00 00 26 16 12 8B 4B B1 4B 33 20 |.S.S3..&...K.K3 |
00000030: 20 20 20 20 20 20 20 A7 53 B2 53 34 00 10 26 20 | .S.S4..& |
00000040: 12 4B 4F B2 53 AC B5 28 4B AD 53 29 00 23 26 2A |.KO.S..(K.S).#&*|
00000050: 12 8B 53 B2 53 31 A7 53 4F B2 4B 4F AD 53 31 00 |..S.S1.SO.KO.S1.|
00000060: 41 26 34 12 8B 53 B2 53 32 A7 53 4F B2 4B 31 AD |A&4..S.S2.SO.K1.|
00000070: 53 31 AA 28 4B 4F AB 4B 31 29 AD 53 32 00 6A 26 |S1.(KO.K1).S2.j&|
00000080: 3E 12 8B 53 B2 53 33 A7 53 4F B2 4B 31 AD 53 31 |>..S.S3.SO.K1.S1|
00000090: AA 28 4B 32 AB 4B 31 29 AD 53 32 AA 28 4B 4F AB |.(K2.K1).S2.(KO.|
000000A0: 4B 32 29 AD 53 33 00 9E 26 48 12 8B 53 B2 53 34 |K2).S3..&H..S.S4|
000000B0: A7 53 4F B2 4B 31 AD 53 31 AA 28 4B 32 AB 4B 31 |.SO.K1.S1.(K2.K1|
000000C0: 29 AD 53 32 AA 28 4B 33 AB 4B 32 29 AD 53 33 AA |).S2.(K3.K2).S3.|
000000D0: 28 4B 4F AB 4B 33 29 AD 53 34 00 A5 26 52 12 64 |(KO.K3).S4..&R.d|
000000E0: 34 00 C9 26 5C 12 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A |4..&\..*********|
000000F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000100: 2A 2A 2A 2A 2A 00 E1 26 66 12 8F 20 20 20 53 50 |*****..&f.. SP|
00000110: 52 49 4E 47 20 54 49 4C 20 4B 55 52 53 00 05 27 |RING TIL KURS..'|
00000120: 70 12 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |p..*************|
00000130: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000140: 2A 00 1C 27 7A 12 64 31 20 53 50 52 49 4E 47 20 |*..'z.d1 SPRING |
00000150: 54 49 4C 20 4B 55 52 53 00 3B 27 84 12 8B 53 4F |TIL KURS.;'...SO|
00000160: B3 B2 34 30 20 20 20 20 20 20 20 20 20 20 A7 4B |..40 .K|
00000170: 4F B2 53 4F AC 53 31 00 63 27 8E 12 8B 53 4F B1 |O.SO.S1.c'...SO.|
00000180: 34 30 AF 53 4F B3 B2 31 32 30 20 A7 4B 4F B2 28 |40.SO..120 .KO.(|
00000190: 53 4F AB 4B 31 AD 53 31 29 AC 53 32 AA 4B 31 00 |SO.K1.S1).S2.K1.|
000001A0: 96 27 98 12 8B 53 4F B1 31 32 30 AF 53 4F B3 B2 |.'...SO.120.SO..|
000001B0: 32 32 30 A7 4B 4F B2 28 53 4F AB 4B 31 AD 53 31 |220.KO.(SO.K1.S1|
000001C0: AB 28 4B 32 AB 4B 31 29 AD 53 32 29 AC 53 33 AA |.(K2.K1).S2).S3.|
000001D0: 4B 32 00 D6 27 A2 12 8B 53 4F B1 32 32 30 20 20 |K2..'...SO.220 |
000001E0: 20 20 20 20 20 20 20 20 A7 4B 4F B2 28 53 4F AB | .KO.(SO.|
000001F0: 4B 31 AD 53 31 AB 28 4B 32 AB 4B 31 29 AD 53 32 |K1.S1.(K2.K1).S2|
00000200: AB 28 4B 33 AB 4B 32 29 AD 53 33 29 AC 53 34 AA |.(K3.K2).S3).S4.|
00000210: 4B 33 00 DD 27 AC 12 64 34 00 01 28 B6 12 8F 2A |K3..'..d4..(...*|
00000220: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000230: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 11 28 |*************..(|
00000240: C0 12 8F 20 20 20 64 72 20 64 7E 4F 52 00 35 28 |... dr d~OR.5(|
00000250: CA 12 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |...*************|
00000260: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000270: 2A 00 43 28 D4 12 64 31 20 64 72 20 64 7E B0 00 |*.C(..d1 dr d~..|
00000280: 54 28 DE 12 9F 31 35 2C 38 2C 35 2C 22 49 30 22 |T(...15,8,5,"I0"|
00000290: 00 69 28 E8 12 84 31 35 2C 45 4E 2C 45 4D 24 2C |.i(...15,EN,EM$,|
000002A0: 45 54 2C 45 53 00 77 28 F2 12 8B 45 4E B2 30 A7 |ET,ES.w(...EN.0.|
000002B0: 20 64 34 00 88 28 FC 12 45 B2 31 30 3A 64 33 20 | d4..(..E.10:d3 |
000002C0: 42 45 45 50 00 9C 28 06 13 99 50 24 22 44 49 53 |BEEP..(...P$"DIS|
000002D0: 4B 20 45 52 52 4F 52 22 00 AB 28 10 13 99 50 24 |K ERROR"..(...P$|
000002E0: 22 46 2D 54 41 53 54 00 BD 28 1A 13 99 45 4E 3B |"F-TAST..(...EN;|
000002F0: 45 4D 24 3B 45 54 3B 45 53 00 D0 28 24 13 64 20 |EM$;ET;ES..($.d |
00000300: 3A 51 B2 64 56 3A 64 29 51 B3 B1 30 00 D7 28 2E |:Q.dV:d)Q..0..(.|
00000310: 13 64 34 00 FB 28 38 13 8F 2A 2A 2A 2A 2A 2A 2A |.d4..(8..*******|
00000320: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000330: 2A 2A 2A 2A 2A 2A 2A 00 0C 29 42 13 8F 20 20 20 |*******..)B.. |
00000340: 47 45 4D 20 47 52 49 44 00 30 29 4C 13 8F 2A 2A |GEM GRID.0)L..**|
00000350: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000360: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 40 29 56 |************.@)V|
00000370: 13 64 31 20 47 45 4D 20 47 52 49 44 00 5C 29 60 |.d1 GEM GRID.\)`|
00000380: 13 99 4B 24 22 47 52 49 44 20 47 45 4D 4D 45 53 |..K$"GRID GEMMES|
00000390: 20 46 4F 52 20 22 41 24 00 73 29 6A 13 99 50 24 | FOR "A$.s)j..P$|
000003A0: 22 4F 4B 3F 20 20 20 20 20 2D 3E 20 20 46 37 00 |"OK? -> F7.|
000003B0: 8A 29 74 13 99 50 24 22 45 4C 4C 45 52 53 20 20 |.)t..P$"ELLERS |
000003C0: 2D 3E 20 20 46 31 00 9D 29 7E 13 64 20 3A 51 B2 |-> F1..)~.d :Q.|
000003D0: 64 56 3A 64 29 51 B3 B1 30 00 AB 29 88 13 8B 51 |dV:d)Q..0..)...Q|
000003E0: B3 B1 37 A7 20 64 34 00 C7 29 92 13 9F 32 2C 38 |..7. d4..)...2,8|
000003F0: 2C 32 2C 22 40 3A 47 2E 22 AA 41 24 AA 22 2C 53 |,2,"@:G.".A$.",S|
00000400: 2C 57 22 00 D0 29 9C 13 98 32 2C 58 00 D9 29 A6 |,W"..)...2,X..).|
00000410: 13 98 32 2C 59 00 E3 29 B0 13 98 32 2C 59 4E 00 |..2,Y..)...2,YN.|
00000420: ED 29 BA 13 98 32 2C 59 58 00 FC 29 C4 13 99 58 |.)...2,YX..)...X|
00000430: 2C 59 2C 59 4E 2C 59 58 00 07 2A CE 13 81 49 B2 |,Y,YN,YX..*...I.|
00000440: 30 A4 58 00 14 2A D8 13 81 4A B2 59 4E A4 59 58 |0.X..*...J.YN.YX|
00000450: 00 23 2A E2 13 98 32 2C 41 25 28 49 2C 4A 29 00 |.#*...2,A%(I,J).|
00000460: 2A 2A EC 13 82 4A 00 31 2A F6 13 82 49 00 38 2A |**...J.1*...I.8*|
00000470: 00 14 A0 32 00 3F 2A 0A 14 64 34 00 63 2A 14 14 |...2.?*..d4.c*..|
00000480: 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.***************|
00000490: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
000004A0: 75 2A 1E 14 8F 20 20 20 48 45 4E 54 20 47 52 49 |u*... HENT GRI|
000004B0: 44 00 99 2A 28 14 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A |D..*(..*********|
000004C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000004D0: 2A 2A 2A 2A 2A 00 AA 2A 32 14 64 31 20 48 45 4E |*****..*2.d1 HEN|
000004E0: 54 20 47 52 49 44 00 CC 2A 3C 14 99 4B 24 22 47 |T GRID..*<..K$"G|
000004F0: 52 49 44 20 48 45 4E 54 45 53 20 20 41 4B 54 49 |RID HENTES AKTI|
00000500: 45 3A 22 3B 3A 85 41 24 00 E8 2A 46 14 99 4B 24 |E:";:.A$..*F..K$|
00000510: 22 47 52 49 44 20 4C 4F 41 44 45 53 20 46 4F 52 |"GRID LOADES FOR|
00000520: 20 22 41 24 00 FF 2A 50 14 99 50 24 22 4F 4B 3F | "A$..*P..P$"OK?|
00000530: 20 20 20 20 20 2D 3E 20 20 46 37 00 16 2B 5A 14 | -> F7..+Z.|
00000540: 99 50 24 22 45 4C 4C 45 52 53 20 20 2D 3E 20 20 |.P$"ELLERS -> |
00000550: 46 31 00 29 2B 64 14 64 20 3A 51 B2 64 56 3A 64 |F1.)+d.d :Q.dV:d|
00000560: 29 51 B3 B1 30 00 37 2B 6E 14 8B 51 B3 B1 37 A7 |)Q..0.7+n..Q..7.|
00000570: 20 64 34 00 51 2B 78 14 9F 32 2C 38 2C 32 2C 22 | d4.Q+x..2,8,2,"|
00000580: 47 2E 22 AA 41 24 AA 22 2C 53 2C 52 22 00 5A 2B |G.".A$.",S,R".Z+|
00000590: 82 14 84 32 2C 58 00 63 2B 8C 14 84 32 2C 59 00 |...2,X.c+...2,Y.|
000005A0: 6D 2B 96 14 84 32 2C 59 4E 00 77 2B A0 14 84 32 |m+...2,YN.w+...2|
000005B0: 2C 59 58 00 86 2B AA 14 99 58 2C 59 2C 59 4E 2C |,YX..+...X,Y,YN,|
000005C0: 59 58 00 91 2B B4 14 81 49 B2 30 A4 58 00 9E 2B |YX..+...I.0.X..+|
000005D0: BE 14 81 4A B2 59 4E A4 59 58 00 AD 2B C8 14 84 |...J.YN.YX..+...|
000005E0: 32 2C 41 25 28 49 2C 4A 29 00 B4 2B D2 14 82 4A |2,A%(I,J)..+...J|
000005F0: 00 BB 2B DC 14 82 49 00 C2 2B E6 14 A0 32 00 C9 |..+...I..+...2..|
00000600: 2B F0 14 64 34 00 ED 2B 84 17 8F 2A 2A 2A 2A 2A |+..d4..+...*****|
00000610: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000620: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 FE 2B 8E 17 8F 20 |*********..+... |
00000630: 20 20 49 4E 49 54 2D 47 45 4D 00 22 2C 98 17 8F | INIT-GEM.",...|
00000640: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000650: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 32 |**************.2|
00000660: 2C A2 17 64 31 20 49 4E 49 54 AB 47 45 4D 00 4E |,..d1 INIT.GEM.N|
00000670: 2C AC 17 9F 32 2C 38 2C 32 2C 22 40 3A 2D 2D 49 |,...2,8,2,"@:--I|
00000680: 4E 49 54 2D 2D 2C 53 2C 57 22 00 61 2C C0 17 99 |NIT--,S,W".a,...|
00000690: 50 24 4E 4E 22 20 41 4B 54 49 45 52 22 00 6B 2C |P$NN" AKTIER".k,|
000006A0: C5 17 98 32 2C 4E 4E 00 77 2C CA 17 81 51 B2 30 |...2,NN.w,...Q.0|
000006B0: A4 4E 4E 00 84 2C D4 17 98 32 2C 42 24 28 51 29 |.NN..,...2,B$(Q)|
000006C0: 00 8B 2C DE 17 82 51 00 97 2C E0 17 81 51 B2 30 |..,...Q..,...Q.0|
000006D0: A4 4E 4E 00 A3 2C E2 17 98 32 2C 4C 28 51 29 00 |.NN..,...2,L(Q).|
000006E0: AA 2C E4 17 82 51 00 B6 2C E8 17 81 51 B2 30 A4 |.,...Q..,...Q.0.|
000006F0: 4E 4E 00 C2 2C F2 17 98 32 2C 4B 28 51 29 00 C9 |NN..,...2,K(Q)..|
00000700: 2C FC 17 82 51 00 DA 2C FE 17 8F 3A 46 4F 52 51 |,...Q..,...:FORQ|
00000710: 3D 30 54 4F 4E 4E 00 EF 2C 00 18 8F 3A 50 52 49 |=0TONN..,...:PRI|
00000720: 4E 54 23 32 2C 44 41 24 28 51 29 00 FB 2C 02 18 |NT#2,DA$(Q)..,..|
00000730: 8F 3A 4E 45 58 54 51 00 02 2D 06 18 A0 32 00 09 |.:NEXTQ..-...2..|
00000740: 2D 10 18 64 34 00 00 00 |-..d4... |
.K.K1.K..K2.S.S2..%...K.K2.K..K3.S.S3..&
...K.K3 .S.S4..& .KO.S..(K.S).#&*
..S.S1.SO.KO.S1.A&4..S.S2.SO.K1.S1.(KO.K
1).S2.J&>..S.S3.SO.K1.S1.(K2.K1).S2.(KO.
K2).S3..&H..S.S4.SO.K1.S1.(K2.K1).S2.(K3
.K2).S3.(KO.K3).S4..&R.D4.I&\..*********
*********************..&F.. SPRING TIL
KURS..'P..*****************************
*..'Z.D1 SPRING TIL KURS.;'...SO..40
.KO.SO.S1.C'...SO.40.SO..120 .KO.(
SO.K1.S1).S2.K1..'...SO.120.SO..220.KO.(
SO.K1.S1.(K2.K1).S2).S3.K2.V'...SO.220
.KO.(SO.K1.S1.(K2.K1).S2.(K3.K2)
.S3).S4.K3..'..D4..(...*****************
*************..(... DR D~OR.5(J..*****
*************************.C(T.D1 DR D~..
T(...15,8,5,"I0".I(...15,EN,EM$,ET,ES.W(
...EN.0. D4..(..E.10:D3 BEEP..(...P$"DIS
K ERROR"..(...P$"F-TAST..(...EN;EM$;ET;E
S.P($.D :Q.DV:D)Q..0.W(..D4..(8..*******
***********************..)B.. GEM GRID
.0)L..******************************.@)V
.D1 GEM GRID.\)`..K$"GRID GEMMES FOR "A$
.S)J..P$"OK? -> F7..)T..P$"ELLERS
-> F1..)~.D :Q.DV:D)Q..0..)...Q..7. D4.
G)...2,8,2,"@:G.".A$.",S,W".P)...2,X.Y).
..2,Y..)...2,YN..)...2,YX..)D..X,Y,YN,YX
..*N..I.0.X..*X..J.YN.YX.#*...2,A%(I,J).
**...J.1*...I.8*.. 2.?*..D4.C*...*******
***********************.U*... HENT GRI
D..*(..******************************..*
2.D1 HENT GRID.L*<..K$"GRID HENTES AKTI
E:";:.A$..*F..K$"GRID LOADES FOR "A$..*P
..P$"OK? -> F7..+Z..P$"ELLERS ->
F1.)+D.D :Q.DV:D)Q..0.7+N..Q..7. D4.Q+X.
.2,8,2,"G.".A$.",S,R".Z+...2,X.C+...2,Y.
M+...2,YN.W+ ..2,YX..+...X,Y,YN,YX..+...
I.0.X..+...J.YN.YX..+H..2,A%(I,J)..+R..J
..+...I.B+.. 2.I+..D4..+...*************
*****************..+... INIT-GEM.",...
******************************.2,..D1 IN
IT.GEM.N,...2,8,2,"@:--INIT--,S,W".A,...
P$NN" AKTIER".K,E..2,NN.W,J..Q.0.NN..,T.
.2,B$(Q)..,...Q..,...Q.0.NN..,...2,L(Q).
.,...Q..,...Q.0.NN.B,...2,K(Q).I,...Q.Z,
...:FORQ=0TONN..,...:PRINT#2,DA$(Q)..,..
.:NEXTQ..-.. 2..-..D4...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL