1 GOSUB 2500
10 PRINT"[147] KENNST DU DIE SPIELREGELN (J/N)?"
20 GETA$:IFA$=""ORA$<>"J"ANDA$<>"N"THEN20
30 IFA$="N"THENGOSUB1000
40 HO=26
50 GOSUB5000
70 PRINT"[147]"
80 PRINT" NOCH"HO"HOELZER."
90 PRINT" WIEVIELE NIMMST DU ?":A=0
100 GETA$:IFA$=""THEN100
105 IFVAL(A$)>4ORVAL(A$)<1THEN100
110 HO=HO-VAL(A$)
120 PRINT"[147]":IFHO<=0THEN250
130 PRINT" NOCH"HO"HOELZER."
140 GOSUB500
150 PRINT" ICH NEHME"A".":FORI=1TO2000:NEXT
160 HO=HO-A
170 IFHO<=0THEN190
180 GOTO70
190 PRINT"[147]"
200 PRINT" DIESMAL HABE ICH GEWONNEN !"
210 PRINT" NOCHMAL (J/N)?"
220 GETA$:IFA$=""THEN220
230 IFA$="J"THENRUN40
240 IFA$="N"THENPRINT"[147]":END
245 GOTO220
250 PRINT" KOMPLIMENT !!!"
260 PRINT" DU HAST GEWONNEN !"
270 GOTO210
500 ONRGOTO700,501,600
501 IFHO=19ORHO=24ORHO=4ORHO=9THENA=4:RETURN
510 IFHO=23ORHO=18ORHO=8ORHO=3THENA=3:RETURN
520 IFHO=22ORHO=20ORHO=12ORHO=17ORHO=7ORHO=2THENA=2:RETURN
530 A=1:RETURN
600 IFHO=20THENA=1:RETURN
610 GOTO501
700 A=INT(4*RND(1)+1):RETURN
1000 PRINT"[147]"
1010 PRINT" AUF EINEM TISCH LIEGEN 26 "
1020 PRINT" STREICHHOELZER. MAN MUSS ZWISCHEN "
1030 PRINT" EINEM UND VIER NEHMEN."
1040 PRINT" DER, DER DAS LETZTE HOELZCHEN NIMMT,"
1050 PRINT" HAT GEWONNEN."
1060 PRINT">> TASTE <<"
1070 GETA$:IFA$=""THEN1070
1080 RETURN
2500 PRINT"[147]":POKE53281,6:POKE53280,14
2510 FORI=1TO20
2520 CO=INT(15*RND(1)):IFCO=6THEN2520
2530 POKE646,CO
2540 PRINT"      STREICHHOLZ-GAME"
2550 NEXT
2560 PRINT"[144]  GESCHRIEBEN VON KLAUS GRUEBENER"
2580 FORI=1TO5000:NEXT:PRINT"":RETURN
5000 PRINT"[147] BITTE WAEHLEN SIE NUN DIE"
5010 PRINT" SPIELSTUFE AUS :"
5020 PRINT" 1) ANFAENGER"
5030 PRINT" 2) NORMAL"
5040 PRINT" 3) PROFI"
5050 GETR$:IFR$=""THEN5050
5060 R=VAL(R$):IFR>3ORR<1THEN5050
5070 RETURN