Change bas files to symlinks (#123)

This commit is contained in:
Terence Boldt 2023-01-25 23:07:09 -05:00 committed by GitHub
parent b10dec3e50
commit 813ab1caee
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
3 changed files with 2 additions and 45 deletions

View File

@ -54,6 +54,3 @@ rm DriveFirmware.bin
rm MenuFirmware.bin rm MenuFirmware.bin
rm CommandFirmware.bin rm CommandFirmware.bin
rm FileAccessFirmware.bin rm FileAccessFirmware.bin
cp Update.Firmware.bas ../RaspberryPi/driveimage/
cp Startup.bas ../RaspberryPi/driveimage/

View File

@ -1,14 +0,0 @@
10 HOME
11 PRINT "Apple2-IO-RPi"
12 PRINT "(c)2021-2023 Terence J. Boldt"
13 PRINT
14 PRINT "This drive is dynamically generated"
15 PRINT "from the current working directory on"
16 PRINT "the Raspberry Pi and is in RAM only."
17 PRINT
18 PRINT "To start a shell to the RPi, type:"
19 PRINT "-shell"
20 PRINT
21 PRINT "To add RPI command to ProDOS, type:"
22 PRINT "-rpi.command"
23 PRINT

View File

@ -0,0 +1 @@
../../Apple2/Startup.bas

View File

@ -1,28 +0,0 @@
10 HOME
100 PRINT CHR$ (4)"BLOAD AT28C64B,A$2000"
200 PRINT "Program the firmare in slot #"
300 INPUT SL
400 FW = 8192 + 256 * SL: REM Firmware source
500 PS = 49287 + SL * 16: REM Firmware page selection
600 EP = 49152 + SL * 256: REM EPROM location
900 HOME
1000 FOR PG = 0 TO 3
1004 PRINT : PRINT
1005 PRINT "Writing page "PG" to slot "SL
1006 PRINT "_______________________________________"
1007 PRINT "_______________________________________";
1008 HTAB 1
1010 POKE PS,PG * 16 + 15: REM Set firmware page
1020 FOR X = 0 TO 255
1030 A = PEEK (FW + PG * 2048 + X)
1035 B = PEEK (EP + X): REM Skip if unchanged
1037 IF (A = B) THEN GOTO 1045
1040 POKE EP + X,A
1041 B = PEEK (EP + X)
1042 IF (B < > A) THEN GOTO 1041: REM Wait for write
1045 HTAB (X / 256) * 39 + 1
1046 INVERSE : PRINT " ";: NORMAL
1050 NEXT X
1060 NEXT PG
1900 PRINT
2000 PRINT "Firmware Update Complete"

View File

@ -0,0 +1 @@
../../Apple2/Update.Firmware.bas