basic: fixes for non-line-number mode (24, 62, 81), handle unhandledrejection, MODERN default dialect, DARTMOUTH

presets/basic/23match.bas

@@ -1,3 +1,5 @@
+OPTION DIALECT DEC
+0 REM from the DEC EduSystem Handbook
 100 REM***23 MATCHES
 110 LET M=23
 115 PRINT

presets/basic/craps.bas

@@ -1,5 +1,5 @@
+OPTION DIALECT HP2000
 0 REM http://www.bitsavers.org/bits/HP/paperTapes/JeffM/CRAPS.BAS
-1 OPTION DIALECT HP2000
 10  REM THIS IS A SPECIAL VERSION OF CRAPS
 20  REM 1) MAXIMUM BANK IS $1000
 30  REM 2) THE PLAYER GETS 10 CHANCES TO PLACE A BET

presets/basic/hamurabi.bas

@@ -1,3 +1,4 @@
+OPTION DIALECT ALTAIR
 10 REM *** CONVERTED FROM THE ORIGINAL FOCAL PROGRAM AND MODIFIED
 20 REM *** FOR EDUSYSTEM 70 BY DAVID AHL, DIGITAL
 30 REM *** MODIFIED FOR 8K MICROSOFT BASIC BY PETER TURNBULL

presets/basic/haunted.bas

@@ -1,4 +1,4 @@
-0 OPTION DIALECT DEC:REM http://www.bitsavers.org/bits/DEC/pdp10/games/
+OPTION DIALECT DEC:REM http://www.bitsavers.org/bits/DEC/pdp10/games/
 00001 PRINT "	This is the latest version as of 2-Jun-82."
 00005 DIM B$(30)
 00010 F=0

presets/basic/hello.bas

@@ -1,8 +1,9 @@
+OPTION DIALECT DARTMOUTH
 10 PRINT "HELLO! LET'S PROGRAM IN BASIC."
 15 PRINT
 20 INPUT "WOULD YOU MIND TYPING IN YOUR NAME";A$
 25 PRINT
-30 PRINT "THANKS, ";A$;"! THIS WILL BE FUN!";CHR$(7)
+30 PRINT "THANKS, ";A$;"! THIS WILL BE FUN!"
 35 PRINT
 40 INPUT "NOW TELL ME YOUR FAVORITE NUMBER";N
 45 PRINT

presets/basic/lander.bas

@@ -1,4 +1,4 @@
-0 OPTION DIALECT HP
+OPTION DIALECT HP
 1  REM  ****  HP BASIC PROGRAM LIBRARY  **************************
 2  REM
 3  REM        LANDER:  ROCKET LANDING VEHICLE

presets/basic/mortgage.bas

@@ -1,4 +1,4 @@
-1 OPTION DIALECT HP
+OPTION DIALECT HP
 10  PRINT "DANIEL O'ROURKE FEB. 23, 1977"
 20  PRINT "MINI-COMPUTOR 102"
 30  PRINT "SUBJECT: MORTGAGE PAYMENT"

presets/basic/sieve.bas

@@ -1,5 +1,5 @@
-001 OPTION DIALECT MODERN
-002 OPTION CPUSPEED MAX
+OPTION DIALECT MODERN
+OPTION CPUSPEED MAX
 010 REM***A PRIME NUMBER SIEVE BENCHMARK
 020 T = TIMER
 022 C = 0

presets/basic/startrader.bas

@@ -1,8 +1,8 @@
+OPTION DIALECT HP
+OPTION BASE 0:REM I GUESS HP HAS ZERO BASE???
 1 REM***STAR TRADER FROM
 2 REM***http://www.dunnington.info/public/basicgames/
 3 REM***2 chain files merged and ported to 8bitworkshop
-5 OPTION DIALECT HP
-6 OPTION BASE 0:REM I GUESS HP HAS ZERO BASE???
 10010 DIM S[12,15],T[12,12],T$[72],B[3,12]
 10020 REM COM W,D9,K9,X9,D1,X1,P9,T9,S9,Y9,H
 10030 DIM M[6,3],C[6,3]:REM COM Y1,R9,G9,Q

presets/basic/wumpus.bas

@@ -1,6 +1,6 @@
+OPTION DIALECT HP
 1 REM from: http://www.dunnington.info/public/basicgames/WUMPUS.hp
 2 REM extracted from HP library tape
-5 OPTION DIALECT HP
 10 REM- HUNT THE WUMPUS
 20 PRINT "INSTRUCTIONS (Y-N)";
 30 INPUT I$