Quizmaster — die Hilfe bei Lernproblemen
Der Computer als universeller Fragebogen — Er hitft Ihnen bei Ihren Prüfungsvorbereitungen, kann aber ebenso als Party-Gag verwendet werden.


Quizmaster ist ein Generator-Programm, das Sie befähigt, eigene Multiple-Choice-Fragen mit grafischer Untermalung zu erstellen. (Multiple Choice ist ein Fragebogen-System, bei dem man mehrere mögliche Antworten zur Auswahl hat, von denen aber nicht unbedingt alle richtig sind.) So können Sie sich zum Beispiel einen Sprachen- oder Mathematikkurs selbst erstellen und sich quasi vom Computer ausfragen lassen.
Durch die Möglichkeit, sich seine Fragen und Antworten universell, das heißt aus jedem Themengebiet, zusammenzustellen und durch geschickte Anordnung und Aufbau der Fragebogenseiten ein attraktives und lehrreiches Quiz zusammenzustellen, wird das Programm erst richtig interessant.
Der aktuelle Prozentsatz an richtigen und falschen Antworten ist nach Beantwortung jeder einzelnen Frage am unteren Bildschirmrand zu sehen, was eine laufende Leistungskontrolle ermöglicht.
Die besonderen Möglichkeiten des Programms sind:
— Einbinden von bis zu zwei frei definierbaren Zeichensätzen,
— zwei Bewegungssequenzen von je 16 Zeichen,
— für jede der bis zu 99 Fragen gibt es einen eigenen Bildschirm,
— Editieren eines Bildschirms wie mit dem Basic-Editor, aber mit einigen Extras,
— alle Funktionen werden durch Menüs gesteuert.
Dieses Listing beweist wieder einmal, daß man auch mit relativ wenig Aufwand durch guten Programmierstil ein effektives Programm schreiben kann. Wenn Sie sich die Listings einmal angeschaut haben und befürchten, daß es Ihnen zuviel Tipparbeit ist, so können Sie beruhigt sein. Sie müssen nur »QUIZMASTER« und »-QUIZML« eingeben. Danach ist das Programm schon voll lauffähig. Das Listing »Quizchar« bietet einen Demo-Zeichensatz an. Beim Eintippen können Sie alle REM-Zeilen weglassen.
(Matthias Gerloff/dm)Prüfungsvorbereitungen oder Party-Gag — Dieser Quizgenerator ist für alles universell verwendbar.
Zuerst eine Funktionsbeschreibung: Wenn Sie »Quizmaster« gestartet haben, wird noch »Quizml« geladen und das Hauptmenü erscheint. Falls sich ein Titelbild oder ein Zeichensatz auf der Diskette befindet, werden diese vorher geladen beziehungsweise angezeigt.
Grundsätzlich wird der Cursor mit der Taste »Cursor abwärts« nach unten und mit der Taste »Cursor rechts« nach oben gesteuert. Das Anwählen einer Funktion erfolgt dann mit RETURN. Durch Anwählen des Punktes »Farbmenü« können sämtliche Farbeinstellungen verändert werden. Dieses hat jedoch keinen Einfluß auf erstellte Bilder oder Fragen. Möchten Sie ein Quiz erstellen oder verändern, so wählen Sie bitte das »Editormenü« an. Doch Vorsicht: der Unterpunkt »Quiz anlegen« formatiert die eingelegte Diskette. Dieser Punkt ist wichtig, wenn Sie das Quiz zum ersten Mal anlegen.
Quiz erstellen
Um Fragen und Titelbilder zu erstellen, gehen Sie bitte in das Menü »Bild editieren«. Ihr Cursor ist das kleine Quadrat oben links. Sollten Sie nichts erkennen können, so können Sie mit den Funktionstasten F3, F5 und F7 die Farben des Cursors, des Rahmens und des Hintergrundes verändern. Ansonsten haben alle Tasten ihre gewohnten Funktionen. »SHIFT-CLR/HOME« löscht tatsächlich den Bildschirm. Dennoch gibt es ein paar Sonderfunktionen: Ihr Cursor kann nach oben und unten aus dem Bild bewegt werden. Er erscheint dann wieder auf der gegenüberliegenden Seite. Außerdem werden nach »INST« oder Anführungsstrichen keine lästigen Steuerzeichen mehr ausgegeben. Das Bearbeiten der untersten Zeile ist leider nicht möglich. Mit F1 gelangen Sie wieder ins »Editormenü«.
Erstellen Sie nun eine Frage, so müssen Sie die möglichen Antworten mit einem »@« kennzeichnen, welcher als kleines Quadrat sichtbar wird. Die richtige Antwort ist mit einem reversen Klammeraffen (»@«) kenntlich zu machen. Sie können dieses aber auch unterlassen und die richtige Antwort erst beim Speichern per Menüauswahl kennzeichnen. Wenn Sie nun eine Frage speichern wollen, so wählen Sie den Punkt »Bild speichern« an. Falls Sie noch keine Antwort markiert haben, können Sie dieses hier nachholen. Geben Sie nun eine Nummer ein, die nicht Null und nicht größer als die maximale Anzahl ist. Haben Sie sich vertippt, so geben Sie einfach die richtige Nummer ein und die falsche wird nach links aus der Anzeige herausgeschoben. So können Sie ein Bild auch als Titelbild von Ihrem Quiz oder vom »Quizmaster« verwenden. Dazu benutzen Sie die entsprechenden Funktionen.
Einbau von Titelbildern
Wovon hängt es denn nun ab, ob das Titelbild vom »Quizmaster« oder vom Quiz selber benutzt wird? Davon, ob es auf der »Quizmaster«-Diskette oder der mit Ihrem eigenen Quiz steht. Das bedeutet, es wird immer das Titelbild benutzt, das sich auf der im Laufwerk eingelegten Diskette befindet.
Der Zeichensatz
Nun ist der Commodore-Zeichensatz nicht gerade geeignet, um tolle Titelbilder oder Fragen mit Sonderzeichen zu erstellen. Deshalb können Sie selbstdefinierte Zeichensätze nachladen und auch speichern. Soll ein Zeichensatz von Ihrem Quiz benutzt werden, so muß er unter dem Namen »←Quizchar« auf die entsprechende Diskette gespeichert werden. Es gilt das gleiche, das auch zum Titelbild gesagt wurde. Damit Sie Ihren persönlichen Zeichensatz nutzen können, muß er folgende Bedingungen erfüllen:
— er muß als PRG-File gespeichert sein,
— er muß den Aufbau haben, der den Bildern 1 und 2 zu entnehmen ist.
Es kann auch ein Doppelzeichensatz definiert werden. Das sind zwei Zeichensätze, die hintereinander gespeichert sind. So ein Zeichensatz wäre etwa ein mit Hi-Eddi erstellter. Die Zeichen »@« und »RVS@« können bei allen Zeichensätzen nicht benutzt werden, da sie für die Menüauswahl und die Antworten gebraucht werden. Es ist also einfach, sich ein eigenes Titelbild mit eigenem Zeichensatz zu erstellen. Wem dieses zu viel Arbeit ist, der kann sich einen bereits vorhandenen Zeichensatz abtippen (Listing 3). Sollten Sie das Problem haben, Ihren Zeichensatz nur als Basic-Lader zu besitzen, dann gehen Sie wie folgt vor, um ihn für den Quizmaster nutzbar zu machen:
Load"←Quizml",8,1:NEW:SYS 50266
Dann Ihren Zeichensatz laden und POKEn lassen. Als Startadresse des Zeichensatzes ist 40960 anzugeben:
POKE 828,83:P0KE 829,58
A$=" NAME"
FOR 1=1 T0 LEN (A$):POKE 829+1,
ASC(MID$(A$,1,1)):NEXT:POKE 2,LEN(A$)
Dann noch:
SYS 50283
und Ihr Zeichensatz wird unter »NAME« gespeichert.
Sie werden sich vielleicht gewundert haben, was die Funktion »Bewegung« bedeutet. Falls Sie diese Funktion angeschaltet haben, so werden zwei Bewegungssequenzen von je 16 Zeichen durchlaufen. Die Sequenzen- benutzen die Zeichen mit den Bildschirmcodes 224 bis 239 und 240 bis 255. Bewegungssequenz bedeutet folgendes: Haben Sie irgendwo auf dem Bildschirm ein Zeichen stehen, dessen Bildschirmcode in eine der beiden Sequenzen fällt, so erscheinen dort nacheinander alle 16 Zeichen der betreffenden Sequenz.
Zur Entwirrung hier ein Beispiel: Nehmen wir einmal an, oben links in der Ecke steht ein Zeichen mit dem Bildschirmcode 240 und die »Bewegung«ist angeschaltet, dann erscheinen an derselben Stelle nacheinander die Zeichen mit dem Code 241, 242, 243, …, 255. Auf 255 folgt dann wieder 240 und so weiter. Probieren wir das einmal aus. »Bewegung« anschalten und »Bild editieren« wählen. Dann den Bildschirm löschen und »RVSON« sowie das Grafikzeichen »(Commodore-Taste + A)« eintippen. Nun noch den Editor mit F1 verlassen und auf »Bild zeigen« gehen. Das Bild erscheint und das Zeichen ändert in wilder Weise seine Form.
Bleibt nur noch die Funktion »Quiz spielen« im Hauptmenü. Diese Funktion führt Sie selbständig durch alle Stufen des Spieles.
Hinweise zum Eintippen
Das Programm besteht aus einem Basic- und einem Maschinenspracheteil. Bitte geben Sie zuerst das Hauptprogramm (Listing 1) ein und speichern es ab. Anschließend tippen Sie den Maschinenspracheteil (Listing 2) mit Hilfe des MSE ein und speichern ihn ebenfalls. Das Listing 3 können Sie ebenfalls abtippen, ist aber nicht für den Programmablauf maßgeblich. Es enthält nur einen Probe-Zeichensatz. Aus Tabelle 1 können Sie die Belegung des Speichers ersehen.
(Matthias Gerloff/dm)| $0400 - $07FF | Zwischenspeicher Farb-RAM |
| $7DF6 | Ende des Basic-Speichers |
| $8000 - $83FF | 1. Bildschirm |
| $8400 - $87FF | 2. Bildschirm |
| $8800 - $993F | Cursorsprite |
| $A000 - $A7FF | 1. Zeichensatz |
| $A800 - $AFFF | 2. Zeichensatz |
| $B000 - $B800 | Menüzeichensatz |
| $C000 - $C4C8 | Maschinenspracheteil |
10 rem *** quizmaster ***
11 rem *** von ***
12 rem *** matthias ***
13 rem *** gerloff ***
14 rem *** weidenbaumsweg 94 ***
15 rem *** 2050 hamburg 80 ***
16 rem *** tel.(040) 7211517 ***
17 rem *** ***
18 rem *** c 64 + 1541 ***
99 gosub32005
100 printchr$(8)chr$(14)"{blk}"chr$(147);:poke53280,10:poke53281,10
110 sys36631
119 ifpeek(2)=0then149
123 print"{wht}Ladefehler":print"{down}Neuer Versuch mit <{rvon}SPACE{rvof}>."
124 gosub11000:ifk$=" "thenprint"{clr}";:goto110
125 goto124
149 clr:dim re(99)
151 rem b1/2 - bildschirm an
152 rem bw - bewegung
153 rem f1/2 - suchstart 1/2
154 rem fc - suche continue
155 rem pl - plot text
157 rem zs - zeichensatz speichern
158 rem ch - zeichensaetze copy
159 rem eb - box einblenden
160 rem sa - bild save
161 rem lo - bild laden
162 rem ed - editor
163 rem sp - sprite copy
164 rem in - init routine
165 rem bf - bewegungsflag
166 rem e1/2 - ende der bildschirme
170 rem *** sys list ***
171 b1=49152:b2=49202:bw=49291:f1=49662:f2=49675:fc=49391:pl=49636:bf=32247
172 ch=50266:eb=49528:sa=50066:lo=49987:ed=49696:sp=49561:in=50190:zs=50283
173 e1=33792:e2=34816
174 tx$="{blk}":bl$="{wht}":tx=0:bl=1:rem*** farb combo fuer menue
180 rem *** such wert fn ***
181 hm=1:em=1:fm=1:lm=1:sm=1:rem ** init der menues ***
185 def fn fi(x)=peek(251)+256*peek(252)
186 fb$="{blk}{wht}{red}{cyn}{pur}{grn}{blu}{yel}{orng}{brn}{lred}{gry1}{gry2}{lgrn}{lblu}{gry3}"
188 sysin:syssp:print"{clr}":sysb2:poke53280,10:poke53281,10:print"{clr}":poke32247,0
189 syspl,10,13,"{blk}booting Quizmaster..."
190 gosub920:a$="_quizchar":au=1:gosub31500:syseb
200 a$="_quiztitel":gosub31510:au=0:ife=0then300
210 print"{clr}{yel} Q U I Z M{$a0}A{$a0}S{$a0}T{$a0}E{$a0}R"
211 print" {CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}"
212 syspl,18,5,"von"
213 syspl,11,9,"Matthias Gerloff"
214 gosub11000:goto400
300 gosub40000:rem *** show pic ***
399 rem *** hauptmenue ***
400 printtx$"{clr}"
401 syspl,15,6,bl$"Hauptmenue":syspl,15,7,tx$"{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}"
402 syspl,12,9,bl$"@"tx$" Quiz spielen"
403 syspl,12,11,bl$"@"tx$" Editormenue"
404 syspl,12,13,bl$"@"tx$" Farbmenue"
405 syspl,12,15,bl$"@"tx$" Ende"
410 fs=f2:en=e2:f=hm:gosub34000:gosub33000
420 hm=f:onfgosub1000,500,700,430
425 goto400
430 print"{clr}":end
499 rem *** editormenue ***
500 printtx$"{clr}"
501 syspl,13,0,bl$"Editormenue":syspl,13,1,tx$"{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}"
502 syspl,10,4,bl$"@"tx$" Bild zeigen
503 syspl,10,5,bl$"@"tx$" Bild editieren"
504 syspl,10,6,bl$"@"tx$" Bild laden"
505 syspl,10,7,bl$"@"tx$" Bild speichern"
506 syspl,10,8,bl$"@"tx$" Zeichensatz laden"
507 syspl,10,9,bl$"@"tx$" Zeichensatz speichern"
508 syspl,10,10,bl$"@"tx$" Titelbild laden"
509 syspl,10,11,bl$"@"tx$" Titelbild speichern"
510 syspl,10,12,bl$"@"tx$" Quiz anlegen"
511 syspl,10,13,bl$"@"tx$" Bewegung : An ":ifpeek(bf)=0thensyspl,23,13,tx$"Aus"
512 syspl,10,14,bl$"@"tx$" Hauptmenue{home}"
513 f=em:gosub34000:gosub33000
516 em=f:iff=11thenem=1:return
517 iff<>3andf<>4thenpokefnfi(0),0
518 onfgoto521,520,530,535,519,522,540,541,551,550
519 gosub900:goto500
520 sysed:print"{rvof}";:goto513
521 gosub40000:goto513
522 gosub800:goto500
530 gosub32500:x=xx:gosub63500:ifa$="00"orf>xxthengosub10000:goto513
531 a$="frage "+a$:gosub31510:gosub10000:pokefnfi(0),0:em=1
532 ifpeek(bf)=1thensyspl,23,13,tx$"An "
533 ifpeek(bf)=0thensyspl,23,13,tx$"Aus"
534 goto513
535 fs=f1:en=e1:poke2,128:sysfs:iffnfi(0)<>enthen538
536 poke2,0:sysfs:iffnfi(0)=enthen595
537 sysb1:gosub33000:sysb2:pokefnfi(0),128
538 fs=f2:en=e2:gosub32500:x=xx+1:gosub63500:ifa$="00"orf>xthengosub10000:goto513
539 a$="frage "+a$:gosub31520:xx=xx-(x=f):gosub32600:gosub10000:goto513
540 syspl,15,24,bl$"loading...";:a$="_quiztitel":gosub31510:gosub10000:em=1:goto513
541 syspl,15,24,bl$"saving...";:a$="_quiztitel":gosub31520:gosub10000:goto513
550 pokebf,1-peek(bf):goto511
551 gosub63000:ifin$=""thengosub10000:goto513
552 gosub10000:syspl,0,24,bl$"Leere Diskette einlegen. <{rvon}SPACE{rvof}>";
553 gosub11000:gosub10000:ifk$<>" "then513
554 syspl,10,24,bl$"Formatiere "in$;
555 gosub38000:open1,8,15,"n:"+in$+",mg":gosub61000:ife<>0thengosub10000:close1:goto513
556 xx=0:gosub32600:gosub10000:print#1,"i":close1:goto513
595 gosub10000:syspl,5,24,bl$"Keine Antwort moeglich. <{rvon}SPACE{rvof}>";
596 gosub11000:ifk$<>" "then596
597 gosub10000:fs=f2:en=e2:goto513
599 rem *** farbwahlmenue ***
600 printtx$"{clr}"
601 syspl,13,0,bl$"Farbwahlmenue":syspl,13,1,tx$"{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}"
602 syspl,14,4,bl$"@"tx$" Schwarz"
603 syspl,14,5,bl$"@"tx$" Weiss"
604 syspl,14,6,bl$"@"tx$" Rot"
605 syspl,14,7,bl$"@"tx$" Tuerkis"
606 syspl,14,8,bl$"@"tx$" Violett"
607 syspl,14,9,bl$"@"tx$" Gruen"
608 syspl,14,10,bl$"@"tx$" Blau"
609 syspl,14,11,bl$"@"tx$" Gelb"
610 syspl,14,12,bl$"@"tx$" Orange"
611 syspl,14,13,bl$"@"tx$" Braun"
612 syspl,14,14,bl$"@"tx$" Hellrot"
613 syspl,14,15,bl$"@"tx$" Dunkelgrau"
614 syspl,14,16,bl$"@"tx$" Grau"
615 syspl,14,17,bl$"@"tx$" Hellgruen"
616 syspl,14,18,bl$"@"tx$" Hellblau"
617 syspl,14,19,bl$"@"tx$" Hellgrau"
620 gosub34000:gosub33000:f=f-1:return
699 rem *** farbmenue ***
700 print"{clr}"
701 syspl,15,5,bl$"Farbmenue":syspl,15,6,tx$"{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}"
702 syspl,13,8,bl$"@"tx$" Hintergrund"
703 syspl,13,10,bl$"@"tx$" Block u. Titel"
704 syspl,13,12,bl$"@"tx$" Schrift"
705 syspl,13,14,bl$"@"tx$" Hauptmenue"
710 f=fm:gosub34000:gosub33000
725 iff=4thenfm=1:return
726 fm=f:onfgosub732,730,731
727 goto700
730 f=bl+1:gosub600:bl=f:bl$=mid$(fb$,f+1,1):return
731 f=tx+1:gosub600:tx=f:tx$=mid$(fb$,f+1,1):return
732 f=(peek(53280)and15)+1:gosub600:poke53280,f:poke53281,f:return
799 rem ** zs - saver **
800 print"{clr}":syspl,10,5,bl$"Zeichensatz speichern"
801 syspl,10,6,tx$"{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}"
802 syspl,12,9,bl$"@"tx$" 1.Zeichensatz"
804 syspl,12,11,bl$"@"tx$" Doppelzeichensatz"
805 syspl,12,13,bl$"@"tx$" Editormenue"
806 f=sm:gosub34000:gosub33000
810 iff=3thensm=1:return
811 sm=f:onfgosub820,822:gosub63000:ifin$=""then806
812 fori=1tolen(in$):poke829+i,asc(mid$(in$,i,1)):next:poke2,len(in$):syszs
813 ifpeek(2)=5thengosub60000:goto812
814 gosub61000:gosub10000:goto806
820 poke50349,168:return
822 poke50349,176:return
899 rem ** zs laden **
900 print"{clr}":syspl,11,5,bl$"Zeichensatz laden"
901 syspl,11,6,tx$"{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}"
902 syspl,12,9,bl$"@"tx$" 1.Zeichensatz"
903 syspl,12,11,bl$"@"tx$" 2.Zeichensatz"
904 syspl,12,13,bl$"@"tx$" Doppelzeichensatz"
905 syspl,12,15,bl$"@"tx$" Editormenue"
906 f=lm:gosub34000:gosub33000
910 iff=4thenlm=1:return
911 lm=f:onfgosub920,921,920:gosub63000:ifin$=""then906
912 a$=in$:gosub31500
915 syseb:gosub10000:goto906
920 poke36686,160:return
921 poke36686,168:return
999 rem *** quiz spielen ***
1000 gosub10000:syspl,3,24,bl$"Spieldiskette einlegen. <{rvon}SPACE{rvof}>";
1005 gosub11000:ifk$<>" "then1005
1006 gosub10000:syspl,13,24,tx$"booting Quiz...";
1010 gosub920:au=1:a$="_quizchar":gosub31500:a$="_quiztitel":gosub31510:au=0
1020 gosub10000:syseb:ife=0thengosub40000
1030 print"{clr}":gosub32500:gosub32800
1040 printtx$"{clr}":syspl,13,0,bl$"Quiz spielen":syspl,13,1,tx$"{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}"
1050 syspl,10,5,bl$"Name: "tx$qu$
1060 syspl,16,7,tx$"{left}"xx"Fragen":ifxx=0thengosub11000:return
1070 syspl,10,10,bl$"Wie viele wollen Sie ? ";:in$="":e=0
1080 print"{CBM-O}{left}";:gosub11000:ifk$=chr$(13)thenprint" ";:goto1100
1090 ife>0andk$=chr$(20)thene=e-1:in$=left$(in$,e):printk$;:goto1080
1095 ifk$>="0"andk$<="9"ande<2thenin$=in$+k$:printk$;
1096 goto1080
1100 nu=val(in$):syspl,10,10,tx$"Gewaehlte Anzahl:"nu"{left} ";:ifnu=0thenreturn
1101 syspl,10,15,tx$"Fragen: ":syspl,10,17,tx$"Richtige Antworten:"
1102 syspl,10,19,tx$"Falsche Antworten :"
1105 fori=1toxx:re(i)=i:next
1106 gosub10000:syspl,5,24,bl$"{rvon}G{rvof}emischt oder der {rvon}R{rvof}eihe nach.";
1107 gosub11000:ifk$="r"then1150
1108 ifk$<>"g"then1107
1109 gosub10000
1110 fori=1toxx
1120 a%=rnd(ti)*xx+1:b%=rnd(ti)*xx+1
1130 e=re(a%):re(a%)=re(b%):re(b%)=e
1140 next
1150 ri=0:fa=0
1160 foryy=1tonu
1170 a$="frage "+right$("00"+mid$(str$(re(yy)),2),2)
1180 gosub31510:ife<>0thenreturn
1190 poke2,128:sysf1:at=fnfi(0):pokeat,0
1200 sysb1:mo=1:fs=f1:en=e1:poke198,0:gosub33000:sysb2:mo=0
1210 iffnfi(0)=atthenri=ri+1:goto1220
1211 fa=fa+1:gosub10000:syspl,3,24,bl$"Leider falsch. Richtig war..<{rvon}SPACE{rvof}>";
1212 pokefnfi(0),0:pokeat,128:gosub11000:gosub40000:gosub10000
1213 goto1230
1220 gosub10000:syspl,10,24,bl$"Die Antwort ist richtig.";
1230 syspl,18,15,tx$yy
1231 syspl,29,17,ri:po=ri:gosub32900:syspl,33,17," ";:syspl,35,17,po$;
1232 syspl,29,19,fa:po=fa:gosub32900:syspl,33,19," ";:syspl,35,19,po$;
1240 nextyy
1250 gosub10000:syspl,6,24,bl$"Ende des Quizspiels. <{rvon}SPACE{rvof}>";
1260 gosub11000:ifk$<>" "then1260
1270 return
10000 syspl,0,24," ";:return
10002 return
11000 getk$:ifmo=1andpeek(bf)=1thensysbw
11001 ifk$=""then11000
11010 return
31499 rem *** zeichen satz load ***
31500 fori=1tolen(a$):poke36614+i,asc(mid$(a$,i,1)):next:poke2,len(a$)
31501 sys36665:ifpeek(2)=5thengosub60000:goto31500
31502 goto61000
31509 rem ** bild load **
31510 fori=1tolen(a$):poke829+i,asc(mid$(a$,i,1)):next:poke2,len(a$)
31512 syslo
31513 ifpeek(2)=5thengosub60000:goto31510
31515 goto61000
31519 rem ** bild save **
31520 fori=1tolen(a$):poke829+i,asc(mid$(a$,i,1)):next:poke2,len(a$)
31522 syssa
31523 ifpeek(2)=5thengosub60000:goto31520
31525 goto61000
31530 return
31999 rem *** data 8f00 ***
32000 data95,81,85,73,90,77,76,95,81,85,73,90,67,72,65,82,0,0,0,0,0,0,0,162,8
32001 data160,0,32,186,255,162,0,160,143,169,7,32,189,255,169,0,162,0,160,192
32002 data32,213,255,160,0,132,2,144,2,133,2,96,162,8,160,0,32,186,255,162,7
32003 data160,143,165,2,32,189,255,169,0,162,0,160,160,32,213,255,160,0,132,2
32004 data144,2,133,2,96,-1
32005 a=36608
32006 readx:ifx<>-1thenpokea,x:a=a+1:goto32006
32007 return
32499 rem*** read max frage ***
32500 gosub38000:open15,8,15,"i":open5,8,5,"#"
32510 print#15,"u1 5 0 18 0":print#15,"b-p 5 165"
32515 get#5,a$,b$:xx=val(a$+b$):close5:close15:gosub61000:ife<>0thenxx=0
32520 return
32599 rem*** write max frage ***
32600 gosub38000:open15,8,15,"i":open5,8,5,"#":print#15,"u1 5 0 18 0"
32605 print#15,"b-p 5 165":a$=left$(right$(str$(xx),2),1)+right$(str$(xx),1)
32610 print#5,a$;:print#15,"u2 5 0 18 0":close5:close15:return
32799 rem *** read quizname ***
32800 open15,8,15,"i":open5,8,5,"#":print#15,"u1 5 0 18 0":print#15,"b-p 5 144"
32810 qu$="":fori=1to16:get#5,k$:qu$=qu$+k$:next:close5:close15:return
32899 rem *** po --> po$ ***
32900 po$="":po=int(po/yy*100+.5):po$=mid$(str$(po),2)+" %"
32910 po$=left$("{left}{left}",len(po$)-3)+po$:return
32999 rem ** menue auswahl ** ed=ende:fs=f1 bzw. f2
33000 poke2,128:sysfs:iffnfi(0)<>enthengosub35000:mx=e+1:sysfs:poke2,0:goto33007
33001 gosub35000:mx=e:f=1:poke2,0:sysfs:iffnfi(0)=enthenreturn
33006 pokefnfi(0),128
33007 gosub11000:ifk$=chr$(13)thenpokefnfi(0),0:return
33008 ifk$="{rght}"thenpokefnfi(0),0:f=f-1-mx*(f=1):gosub34000:goto33006
33010 ifk$<>"{down}"then33007
33015 pokefnfi(0),0:f=f+1:sysfc:iffnfi(0)=enthensysfs:f=1
33020 goto33006
33035 .
34000 poke2,0:sysfs:iff=1thenpokefnfi(0),128:return
34001 fori=1tof-1:sysfc:next:pokefnfi(0),128:return
34999 rem *** finde ma ***
35000 po=peek(2):poke2,0:sysfs:e=0
35010 ifen<>fnfi(0)thene=e+1:sysfc:goto35010
35020 poke2,po:return
37999 rem *** test floppy an **
38000 a$=chr$(0):au=1:gosub31510:au=0:return
40000 sysb1
40001 ifpeek(bf)=1thensysbw
40002 getk$:ifk$=""then40001
40003 sysb2:return
59999 rem ** floppy aus hinweis **
60000 gosub10000:syspl,10,24,bl$"Floppy anschalten";:gosub11000:return
60999 rem *** error kanal ***
61000 open8,8,15:input#8,e,e$,tr,se:close8:ife=0orau=1thenreturn
61010 gosub10000:syspl,0,24,bl$"Fehler : ";e;e$;tr;se;:gosub11000:gosub10000:return
62999 rem *** file eingabe ***
63000 gosub10000:syspl,0,24,tx$"Name:";
63001 in$="":e=0
63002 print"{CBM-O}{left}";:gosub11000:ifk$=chr$(13)thenprint" ";:return
63003 ifk$=chr$(20)ande>0thene=e-1:in$=left$(in$,e):printk$;:goto63002
63004 ife=16ork$=chr$(34)ork$<chr$(32)or(k$>chr$(127)andk$<chr$(160))then63002
63005 printk$;:e=e+1:in$=in$+k$:goto63002
63499 rem ** eingabe bild nummer **
63500 a$="00":gosub10000:syspl,0,24,tx$"Bildnummer 00 "bl$"max ";
63501 f=0:printright$("00"+mid$(str$(x+(x=100)),2),2)tx$;
63502 gosub11000:ifk$=chr$(13)thenreturn
63503 ifk$<"0"ork$>"9"then63502
63504 f=10*(f-10*int(f/10))+val(k$):a$=right$("00"+mid$(str$(f),2),2)
63505 syspl,11,24,a$;:goto63502
PROGRAMM : _QUIZML C000 C4C4 ----------------------------------- C000 : A9 80 8D 88 02 20 FE C0 FC C008 : EA EA AD 20 D0 8D FC 7D 3F C010 : AD 21 D0 8D FD 7D AD 86 C3 C018 : 02 8D FE 7D AD F8 7D 8D 04 C020 : 20 D0 AD F9 7D 8D 21 D0 BD C028 : AD FA 7D 8D 86 02 20 64 25 C030 : C0 60 A9 84 8D 88 02 20 81 C038 : 0B C1 EA EA AD 20 D0 8D 76 C040 : F8 7D AD 21 D0 8D F9 7D E3 C048 : AD 86 02 8D FA 7D AD FC B7 C050 : 7D 8D 20 D0 AD FD 7D 8D 92 C058 : 21 D0 AD FE 7D 8D 86 02 8F C060 : 20 64 C0 60 A2 04 A0 00 BB C068 : A9 00 85 8B 85 FD A9 04 DB C070 : 85 8C A9 D8 85 FE B1 8B EF C078 : 48 B1 FD 91 8B 68 91 FD 89 C080 : C8 D0 F3 E6 8C E6 FE CA 1B C088 : D0 EC 60 A9 80 85 8C A9 D5 C090 : 00 85 8B A2 04 A0 00 B1 33 C098 : 8B 85 8F 29 E0 C9 E0 D0 70 C0A0 : 13 A9 0F 25 8F 18 69 01 52 C0A8 : 29 0F 85 FE A9 F0 25 8F 70 C0B0 : 05 FE 91 8B C8 D0 E0 E6 6E C0B8 : 8C CA D0 D9 60 A9 00 85 77 C0C0 : FB A9 80 85 FC A0 00 B1 99 C0C8 : FB C5 02 D0 0B A5 FB 8D 29 C0D0 : 10 8E A5 FC 8D 11 8E 60 8D C0D8 : E6 FB D0 EB E6 FC A5 FC 54 C0E0 : C9 88 D0 E3 A9 FF 8D 10 8F C0E8 : 8E A9 87 8D 11 8E 60 AD 41 C0F0 : 10 8E 85 FB AD 11 8E 85 D1 C0F8 : FC A0 00 4C D8 C0 AD 18 48 C100 : D0 8D FF 7D AD FB 7D 8D 12 C108 : 18 D0 60 AD 18 D0 8D FB 8C C110 : 7D AD FF 7D 8D 18 D0 60 B1 C118 : AD 0E DC 29 FE 8D 0E DC 77 C120 : A5 01 29 FA 85 01 A2 10 FB C128 : A0 00 A9 00 85 FB 85 FD 7D C130 : A9 D0 85 FC A9 B0 85 FE 76 C138 : B1 FB 91 FD C8 D0 F9 E6 D4 C140 : FE E6 FC CA D0 F2 A5 01 87 C148 : 09 05 85 01 AD 0E DC 09 26 C150 : 01 8D 0E DC 60 A0 07 B9 D2 C158 : 89 C1 91 FB 88 10 F8 A5 DE C160 : FC 18 69 04 85 FC A0 07 14 C168 : B9 91 C1 91 FB 88 10 F8 C3 C170 : 18 A5 FC 69 04 85 FC 60 E8 C178 : A9 00 85 FB A9 A0 85 FC B2 C180 : A2 04 20 55 C1 CA D0 FA 83 C188 : 60 00 7E 42 42 42 42 7E 0C C190 : 00 00 7E 7E 7E 7E 7E 7E D3 C198 : 00 A0 3F B9 A5 C1 99 00 BE C1A0 : 88 88 10 F7 60 FF C0 00 78 C1A8 : 80 40 00 80 40 00 80 40 DF C1B0 : 00 80 40 00 80 40 00 80 0C C1B8 : 40 00 80 40 00 80 40 00 26 C1C0 : FF C0 00 00 00 00 00 00 20 C1C8 : 00 00 00 00 00 00 00 00 C9 C1D0 : 00 00 00 00 00 00 00 00 D1 C1D8 : 00 00 00 00 00 00 00 00 D9 C1E0 : 00 00 00 00 20 FD AE 20 CD C1E8 : 9E B7 8A 48 20 FD AE 20 FA C1F0 : 9E B7 68 A8 18 20 F0 FF DF C1F8 : 20 FD AE 4C A4 AA A9 84 9B C200 : 8D E1 C0 A9 83 8D EA C0 B5 C208 : 4C BD C0 A9 88 8D E1 C0 96 C210 : A9 87 8D EA C0 A9 00 85 A2 C218 : FB A9 84 85 FC 4C C5 C0 84 C220 : A9 20 8D F8 83 20 00 C0 16 C228 : A9 13 20 D2 FF A9 09 20 6F C230 : D2 FF A9 01 8D 15 D0 A9 A4 C238 : 00 8D 1C D0 8D 17 D0 8D 10 C240 : 1D D0 38 20 F0 FF 84 FB F0 C248 : 86 FC 98 38 E9 28 90 02 A0 C250 : 85 FB A9 31 A6 FC F0 07 87 C258 : 18 69 08 CA 4C 56 C2 8D 1E C260 : 01 D0 8E 10 D0 A9 17 A6 73 C268 : FB F0 0E 18 69 08 90 05 85 C270 : A0 01 8D 10 D0 CA 4C 69 5E C278 : C2 8D 00 D0 AD 01 D0 C9 D5 C280 : F1 D0 08 A4 FB A6 FC CA EE C288 : 4C 36 C3 20 E4 FF F0 FB EE C290 : C9 85 D0 0D A9 08 20 D2 F3 C298 : FF A9 00 8D 15 D0 4C 32 8B C2A0 : C0 C9 86 D0 06 EE 27 D0 17 C2A8 : 4C 8B C2 C9 87 D0 06 EE 99 C2B0 : 20 D0 4C 8B C2 C9 88 D0 FB C2B8 : 06 EE 21 D0 4C 8B C2 C9 57 C2C0 : 94 D0 26 20 D2 FF A0 29 4C C2C8 : AD 21 D0 99 C0 DB 88 10 9A C2D0 : F7 A2 18 A0 01 18 20 F0 66 C2D8 : FF A9 00 85 D8 A9 14 20 C8 C2E0 : D2 FF A6 FC A4 FB 4C 36 C3 C2E8 : C3 C9 11 D0 0D A6 FC E0 AA C2F0 : 17 D0 07 A2 00 A4 FB 4C 33 C2F8 : 36 C3 C9 91 D0 0B A6 FC AE C300 : D0 07 A2 17 A4 FB 4C 36 A7 C308 : C3 C9 1D D0 0D A6 FB E0 C9 C310 : 27 D0 07 A0 00 A6 FC 4C 37 C318 : 36 C3 C9 9D D0 0B A6 FB 4E C320 : D0 07 A0 27 A6 FC 4C 36 71 C328 : C3 C9 0D F0 04 C9 8D D0 98 C330 : 0C A6 FC A0 00 E8 18 20 CA C338 : F0 FF 4C 42 C2 20 D2 FF FC C340 : 4C BD C4 A5 02 A2 3E A0 C0 C348 : 03 20 BD FF A2 08 A0 00 B8 C350 : 20 BA FF A9 00 A2 F7 A0 39 C358 : 7D 20 D5 FF 90 03 85 02 96 C360 : 60 A9 7E 85 8C A9 04 85 16 C368 : FC A9 06 85 FE A9 00 85 B3 C370 : 8B 85 FB 85 FD A2 02 A0 AC C378 : 00 B1 8B 91 FB 4A 4A 4A 36 C380 : 4A 91 FD C8 D0 F3 E6 8C 8D C388 : E6 FC E6 FE CA D0 EA 86 72 C390 : 02 60 A6 02 E8 E8 8A A2 F1 C398 : 3C A0 03 20 BD FF A9 01 6E C3A0 : A2 08 A0 0F 20 BA FF 20 68 C3A8 : C0 FF 20 CC FF A9 01 20 9B C3B0 : C3 FF A9 7E 85 8C A9 04 18 C3B8 : 85 FC A9 06 85 FE A9 00 DD C3C0 : 85 8B 85 FB 85 FD A2 02 C2 C3C8 : A0 00 B1 FB 29 0F 91 FB 9D C3D0 : B1 FD 0A 0A 0A 0A 11 FB 71 C3D8 : 91 8B C8 D0 ED E6 8C E6 91 C3E0 : FC E6 FE CA D0 E4 A2 08 37 C3E8 : 20 BA FF A5 02 A2 3E A0 89 C3F0 : 03 20 BD FF A9 F7 85 FB DB C3F8 : A9 7D 85 FC A9 FB A2 C0 E7 C400 : A0 83 20 D8 FF A0 00 84 93 C408 : 02 90 02 85 02 60 AD 02 61 C410 : DD 09 03 8D 02 DD AD 00 AA C418 : DD 29 FD 8D 00 DD A9 09 62 C420 : 8D 18 D0 A9 1F 8D FF 7D 7C C428 : A9 80 8D 88 02 8D 8A 02 40 C430 : A9 7D 85 38 A9 F6 85 37 D7 C438 : A9 53 8D 3C 03 A9 3A 8D F7 C440 : 3D 03 A9 00 85 FB A9 80 49 C448 : 85 FC A9 A0 A2 08 A0 00 B7 C450 : 91 FB C8 D0 FB E6 FC CA AB C458 : D0 F6 A9 A0 8D 35 C1 20 EB C460 : 18 C1 A9 B0 8D 35 C1 20 A3 C468 : 18 C1 60 A5 01 48 A9 36 93 C470 : 85 01 A6 02 E8 E8 8A A2 A5 C478 : 3C A0 03 20 BD FF A9 01 4E C480 : A2 08 A0 0F 20 BA FF 20 48 C488 : C0 FF 20 CC FF A9 01 20 7B C490 : C3 FF A2 08 20 BA FF A5 20 C498 : 02 A2 3E A0 03 20 BD FF B7 C4A0 : A9 00 85 FB A9 A0 85 FC DA C4A8 : A9 FB A2 00 A0 A8 20 D8 79 C4B0 : FF A0 00 84 02 90 02 85 48 C4B8 : 02 68 85 01 60 A9 00 85 CE C4C0 : D4 4C 42 C2 4B
PROGRAMM : _QUIZCHAR A000 A800 ----------------------------------- A000 : 00 7E 42 42 42 42 7E 00 48 A008 : 18 3C 66 7E 66 66 66 00 DB A010 : 7C 66 66 7C 66 66 7C 00 74 A018 : 3C 66 60 60 60 66 3C 00 D6 A020 : 78 6C 66 66 66 6C 78 00 E0 A028 : 7E 60 60 78 60 60 7E 00 00 A030 : 7E 60 60 78 60 60 60 00 90 A038 : 3C 66 60 6E 66 66 3C 00 18 A040 : 66 66 66 7E 66 66 66 00 76 A048 : 3C 18 18 18 18 18 3C 00 CD A050 : 1E 0C 0C 0C 0C 6C 38 00 FE A058 : 66 6C 78 70 78 6C 66 00 A5 A060 : 60 60 60 60 60 60 7E 00 17 A068 : 63 77 7F 6B 63 63 63 00 B3 A070 : 66 76 7E 7E 6E 66 66 00 34 A078 : 3C 66 66 66 66 66 3C 00 D8 A080 : 7C 66 66 7C 60 60 60 00 E3 A088 : 3C 66 66 66 66 3C 0E 00 DE A090 : 7C 66 66 7C 78 6C 66 00 ED A098 : 3C 66 60 3C 06 66 3C 00 2C A0A0 : 7E 18 18 18 18 18 18 00 D6 A0A8 : 66 66 66 66 66 66 3C 00 32 A0B0 : 66 66 66 66 66 3C 18 00 58 A0B8 : 63 63 63 6B 7F 77 63 00 54 A0C0 : 66 66 3C 18 3C 66 66 00 FC A0C8 : 66 66 66 3C 18 18 18 00 25 A0D0 : 7E 06 0C 18 30 60 7E 00 57 A0D8 : 3C 30 30 30 30 30 3C 00 B4 A0E0 : 0C 12 30 7C 30 62 FC 00 9B A0E8 : 3C 0C 0C 0C 0C 0C 3C 00 C1 A0F0 : 00 18 3C 7E 18 18 18 18 AE A0F8 : 00 10 30 7F 7F 30 10 00 B6 A100 : 00 00 00 00 00 00 00 00 01 A108 : 18 18 18 18 00 00 18 00 96 A110 : 66 66 66 00 00 00 00 00 43 A118 : 66 66 FF 66 FF 66 66 00 4B A120 : 18 3E 60 3C 06 7C 18 00 9C A128 : 62 66 0C 18 30 66 46 00 13 A130 : 3C 66 3C 38 67 66 3F 00 5C A138 : 06 0C 18 00 00 00 00 00 4B A140 : 0C 18 30 30 30 18 0C 00 5E A148 : 30 18 0C 0C 0C 18 30 00 4B A150 : 00 66 3C FF 3C 66 00 00 89 A158 : 00 18 18 7E 18 18 00 00 7D A160 : 00 00 00 00 00 18 18 30 E2 A168 : 00 00 00 7E 00 00 00 00 38 A170 : 00 00 00 00 00 18 18 00 92 A178 : 00 03 06 0C 18 30 60 00 82 A180 : 3C 66 6E 76 66 66 3C 00 E4 A188 : 18 18 38 18 18 18 7E 00 FA A190 : 3C 66 06 0C 30 60 7E 00 02 A198 : 3C 66 06 1C 06 66 3C 00 91 A1A0 : 06 0E 1E 66 7F 06 06 00 42 A1A8 : 7E 60 7C 06 06 66 3C 00 BB A1B0 : 3C 66 60 7C 66 66 3C 00 52 A1B8 : 7E 66 0C 18 18 18 18 00 12 A1C0 : 3C 66 66 3C 66 66 3C 00 DB A1C8 : 3C 66 66 3E 06 66 3C 00 1D A1D0 : 00 00 18 00 00 18 00 00 97 A1D8 : 00 00 18 00 00 18 18 30 60 A1E0 : 0E 18 30 60 30 18 0E 00 0E A1E8 : 00 00 7E 00 7E 00 00 00 70 A1F0 : 70 18 0C 06 0C 18 70 00 74 A1F8 : 3C 66 06 0C 18 00 18 00 4C A200 : 00 00 01 03 07 0F 0F 0F E4 A208 : 00 F0 FC FC FE FE BE 3E BE A210 : 00 0F 3F 3F 7F 7C 7F 3F A8 A218 : 00 F0 FC FC FE 3E FE FE 4B A220 : 00 0F 3F 3F 7F 7C 7F 3F B8 A228 : 00 F0 FC FC FE 3E FE FE 5B A230 : 00 7F 7F 7F 7F 7C 7F 3F 18 A238 : 00 FC FE FE FC 00 F0 FC E3 A240 : 00 7F 7F 7F 7F 78 78 78 5E A248 : 00 F0 FC FC FE 3E 1E 1E 36 A250 : 00 0F 3F 3F 7F 7C 78 78 3E A258 : 00 F0 FC FC FE 3E 1E 1E 46 A260 : 00 0F 3F 3F 7F 7C 7C 7F 6C A268 : 00 FC FE FE FC 00 00 C0 D7 A270 : 00 38 7C 7C 7C 7C 7C 7C D2 A278 : 00 1C 3E 3E 3E 3E 3E 3E 29 A280 : 00 00 01 03 07 0F 0F 0F 64 A288 : 00 60 F0 E0 C0 80 80 80 24 A290 : 00 06 0F 07 03 01 01 01 76 A298 : 00 00 80 C0 E0 F0 F0 F0 0C A2A0 : 60 60 60 60 60 60 60 60 A0 A2A8 : 00 00 00 07 0F 1C 18 18 EC A2B0 : C3 E7 7E 3C 3C 7E E7 C3 6D A2B8 : 00 3C 7E 66 66 7E 3C 00 8E A2C0 : 18 18 66 66 18 18 3C 00 7E A2C8 : 06 06 06 06 06 06 06 06 C8 A2D0 : 08 1C 3E 7F 3E 1C 08 00 4B A2D8 : 18 18 18 FF FF 18 18 18 54 A2E0 : C0 C0 30 30 C0 C0 30 30 46 A2E8 : 18 18 18 18 18 18 18 18 E8 A2F0 : 00 00 03 3E 76 36 36 00 6B A2F8 : FF 7F 3F 1F 0F 07 03 01 A2 A300 : 06 00 00 00 00 00 00 00 07 A308 : 3E 3E 3E 3E 3E 3E 1C 00 03 A310 : 3F 0F 00 1F 3F 3F 1F 00 25 A318 : FE FE 3E FE FC FC F0 00 80 A320 : 7F 7F 7C 7F 3F 3F 0F 00 98 A328 : FC FE 3E FE FC FC F0 00 8E A330 : 3F 0F 00 1F 3F 3F 0F 00 05 A338 : FC FE 3E FE FC FC F0 00 9E A340 : 78 78 78 7F 7F 7F 7F 00 F4 A348 : 1E 1E 3E FE FC FC F0 00 60 A350 : 78 78 7C 7F 3F 3F 0F 00 3E A358 : 0E 36 78 7C BE DE CE 00 4D A360 : 7F 7F 7F 7C 7C 7C 38 00 9B A368 : E0 E0 C0 00 00 00 00 00 E9 A370 : 7C 7C 7E 7F 7F 3F 0F 00 E8 A378 : 3E 3E 7E FE FE FC F0 00 F0 A380 : 0F 0F 0F 07 03 01 00 00 F4 A388 : 80 80 80 C0 E0 F0 60 00 98 A390 : 01 01 01 03 07 0F 06 00 B4 A398 : F0 F0 F0 E0 C0 80 00 00 69 A3A0 : C0 C0 C0 C0 C0 C0 C0 C0 9F A3A8 : E0 E0 E0 E0 E0 E0 E0 E0 A7 A3B0 : 07 07 07 07 07 07 07 07 B0 A3B8 : FF FF 00 00 00 00 00 00 B7 A3C0 : FF FF FF 00 00 00 00 00 BF A3C8 : 00 00 00 00 00 FF FF FF C8 A3D0 : 00 00 00 00 00 00 00 00 D1 A3D8 : 00 00 00 00 F0 F0 F0 F0 15 A3E0 : 0F 0F 0F 0F 00 00 00 00 1D A3E8 : 18 18 18 F8 F8 00 00 00 C1 A3F0 : F0 F0 F0 F0 00 00 00 00 B3 A3F8 : F0 F0 F0 F0 0F 0F 0F 0F 7E A400 : 00 7E 7E 7E 7E 7E 7E 00 85 A408 : E7 C3 99 81 99 99 99 FF 34 A410 : 83 99 99 83 99 99 83 FF AB A418 : C3 99 9F 9F 9F 99 C3 FF 59 A420 : 87 93 99 99 99 93 87 FF 5F A428 : 81 9F 9F 87 9F 9F 81 FF 4F A430 : 81 9F 9F 87 9F 9F 9F FF CF A438 : C3 99 9F 91 99 99 C3 FF 57 A440 : 99 99 99 81 99 99 99 FF 09 A448 : C3 E7 E7 E7 E7 E7 C3 FF C2 A450 : E1 F3 F3 F3 F3 93 C7 FF A1 A458 : 99 93 87 8F 87 93 99 FF 0A A460 : 9F 9F 9F 9F 9F 9F 81 FF A8 A468 : 9C 88 80 94 9C 9C 9C FF 1C A470 : 99 89 81 81 91 99 99 FF AB A478 : C3 99 99 99 99 99 C3 FF 17 A480 : 83 99 99 83 9F 9F 9F FF 1C A488 : C3 99 99 99 99 C3 F1 FF 31 A490 : 83 99 99 83 87 93 99 FF 32 A498 : C3 99 9F C3 F9 99 C3 FF 04 A4A0 : 81 E7 E7 E7 E7 E7 E7 FF 69 A4A8 : 99 99 99 99 99 99 C3 FF 1D A4B0 : 99 99 99 99 99 C3 E7 FF 07 A4B8 : 9C 9C 9C 94 80 88 9C FF 1B A4C0 : 99 99 C3 E7 C3 99 99 FF 83 A4C8 : 99 99 99 C3 E7 E7 E7 FF 6A A4D0 : 81 F9 F3 E7 CF 9F 81 FF 48 A4D8 : C3 CF CF CF CF CF C3 FF FB A4E0 : F3 ED CF 83 CF 9D 03 FF 24 A4E8 : C3 F3 F3 F3 F3 F3 C3 FF 0E A4F0 : FF E7 C3 81 E7 E7 E7 E7 31 A4F8 : FF EF CF 80 80 CF EF FF 39 A500 : 00 38 7C 7C 7C 7D 7D 7D 70 A508 : 00 1C 3E 3E 3E BE BE BE C0 A510 : 00 0F 3F 3F 7F 7C 7C 7F 1C A518 : 00 F0 FC FC FE 3E 3E FE 48 A520 : 00 38 7C 7C 7C 7C 7C 7F 88 A528 : 00 1C 3E 3E 3E 3E 3E FE 5B A530 : 00 0F 3F 3F 7F 7C 7C 7F 3C A538 : 00 F0 F8 FC FC 3C 78 F0 03 A540 : 00 0F 3F 7F 7F 78 7F 7F 40 A548 : 00 FC FE FE FC 00 F8 FC 13 A550 : 00 3F 7F 7F 3F 07 07 07 16 A558 : 00 FC FE FE FC E0 E0 E0 92 A560 : 00 3F 7F 7F 3F 00 00 07 D2 A568 : 00 F0 FC FE FE 1E FC F8 C6 A570 : 00 38 7C 7C 7C 7C 7C 7C D2 A578 : 00 00 00 00 00 00 00 00 79 A580 : 00 03 07 07 07 07 07 07 77 A588 : 00 C0 E0 E0 E0 E0 E0 E0 97 A590 : 00 0E 3F 3B 7B 79 7D 7D 43 A598 : 00 70 FC DC DE 9E BE BE 06 A5A0 : 00 0F 3F 3F 7F 7C 78 78 8E A5A8 : 00 F0 FC FC FE 3E 1E 1E 96 A5B0 : 00 0E 3F 3B 7B 79 7D 7D 63 A5B8 : 00 1C 3E 3E 3E BE BE BE 70 A5C0 : 00 0F 3F 3F 7F 7C 7C 7C C6 A5C8 : 00 FC FE FE FC 00 00 7C AE A5D0 : 00 0F 3F 3F 7F 7C 7F 7F E8 A5D8 : 00 FC FE FE FC 00 C0 E0 8A A5E0 : 00 38 7C 7C 7C 7C 3C 3C C0 A5E8 : 00 1C 3E 3E 3E 3E 3C 3C 8D A5F0 : 00 07 0F 18 30 63 67 66 C3 A5F8 : 00 E0 F0 18 0C E6 E6 06 47 A600 : 7D 7D 79 7B 3B 3F 0E 00 F0 A608 : BE BE 9E DE DC FC 70 00 20 A610 : 7F 7F 7F 7C 7C 7C 38 00 4B A618 : FE FE FE 3E 3E 3E 1C 00 63 A620 : 7F 7F 7F 7C 7C 7C 38 00 5B A628 : FE FE FE 3E 3E 3E 1C 00 73 A630 : 7F 7F 7F 7C 7C 7C 38 00 6B A638 : F0 F8 FC 3C 3E 3E 1C 00 B1 A640 : 3F 1F 00 3F 7F 7F 3F 00 E8 A648 : FE FE 1E FE FE FC F8 00 E8 A650 : 07 07 07 07 07 07 03 00 32 A658 : E0 E0 E0 E0 E0 E0 C0 00 15 A660 : 1F 3F 78 7F 7F 3F 0F 00 5B A668 : E0 00 00 FC FE FE FC 00 C4 A670 : 7C 7C 7E 7F 7F 3F 0F 00 E8 A678 : 00 00 00 FC FE FE FC 00 F4 A680 : 07 07 07 07 07 07 03 00 62 A688 : E0 E0 E0 E0 E0 E0 C0 00 45 A690 : 7D 7D 7D 7C 7C 7C 38 00 47 A698 : BE BE BE 3E 3E 3E 1C 00 73 A6A0 : 78 78 7C 7F 3F 3F 0F 00 8E A6A8 : 1E 1E 3E FE FC FC F0 00 C0 A6B0 : 7D 7D 7D 7C 7C 7C 38 00 67 A6B8 : BE BE 9E DE DC FC 70 00 D0 A6C0 : 7C 7C 7C 7F 7F 3F 1F 00 F8 A6C8 : 7E 3E 3E FE FE FC F8 00 90 A6D0 : 7F 7F 7C 7F 3F 3F 0F 00 48 A6D8 : E0 C0 00 FC FE FE FC 00 94 A6E0 : 3E 1E 1F 0F 0F 07 03 00 0C A6E8 : 7C 78 F8 F0 F0 E0 C0 00 16 A6F0 : 66 67 63 30 18 0F 07 00 FF A6F8 : 06 E6 E6 0C 18 F0 E0 00 39 A700 : 00 00 00 00 00 00 00 00 01 A708 : 00 00 00 18 18 00 00 00 8D A710 : 00 00 00 18 18 00 00 00 95 A718 : 00 00 18 3C 3C 18 00 00 2B A720 : 00 00 18 3C 3C 18 00 00 33 A728 : 00 18 3C 7E 7E 3C 18 00 3D A730 : 00 18 3C 7E 7E 3C 18 00 45 A738 : 18 3C 7E FF FF 7E 3C 18 23 A740 : 18 3C 7E FF FF 7E 3C 18 2B A748 : 18 3C 7E E7 E7 7E 3C 18 AE A750 : 18 3C 7E E7 E7 7E 3C 18 B6 A758 : 18 7E 66 C3 C3 66 7E 18 5B A760 : 18 7E 66 C3 C3 66 7E 18 63 A768 : 81 5A 24 42 42 24 5A 81 19 A770 : 81 42 24 00 00 24 42 81 49 A778 : 81 42 00 00 00 00 42 81 27 A780 : E0 F0 38 18 18 1C 0F 07 96 A788 : F0 F8 1C 0C 0C 0E 07 03 D0 A790 : F8 FC 0E 06 06 07 03 01 F1 A798 : FC FE 87 03 03 03 01 00 A2 A7A0 : 7E FF C3 81 81 81 00 00 63 A7A8 : 3F 7F E1 C0 C0 C0 80 00 4B A7B0 : 1F 3F 70 60 60 E0 C0 80 A8 A7B8 : 0F 1F 38 30 30 70 E0 C0 F7 A7C0 : 07 0F 1C 18 18 38 F0 E0 22 A7C8 : 03 07 0E 0C 0C 1C F8 F0 BB A7D0 : 01 03 07 06 06 0E FC F8 8C A7D8 : 00 01 03 03 03 87 FE FC DC A7E0 : 00 00 81 81 81 C3 FF 7E A4 A7E8 : 00 80 C0 C0 C0 E1 7F 3F 08 A7F0 : 80 C0 E0 60 60 70 3F 1F D9 A7F8 : C0 E0 70 30 30 38 1F 0F AA