8/2LEKTION
FILE INFORMATION
FILENAME(S): 8/2LEKTION
FILE TYPE(S): PRG
FILE SIZE: 2.1K
FIRST SEEN: 2025-10-20 14:37:14
APPEARS ON: 1 disk(s)
FILE HASH
2bc9b7f6c6cabaafb5fc20d631735b0d1d2a573c3cc2facc08341fb0b29a7204
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| HANS | 8/2LEKTION | PRG | Treasure Chest - LehrerMIL | 10 | 6 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 45 49 4E 4C 45 53 45 4E 00 0A 1B DA 07 99 22 DD |EINLESEN......".| 00000010: 11 9D DD 20 20 54 41 58 20 20 20 20 20 20 20 20 |... TAX | 00000020: 20 20 49 4E 20 58 52 20 53 43 48 49 45 42 45 4E | IN XR SCHIEBEN| 00000030: 00 31 1B E4 07 99 22 DD 11 9D DD 20 20 4C 44 41 |.1....".... LDA| 00000040: 20 23 24 30 44 20 20 20 20 20 28 41 43 29 3D 27 | #$0D (AC)='| 00000050: 52 45 54 55 52 4E 27 00 5C 1B F8 07 99 22 DD 11 |RETURN'.\...."..| 00000060: 9D DD 20 20 4A 53 52 20 24 46 46 44 32 20 20 20 |.. JSR $FFD2 | 00000070: 20 41 42 42 52 55 43 48 20 44 45 53 20 49 4E 50 | ABBRUCH DES INP| 00000080: 55 54 00 85 1B 02 08 99 22 DD 11 9D DD 20 20 43 |UT......".... C| 00000090: 50 58 20 23 24 34 41 20 20 20 20 20 49 53 54 20 |PX #$4A IST | 000000A0: 45 53 20 45 49 4E 20 27 4A 27 3F 00 A7 1B 07 08 |ES EIN 'J'?.....| 000000B0: 99 22 DD 11 9D DD B0 5F 42 45 51 20 24 30 34 20 |."....._BEQ $04 | 000000C0: 20 20 20 20 20 4A 41 3A 20 45 4E 44 45 00 D2 1B | JA: ENDE...| 000000D0: 0C 08 99 22 DD DD 11 9D 9D DD DD 20 43 50 58 20 |..."....... CPX | 000000E0: 23 24 34 45 20 20 20 20 20 49 53 54 20 45 53 20 |#$4E IST ES | 000000F0: 45 49 4E 20 27 4E 27 3F 00 FD 1B 16 08 99 22 DD |EIN 'N'?......".| 00000100: DD 11 9D 9D AD C0 5F 42 4E 45 20 24 45 46 20 20 |......_BNE $EF | 00000110: 20 20 20 20 4E 45 49 4E 3A 20 56 4F 4E 20 56 4F | NEIN: VON VO| 00000120: 52 4E 45 00 2E 1C 2A 08 99 22 20 DD 11 9D AD C0 |RNE...*.." .....| 00000130: 52 54 53 20 20 20 20 20 20 20 20 20 20 52 55 45 |RTS RUE| 00000140: 43 4B 53 50 52 55 4E 47 20 4D 49 54 20 5A 45 49 |CKSPRUNG MIT ZEI| 00000150: 43 48 45 4E 00 4B 1C 34 08 99 22 11 20 20 20 20 |CHEN.K.4..". | 00000160: 20 20 20 20 20 20 20 20 20 20 20 20 49 4D 20 58 | IM X| 00000170: 52 00 63 1C 3E 08 49 B2 31 30 3A 8D 35 30 30 30 |R.c.>.I.10:.5000| 00000180: 3A 8B 46 4C A7 31 38 30 30 00 92 1C 98 08 99 22 |:.FL.1800......"| 00000190: 93 44 41 53 20 50 52 4F 47 52 41 4D 4D 20 4C 49 |.DAS PROGRAMM LI| 000001A0: 45 53 54 20 20 45 49 4E 20 57 4F 52 54 20 20 55 |EST EIN WORT U| 000001B0: 45 42 45 52 20 44 49 45 00 C1 1C AC 08 99 22 11 |EBER DIE......".| 000001C0: 54 41 53 54 41 54 55 52 20 45 49 4E 2E 20 20 44 |TASTATUR EIN. D| 000001D0: 45 52 20 45 52 53 54 45 20 42 55 43 48 53 54 41 |ER ERSTE BUCHSTA| 000001E0: 42 45 20 57 49 52 44 00 F0 1C B6 08 99 22 11 41 |BE WIRD......".A| 000001F0: 55 46 20 27 4A 27 20 55 4E 44 20 27 4E 27 20 47 |UF 'J' UND 'N' G| 00000200: 45 50 52 55 45 46 54 2E 20 20 20 4C 49 45 47 54 |EPRUEFT. LIEGT| 00000210: 20 45 49 4E 45 52 00 1F 1D C0 08 99 22 11 44 49 | EINER......".DI| 00000220: 45 53 45 52 20 20 42 45 49 44 45 4E 20 20 42 55 |ESER BEIDEN BU| 00000230: 43 48 53 54 41 42 45 4E 20 56 4F 52 2C 20 20 53 |CHSTABEN VOR, S| 00000240: 4F 20 45 52 2D 00 4E 1D CA 08 99 22 11 46 4F 4C |O ER-.N....".FOL| 00000250: 47 54 20 44 45 52 20 52 55 45 43 4B 53 50 52 55 |GT DER RUECKSPRU| 00000260: 4E 47 20 20 20 4D 49 54 20 44 45 4D 20 5A 45 49 |NG MIT DEM ZEI| 00000270: 43 48 45 4E 00 7D 1D D4 08 99 22 11 27 4A 27 20 |CHEN.}....".'J' | 00000280: 28 3D 24 34 41 29 20 4F 44 45 52 20 27 4E 27 20 |(=$4A) ODER 'N' | 00000290: 28 3D 24 34 45 29 20 49 4D 20 58 52 2E 20 20 20 |(=$4E) IM XR. | 000002A0: 41 4E 2D 00 AB 1D DE 08 99 22 11 44 45 52 4E 46 |AN-......".DERNF| 000002B0: 41 4C 4C 53 20 57 49 52 44 20 44 49 45 20 45 49 |ALLS WIRD DIE EI| 000002C0: 4E 47 41 42 45 20 57 49 45 44 45 52 48 4F 4C 54 |NGABE WIEDERHOLT| 000002D0: 2E 00 DB 1D E8 08 99 22 11 11 44 45 4D 20 50 52 |......."..DEM PR| 000002E0: 4F 47 52 41 4D 4D 20 20 57 55 45 52 44 45 20 4E |OGRAMM WUERDE N| 000002F0: 55 4E 20 4E 4F 43 48 20 20 44 49 45 20 56 45 52 |UN NOCH DIE VER| 00000300: 2D 00 0A 1E F2 08 99 22 11 5A 57 45 49 47 55 4E |-......".ZWEIGUN| 00000310: 47 20 49 4E 20 41 42 48 41 45 4E 47 49 47 4B 45 |G IN ABHAENGIGKE| 00000320: 49 54 20 20 56 4F 4E 20 44 45 52 20 45 49 4E 2D |IT VON DER EIN-| 00000330: 00 39 1E F7 08 99 22 11 47 41 42 45 20 46 4F 4C |.9....".GABE FOL| 00000340: 47 45 4E 2E 20 20 20 44 41 53 20 53 4F 4C 4C 54 |GEN. DAS SOLLT| 00000350: 45 4E 20 53 49 45 20 53 49 43 48 20 41 4C 53 00 |EN SIE SICH ALS.| 00000360: 5B 1E FC 08 99 22 11 55 45 42 55 4E 47 53 41 55 |[....".UEBUNGSAU| 00000370: 46 47 41 42 45 20 55 45 42 45 52 4C 45 47 45 4E |FGABE UEBERLEGEN| 00000380: 2E 00 73 1E 06 09 49 B2 31 31 3A 8D 35 30 30 30 |..s...I.11:.5000| 00000390: 3A 8B 46 4C A7 32 30 30 30 00 A0 1E 60 09 99 22 |:.FL.2000...`.."| 000003A0: 93 4E 55 4E 20 45 49 4E 45 20 44 45 4D 4F 4E 53 |.NUN EINE DEMONS| 000003B0: 54 52 41 54 49 4F 4E 3A 22 3A 99 55 24 3B 55 24 |TRATION:":.U$;U$| 000003C0: 3B 22 C5 C5 C5 22 00 CF 1E 6A 09 99 22 11 50 52 |;"..."...j..".PR| 000003D0: 4F 42 49 45 52 45 4E 20 53 49 45 20 49 4E 53 42 |OBIEREN SIE INSB| 000003E0: 45 53 4F 4E 44 45 52 45 2C 57 41 53 20 42 45 49 |ESONDERE,WAS BEI| 000003F0: 20 46 41 4C 2D 00 FE 1E 74 09 99 22 11 53 43 48 | FAL-...t..".SCH| 00000400: 45 4E 20 45 49 4E 47 41 42 45 4E 20 50 41 53 53 |EN EINGABEN PASS| 00000410: 49 45 52 54 20 21 20 28 5A 2E 42 2E 27 52 45 54 |IERT ! (Z.B.'RET| 00000420: 55 52 4E 27 00 2C 1F 7E 09 99 22 11 4F 44 45 52 |URN'.,.~..".ODER| 00000430: 20 41 4E 44 45 52 45 20 42 55 43 48 53 54 41 42 | ANDERE BUCHSTAB| 00000440: 45 4E 20 41 4C 53 20 4A 20 55 4E 44 20 4E 29 2E |EN ALS J UND N).| 00000450: 11 11 00 43 1F 88 09 9E 20 39 32 36 3A 8F 20 42 |...C.... 926:. B| 00000460: 45 49 53 50 49 45 4C 20 32 00 6C 1F 8D 09 99 22 |EISPIEL 2.l...."| 00000470: 11 11 11 4F 4B 20 2D 20 4A 45 54 5A 54 20 4B 41 |...OK - JETZT KA| 00000480: 4D 20 44 45 52 20 52 55 45 43 4B 53 50 52 55 4E |M DER RUECKSPRUN| 00000490: 47 2E 00 77 1F 92 09 8D 31 30 30 30 30 00 88 1F |G..w....10000...| 000004A0: B0 09 8B 58 24 B2 22 4A 22 A7 32 34 30 30 00 A0 |...X$."J".2400..| 000004B0: 1F CE 09 49 B2 31 32 3A 8D 35 30 30 30 3A 8B 46 |...I.12:.5000:.F| 000004C0: 4C A7 32 32 30 30 00 B6 1F 28 0A 99 22 93 41 55 |L.2200...(..".AU| 000004D0: 46 47 41 42 45 4E 3A 22 3A 99 55 24 00 E5 1F 32 |FGABEN:":.U$...2| 000004E0: 0A 99 22 11 31 2E 20 53 43 48 52 45 49 42 45 4E |..".1. SCHREIBEN| 000004F0: 20 53 49 45 20 20 48 49 4E 54 45 52 20 44 41 53 | SIE HINTER DAS| 00000500: 20 4C 45 54 5A 54 45 20 50 47 4D 00 14 20 3C 0A | LETZTE PGM.. <.| 00000510: 99 22 11 20 20 20 45 49 4E 45 20 41 42 46 52 41 |.". EINE ABFRA| 00000520: 47 45 2C 20 20 57 45 4C 43 48 45 52 20 46 41 4C |GE, WELCHER FAL| 00000530: 4C 20 56 4F 52 4C 49 45 47 54 00 3E 20 46 0A 99 |L VORLIEGT.> F..| 00000540: 22 11 20 20 20 4D 49 54 20 45 4E 54 53 50 52 45 |". MIT ENTSPRE| 00000550: 43 48 45 4E 44 45 52 20 56 45 52 5A 57 45 49 47 |CHENDER VERZWEIG| 00000560: 55 4E 47 2E 00 6E 20 50 0A 99 22 11 11 32 2E 20 |UNG..n P.."..2. | 00000570: 57 41 53 20 50 41 53 53 49 45 52 54 2C 57 45 4E |WAS PASSIERT,WEN| 00000580: 4E 20 53 49 45 20 49 4D 20 4C 45 54 5A 54 45 4E |N SIE IM LETZTEN| 00000590: 20 50 47 4D 00 9D 20 5A 0A 99 22 11 20 20 20 44 | PGM.. Z..". D| 000005A0: 49 45 20 20 44 52 49 54 54 45 20 55 4E 44 20 20 |IE DRITTE UND | 000005B0: 56 49 45 52 54 45 20 20 5A 45 49 4C 45 20 20 57 |VIERTE ZEILE W| 000005C0: 45 47 2D 00 B0 20 64 0A 99 22 11 20 20 20 4C 41 |EG-.. d..". LA| 000005D0: 53 53 45 4E 20 3F 00 DF 20 6E 0A 99 22 11 33 2E |SSEN ?.. n..".3.| 000005E0: 20 45 52 57 45 49 54 45 52 4E 20 53 49 45 20 44 | ERWEITERN SIE D| 000005F0: 41 53 20 50 47 4D 20 49 4D 20 45 52 53 54 45 4E |AS PGM IM ERSTEN| 00000600: 20 42 45 49 2D 00 0E 21 78 0A 99 22 11 20 20 20 | BEI-..!x..". | 00000610: 53 50 49 45 4C 20 44 45 52 41 52 54 2C 20 20 44 |SPIEL DERART, D| 00000620: 41 53 53 20 41 4C 4C 45 20 4C 45 45 52 5A 45 49 |ASS ALLE LEERZEI| 00000630: 43 48 45 4E 00 2D 21 82 0A 99 22 11 20 20 20 55 |CHEN.-!...". U| 00000640: 4E 54 45 52 44 52 55 45 43 4B 54 20 57 45 52 44 |NTERDRUECKT WERD| 00000650: 45 4E 2E 00 45 21 96 0A 49 B2 31 33 3A 8D 35 30 |EN..E!..I.13:.50| 00000660: 30 30 3A 8B 46 4C A7 32 34 30 30 00 74 21 FA 0A |00:.FL.2400.t!..| 00000670: 99 22 93 44 49 45 20 4C 4F 45 53 55 4E 47 20 46 |.".DIE LOESUNG F| 00000680: 55 52 20 41 55 46 47 41 42 45 20 33 20 46 49 4E |UR AUFGABE 3 FIN| 00000690: 44 45 4E 20 53 49 45 20 49 4D 00 87 21 04 0B 99 |DEN SIE IM..!...| 000006A0: 22 11 52 41 4D 20 41 42 20 39 34 34 2E 00 CD 21 |".RAM AB 944...!| 000006B0: 5E 0B 99 22 11 11 11 11 11 11 11 11 11 11 11 11 |^.."............| 000006C0: 1D 1D 2D 20 53 45 49 54 45 20 31 34 20 2D 20 20 |..- SEITE 14 - | 000006D0: 3C 2B 3E 20 91 A4 A4 A4 A4 11 9D 9D 9D 9D 12 45 |<+> ...........E| 000006E0: 4E 44 45 92 20 3C 2D 3E 20 56 4F 4E 20 56 4F 52 |NDE. <-> VON VOR| 000006F0: 4E 45 22 00 DD 21 F4 0B 8D 35 30 32 30 3A 91 46 |NE"..!...5020:.F| 00000700: 4C 89 30 00 E3 21 FE 0B 80 00 F5 21 88 13 8F 20 |L.0..!.....!... | 00000710: 55 4D 42 4C 41 45 54 54 45 52 4E 00 3F 22 92 13 |UMBLAETTERN.?"..| 00000720: 99 22 13 11 11 11 11 11 11 11 11 11 11 11 11 11 |."..............| 00000730: 11 11 11 11 11 11 11 11 11 11 11 20 20 2D 20 53 |........... - S| 00000740: 45 49 54 45 22 3B 49 3B 22 2D 20 20 3C 2B 3E 20 |EITE";I;"- <+> | 00000750: 57 45 49 54 45 52 20 20 3C 2D 3E 20 5A 55 52 55 |WEITER <-> ZURU| 00000760: 45 43 4B 22 3B 00 51 22 9C 13 81 49 B2 30 A4 31 |ECK";.Q"...I.0.1| 00000770: 31 3A A1 58 24 3A 82 00 65 22 A6 13 A1 58 24 3A |1:.X$:..e"...X$:| 00000780: 8B 58 24 B2 22 22 A7 35 30 33 30 00 78 22 B0 13 |.X$."".5030.x"..| 00000790: 8B 58 24 B2 22 2B 22 A7 46 4C B2 30 3A 8E 00 8B |.X$."+".FL.0:...| 000007A0: 22 BA 13 8B 58 24 B2 22 2D 22 A7 46 4C B2 31 3A |"...X$."-".FL.1:| 000007B0: 8E 00 95 22 C4 13 89 35 30 33 30 00 BC 22 10 27 |..."...5030..".'| 000007C0: 99 22 11 4E 4F 43 48 4D 41 4C 20 28 4A 2F 4E 29 |.".NOCHMAL (J/N)| 000007D0: 20 3F 22 3B 3A 81 49 B2 30 A4 31 31 3A A1 58 24 | ?";:.I.0.11:.X$| 000007E0: 3A 82 00 CE 22 1A 27 81 49 B2 30 A4 31 31 3A A1 |:...".'.I.0.11:.| 000007F0: 58 24 3A 82 00 E3 22 24 27 A1 58 24 3A 8B 58 24 |X$:..."$'.X$:.X$| 00000800: B2 22 22 A7 31 30 30 32 30 00 FA 22 2E 27 8B 58 |."".10020..".'.X| 00000810: 24 B2 22 4E 22 A7 99 22 20 4E 45 49 4E 22 3A 8E |$."N".." NEIN":.| 00000820: 00 0D 23 38 27 8B 58 24 B3 B1 22 4A 22 A7 31 30 |..#8'.X$.."J".10| 00000830: 30 32 30 00 13 23 42 27 8E 00 00 00 49 52 |020..#B'....IR |
EINLESEN...Z..".... TAX IN XR
SCHIEBEN.1....".... LDA #$0D (AC)='
RETURN'.\....".... JSR $FFD2 ABBRUCH
DES INPUT......".... CPX #$4A IST
ES EIN 'J'?......"....._BEQ $04 JA:
ENDE.R...."....... CPX #$4E IST ES
EIN 'N'?......"......._BNE $EF NEIN
: VON VORNE...*.." .....RTS RUE
CKSPRUNG MIT ZEICHEN.K.4..".
IM XR.C.>.I.10:.5000:.FL.1800......"
.DAS PROGRAMM LIEST EIN WORT UEBER DIE
.A....".TASTATUR EIN. DER ERSTE BUCHSTA
BE WIRD......".AUF 'J' UND 'N' GEPRUEFT.
LIEGT EINER......".DIESER BEIDEN BU
CHSTABEN VOR, SO ER-.N.J..".FOLGT DER R
UECKSPRUNG MIT DEM ZEICHEN.}.T..".'J'
(=$4A) ODER 'N' (=$4E) IM XR. AN-.....
.".DERNFALLS WIRD DIE EINGABE WIEDERHOLT
......."..DEM PROGRAMM WUERDE NUN NOCH
DIE VER-......".ZWEIGUNG IN ABHAENGIGKE
IT VON DER EIN-.9....".GABE FOLGEN. D
AS SOLLTEN SIE SICH ALS.[....".UEBUNGSAU
FGABE UEBERLEGEN..S...I.11:.5000:.FL.200
0. .`..".NUN EINE DEMONSTRATION:":.U$;U$
;"EEE".O.J..".PROBIEREN SIE INSBESONDERE
,WAS BEI FAL-...T..".SCHEN EINGABEN PASS
IERT ! (Z.B.'RETURN'.,.~..".ODER ANDERE
BUCHSTABEN ALS J UND N)....C.... 926:. B
EISPIEL 2.L...."...OK - JETZT KAM DER RU
ECKSPRUNG..W....10000......X$."J".2400.
.N.I.12:.5000:.FL.2200...(..".AUFGABEN:"
:.U$...2..".1. SCHREIBEN SIE HINTER DAS
LETZTE PGM.. <..". EINE ABFRAGE, WEL
CHER FALL VORLIEGT.> F..". MIT ENTSPRE
CHENDER VERZWEIGUNG..N P.."..2. WAS PASS
IERT,WENN SIE IM LETZTEN PGM.. Z..". D
IE DRITTE UND VIERTE ZEILE WEG-.. D.
.". LASSEN ?.. N..".3. ERWEITERN SIE D
AS PGM IM ERSTEN BEI-..!X..". SPIEL DE
RART, DASS ALLE LEERZEICHEN.-!...". U
NTERDRUECKT WERDEN..E!..I.13:.5000:.FL.2
400.T!...".DIE LOESUNG FUR AUFGABE 3 FIN
DEN SIE IM..!...".RAM AB 944..M!^.."....
..........- SEITE 14 - <+> ...........E
NDE. <-> VON VORNE"..!...5020:.FL.0..!..
...!... UMBLAETTERN.?"..."..............
........... - SEITE";I;"- <+> WEITER
<-> ZURUECK";.Q"...I.0.11:.X$:..E"...X$:
.X$."".5030.X"...X$."+".FL.0:..."...X$."
-".FL.1:..."D..5030..".'.".NOCHMAL (J/N)
?";:.I.0.11:.X$:..N".'.I.0.11:.X$:..."$
'.X$:.X$."".10020..".'.X$."N".." NEIN":.
..#8'.X$.."J".10020..#B'....IR
> CLICK IMAGE PREVIEW FOR FULL MODAL