LR
FILE INFORMATION
FILENAME(S): LR
FILE TYPE(S): PRG
FILE SIZE: 4.2K
FIRST SEEN: 2025-11-02 17:01:49
APPEARS ON: 1 disk(s)
FILE HASH
73a868216c82e4824b6a05cb76fb5d30f45d4175fd5ca44bb2332f2af51e3d53
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PRINTER2 | LR | PRG | Treasure Chest - Spook | 11 | 5 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 36 08 0A 00 86 4E 41 24 28 31 30 30 29 3A |..6....NA$(100):| 00000010: 86 53 54 24 28 31 30 30 29 3A 86 50 4C 24 28 31 |.ST$(100):.PL$(1| 00000020: 30 30 29 3A 86 54 4C 24 28 31 30 30 29 3A 86 42 |00):.TL$(100):.B| 00000030: 4E 28 31 30 30 29 00 55 08 14 00 99 C7 28 31 34 |N(100).U.....(14| 00000040: 29 3A 99 22 93 11 1D 1D 58 58 2E 20 31 32 2E 20 |):."....XX. 12. | 00000050: 31 39 39 32 22 00 6F 08 1E 00 99 22 13 C4 41 54 |1992".o...."..AT| 00000060: 55 4D 3A 22 3A 85 44 41 24 3A 8D 33 30 30 30 00 |UM:":.DA$:.3000.| 00000070: 82 08 23 00 44 54 24 B2 CA 28 44 41 24 2C 35 2C |..#.DT$..(DA$,5,| 00000080: 32 29 00 CB 08 28 00 59 B2 31 3A 99 22 93 C2 49 |2)...(.Y.1:."..I| 00000090: 54 54 45 20 C2 45 52 41 54 45 52 20 57 41 45 48 |TTE .ERATER WAEH| 000000A0: 4C 45 4E 21 20 28 C3 55 52 53 4F 52 20 5A 55 4D |LEN! (.URSOR ZUM| 000000B0: 20 41 55 53 2D 20 57 41 45 48 4C 45 4E 29 13 11 | AUS- WAEHLEN)..| 000000C0: 11 11 22 3A 99 4E 41 24 28 59 29 00 DD 08 32 00 |..":.NA$(Y)...2.| 000000D0: A1 54 24 3A 8B 54 24 B2 22 22 A7 35 30 00 02 09 |.T$:.T$."".50...| 000000E0: 3C 00 8B 54 24 B2 22 11 22 AF 59 B3 31 30 30 AF |<..T$.".".Y.100.| 000000F0: 4E 41 24 28 59 AA 31 29 B3 B1 22 22 A7 59 B2 59 |NA$(Y.1).."".Y.Y| 00000100: AA 31 00 18 09 46 00 8B 54 24 B2 22 91 22 AF 59 |.1...F..T$.".".Y| 00000110: B1 31 A7 59 B2 59 AB 31 00 2A 09 50 00 8B 54 24 |.1.Y.Y.1.*.P..T$| 00000120: B2 C7 28 31 33 29 A7 31 30 30 00 75 09 5A 00 99 |..(13).100.u.Z..| 00000130: 22 13 11 11 11 11 20 20 20 20 20 20 20 20 20 20 |"..... | 00000140: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000150: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000160: 20 22 3B 22 13 11 11 11 11 22 3B 4E 41 24 28 59 | ";".....";NA$(Y| 00000170: 29 3A 89 35 30 00 7F 09 64 00 8D 33 30 30 30 00 |):.50...d..3000.| 00000180: AB 09 6E 00 99 22 93 11 D0 45 52 20 D0 4F 53 54 |..n.."...ER .OST| 00000190: 20 4F 44 45 52 20 D5 50 53 3F 13 11 11 11 20 20 | ODER .PS?.... | 000001A0: D0 4F 53 54 91 22 3A 85 55 50 24 00 D6 09 78 00 |.OST.":.UP$...x.| 000001B0: 99 22 93 11 DA 55 53 41 54 5A 2D C2 45 4D 45 52 |."...USATZ-.EMER| 000001C0: 4B 55 4E 47 3F 13 11 11 11 20 20 CE 45 49 4E 91 |KUNG?.... .EIN.| 000001D0: 22 3A 85 5A 55 24 00 EA 09 82 00 8B 5A 55 24 B2 |":.ZU$......ZU$.| 000001E0: 22 CE 45 49 4E 22 A7 32 30 30 00 1B 0A 8C 00 99 |".EIN".200......| 000001F0: 22 93 3C 31 3E 20 27 C2 49 54 54 45 20 4E 4F 43 |".<1> '.ITTE NOC| 00000200: 48 20 46 55 45 52 20 C2 4F 4E 55 53 4D 4F 4E 41 |H FUER .ONUSMONA| 00000210: 54 20 22 3B 44 54 24 3B 22 27 22 00 2E 0A 96 00 |T ";DT$;"'".....| 00000220: 99 22 3C 32 3E 20 27 C5 49 4C 54 21 27 22 00 41 |."<2> '.ILT!'".A| 00000230: 0A A0 00 A1 41 24 3A 8B 41 24 B2 22 22 A7 31 36 |....A$:.A$."".16| 00000240: 30 00 57 0A AA 00 8B 41 24 B2 22 31 22 A7 42 55 |0.W....A$."1".BU| 00000250: B2 31 3A 89 32 30 30 00 60 0A B4 00 42 55 B2 32 |.1:.200.`...BU.2| 00000260: 00 7A 0A C8 00 99 22 93 C2 45 53 54 45 4C 4C 45 |.z...."..ESTELLE| 00000270: 52 3A 22 3B 4E 41 24 28 59 29 00 B9 0A CA 00 99 |R:";NA$(Y)......| 00000280: 22 C5 49 4E 45 4E 20 CD 4F 4D 45 4E 54 2C 20 42 |".INEN .OMENT, B| 00000290: 49 54 54 45 2C 20 49 43 48 20 44 52 55 43 4B 45 |ITTE, ICH DRUCKE| 000002A0: 20 C2 45 53 54 45 4C 4C 2D 46 4F 52 4D 55 4C 41 | .ESTELL-FORMULA| 000002B0: 52 20 28 CB 4F 50 46 29 22 00 E0 0A CD 00 9F 34 |R (.OPF)"......4| 000002C0: 2C 34 2C 37 3A 98 34 2C C7 28 32 37 29 3B C7 28 |,4,7:.4,.(27);.(| 000002D0: 31 32 30 29 3B C7 28 34 39 29 3B C7 28 31 37 29 |120);.(49);.(17)| 000002E0: 00 FC 0A D2 00 98 34 2C C7 28 32 37 29 3B C7 28 |......4,.(27);.(| 000002F0: 39 37 29 3B C7 28 32 29 3B 44 41 24 00 14 0B D7 |97);.(2);DA$....| 00000300: 00 98 34 2C C7 28 32 37 29 3B C7 28 39 37 29 3B |..4,.(27);.(97);| 00000310: C7 28 30 29 00 22 0B DC 00 98 34 2C 4E 41 24 28 |.(0)."....4,NA$(| 00000320: 59 29 00 30 0B E6 00 98 34 2C 53 54 24 28 59 29 |Y).0....4,ST$(Y)| 00000330: 00 3E 0B F0 00 98 34 2C 50 4C 24 28 59 29 00 4C |.>....4,PL$(Y).L| 00000340: 0B FA 00 98 34 2C 54 4C 24 28 59 29 00 76 0B 04 |....4,TL$(Y).v..| 00000350: 01 8B 55 50 24 B2 22 D0 4F 53 54 22 A7 98 34 2C |..UP$.".OST"..4,| 00000360: C7 28 32 37 29 3B C7 28 31 30 34 29 3B C7 28 32 |.(27);.(104);.(2| 00000370: 29 3A 89 32 36 35 00 7F 0B 06 01 89 32 37 30 00 |):.265......270.| 00000380: AE 0B 09 01 98 34 2C C7 28 32 37 29 3B C7 28 39 |.....4,.(27);.(9| 00000390: 37 29 3B C7 28 32 29 3B 22 20 20 20 20 20 20 20 |7);.(2);" | 000003A0: 50 45 52 20 D0 4F 53 54 22 3A 89 32 37 36 00 C7 |PER .OST":.276..| 000003B0: 0B 0E 01 98 34 2C C7 28 32 37 29 3B C7 28 31 30 |....4,.(27);.(10| 000003C0: 34 29 3B C7 28 32 29 00 F1 0B 13 01 98 34 2C C7 |4);.(2)......4,.| 000003D0: 28 32 37 29 3B C7 28 39 37 29 3B C7 28 32 29 3B |(27);.(97);.(2);| 000003E0: 22 20 20 20 20 20 20 20 20 50 45 52 20 D5 50 53 |" PER .PS| 000003F0: 22 00 0A 0C 14 01 8B 42 55 B2 32 A7 98 34 2C 22 |"......BU.2..4,"| 00000400: 20 20 20 20 C5 49 4C 54 21 22 00 34 0C 15 01 98 | .ILT!".4....| 00000410: 34 2C C7 28 32 37 29 3B C7 28 39 37 29 3B C7 28 |4,.(27);.(97);.(| 00000420: 30 29 3B C7 28 32 37 29 3B C7 28 31 30 34 29 3B |0);.(27);.(104);| 00000430: C7 28 30 29 00 41 0C 18 01 98 34 2C 22 C1 4E 3A |.(0).A....4,".N:| 00000440: 22 00 5B 0C 22 01 98 34 2C 22 CC 52 20 C3 4F 53 |".[."..4,".R .OS| 00000450: 4D 45 54 49 43 20 C7 4D 42 C8 22 00 6A 0C 2C 01 |METIC .MB.".j.,.| 00000460: 98 34 2C 22 C1 48 4C 45 4E 22 00 98 0C 36 01 98 |.4,".HLEN"...6..| 00000470: 34 2C 22 C6 41 58 2D 4E 52 2E 20 30 32 33 38 32 |4,".AX-NR. 02382| 00000480: 2F 37 34 35 34 36 20 4F 44 45 52 20 37 30 36 30 |/74546 ODER 7060| 00000490: 2D 31 39 38 22 3A 98 34 00 A1 0C 38 01 8D 35 39 |-198":.4...8..59| 000004A0: 30 00 AF 0C 39 01 8B 48 4A B2 31 A7 33 31 36 00 |0...9..HJ.1.316.| 000004B0: D5 0C 3B 01 98 34 2C 22 C2 45 52 41 54 45 52 4E |..;..4,".ERATERN| 000004C0: 55 4D 4D 45 52 20 22 3B 42 4E 28 59 29 3A 98 34 |UMMER ";BN(Y):.4| 000004D0: 3A 89 33 31 37 00 21 0D 3C 01 98 34 2C 22 C2 45 |:.317.!.<..4,".E| 000004E0: 52 41 54 45 52 2D CE 52 2E 20 49 53 54 20 4D 49 |RATER-.R. IST MI| 000004F0: 52 20 4E 4F 43 48 20 4E 49 43 48 54 20 42 45 4B |R NOCH NICHT BEK| 00000500: 41 4E 4E 54 3B 20 CF 52 47 41 2D 4C 45 49 54 45 |ANNT; .RGA-LEITE| 00000510: 52 3A D0 45 54 45 52 20 CD 55 45 4C 4C 45 52 21 |R:.ETER .UELLER!| 00000520: 22 00 30 0D 3D 01 8B 42 55 B3 B1 31 A7 33 33 30 |".0.=..BU..1.330| 00000530: 00 64 0D 40 01 98 34 3A 98 34 2C 22 C2 49 54 54 |.d.@..4:.4,".ITT| 00000540: 45 20 4E 4F 43 48 20 46 55 45 52 20 C2 4F 4E 55 |E NOCH FUER .ONU| 00000550: 53 2D CD 4F 4E 41 54 20 22 3B 44 54 24 3B 22 21 |S-.ONAT ";DT$;"!| 00000560: 22 3A 98 34 00 79 0D 4A 01 98 34 2C 22 C2 45 53 |":.4.y.J..4,".ES| 00000570: 54 45 4C 4C 55 4E 47 3A 22 00 8E 0D 54 01 98 34 |TELLUNG:"...T..4| 00000580: 2C 22 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 22 00 B9 |,"..........."..| 00000590: 0D 5E 01 99 22 93 C2 45 53 54 45 4C 4C 55 4E 47 |.^.."..ESTELLUNG| 000005A0: 3A 20 28 C5 49 4E 47 41 42 45 20 D3 54 4F 50 3A |: (.INGABE .TOP:| 000005B0: D2 45 54 55 52 4E 29 11 22 00 C7 0D 68 01 86 50 |.ETURN)."...h..P| 000005C0: 52 24 28 31 30 30 29 00 D3 0D 72 01 81 49 B2 31 |R$(100)...r..I.1| 000005D0: A4 39 39 00 E5 0D 7C 01 99 3A 85 22 91 22 3B 50 |.99...|..:.".";P| 000005E0: 52 24 28 49 29 00 F9 0D 86 01 8B 50 52 24 28 49 |R$(I)......PR$(I| 000005F0: 29 B2 22 22 A7 49 B2 39 39 00 00 0E 90 01 82 49 |)."".I.99......I| 00000600: 00 40 0E 9A 01 99 22 93 C4 41 4E 4B 45 2E 20 C1 |.@...."..ANKE. .| 00000610: 55 46 20 CB 4E 4F 50 46 44 52 55 43 4B 20 5A 45 |UF .NOPFDRUCK ZE| 00000620: 49 47 45 20 49 43 48 20 4E 4F 43 48 4D 41 4C 20 |IGE ICH NOCHMAL | 00000630: 44 49 45 20 C2 45 53 54 45 4C 4C 55 4E 47 2E 22 |DIE .ESTELLUNG."| 00000640: 00 53 0E 9C 01 A1 54 24 3A 8B 54 24 B2 22 22 A7 |.S....T$:.T$."".| 00000650: 34 31 32 00 5C 0E 9F 01 99 22 11 22 00 69 0E A4 |412.\....".".i..| 00000660: 01 81 49 B2 31 A4 31 30 30 00 75 0E AE 01 99 50 |..I.1.100.u....P| 00000670: 52 24 28 49 29 00 8C 0E B8 01 8B 50 52 24 28 49 |R$(I)......PR$(I| 00000680: AA 31 29 B2 22 22 A7 49 B2 31 30 30 00 A2 0E BD |.1)."".I.100....| 00000690: 01 8B 49 B2 32 30 A7 92 31 39 38 2C 32 3A 99 22 |..I.20..198,2:."| 000006A0: 93 22 00 A9 0E C2 01 82 49 00 D1 0E CC 01 99 3A |."......I......:| 000006B0: 99 22 41 4C 4C 45 53 20 4F 2E 4B 2E 3F 11 9D 9D |."ALLES O.K.?...| 000006C0: 9D 9D 9D 9D 9D 9D 9D 11 4A 41 91 22 3A 85 4F 4B |........JA.":.OK| 000006D0: 24 00 E3 0E D6 01 8B 4F 4B 24 B2 22 4A 41 22 A7 |$......OK$."JA".| 000006E0: 35 30 30 00 EB 0E D7 01 58 B2 31 00 2B 0F D8 01 |500.....X.1.+...| 000006F0: 99 22 93 43 55 52 53 4F 52 20 55 50 2F 44 4F 57 |.".CURSOR UP/DOW| 00000700: 4E 3D 5A 45 49 4C 45 20 41 55 53 53 55 43 48 45 |N=ZEILE AUSSUCHE| 00000710: 4E 2C 20 56 20 3D 20 56 45 52 2D 42 45 53 53 45 |N, V = VER-BESSE| 00000720: 52 4E 2C 20 58 3D 53 54 4F 50 22 00 3E 0F D9 01 |RN, X=STOP".>...| 00000730: 99 22 13 11 11 11 22 3B 50 52 24 28 58 29 00 51 |."....";PR$(X).Q| 00000740: 0F DA 01 A1 58 24 3A 8B 58 24 B2 22 22 A7 34 37 |....X$:.X$."".47| 00000750: 33 00 61 0F DB 01 8B 58 24 B2 22 58 22 A7 34 31 |3.a....X$."X".41| 00000760: 30 00 78 0F DC 01 8B 58 24 B2 22 11 22 A7 58 B2 |0.x....X$.".".X.| 00000770: 58 AA 31 3A 89 34 37 32 00 88 0F DD 01 8B 58 24 |X.1:.472......X$| 00000780: B2 22 56 22 A7 34 38 31 00 9D 0F DE 01 8B 58 B3 |."V".481......X.| 00000790: B1 31 A7 58 B2 58 AB 31 3A 89 34 37 32 00 B7 0F |.1.X.X.1:.472...| 000007A0: DF 01 8B 50 52 24 28 58 29 B2 22 22 A7 58 B2 58 |...PR$(X)."".X.X| 000007B0: AB 31 3A 89 34 37 34 00 C0 0F E0 01 89 34 37 34 |.1:.474......474| 000007C0: 00 E3 0F E1 01 99 22 93 22 3A 99 22 20 20 22 3B |......".":." ";| 000007D0: 50 52 24 28 58 29 3B 22 13 91 9D 9D 9D 22 3A 85 |PR$(X);".....":.| 000007E0: 50 4E 24 00 F7 0F EF 01 50 52 24 28 58 29 B2 50 |PN$.....PR$(X).P| 000007F0: 4E 24 3A 89 34 31 30 00 16 10 F4 01 8F 3A 2D 2D |N$:.410......:--| 00000800: 2D 42 45 53 54 45 4C 4C 55 4E 47 20 44 52 55 43 |-BESTELLUNG DRUC| 00000810: 4B 45 4E 2D 2D 2D 00 22 10 F9 01 81 49 B2 31 A4 |KEN---."....I.1.| 00000820: 39 39 00 36 10 FE 01 8B 50 52 24 28 49 29 B2 22 |99.6....PR$(I)."| 00000830: 22 A7 49 B2 39 39 00 44 10 08 02 98 34 2C 50 52 |".I.99.D....4,PR| 00000840: 24 28 49 29 00 4B 10 12 02 82 49 00 67 10 1C 02 |$(I).K....I.g...| 00000850: A0 34 3A 8F 3A 2D 2D 2D 50 52 49 4E 54 20 46 45 |.4:.:---PRINT FE| 00000860: 52 54 49 47 2D 2D 2D 00 96 10 26 02 99 22 CE 4F |RTIG---...&..".O| 00000870: 43 48 20 45 49 4E 45 20 C2 45 53 54 45 4C 4C 55 |CH EINE .ESTELLU| 00000880: 4E 47 3F 20 3E 4A 3C 3D 4A 41 2C 20 3E 4E 3C 3D |NG? >J<=JA, >N<=| 00000890: 4E 45 49 4E 2E 22 00 A9 10 30 02 A1 58 24 3A 8B |NEIN."...0..X$:.| 000008A0: 58 24 B2 22 22 A7 35 36 30 00 BE 10 3A 02 8B 58 |X$."".560...:..X| 000008B0: 24 B2 22 4A 22 A7 99 22 93 22 3A 89 34 30 00 C4 |$."J"..".":.40..| 000008C0: 10 44 02 80 00 D7 10 B8 0B 8F 20 41 42 20 48 49 |.D........ AB HI| 000008D0: 45 52 20 44 41 54 41 00 F1 10 C2 0B 4E 41 24 28 |ER DATA.....NA$(| 000008E0: 31 29 B2 22 CD 41 52 54 49 4E 20 C6 52 45 43 48 |1).".ARTIN .RECH| 000008F0: 22 00 02 11 CC 0B 42 4E 28 31 29 B2 31 31 32 35 |".....BN(1).1125| 00000900: 36 36 00 27 11 D6 0B 53 54 24 28 31 29 B2 22 CB |66.'...ST$(1).".| 00000910: 55 52 54 2D D3 43 48 55 4D 41 43 48 45 52 2D D3 |URT-.CHUMACHER-.| 00000920: 54 52 2E 20 31 33 22 00 44 11 E0 0B 50 4C 24 28 |TR. 13".D...PL$(| 00000930: 31 29 B2 22 36 33 36 31 20 CE 49 44 44 41 54 41 |1)."6361 .IDDATA| 00000940: 4C 20 32 22 00 63 11 EA 0B 54 4C 24 28 31 29 B2 |L 2".c...TL$(1).| 00000950: 22 28 D4 45 4C 2E 20 30 36 30 33 34 2F 36 35 34 |"(.EL. 06034/654| 00000960: 36 29 22 00 69 11 F4 0B 8F 00 84 11 FE 0B 4E 41 |6)".i.........NA| 00000970: 24 28 32 29 B2 22 C1 4E 54 41 4C 20 D7 41 48 4C |$(2).".NTAL .AHL| 00000980: 45 52 53 22 00 95 11 08 0C 42 4E 28 32 29 B2 31 |ERS".....BN(2).1| 00000990: 32 35 31 33 32 00 AF 11 12 0C 53 54 24 28 32 29 |25132.....ST$(2)| 000009A0: B2 22 D3 4F 4E 4E 45 4E 57 45 47 20 31 37 22 00 |.".ONNENWEG 17".| 000009B0: CC 11 1C 0C 50 4C 24 28 32 29 B2 22 36 33 36 31 |....PL$(2)."6361| 000009C0: 20 CE 49 44 44 41 54 41 4C 20 34 22 00 EC 11 26 | .IDDATAL 4"...&| 000009D0: 0C 54 4C 24 28 32 29 B2 22 28 D4 45 4C 2E 20 30 |.TL$(2)."(.EL. 0| 000009E0: 36 31 38 37 2F 32 35 38 38 37 29 22 00 09 12 30 |6187/25887)"...0| 000009F0: 0C 4E 41 24 28 33 29 B2 22 C6 41 52 55 4B 20 C2 |.NA$(3).".ARUK .| 00000A00: 52 4C 41 4A 4F 4C 4C 49 22 00 1A 12 3A 0C 42 4E |RLAJOLLI"...:.BN| 00000A10: 28 33 29 B2 31 31 35 34 36 38 00 36 12 44 0C 53 |(3).115468.6.D.S| 00000A20: 54 24 28 33 29 B2 22 CD 55 53 45 55 4D 53 53 54 |T$(3).".USEUMSST| 00000A30: 52 2E 20 32 31 22 00 54 12 4E 0C 50 4C 24 28 33 |R. 21".T.N.PL$(3| 00000A40: 29 B2 22 34 35 39 30 20 C3 4C 4F 50 50 45 4E 42 |)."4590 .LOPPENB| 00000A50: 55 52 47 22 00 74 12 58 0C 54 4C 24 28 33 29 B2 |URG".t.X.TL$(3).| 00000A60: 22 28 D4 45 4C 2E 20 30 34 34 37 31 2F 38 31 30 |"(.EL. 04471/810| 00000A70: 34 39 29 22 00 8E 12 62 0C 4E 41 24 28 34 29 B2 |49)"...b.NA$(4).| 00000A80: 22 C5 44 47 41 52 20 C8 4F 4C 5A 4B 45 22 00 9F |".DGAR .OLZKE"..| 00000A90: 12 6C 0C 42 4E 28 34 29 B2 31 32 38 32 33 38 00 |.l.BN(4).128238.| 00000AA0: BD 12 76 0C 53 54 24 28 34 29 B2 22 CF 53 54 48 |..v.ST$(4).".STH| 00000AB0: 45 49 4D 45 52 53 54 52 2E 20 34 35 22 00 DA 12 |EIMERSTR. 45"...| 00000AC0: 80 0C 50 4C 24 28 34 29 B2 22 36 33 36 39 20 CE |..PL$(4)."6369 .| 00000AD0: 49 44 44 45 52 41 55 20 32 22 00 F9 12 8A 0C 54 |IDDERAU 2".....T| 00000AE0: 4C 24 28 34 29 B2 22 28 D4 45 4C 2E 20 30 36 31 |L$(4)."(.EL. 061| 00000AF0: 38 37 2F 33 32 38 33 29 22 00 16 13 94 0C 4E 41 |87/3283)".....NA| 00000B00: 24 28 35 29 B2 22 C1 4E 44 52 45 41 53 20 C8 45 |$(5).".NDREAS .E| 00000B10: 52 52 4C 45 52 22 00 27 13 9E 0C 42 4E 28 35 29 |RRLER".'...BN(5)| 00000B20: B2 31 31 33 37 31 35 00 3F 13 A8 0C 53 54 24 28 |.113715.?...ST$(| 00000B30: 35 29 B2 22 C1 4D 20 C8 41 49 4E 20 34 38 22 00 |5).".M .AIN 48".| 00000B40: 5B 13 B2 0C 50 4C 24 28 35 29 B2 22 36 34 37 30 |[...PL$(5)."6470| 00000B50: 20 C2 55 45 44 49 4E 47 45 4E 22 00 7A 13 BC 0C | .UEDINGEN".z...| 00000B60: 54 4C 24 28 35 29 B2 22 28 D4 45 4C 2E 20 30 36 |TL$(5)."(.EL. 06| 00000B70: 30 34 32 2F 31 34 33 35 29 22 00 91 13 C6 0C 4E |042/1435)".....N| 00000B80: 41 24 28 36 29 B2 22 CA 4F 45 52 47 20 C8 45 59 |A$(6).".OERG .EY| 00000B90: 22 00 A2 13 D0 0C 42 4E 28 36 29 B2 31 31 38 31 |".....BN(6).1181| 00000BA0: 34 38 00 BD 13 DA 0C 53 54 24 28 36 29 B2 22 D5 |48.....ST$(6).".| 00000BB0: 4E 54 45 52 47 41 53 53 45 20 39 42 22 00 DE 13 |NTERGASSE 9B"...| 00000BC0: E4 0C 50 4C 24 28 36 29 B2 22 36 33 36 31 20 D2 |..PL$(6)."6361 .| 00000BD0: 45 49 43 48 45 4C 53 48 45 49 4D 20 32 22 00 FD |EICHELSHEIM 2"..| 00000BE0: 13 EE 0C 54 4C 24 28 36 29 B2 22 28 D4 45 4C 2E |...TL$(6)."(.EL.| 00000BF0: 20 30 36 30 33 35 2F 36 31 38 39 29 22 00 17 14 | 06035/6189)"...| 00000C00: F8 0C 4E 41 24 28 37 29 B2 22 CF 4C 49 56 45 52 |..NA$(7).".LIVER| 00000C10: 20 D3 54 41 48 4C 22 00 28 14 02 0D 42 4E 28 37 | .TAHL".(...BN(7| 00000C20: 29 B2 31 32 30 33 38 33 00 44 14 0C 0D 53 54 24 |).120383.D...ST$| 00000C30: 28 37 29 B2 22 C1 4D 41 4C 49 45 4E 53 54 52 2E |(7).".MALIENSTR.| 00000C40: 20 31 37 22 00 61 14 16 0D 50 4C 24 28 37 29 B2 | 17".a...PL$(7).| 00000C50: 22 36 33 36 31 20 CE 49 44 44 41 54 41 4C 20 31 |"6361 .IDDATAL 1| 00000C60: 22 00 80 14 20 0D 54 4C 24 28 37 29 B2 22 28 D4 |"... .TL$(7)."(.| 00000C70: 45 4C 2E 20 30 36 30 33 34 2F 33 36 35 36 29 22 |EL. 06034/3656)"| 00000C80: 00 9F 14 2A 0D 4E 41 24 28 38 29 B2 22 D3 54 45 |...*.NA$(8).".TE| 00000C90: 46 41 4E 20 DA 49 4D 4D 45 52 4D 41 4E 4E 22 00 |FAN .IMMERMANN".| 00000CA0: B0 14 34 0D 42 4E 28 38 29 B2 31 32 30 33 31 36 |..4.BN(8).120316| 00000CB0: 00 CF 14 3E 0D 53 54 24 28 38 29 B2 22 D3 43 48 |...>.ST$(8).".CH| 00000CC0: 55 45 54 5A 45 4E 54 52 41 49 4E 20 31 31 22 00 |UETZENTRAIN 11".| 00000CD0: EB 14 48 0D 50 4C 24 28 38 29 B2 22 36 33 36 30 |..H.PL$(8)."6360| 00000CE0: 20 C6 52 49 45 44 42 45 52 47 22 00 0A 15 52 0D | .RIEDBERG"...R.| 00000CF0: 54 4C 24 28 38 29 B2 22 28 D4 45 4C 2E 20 30 36 |TL$(8)."(.EL. 06| 00000D00: 30 33 31 2F 32 33 39 33 29 22 00 24 15 5C 0D 4E |031/2393)".$.\.N| 00000D10: 41 24 28 39 29 B2 22 D3 56 45 4E 20 D3 43 48 4F |A$(9).".VEN .CHO| 00000D20: 54 54 45 22 00 35 15 66 0D 42 4E 28 39 29 B2 31 |TTE".5.f.BN(9).1| 00000D30: 32 34 31 32 34 00 5D 15 70 0D 53 54 24 28 39 29 |24124.].p.ST$(9)| 00000D40: B2 22 D7 49 4C 48 45 4C 4D 2D CC 45 55 53 43 48 |.".ILHELM-.EUSCH| 00000D50: 4E 45 52 2D D3 54 52 20 33 32 20 41 22 00 7D 15 |NER-.TR 32 A".}.| 00000D60: 7A 0D 50 4C 24 28 39 29 B2 22 36 33 35 30 20 C2 |z.PL$(9)."6350 .| 00000D70: 41 44 20 CE 41 55 48 45 49 4D 20 36 22 00 9D 15 |AD .AUHEIM 6"...| 00000D80: 84 0D 54 4C 24 28 39 29 B2 22 28 D4 45 4C 2E 20 |..TL$(9)."(.EL. | 00000D90: 30 36 30 33 32 2F 37 33 39 31 33 29 22 00 BA 15 |06032/73913)"...| 00000DA0: 8E 0D 4E 41 24 28 31 30 29 B2 22 C7 45 52 52 49 |..NA$(10).".ERRI| 00000DB0: 54 20 CE 45 55 4D 41 4E 4E 22 00 CC 15 98 0D 42 |T .EUMANN".....B| 00000DC0: 4E 28 31 30 29 B2 31 32 35 38 32 32 00 EC 15 A2 |N(10).125822....| 00000DD0: 0D 53 54 24 28 31 30 29 B2 22 C1 4D 20 CB 49 52 |.ST$(10).".M .IR| 00000DE0: 53 43 48 45 4E 42 45 52 47 20 38 22 00 0B 16 AC |SCHENBERG 8"....| 00000DF0: 0D 50 4C 24 28 31 30 29 B2 22 36 33 36 30 20 C6 |.PL$(10)."6360 .| 00000E00: 52 49 45 44 42 45 52 47 20 32 22 00 2C 16 B6 0D |RIEDBERG 2".,...| 00000E10: 54 4C 24 28 31 30 29 B2 22 28 D4 45 4C 2E 20 30 |TL$(10)."(.EL. 0| 00000E20: 36 30 33 31 2F 31 33 38 30 30 29 22 00 48 16 C0 |6031/13800)".H..| 00000E30: 0D 4E 41 24 28 31 31 29 B2 22 D4 4F 52 53 54 45 |.NA$(11).".ORSTE| 00000E40: 4E 20 D4 49 45 54 5A 22 00 5A 16 CA 0D 42 4E 28 |N .IETZ".Z...BN(| 00000E50: 31 31 29 B2 31 32 34 32 35 33 00 75 16 D4 0D 53 |11).124253.u...S| 00000E60: 54 24 28 31 31 29 B2 22 CD 4F 5A 41 52 54 53 54 |T$(11).".OZARTST| 00000E70: 52 2E 20 35 22 00 91 16 DE 0D 50 4C 24 28 31 31 |R. 5".....PL$(11| 00000E80: 29 B2 22 36 33 30 38 20 C2 55 54 5A 42 41 43 48 |)."6308 .UTZBACH| 00000E90: 22 00 B2 16 E8 0D 54 4C 24 28 31 31 29 B2 22 28 |".....TL$(11)."(| 00000EA0: D4 45 4C 2E 20 30 36 30 33 33 2F 37 31 39 31 34 |.EL. 06033/71914| 00000EB0: 29 22 00 CF 16 F2 0D 4E 41 24 28 31 32 29 B2 22 |)".....NA$(12)."| 00000EC0: D2 41 4C 46 20 D3 43 48 55 42 52 49 4E 47 22 00 |.ALF .CHUBRING".| 00000ED0: E1 16 FC 0D 42 4E 28 31 32 29 B2 31 30 30 30 30 |....BN(12).10000| 00000EE0: 30 00 FD 16 06 0E 53 54 24 28 31 32 29 B2 22 D3 |0.....ST$(12).".| 00000EF0: 43 48 52 45 42 45 52 57 45 47 20 34 22 00 1C 17 |CHREBERWEG 4"...| 00000F00: 10 0E 50 4C 24 28 31 32 29 B2 22 36 33 36 30 20 |..PL$(12)."6360 | 00000F10: C6 52 49 45 44 42 45 52 47 20 33 22 00 3D 17 1A |.RIEDBERG 3".=..| 00000F20: 0E 54 4C 24 28 31 32 29 B2 22 28 D4 45 4C 2E 20 |.TL$(12)."(.EL. | 00000F30: 30 36 30 33 31 2F 31 33 35 34 38 29 22 00 5F 17 |06031/13548)"._.| 00000F40: 24 0E 4E 41 24 28 31 33 29 B2 22 CD 41 54 54 48 |$.NA$(13).".ATTH| 00000F50: 49 41 53 20 D2 4F 53 45 4E 53 43 48 4F 4E 22 00 |IAS .OSENSCHON".| 00000F60: 71 17 2E 0E 42 4E 28 31 33 29 B2 31 30 30 30 30 |q...BN(13).10000| 00000F70: 30 00 8C 17 38 0E 53 54 24 28 31 33 29 B2 22 CE |0...8.ST$(13).".| 00000F80: 45 4C 4B 45 4E 57 45 47 20 31 30 22 00 AB 17 42 |ELKENWEG 10"...B| 00000F90: 0E 50 4C 24 28 31 33 29 B2 22 36 33 36 30 20 C6 |.PL$(13)."6360 .| 00000FA0: 52 49 45 44 42 45 52 47 20 32 22 00 CC 17 4C 0E |RIEDBERG 2"...L.| 00000FB0: 54 4C 24 28 31 33 29 B2 22 28 D4 45 4C 2E 20 30 |TL$(13)."(.EL. 0| 00000FC0: 36 30 33 31 2F 31 32 32 36 35 29 22 00 EC 17 56 |6031/12265)"...V| 00000FD0: 0E 4E 41 24 28 31 34 29 B2 22 C1 4E 44 52 45 41 |.NA$(14).".NDREA| 00000FE0: 53 20 D0 45 54 53 43 48 4E 49 47 22 00 FE 17 60 |S .ETSCHNIG"...`| 00000FF0: 0E 42 4E 28 31 34 29 B2 31 30 30 30 30 30 00 1C |.BN(14).100000..| 00001000: 18 6A 0E 53 54 24 28 31 34 29 B2 22 C2 52 55 43 |.j.ST$(14).".RUC| 00001010: 4B 4E 45 52 53 54 52 2E 20 32 31 22 00 3A 18 74 |KNERSTR. 21".:.t| 00001020: 0E 50 4C 24 28 31 34 29 B2 22 36 33 36 39 20 CE |.PL$(14)."6369 .| 00001030: 49 44 44 45 52 41 55 20 31 22 00 5B 18 7E 0E 54 |IDDERAU 1".[.~.T| 00001040: 4C 24 28 31 34 29 B2 22 28 D4 45 4C 2E 20 30 36 |L$(14)."(.EL. 06| 00001050: 31 38 37 2F 32 34 32 34 35 29 22 00 7A 18 88 0E |187/24245)".z...| 00001060: 4E 41 24 28 31 35 29 B2 22 D4 48 4F 4D 41 53 20 |NA$(15).".HOMAS | 00001070: D0 45 54 53 43 48 4E 49 47 22 00 8C 18 92 0E 42 |.ETSCHNIG".....B| 00001080: 4E 28 31 35 29 B2 31 30 30 30 30 30 00 AA 18 9C |N(15).100000....| 00001090: 0E 53 54 24 28 31 35 29 B2 22 C1 4D 20 C8 4F 4C |.ST$(15).".M .OL| 000010A0: 4C 47 52 41 42 45 4E 20 34 22 00 CA 18 A6 0E 50 |LGRABEN 4".....P| 000010B0: 4C 24 28 31 35 29 B2 22 36 30 30 30 20 C6 52 41 |L$(15)."6000 .RA| 000010C0: 4E 4B 46 55 52 54 20 36 30 22 00 EB 18 B0 0E 54 |NKFURT 60".....T| 000010D0: 4C 24 28 31 35 29 B2 22 28 D4 45 4C 2E 20 30 36 |L$(15)."(.EL. 06| 000010E0: 31 30 39 2F 32 33 36 39 34 29 22 00 F1 18 9F 0F |109/23694)".....| 000010F0: 8E 00 F7 18 87 13 8E 00 00 00 |.......... |
..6....NA$(100):.ST$(100):.PL$(100):.TL$
(100):.BN(100).U....G(14):."....XX. 12.
1992".O....".DATUM:":.DA$:.3000...#.DT$.
J(DA$,5,2).K.(.Y.1:.".BITTE BERATER WAEH
LEN! (CURSOR ZUM AUS- WAEHLEN)....":.NA$
(Y)...2..T$:.T$."".50...<..T$.".".Y.100.
NA$(Y.1).."".Y.Y.1...F..T$.".".Y.1.Y.Y.1
.*.P..T$.G(13).100.U.Z..".....
";"....
.";NA$(Y):.50..D..3000...N.."..PER POST
ODER UPS?.... POST.":.UP$.V.X.."..ZUSA
TZ-BEMERKUNG?.... NEIN.":.ZU$......ZU$.
"NEIN".200......".<1> 'BITTE NOCH FUER B
ONUSMONAT ";DT$;"'"......"<2> 'EILT!'".A
. ..A$:.A$."".160.W....A$."1".BU.1:.200.
`...BU.2.Z.H..".BESTELLER:";NA$(Y)...J..
"EINEN MOMENT, BITTE, ICH DRUCKE BESTELL
-FORMULAR (KOPF)"...M..4,4,7:.4,G(27);G(
120);G(49);G(17)...R..4,G(27);G(97);G(2)
;DA$...W..4,G(27);G(97);G(0)."....4,NA$(
Y).0....4,ST$(Y).>....4,PL$(Y).L....4,TL
$(Y).V....UP$."POST"..4,G(27);G(104);G(2
):.265.....270......4,G(27);G(97);G(2);
" PER POST":.276.G....4,G(27);G(10
4);G(2)......4,G(27);G(97);G(2);"
PER UPS"......BU.2..4," EILT!".4....
4,G(27);G(97);G(0);G(27);G(104);G(0).A..
..4,"AN:".[."..4,"LR COSMETIC GMBH".J.,.
.4,"AHLEN"...6..4,"FAX-NR. 02382/74546 O
DER 7060-198":.4...8..590...9..HJ.1.316.
U.;..4,"BERATERNUMMER ";BN(Y):.4:.317.!.
<..4,"BERATER-NR. IST MIR NOCH NICHT BEK
ANNT; ORGA-LEITER:PETER MUELLER!".0.=..B
U..1.330.D.@..4:.4,"BITTE NOCH FUER BONU
S-MONAT ";DT$;"!":.4.Y.J..4,"BESTELLUNG:
"...T..4,"..........."...^..".BESTELLUNG
: (EINGABE STOP:RETURN).".G.H..PR$(100).
S.R..I.1.99...|..:.".";PR$(I)......PR$(I
)."".I.99......I.@....".DANKE. AUF KNOPF
DRUCK ZEIGE ICH NOCHMAL DIE BESTELLUNG."
.S....T$:.T$."".412.\....".".I....I.1.10
0.U....PR$(I)......PR$(I.1)."".I.100....
..I.20..198,2:."."...B..I.Q.L..:."ALLES
O.K.?...........JA.":.OK$...V..OK$."JA".
500...W.X.1.+.X..".CURSOR UP/DOWN=ZEILE
AUSSUCHEN, V = VER-BESSERN, X=STOP".>.Y.
."....";PR$(X).Q.Z..X$:.X$."".473.A....X
$."X".410.X....X$.".".X.X.1:.472......X$
."V".481......X..1.X.X.1:.472......PR$(X
)."".X.X.1:.474......474......".":." ";
PR$(X);".....":.PN$.....PR$(X).PN$:.410.
.....:---BESTELLUNG DRUCKEN---."....I.1.
99.6....PR$(I)."".I.99.D....4,PR$(I).K..
..I.G... 4:.:---PRINT FERTIG---...&.."NO
CH EINE BESTELLUNG? >J<=JA, >N<=NEIN."..
.0..X$:.X$."".560...:..X$."J"..".":.40.D
.D...W.... AB HIER DATA...B.NA$(1)."MART
IN FRECH"...L.BN(1).112566.'.V.ST$(1)."K
URT-SCHUMACHER-STR. 13".D...PL$(1)."6361
NIDDATAL 2".C...TL$(1)."(TEL. 06034/654
6)".I.........NA$(2)."ANTAL WAHLERS"....
.BN(2).125132.....ST$(2)."SONNENWEG 17".
L...PL$(2)."6361 NIDDATAL 4"...&.TL$(2).
"(TEL. 06187/25887)"...0.NA$(3)."FARUK B
RLAJOLLI"...:.BN(3).115468.6.D.ST$(3)."M
USEUMSSTR. 21".T.N.PL$(3)."4590 CLOPPENB
URG".T.X.TL$(3)."(TEL. 04471/81049)"...B
.NA$(4)."EDGAR HOLZKE"...L.BN(4).128238.
..V.ST$(4)."OSTHEIMERSTR. 45".Z...PL$(4)
."6369 NIDDERAU 2".....TL$(4)."(TEL. 061
87/3283)".....NA$(5)."ANDREAS HERRLER".'
...BN(5).113715.?...ST$(5)."AM HAIN 48".
[...PL$(5)."6470 BUEDINGEN".Z...TL$(5)."
(TEL. 06042/1435)"...F.NA$(6)."JOERG HEY
"...P.BN(6).118148...Z.ST$(6)."UNTERGASS
E 9B".....PL$(6)."6361 REICHELSHEIM 2"..
...TL$(6)."(TEL. 06035/6189)".....NA$(7)
."OLIVER STAHL".(...BN(7).120383.D...ST$
(7)."AMALIENSTR. 17".A...PL$(7)."6361 NI
DDATAL 1"... .TL$(7)."(TEL. 06034/3656)"
...*.NA$(8)."STEFAN ZIMMERMANN"...4.BN(8
).120316.O.>.ST$(8)."SCHUETZENTRAIN 11".
..H.PL$(8)."6360 FRIEDBERG"...R.TL$(8)."
(TEL. 06031/2393)".$.\.NA$(9)."SVEN SCHO
TTE".5.F.BN(9).124124.].P.ST$(9)."WILHEL
M-LEUSCHNER-STR 32 A".}.Z.PL$(9)."6350 B
AD NAUHEIM 6".....TL$(9)."(TEL. 06032/73
913)".....NA$(10)."GERRIT NEUMANN".L...B
N(10).125822.....ST$(10)."AM KIRSCHENBER
G 8".....PL$(10)."6360 FRIEDBERG 2".,...
TL$(10)."(TEL. 06031/13800)".H...NA$(11)
."TORSTEN TIETZ".Z.J.BN(11).124253.U.T.S
T$(11)."MOZARTSTR. 5".....PL$(11)."6308
BUTZBACH".....TL$(11)."(TEL. 06033/71914
)".O...NA$(12)."RALF SCHUBRING".....BN(1
2).100000.....ST$(12)."SCHREBERWEG 4"...
..PL$(12)."6360 FRIEDBERG 3".=...TL$(12)
."(TEL. 06031/13548)"._.$.NA$(13)."MATTH
IAS ROSENSCHON".Q...BN(13).100000...8.ST
$(13)."NELKENWEG 10"...B.PL$(13)."6360 F
RIEDBERG 2".L.L.TL$(13)."(TEL. 06031/122
65)"...V.NA$(14)."ANDREAS PETSCHNIG"...`
.BN(14).100000...J.ST$(14)."BRUCKNERSTR.
21".:.T.PL$(14)."6369 NIDDERAU 1".[.~.T
L$(14)."(TEL. 06187/24245)".Z...NA$(15).
"THOMAS PETSCHNIG".....BN(15).100000....
.ST$(15)."AM HOLLGRABEN 4".J...PL$(15)."
6000 FRANKFURT 60".....TL$(15)."(TEL. 06
109/23694)"...............
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL