Change bas files to symlinks (#123)

Apple2/assemble.sh

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

RaspberryPi/driveimage/Startup.bas

@@ -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 

RaspberryPi/driveimage/Startup.bas

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

RaspberryPi/driveimage/Update.Firmware.bas

@@ -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"

RaspberryPi/driveimage/Update.Firmware.bas

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