Session end : 11h59m58s | Hide picture Sexe : OFF | Donations 2024 : 785.48 € |
210 CLEAR INPUT:INPUT#7,score$:IF score$=""THEN 300
380 CLEAR INPUT:LOCATE#6,16,1:PRINT#6,"Another":LOCATE#6,15,2:PRINT#6,"Game(Y/N)?"
660 PEN p:LOCATE 1,z:PRINT dart$:NEXT:RETURN
1160 CORRECT=0:CLEAR INPUT:LOCATE 9,25:PRINT"Is this Correct (Y/N) ?";
1290 INK 0,14:INK 1,14:INK 2,14:INK 3,14:INK 4,14:BORDER 14:MODE 0:PAPER 0:CLS:PEN 2:PAPER 3:CLEAR INPUT
1300 LOCATE 3,10:PRINT"DART SCOREBOARD":PAPER 0:PEN 4:FOR n=7 TO 11 STEP 4:FOR z=2 TO 17 STEP 5:LOCATE z,n:PRINT dart$:NEXT:NEXT
1530 SYMBOL 247,56,56,144,144,144,144,16,16: dart$=CHR$(241)+CHR$(242)+CHR$(243)+CHR$(10)+CHR$(8)+CHR$(8)+CHR$(8) +CHR$(244)+CHR$(244)+CHR$(245)+CHR$(10)+CHR$(8)+CHR$(8)+CHR$(8)+CHR$(246)+CHR$(241)+CHR$(247)
210 WHILE INKEY$<>"":WEND:INPUT#7,score$:IF score$=""THEN 300
380 WHILE INKEY$<>"":WEND:LOCATE#6,16,1:PRINT#6,"Another":LOCATE#6,15,2:PRINT#6,"Game(Y/N)?"
660 PEN p:LOCATE 1,z:PRINT dart1$:LOCATE 1,z+1:PRINT dart2$:LOCATE 1,z+2:PRINT dart3$:NEXT:RETURN
1160 CORRECT=0:WHILE INKEY$<>"":WEND:LOCATE 9,25:PRINT"Is this Correct (Y/N) ?";
1290 INK 0,14:INK 1,14:INK 2,14:INK 3,14:INK 4,14:BORDER 14:MODE 0:PAPER 0:CLS:PEN 2:PAPER 3:WHILE INKEY$<>"":WEND
1300 LOCATE 3,10:PRINT"DART SCOREBOARD":PAPER 0:PEN 4:FOR n=7 TO 11 STEP 4:FOR z=2 TO 17 STEP 5:LOCATE z,n:PRINT dart1$:LOCATE z,n+1:PRINT dart2$:LOCATE z,n+2:PRINT dart3$:NEXT:NEXT
1530 SYMBOL 247,56,56,144,144,144,144,16,16: dart1$=CHR$(241)+CHR$(242)+CHR$(243):dart2$=CHR$(244)+CHR$(244)+CHR$(245): dart3$=CHR$(246)+CHR$(241)+CHR$(247)