GE128.SRC
FILE INFORMATION
FILENAME(S): GE128.SRC
FILE TYPE(S): PRG
FILE SIZE: 3.7K
FIRST SEEN: 2025-10-20 14:31:17
APPEARS ON: 3 disk(s)
FILE HASH
096993fdf25df3a010da94e29de5cb3d8f6ba93a2a47e054dd0ed66ef521f177
FOUND ON DISKS (3 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| S 1076 | GE128.SRC | PRG | Treasure Chest - Klaus Der Suhler | 21 | 17 | DOWNLOAD FILE |
| G PD 2 | GE128.SRC | PRG | Treasure Chest - Klaus Der Suhler | 21 | 17 | DOWNLOAD FILE |
| LIB 1 | GE128.SRC | PRG | Treasure Chest - Plattfuss | 23 | 5 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 9C 0E 28 E8 03 00 3B 44 49 45 53 45 53 20 46 4C |..(...;DIESES FL| 00000010: 4F 50 50 59 2D 50 52 4F 47 52 41 4D 4D 20 4B 4F |OPPY-PROGRAMM KO| 00000020: 50 49 45 52 54 20 44 49 45 00 26 F2 03 00 3B 53 |PIERT DIE.&...;S| 00000030: 50 55 52 20 32 31 20 44 45 52 20 47 45 4F 53 31 |PUR 21 DER GEOS1| 00000040: 32 38 2D 42 4F 4F 54 44 49 53 4B 45 54 54 45 00 |28-BOOTDISKETTE.| 00000050: 2A FC 03 00 3B 41 55 46 20 44 49 45 20 53 50 55 |*...;AUF DIE SPU| 00000060: 52 45 4E 20 32 37 20 55 4E 44 20 32 38 20 55 4D |REN 27 UND 28 UM| 00000070: 2C 20 56 45 52 41 45 4E 2D 00 2B 06 04 00 3B 44 |, VERAEN-.+...;D| 00000080: 45 52 54 20 44 49 45 20 42 41 4D 20 45 4E 54 53 |ERT DIE BAM ENTS| 00000090: 50 52 45 43 48 45 4E 44 2C 20 46 4F 52 4D 41 54 |PRECHEND, FORMAT| 000000A0: 49 45 52 54 00 28 10 04 00 3B 44 49 45 20 53 50 |IERT.(...;DIE SP| 000000B0: 55 52 20 32 31 20 55 4E 44 20 4D 41 43 48 54 20 |UR 21 UND MACHT | 000000C0: 44 49 45 20 44 49 53 4B 45 54 54 45 00 10 1A 04 |DIE DISKETTE....| 000000D0: 00 3B 4B 4F 50 49 45 52 42 41 52 2E 00 06 24 04 |.;KOPIERBAR...$.| 000000E0: 00 3B 00 18 2E 04 00 2A 20 3D 20 20 20 24 30 33 |.;.....* = $03| 000000F0: 30 30 20 3B 42 45 47 49 4E 4E 00 16 38 04 09 2E |00 ;BEGINN..8...| 00000100: 4F 55 54 20 22 47 45 31 32 38 31 2E 4F 42 4A 22 |OUT "GE1281.OBJ"| 00000110: 00 13 42 04 00 53 54 41 52 54 20 4C 44 58 20 23 |..B..START LDX #| 00000120: 24 31 32 00 0D 4C 04 01 4C 44 59 20 23 24 30 30 |$12..L..LDY #$00| 00000130: 00 0D 56 04 01 4C 44 41 20 23 24 38 30 00 0C 60 |..V..LDA #$80..`| 00000140: 04 01 4A 53 52 20 55 50 31 00 0D 6A 04 01 4C 44 |..JSR UP1..j..LD| 00000150: 41 20 23 24 34 32 00 0E 74 04 01 43 4D 50 20 24 |A #$42..t..CMP $| 00000160: 30 36 42 44 00 0E 7E 04 01 42 4E 45 20 46 41 49 |06BD..~..BNE FAI| 00000170: 4C 31 00 0D 88 04 01 4C 44 41 20 23 24 38 30 00 |L1.....LDA #$80.| 00000180: 0E 92 04 01 43 4D 50 20 24 30 36 42 45 00 0F 9C |....CMP $06BE...| 00000190: 04 01 42 45 51 20 4F 4B 44 49 53 4B 00 16 A6 04 |..BEQ OKDISK....| 000001A0: 00 46 41 49 4C 31 20 20 20 20 4C 44 41 20 23 24 |.FAIL1 LDA #$| 000001B0: 34 44 00 0E B0 04 01 43 4D 50 20 24 30 36 42 45 |4D.....CMP $06BE| 000001C0: 00 0E BA 04 01 42 4E 45 20 45 52 52 4F 52 00 0D |.....BNE ERROR..| 000001D0: C4 04 09 4A 4D 50 20 46 4F 52 4D 00 14 CE 04 00 |...JMP FORM.....| 000001E0: 4F 4B 44 49 53 4B 20 4C 44 58 20 23 24 30 30 00 |OKDISK LDX #$00.| 000001F0: 16 D8 04 00 4C 4F 4F 50 20 4C 44 41 20 53 45 43 |....LOOP LDA SEC| 00000200: 54 41 42 2C 58 00 0F E2 04 01 42 45 51 20 45 4E |TAB,X.....BEQ EN| 00000210: 44 43 50 59 00 0C EC 04 01 53 54 41 20 24 30 43 |DCPY.....STA $0C| 00000220: 00 13 F6 04 01 4C 44 59 20 53 45 43 54 41 42 2B |.....LDY SECTAB+| 00000230: 31 2C 58 00 0D 00 05 01 4C 44 41 20 23 24 38 30 |1,X.....LDA #$80| 00000240: 00 0C 0A 05 01 4A 53 52 20 55 50 32 00 13 14 05 |.....JSR UP2....| 00000250: 01 4C 44 41 20 53 45 43 54 41 42 2B 32 2C 58 00 |.LDA SECTAB+2,X.| 00000260: 0E 1E 05 01 53 54 41 20 24 30 36 30 30 00 13 28 |....STA $0600..(| 00000270: 05 01 4C 44 41 20 53 45 43 54 41 42 2B 33 2C 58 |..LDA SECTAB+3,X| 00000280: 00 0E 32 05 01 53 54 41 20 24 30 36 30 31 00 13 |..2..STA $0601..| 00000290: 3C 05 01 4C 44 41 20 53 45 43 54 41 42 2B 34 2C |<..LDA SECTAB+4,| 000002A0: 58 00 0C 46 05 01 53 54 41 20 24 30 43 00 13 50 |X..F..STA $0C..P| 000002B0: 05 01 4C 44 59 20 53 45 43 54 41 42 2B 35 2C 58 |..LDY SECTAB+5,X| 000002C0: 00 0D 5A 05 01 4C 44 41 20 23 24 39 30 00 0C 64 |..Z..LDA #$90..d| 000002D0: 05 01 4A 53 52 20 55 50 32 00 08 6E 05 01 49 4E |..JSR UP2..n..IN| 000002E0: 58 00 08 78 05 01 49 4E 58 00 08 82 05 01 49 4E |X..x..INX.....IN| 000002F0: 58 00 08 8C 05 01 49 4E 58 00 08 96 05 01 49 4E |X.....INX.....IN| 00000300: 58 00 08 A0 05 01 49 4E 58 00 0D AA 05 01 42 4E |X.....INX.....BN| 00000310: 45 20 4C 4F 4F 50 00 13 B4 05 00 45 52 52 4F 52 |E LOOP.....ERROR| 00000320: 20 4C 44 41 20 23 24 46 46 00 0F BE 05 01 53 54 | LDA #$FF.....ST| 00000330: 41 20 45 52 52 4F 52 46 00 08 C8 05 09 52 54 53 |A ERRORF.....RTS| 00000340: 00 14 D2 05 00 45 4E 44 43 50 59 20 4C 44 58 20 |.....ENDCPY LDX | 00000350: 23 24 31 32 00 0D DC 05 01 4C 44 59 20 23 24 30 |#$12.....LDY #$0| 00000360: 30 00 0D E6 05 01 4C 44 41 20 23 24 38 30 00 0C |0.....LDA #$80..| 00000370: F0 05 01 4A 53 52 20 55 50 31 00 0D FA 05 01 4C |...JSR UP1.....L| 00000380: 44 41 20 23 24 30 30 00 0E 04 06 01 53 54 41 20 |DA #$00.....STA | 00000390: 24 30 36 37 30 00 0E 0E 06 01 53 54 41 20 24 30 |$0670.....STA $0| 000003A0: 36 37 31 00 0E 18 06 01 53 54 41 20 24 30 36 37 |671.....STA $067| 000003B0: 32 00 0E 22 06 01 53 54 41 20 24 30 36 37 33 00 |2.."..STA $0673.| 000003C0: 0D 2C 06 01 4C 44 41 20 23 24 31 31 00 0E 36 06 |.,..LDA #$11..6.| 000003D0: 01 53 54 41 20 24 30 36 37 34 00 0D 40 06 09 4C |.STA $0674..@..L| 000003E0: 44 41 20 23 24 46 43 00 0E 4A 06 01 53 54 41 20 |DA #$FC..J..STA | 000003F0: 24 30 36 37 36 00 0D 54 06 01 4C 44 41 20 23 24 |$0676..T..LDA #$| 00000400: 34 44 00 0E 5E 06 01 53 54 41 20 24 30 36 42 45 |4D..^..STA $06BE| 00000410: 00 0D 68 06 01 4C 44 58 20 23 24 31 32 00 0D 72 |..h..LDX #$12..r| 00000420: 06 01 4C 44 59 20 23 24 30 30 00 0D 7C 06 01 4C |..LDY #$00..|..L| 00000430: 44 41 20 23 24 39 30 00 0C 86 06 09 4A 53 52 20 |DA #$90.....JSR | 00000440: 55 50 31 00 11 90 06 00 46 4F 52 4D 20 20 20 20 |UP1.....FORM | 00000450: 20 52 54 53 00 10 9A 06 00 55 50 31 20 53 54 58 | RTS.....UP1 STX| 00000460: 20 24 30 43 00 10 A4 06 00 55 50 32 20 53 54 59 | $0C.....UP2 STY| 00000470: 20 24 30 44 00 08 AE 06 04 53 45 49 00 0C B8 06 | $0D.....SEI....| 00000480: 04 53 54 41 20 24 30 33 00 0E C2 06 04 4C 44 41 |.STA $03.....LDA| 00000490: 20 24 31 43 30 30 00 0D CC 06 01 4F 52 41 20 23 | $1C00.....ORA #| 000004A0: 24 30 38 00 0E D6 06 01 53 54 41 20 24 31 43 30 |$08.....STA $1C0| 000004B0: 30 00 08 E0 06 01 43 4C 49 00 11 EA 06 00 57 41 |0.....CLI.....WA| 000004C0: 49 54 20 4C 44 41 20 24 30 33 00 0D F4 06 01 42 |IT LDA $03.....B| 000004D0: 4D 49 20 57 41 49 54 00 0E FE 06 01 4C 44 41 20 |MI WAIT.....LDA | 000004E0: 24 31 43 30 30 00 0D 08 07 01 41 4E 44 20 23 24 |$1C00.....AND #$| 000004F0: 46 37 00 0E 12 07 01 53 54 41 20 24 31 43 30 30 |F7.....STA $1C00| 00000500: 00 08 1C 07 01 52 54 53 00 2A 26 07 00 53 45 43 |.....RTS.*&..SEC| 00000510: 54 41 42 20 20 20 2E 42 59 54 20 24 31 34 20 24 |TAB .BYT $14 $| 00000520: 30 41 20 24 31 43 20 24 30 45 20 24 31 34 20 24 |0A $1C $0E $14 $| 00000530: 30 41 00 21 30 07 09 2E 42 59 54 20 24 31 35 20 |0A.!0...BYT $15 | 00000540: 24 30 45 20 24 31 43 20 24 30 32 20 24 31 43 20 |$0E $1C $02 $1C | 00000550: 24 30 45 00 21 3A 07 09 2E 42 59 54 20 24 31 35 |$0E.!:...BYT $15| 00000560: 20 24 30 33 20 24 31 43 20 24 30 38 20 24 31 43 | $03 $1C $08 $1C| 00000570: 20 24 30 32 00 21 44 07 09 2E 42 59 54 20 24 31 | $02.!D...BYT $1| 00000580: 35 20 24 30 42 20 24 31 43 20 24 30 44 20 24 31 |5 $0B $1C $0D $1| 00000590: 43 20 24 30 38 00 21 4E 07 09 2E 42 59 54 20 24 |C $08.!N...BYT $| 000005A0: 31 35 20 24 30 30 20 24 31 43 20 24 30 31 20 24 |15 $00 $1C $01 $| 000005B0: 31 43 20 24 30 44 00 21 58 07 09 2E 42 59 54 20 |1C $0D.!X...BYT | 000005C0: 24 31 35 20 24 30 38 20 24 31 43 20 24 30 37 20 |$15 $08 $1C $07 | 000005D0: 24 31 43 20 24 30 31 00 21 62 07 09 2E 42 59 54 |$1C $01.!b...BYT| 000005E0: 20 24 31 35 20 24 31 30 20 24 31 43 20 24 30 43 | $15 $10 $1C $0C| 000005F0: 20 24 31 43 20 24 30 37 00 21 6C 07 09 2E 42 59 | $1C $07.!l...BY| 00000600: 54 20 24 31 35 20 24 30 35 20 24 31 43 20 24 30 |T $15 $05 $1C $0| 00000610: 30 20 24 31 43 20 24 30 43 00 21 76 07 09 2E 42 |0 $1C $0C.!v...B| 00000620: 59 54 20 24 31 35 20 24 30 44 20 24 31 43 20 24 |YT $15 $0D $1C $| 00000630: 30 36 20 24 31 43 20 24 30 30 00 21 80 07 09 2E |06 $1C $00.!....| 00000640: 42 59 54 20 24 31 35 20 24 30 32 20 24 31 43 20 |BYT $15 $02 $1C | 00000650: 24 30 42 20 24 31 43 20 24 30 36 00 21 8A 07 09 |$0B $1C $06.!...| 00000660: 2E 42 59 54 20 24 31 35 20 24 30 41 20 24 31 43 |.BYT $15 $0A $1C| 00000670: 20 24 31 31 20 24 31 43 20 24 30 42 00 21 94 07 | $11 $1C $0B.!..| 00000680: 09 2E 42 59 54 20 24 31 35 20 24 31 32 20 24 31 |..BYT $15 $12 $1| 00000690: 43 20 24 30 35 20 24 31 43 20 24 31 31 00 21 9E |C $05 $1C $11.!.| 000006A0: 07 09 2E 42 59 54 20 24 31 35 20 24 30 37 20 24 |...BYT $15 $07 $| 000006B0: 31 43 20 24 30 41 20 24 31 43 20 24 30 35 00 21 |1C $0A $1C $05.!| 000006C0: A8 07 09 2E 42 59 54 20 24 31 35 20 24 30 46 20 |....BYT $15 $0F | 000006D0: 24 31 43 20 24 31 30 20 24 31 43 20 24 30 41 00 |$1C $10 $1C $0A.| 000006E0: 21 B2 07 09 2E 42 59 54 20 24 31 35 20 24 30 34 |!....BYT $15 $04| 000006F0: 20 24 31 43 20 24 30 34 20 24 31 43 20 24 31 30 | $1C $04 $1C $10| 00000700: 00 21 BC 07 09 2E 42 59 54 20 24 31 35 20 24 30 |.!....BYT $15 $0| 00000710: 43 20 24 31 43 20 24 30 39 20 24 31 43 20 24 30 |C $1C $09 $1C $0| 00000720: 34 00 21 C6 07 09 2E 42 59 54 20 24 31 35 20 24 |4.!....BYT $15 $| 00000730: 30 31 20 24 31 43 20 24 30 46 20 24 31 43 20 24 |01 $1C $0F $1C $| 00000740: 30 39 00 21 D0 07 09 2E 42 59 54 20 24 31 35 20 |09.!....BYT $15 | 00000750: 24 30 39 20 24 31 43 20 24 30 33 20 24 31 43 20 |$09 $1C $03 $1C | 00000760: 24 30 46 00 21 DA 07 09 2E 42 59 54 20 24 31 35 |$0F.!....BYT $15| 00000770: 20 24 31 31 20 24 31 44 20 24 30 39 20 24 31 43 | $11 $1D $09 $1C| 00000780: 20 24 30 33 00 21 E4 07 09 2E 42 59 54 20 24 31 | $03.!....BYT $1| 00000790: 35 20 24 30 36 20 24 31 36 20 24 30 45 20 24 31 |5 $06 $16 $0E $1| 000007A0: 44 20 24 30 39 00 0D EE 07 09 2E 42 59 54 20 24 |D $09......BYT $| 000007B0: 30 30 00 09 F8 07 01 2E 4F 55 54 00 15 02 08 00 |00......OUT.....| 000007C0: 2A 20 20 20 20 20 20 20 20 3D 20 24 30 34 45 45 |* = $04EE| 000007D0: 00 16 0C 08 09 2E 4F 55 54 20 22 47 45 31 32 38 |......OUT "GE128| 000007E0: 32 2E 4F 42 4A 22 00 14 16 08 00 46 4F 52 4D 41 |2.OBJ".....FORMA| 000007F0: 54 20 4C 44 41 20 23 24 31 41 00 0E 20 08 01 53 |T LDA #$1A.. ..S| 00000800: 54 41 20 24 31 43 30 35 00 0D 2A 08 01 4C 44 58 |TA $1C05..*..LDX| 00000810: 20 23 24 31 35 00 0C 34 08 01 53 54 58 20 24 30 | #$15..4..STX $0| 00000820: 41 00 0D 3E 08 01 4C 44 41 20 23 24 45 30 00 0C |A..>..LDA #$E0..| 00000830: 48 08 01 53 54 41 20 24 30 32 00 12 52 08 00 57 |H..STA $02..R..W| 00000840: 41 49 54 58 20 4C 44 41 20 24 30 32 00 0E 5C 08 |AITX LDA $02..\.| 00000850: 01 42 4D 49 20 57 41 49 54 58 00 08 66 08 01 52 |.BMI WAITX..f..R| 00000860: 54 53 00 16 70 08 00 50 55 46 46 45 52 32 20 20 |TS..p..PUFFER2 | 00000870: 4C 44 41 20 23 24 31 33 00 0C 7A 08 02 53 54 41 |LDA #$13..z..STA| 00000880: 20 24 34 33 00 0D 84 08 09 4C 44 41 20 23 24 30 | $43.....LDA #$0| 00000890: 30 00 0C 8E 08 01 53 54 41 20 24 31 42 00 0D 98 |0.....STA $1B...| 000008A0: 08 01 4C 44 59 20 23 24 30 30 00 0D A2 08 01 4C |..LDY #$00.....L| 000008B0: 44 58 20 23 24 30 30 00 11 AC 08 00 4C 4F 50 41 |DX #$00.....LOPA| 000008C0: 20 4C 44 41 20 24 33 39 00 10 B6 08 09 53 54 41 | LDA $39.....STA| 000008D0: 20 24 30 33 30 30 2C 59 00 08 C0 08 01 49 4E 59 | $0300,Y.....INY| 000008E0: 00 08 CA 08 01 49 4E 59 00 0C D4 08 01 4C 44 41 |.....INY.....LDA| 000008F0: 20 24 31 42 00 10 DE 08 09 53 54 41 20 24 30 33 | $1B.....STA $03| 00000900: 30 30 2C 59 00 08 E8 08 01 49 4E 59 00 0C F2 08 |00,Y.....INY....| 00000910: 01 4C 44 41 20 24 30 41 00 10 FC 08 09 53 54 41 |.LDA $0A.....STA| 00000920: 20 24 30 33 30 30 2C 59 00 08 06 09 01 49 4E 59 | $0300,Y.....INY| 00000930: 00 0C 10 09 01 4C 44 41 20 24 31 33 00 10 1A 09 |.....LDA $13....| 00000940: 09 53 54 41 20 24 30 33 30 30 2C 59 00 08 24 09 |.STA $0300,Y..$.| 00000950: 01 49 4E 59 00 0C 2E 09 01 4C 44 41 20 24 31 32 |.INY.....LDA $12| 00000960: 00 10 38 09 09 53 54 41 20 24 30 33 30 30 2C 59 |..8..STA $0300,Y| 00000970: 00 08 42 09 01 49 4E 59 00 0D 4C 09 01 4C 44 41 |..B..INY..L..LDA| 00000980: 20 23 24 30 46 00 10 56 09 09 53 54 41 20 24 30 | #$0F..V..STA $0| 00000990: 33 30 30 2C 59 00 08 60 09 01 49 4E 59 00 10 6A |300,Y..`..INY..j| 000009A0: 09 09 53 54 41 20 24 30 33 30 30 2C 59 00 08 74 |..STA $0300,Y..t| 000009B0: 09 09 49 4E 59 00 0D 7E 09 01 4C 44 41 20 23 24 |..INY..~..LDA #$| 000009C0: 30 30 00 10 88 09 09 45 4F 52 20 24 30 32 46 41 |00.....EOR $02FA| 000009D0: 2C 59 00 10 92 09 09 45 4F 52 20 24 30 32 46 42 |,Y.....EOR $02FB| 000009E0: 2C 59 00 10 9C 09 09 45 4F 52 20 24 30 32 46 43 |,Y.....EOR $02FC| 000009F0: 2C 59 00 10 A6 09 09 45 4F 52 20 24 30 32 46 44 |,Y.....EOR $02FD| 00000A00: 2C 59 00 10 B0 09 09 53 54 41 20 24 30 32 46 39 |,Y.....STA $02F9| 00000A10: 2C 59 00 0C BA 09 01 49 4E 43 20 24 31 42 00 0C |,Y.....INC $1B..| 00000A20: C4 09 01 4C 44 41 20 24 31 42 00 0C CE 09 09 43 |...LDA $1B.....C| 00000A30: 4D 50 20 24 34 33 00 0D D8 09 01 42 43 43 20 4C |MP $43.....BCC L| 00000A40: 4F 50 41 00 0D E2 09 09 4C 44 41 20 23 24 30 33 |OPA.....LDA #$03| 00000A50: 00 0C EC 09 01 53 54 41 20 24 33 31 00 08 F6 09 |.....STA $31....| 00000A60: 01 54 59 41 00 08 00 0A 01 50 48 41 00 08 0A 0A |.TYA.....PHA....| 00000A70: 01 54 58 41 00 15 14 0A 00 4C 4F 50 42 20 53 54 |.TXA.....LOPB ST| 00000A80: 41 20 24 30 37 30 30 2C 58 00 08 1E 0A 01 49 4E |A $0700,X.....IN| 00000A90: 58 00 0D 28 0A 01 42 4E 45 20 4C 4F 50 42 00 0E |X..(..BNE LOPB..| 00000AA0: 32 0A 01 4A 53 52 20 24 46 45 33 30 00 08 3C 0A |2..JSR $FE30..<.| 00000AB0: 01 50 4C 41 00 08 46 0A 01 54 41 59 00 08 50 0A |.PLA..F..TAY..P.| 00000AC0: 01 44 45 59 00 0E 5A 0A 01 4A 53 52 20 24 46 44 |.DEY..Z..JSR $FD| 00000AD0: 45 35 00 0E 64 0A 01 4A 53 52 20 24 46 44 46 35 |E5..d..JSR $FDF5| 00000AE0: 00 0D 6E 0A 01 4C 44 41 20 23 24 30 37 00 0C 78 |..n..LDA #$07..x| 00000AF0: 0A 01 53 54 41 20 24 33 31 00 0E 82 0A 01 4A 53 |..STA $31.....JS| 00000B00: 52 20 24 46 35 45 39 00 0C 8C 0A 01 53 54 41 20 |R $F5E9.....STA | 00000B10: 24 33 41 00 0E 96 0A 01 4A 53 52 20 24 46 37 38 |$3A.....JSR $F78| 00000B20: 46 00 0D A0 0A 01 4C 44 41 20 23 24 30 30 00 0C |F.....LDA #$00..| 00000B30: AA 0A 01 53 54 41 20 24 33 32 00 0E B4 0A 01 4A |...STA $32.....J| 00000B40: 53 52 20 24 46 45 30 45 00 16 BE 0A 00 46 4F 52 |SR $FE0E.....FOR| 00000B50: 4C 4F 4F 50 20 20 4C 44 41 20 23 24 46 46 00 0E |LOOP LDA #$FF..| 00000B60: C8 0A 01 53 54 41 20 24 31 43 30 31 00 0D D2 0A |...STA $1C01....| 00000B70: 01 4C 44 58 20 23 24 30 35 00 14 DC 0A 00 57 41 |.LDX #$05.....WA| 00000B80: 49 54 41 20 42 56 43 20 57 41 49 54 41 00 08 E6 |ITA BVC WAITA...| 00000B90: 0A 01 43 4C 56 00 08 F0 0A 01 44 45 58 00 0E FA |..CLV.....DEX...| 00000BA0: 0A 01 42 4E 45 20 57 41 49 54 41 00 0D 04 0B 01 |..BNE WAITA.....| 00000BB0: 4C 44 58 20 23 24 30 41 00 0C 0E 0B 01 4C 44 59 |LDX #$0A.....LDY| 00000BC0: 20 24 33 32 00 14 18 0B 00 57 41 49 54 42 20 42 | $32.....WAITB B| 00000BD0: 56 43 20 57 41 49 54 42 00 08 22 0B 01 43 4C 56 |VC WAITB.."..CLV| 00000BE0: 00 10 2C 0B 09 4C 44 41 20 24 30 33 30 30 2C 59 |..,..LDA $0300,Y| 00000BF0: 00 0E 36 0B 01 53 54 41 20 24 31 43 30 31 00 08 |..6..STA $1C01..| 00000C00: 40 0B 01 49 4E 59 00 08 4A 0B 01 44 45 58 00 0E |@..INY..J..DEX..| 00000C10: 54 0B 09 42 4E 45 20 57 41 49 54 42 00 0D 5E 0B |T..BNE WAITB..^.| 00000C20: 01 4C 44 58 20 23 24 30 39 00 14 68 0B 00 57 41 |.LDX #$09..h..WA| 00000C30: 49 54 43 20 42 56 43 20 57 41 49 54 43 00 08 72 |ITC BVC WAITC..r| 00000C40: 0B 01 43 4C 56 00 0D 7C 0B 01 4C 44 41 20 23 24 |..CLV..|..LDA #$| 00000C50: 36 37 00 0E 86 0B 01 53 54 41 20 24 31 43 30 31 |67.....STA $1C01| 00000C60: 00 08 90 0B 01 44 45 58 00 0E 9A 0B 01 42 4E 45 |.....DEX.....BNE| 00000C70: 20 57 41 49 54 43 00 0D A4 0B 01 4C 44 41 20 23 | WAITC.....LDA #| 00000C80: 24 46 46 00 0D AE 0B 01 4C 44 58 20 23 24 30 35 |$FF.....LDX #$05| 00000C90: 00 14 B8 0B 00 57 41 49 54 44 20 42 56 43 20 57 |.....WAITD BVC W| 00000CA0: 41 49 54 44 00 08 C2 0B 01 43 4C 56 00 0E CC 0B |AITD.....CLV....| 00000CB0: 01 53 54 41 20 24 31 43 30 31 00 08 D6 0B 01 44 |.STA $1C01.....D| 00000CC0: 45 58 00 0E E0 0B 01 42 4E 45 20 57 41 49 54 44 |EX.....BNE WAITD| 00000CD0: 00 0D EA 0B 01 4C 44 58 20 23 24 42 42 00 14 F4 |.....LDX #$BB...| 00000CE0: 0B 00 57 41 49 54 45 20 42 56 43 20 57 41 49 54 |..WAITE BVC WAIT| 00000CF0: 45 00 08 FE 0B 01 43 4C 56 00 10 08 0C 01 4C 44 |E.....CLV.....LD| 00000D00: 41 20 24 30 31 30 30 2C 58 00 0E 12 0C 01 53 54 |A $0100,X.....ST| 00000D10: 41 20 24 31 43 30 31 00 08 1C 0C 01 49 4E 58 00 |A $1C01.....INX.| 00000D20: 0E 26 0C 01 42 4E 45 20 57 41 49 54 45 00 0D 30 |.&..BNE WAITE..0| 00000D30: 0C 01 4C 44 59 20 23 24 30 30 00 14 3A 0C 00 57 |..LDY #$00..:..W| 00000D40: 41 49 54 46 20 42 56 43 20 57 41 49 54 46 00 08 |AITF BVC WAITF..| 00000D50: 44 0C 01 43 4C 56 00 10 4E 0C 01 4C 44 41 20 28 |D..CLV..N..LDA (| 00000D60: 24 33 30 29 2C 59 00 0E 58 0C 01 53 54 41 20 24 |$30),Y..X..STA $| 00000D70: 31 43 30 31 00 08 62 0C 01 49 4E 59 00 0E 6C 0C |1C01..b..INY..l.| 00000D80: 01 42 4E 45 20 57 41 49 54 46 00 0D 76 0C 01 4C |.BNE WAITF..v..L| 00000D90: 44 41 20 23 24 36 37 00 0D 80 0C 01 4C 44 58 20 |DA #$67.....LDX | 00000DA0: 23 24 30 38 00 14 8A 0C 00 57 41 49 54 47 20 42 |#$08.....WAITG B| 00000DB0: 56 43 20 57 41 49 54 47 00 08 94 0C 01 43 4C 56 |VC WAITG.....CLV| 00000DC0: 00 0E 9E 0C 01 53 54 41 20 24 31 43 30 31 00 08 |.....STA $1C01..| 00000DD0: A8 0C 01 44 45 58 00 0E B2 0C 01 42 4E 45 20 57 |...DEX.....BNE W| 00000DE0: 41 49 54 47 00 0C BC 0C 01 4C 44 41 20 24 33 32 |AITG.....LDA $32| 00000DF0: 00 08 C6 0C 01 43 4C 43 00 0D D0 0C 01 41 44 43 |.....CLC.....ADC| 00000E00: 20 23 24 30 41 00 0C DA 0C 01 53 54 41 20 24 33 | #$0A.....STA $3| 00000E10: 32 00 0C E4 0C 01 44 45 43 20 24 31 42 00 10 EE |2.....DEC $1B...| 00000E20: 0C 01 42 4E 45 20 46 4F 52 4C 4F 4F 50 00 14 F8 |..BNE FORLOOP...| 00000E30: 0C 00 57 41 49 54 48 20 42 56 43 20 57 41 49 54 |..WAITH BVC WAIT| 00000E40: 48 00 08 02 0D 01 43 4C 56 00 14 0C 0D 00 57 41 |H.....CLV.....WA| 00000E50: 49 54 49 20 42 56 43 20 57 41 49 54 49 00 08 16 |ITI BVC WAITI...| 00000E60: 0D 01 43 4C 56 00 0E 20 0D 01 4A 53 52 20 24 46 |..CLV.. ..JSR $F| 00000E70: 45 30 30 00 0E 2A 0D 01 4A 4D 50 20 24 46 44 39 |E00..*..JMP $FD9| 00000E80: 45 00 13 34 0D 00 45 52 52 4F 52 46 20 2E 42 59 |E..4..ERRORF .BY| 00000E90: 54 20 24 30 00 09 3E 0D 01 2E 4F 55 54 00 00 |T $0..>...OUT.. |
..(...;DIESES FLOPPY-PROGRAMM KOPIERT DI E.&...;SPUR 21 DER GEOS128-BOOTDISKETTE. *...;AUF DIE SPUREN 27 UND 28 UM, VERAEN -.+...;DERT DIE BAM ENTSPRECHEND, FORMAT IERT.(...;DIE SPUR 21 UND MACHT DIE DISK ETTE.....;KOPIERBAR...$..;.....* = $03 00 ;BEGINN..8...OUT "GE1281.OBJ"..B..STA RT LDX #$12..L..LDY #$00..V..LDA #$80..` ..JSR UP1..J..LDA #$42..T..CMP $06BD..~. .BNE FAIL1.....LDA #$80.....CMP $06BE... ..BEQ OKDISK.....FAIL1 LDA #$4D.....C MP $06BE.....BNE ERROR..D..JMP FORM..N.. OKDISK LDX #$00..X..LOOP LDA SECTAB,X... ..BEQ ENDCPY.....STA $0C.....LDY SECTAB+ 1,X.....LDA #$80.....JSR UP2.....LDA SEC TAB+2,X.....STA $0600..(..LDA SECTAB+3,X ..2..STA $0601..<..LDA SECTAB+4,X..F..ST A $0C..P..LDY SECTAB+5,X..Z..LDA #$90..D ..JSR UP2..N..INX..X..INX.....INX.....IN X.....INX.. ..INX.....BNE LOOP.....ERROR LDA #$FF.....STA ERRORF..H..RTS..R..END CPY LDX #$12.....LDY #$00.....LDA #$80.. ...JSR UP1.....LDA #$00.....STA $0670... ..STA $0671.....STA $0672.."..STA $0673. .,..LDA #$11..6..STA $0674..@..LDA #$FC. .J..STA $0676..T..LDA #$4D..^..STA $06BE ..H..LDX #$12..R..LDY #$00..|..LDA #$90. ....JSR UP1.....FORM RTS.....UP1 STX $0C.....UP2 STY $0D.....SEI.....STA $03 ..B..LDA $1C00..L..ORA #$08..V..STA $1C0 0.....CLI.....WAIT LDA $03.....BMI WAIT. ....LDA $1C00.....AND #$F7.....STA $1C00 .....RTS.*&..SECTAB .BYT $14 $0A $1C $ 0E $14 $0A.!0...BYT $15 $0E $1C $02 $1C $0E.!:...BYT $15 $03 $1C $08 $1C $02.!D. ..BYT $15 $0B $1C $0D $1C $08.!N...BYT $ 15 $00 $1C $01 $1C $0D.!X...BYT $15 $08 $1C $07 $1C $01.!B...BYT $15 $10 $1C $0C $1C $07.!L...BYT $15 $05 $1C $00 $1C $0 C.!V...BYT $15 $0D $1C $06 $1C $00.!.... BYT $15 $02 $1C $0B $1C $06.!....BYT $15 $0A $1C $11 $1C $0B.!....BYT $15 $12 $1 C $05 $1C $11.!....BYT $15 $07 $1C $0A $ 1C $05.!....BYT $15 $0F $1C $10 $1C $0A. !....BYT $15 $04 $1C $04 $1C $10.!....BY T $15 $0C $1C $09 $1C $04.!F...BYT $15 $ 01 $1C $0F $1C $09.!P...BYT $15 $09 $1C $03 $1C $0F.!Z...BYT $15 $11 $1D $09 $1C $03.!....BYT $15 $06 $16 $0E $1D $09... ...BYT $00......OUT.....* = $04EE ......OUT "GE1282.OBJ".....FORMAT LDA #$ 1A.. ..STA $1C05..*..LDX #$15..4..STX $0 A..>..LDA #$E0..H..STA $02..R..WAITX LDA $02..\..BMI WAITX..F..RTS..P..PUFFER2 LDA #$13..Z..STA $43.....LDA #$00.....ST A $1B.....LDY #$00.....LDX #$00.....LOPA LDA $39.....STA $0300,Y.....INY..J..INY ..T..LDA $1B.....STA $0300,Y.....INY.... .LDA $0A.....STA $0300,Y.....INY.....LDA $13.....STA $0300,Y..$..INY.....LDA $12 ..8..STA $0300,Y..B..INY..L..LDA #$0F..V ..STA $0300,Y..`..INY..J..STA $0300,Y..T ..INY..~..LDA #$00.....EOR $02FA,Y.....E OR $02FB,Y.....EOR $02FC,Y.....EOR $02FD ,Y.....STA $02F9,Y.....INC $1B..D..LDA $ 1B..N..CMP $43..X..BCC LOPA.....LDA #$03 .....STA $31.....TYA.....PHA.....TXA.... .LOPB STA $0700,X.....INX..(..BNE LOPB.. 2..JSR $FE30..<..PLA..F..TAY..P..DEY..Z. .JSR $FDE5..D..JSR $FDF5..N..LDA #$07..X ..STA $31.....JSR $F5E9.....STA $3A..... JSR $F78F.. ..LDA #$00.....STA $32.....J SR $FE0E.....FORLOOP LDA #$FF..H..STA $ 1C01..R..LDX #$05.....WAITA BVC WAITA... ..CLV.....DEX.....BNE WAITA.....LDX #$0A .....LDY $32.....WAITB BVC WAITB.."..CLV ..,..LDA $0300,Y..6..STA $1C01..@..INY.. J..DEX..T..BNE WAITB..^..LDX #$09..H..WA ITC BVC WAITC..R..CLV..|..LDA #$67.....S TA $1C01.....DEX.....BNE WAITC.....LDA # $FF.....LDX #$05.....WAITD BVC WAITD..B. .CLV..L..STA $1C01..V..DEX.....BNE WAITD .....LDX #$BB.....WAITE BVC WAITE.....CL V.....LDA $0100,X.....STA $1C01.....INX. .&..BNE WAITE..0..LDY #$00..:..WAITF BVC WAITF..D..CLV..N..LDA ($30),Y..X..STA $ 1C01..B..INY..L..BNE WAITF..V..LDA #$67. ....LDX #$08.....WAITG BVC WAITG.....CLV .....STA $1C01.....DEX.....BNE WAITG.... .LDA $32..F..CLC..P..ADC #$0A..Z..STA $3 2.....DEC $1B.....BNE FORLOOP.....WAITH BVC WAITH.....CLV.....WAITI BVC WAITI... ..CLV.. ..JSR $FE00..*..JMP $FD9E..4..ER RORF .BYT $0..>...OUT..
> CLICK IMAGE PREVIEW FOR FULL MODAL