|
|
|
@ -1,5 +1,5 @@
|
|
|
|
10 REM - VIRTUALBASIC.ORG - ONLINE-TOOL.BAS - 08/10/2018 - 01h32
|
|
|
|
10 REM - VIRTUALBASIC.ORG - ONLINE-TOOL.BAS - 08/10/2018 - 01h32
|
|
|
|
11 REM - LABELED ALPHA 1
|
|
|
|
11 REM - LABELED ALPHA 2
|
|
|
|
20 GOTO 4480
|
|
|
|
20 GOTO 4480
|
|
|
|
30 REM ->TITLEBAR
|
|
|
|
30 REM ->TITLEBAR
|
|
|
|
40 PRINT " DRUGWAR//E "
|
|
|
|
40 PRINT " DRUGWAR//E "
|
|
|
|
@ -198,7 +198,7 @@
|
|
|
|
1970 IF T$ = "J" GOTO 4240
|
|
|
|
1970 IF T$ = "J" GOTO 4240
|
|
|
|
1980 IF T$ = "L" GOTO 1680
|
|
|
|
1980 IF T$ = "L" GOTO 1680
|
|
|
|
1990 IF T% = "V" GOTO 1750
|
|
|
|
1990 IF T% = "V" GOTO 1750
|
|
|
|
2000 PRINT "INVALID SELECTION"
|
|
|
|
2000 PRINT "INVALID SELECTION""
|
|
|
|
2010 GOTO 1820
|
|
|
|
2010 GOTO 1820
|
|
|
|
2020 REM ->PRICES
|
|
|
|
2020 REM ->PRICES
|
|
|
|
2030 HOME
|
|
|
|
2030 HOME
|
|
|
|
|
