1
0
mirror of https://github.com/dschmenk/PLASMA.git synced 2026-03-12 01:41:40 +00:00

20 Commits
Beta ... v2.0

Author SHA1 Message Date
David Schmenk
2c11ce4e96 Improve Apple /// Ready-To-Run instructions 2023-03-23 08:15:25 -07:00
David Schmenk
4854baec5a update Apple /// images for apple3rtr 2023-03-22 17:25:13 -07:00
David Schmenk
82a4a252a3 Update utility command options 2023-03-20 22:28:19 -07:00
David Schmenk
0e0ba23d7a Update 2.0 release fixes 2023-03-20 22:26:04 -07:00
Dave Schmenk
b865004d7b Update images 2023-03-20 22:19:14 -07:00
dschmenk
9932639b1b VBL test compatible with IIe and IIc 2023-03-20 10:55:46 -07:00
Dave Schmenk
655e410a1d IOUSDis must be written 2023-03-19 19:30:37 -07:00
Dave Schmenk
ee14a3bdf4 forgot IOUDis 2023-03-19 18:57:26 -07:00
Dave Schmenk
60c1b4f6e9 Enable/disable VBL ints for //c 2023-03-19 17:59:38 -07:00
Dave Schmenk
094ddd31e8 Flash cursor on 2e based on VBL 2023-03-19 16:28:41 -07:00
dschmenk
6fc53c4c21 Make '=' shorthand for destionation being current directory 2023-03-19 13:57:13 -07:00
dschmenk
0d585d7110 Disable windowsize because TFTPD is so slow 2023-03-19 13:33:41 -07:00
David Schmenk
bc68776f93 Merge branch 'master' of https://github.com/dschmenk/PLASMA 2023-03-19 12:21:30 -07:00
David Schmenk
9e7a774972 Add lz4 rogue instructions 2023-03-19 12:20:52 -07:00
David Schmenk
17d1e1eb89 Use PLASMA editor to edit levels 2023-03-19 11:30:42 -07:00
David Schmenk
976581b1c1 Cleanup for release 2023-03-19 08:51:17 -07:00
David Schmenk
3d1c3e9407 Keep trying to free some bytes 2023-03-18 19:30:17 -07:00
David Schmenk
4ca1ba9c04 Free prefix buffer before execmod 2023-03-18 16:33:55 -07:00
David Schmenk
af57dfdeeb Increase size of command line buffer without additional memory 2023-03-18 16:05:29 -07:00
David Schmenk
267fdebdef Beta release 2023-02-28 15:10:02 -08:00
32 changed files with 354 additions and 220 deletions

View File

@@ -1,9 +1,9 @@
# 2/28/2023 PLASMA 2.0 Beta Available! # 2/28/2023 PLASMA 2.0 Beta Available!
Hopefully close to a 2.0 Release. Hopefully close to a 2.0 Release.
[Download and read the Release Notes](https://github.com/dschmenk/PLASMA/releases) [Download and read the Release Notes](https://github.com/dschmenk/PLASMA/blob/master/doc/Version%202.0.md)
[Change List](https://github.com/dschmenk/PLASMA/blob/master/doc/Version%202.0.md#changes-in-plasma-for-20-alpha-2) [Change List](https://github.com/dschmenk/PLASMA/blob/master/doc/Version%202.0.md#changes-in-plasma-for-20-beta)
# 4/29/2018 PLASMA 1.2 Available! # 4/29/2018 PLASMA 1.2 Available!
[Download and read the Release Notes](https://github.com/dschmenk/PLASMA/blob/master/doc/Version%201.2.md) [Download and read the Release Notes](https://github.com/dschmenk/PLASMA/blob/master/doc/Version%201.2.md)

BIN
doc/ROGUE.LZ4.BIN Normal file

Binary file not shown.

94
doc/ROGUE.TXT Normal file
View File

@@ -0,0 +1,94 @@
PLASMA goes ROGUE
=================
Introduction
------------
This version of ROGUE is somewhat different than others. It is very simple in most ways, but I have developed a (I think) unique visibility algorithm that runs extremely fast. Fast enough to run interpreted by the PLASMA VM on a 1 MHz 6502, and space efficient enough to allow for large (in the future) dungeons. The unique feature of this ROGUE is that lighting becomes critical and strategic. You are in dark catacombs, after all. You enter with a lit lamp, throwing off a circle of light. There are also torches throughout the catacombs that light up a small surrounding circle of light. Other items in the catacombs are mana (health+energy increase), a key, a raft, and gold. You will also encounter a number of enemies that will track you down to try and kill you. You will also encounter doors, locked doors, windows, water, and crevasses.
Strategy
--------
As you travel through the catacombs, you must watch your health, energy, and lamp oil levels. Once health reaches zero, you are dead. As energy reaches zero, your vision will narrow and you will no longer be able to run. When the lamp oil runs out, you will be cast into darkness. If you see any torches in your field of vision, you can navigate to them. Taking the torch will extinguish the torch and replenish some of your lamp oil. Note that as you travel through the catacombs, your map of what you have seen will automatically fill in. But, if you are in the dark, you cannot read your map. You must turn on your lamp or get next to a torch before you can read the map again. If you are in the dark and cant see any torches in your field of vision, you are in complete darkness. It is easy to lose your bearings. As such, the absolute direction movements no longer work (NSEW) - you will end up in a random direction if you try. However, the relative turns, left/right and forward/backward controls continue to work (that you can do in the dark).
Being in the dark can be advantageous, however. All the enemies in the catacombs can see you if you are in light, just as you can see them. If you are in darkness, they can't see you, and you can move around without being tracked. Don't run into them! Also, don't fall off a crevasse. You will hear certain noises giving you feedback on what is going on. A simple beep when you run into walls. A groan when an enemy moves towards you. A bleep when you pick an item up. Other noises when you fall over an edge or win a battle. These can be used strategically when moving in the dark.
Health will slowly improve as you move around. However, energy is depleted as you move. Mana will increase both health and energy. If health is already at 100, it wont go any higher. Same for energy, but it is important to keep both high. When energy goes low, you can no longer move quickly and your field-of-vision narrows. When health goes to zero, you are dead.
Tile Description
----------------
As ROGUE uses the text screen for display, a little creativity is required to interpret the map. These are the characters you will see and what the represent. Once you get the hang of it, it will be just like looking at the unencoded Matrix.
Screen Character Represents
# Wall
. Floor
: Window (barred opening)
+ Door
% Locked Door (need key to open)
' ' space Crevasse (pit - don't fall in)
= Exit
- Entrance
* Torch
& Mana
, Key (yep, hard to spot)
@ Raft (need to cross water)
<<< Water
>>> Water (you will drown without raft)
$ Gold
Flashing Entity
T Thief
O Ogre
Z Zombie
R Rogue
Player Facing Direction
^ North
\ NE
> East
/ SE
v South
\ SW
< West
/ NW
Tiles in light are inverse. Entities are displayed only when lit and in field of view. The map is only visible when lit, i.e lamp is on or standing next to a torch.
Interaction
-----------
Keyboard commands Action
Q Run (Quick)
W up-arrow Forward
S down-arrow Backward
A left-arrow Turn left
D right-arrow Turn right
I Move N
J Move W
K Move E
M Move S
< , Turn lamp down
> . Turn lamp up/on
O Turn lamp off
Space-bar Open door
Return Pick up item
X Exit (die)
Whenever you and an enemy end up on the same tile, battle commences. As you win fights, your skill increases, improving your attack effectiveness. As you advance through the catacombs, the enemies become more powerful. You will need to replenish health and energy with mana. Don't forget, the alternative to fighting is stealth in the darkness. During battle, you have the option to run. If you have low energy, you won't get very far. Also, when fighting, you get turned around so you can't depend on the direction you were facing before fighting. Running ('Q'uick) will get you away from enemies but will use much more energy.
If you should die, restart the game by typing:
+rogue
Map Levels
----------
Level maps are up to 62x62 in size (plus a wall boundary for an effective 64x64 map size). They can be smaller than this. The game will end when it tries to load an non-existent level. Levels start at file name “LEVEL0“ and can go all the way to “LEVEL9“, but must be sequential.
There are two levels included on the disk, and an empty level for you to use as a template. You can edit the map levels, and add your own. They are simple ASCII text files. The included editor can edit the maps right on the disk. type:
+ed level.empty
after exiting from ROGUE. Make your changes and save it as LEVEL0" to "LEVEL9". The next free level is currently "LEVEL2". You may also edit an existing level:
+ed level0
for instance.

View File

@@ -81,13 +81,13 @@ If you should die, restart the game by typing:
Level maps are up to 62x62 in size (plus a wall boundary for an effective 64x64 map size). They can be smaller than this. The game will end when it tries to load an non-existent level. Levels start at file name “LEVEL0“ and can go all the way to “LEVEL9“, but must be sequential. Level maps are up to 62x62 in size (plus a wall boundary for an effective 64x64 map size). They can be smaller than this. The game will end when it tries to load an non-existent level. Levels start at file name “LEVEL0“ and can go all the way to “LEVEL9“, but must be sequential.
There are two levels included on the disk, and an empty level for you to use as a template. You can edit the map levels, and add your own. They are simple ASCII text files. The included sandbox editor can edit the maps right on the disk. type: There are two levels included on the disk, and an empty level for you to use as a template. You can edit the map levels, and add your own. They are simple ASCII text files. The included editor can edit the maps right on the disk. type:
``` ```
-sandbox level.empty +ed level.empty
``` ```
after exiting from ROGUE. Make your changes and save it as LEVEL0" to "LEVEL9". The next free level is currently "LEVEL2". You may also edit an existing level: after exiting from ROGUE. Make your changes and save it as LEVEL0" to "LEVEL9". The next free level is currently "LEVEL2". You may also edit an existing level:
``` ```
-sandbox level0 +ed level0
``` ```
for instance. for instance.

View File

@@ -1,20 +1,20 @@
# PLASMA Version 2.0 Beta # PLASMA Version 2.0
Welcome to PLASMA: the Grand Unifying Platform for the Apple 1, ][, and ///. Welcome to PLASMA: the Grand Unifying Platform for the Apple 1, ][, and ///.
Download the five disk images: Download the five disk images:
[PLASMA 2.0 Beta 800K Full System](https://github.com/dschmenk/PLASMA/blob/master/images/apple/PLASMA2.2mg?raw=true) [PLASMA 2.0 800K Full System](https://github.com/dschmenk/PLASMA/blob/master/images/apple/PLASMA2.2mg?raw=true)
[PLASMA 2.0 Beta System and ProDOS Boot](https://github.com/dschmenk/PLASMA/blob/master/images/apple/PLASMA2-SYS.PO?raw=true) [PLASMA 2.0 System and ProDOS Boot](https://github.com/dschmenk/PLASMA/blob/master/images/apple/PLASMA2-SYS.PO?raw=true)
[PLASMA 2.0 Beta Build Tools](https://github.com/dschmenk/PLASMA/blob/master/images/apple/PLASMA2-BLD.PO?raw=true) [PLASMA 2.0 Build Tools](https://github.com/dschmenk/PLASMA/blob/master/images/apple/PLASMA2-BLD.PO?raw=true)
[PLASMA 2.0 Beta Demos](https://github.com/dschmenk/PLASMA/blob/master/images/apple/PLASMA2-DEM.PO?raw=true) [PLASMA 2.0 Demos](https://github.com/dschmenk/PLASMA/blob/master/images/apple/PLASMA2-DEM.PO?raw=true)
[PLASMA 2.0 Beta TCP/IP network modules](https://github.com/dschmenk/PLASMA/blob/master/images/apple/PLASMA2-INET.PO?raw=true) [PLASMA 2.0 TCP/IP network modules](https://github.com/dschmenk/PLASMA/blob/master/images/apple/PLASMA2-INET.PO?raw=true)
[PLASMA 2.0 Beta Apple /// SOS Mame Boot and SANE floating point modules](https://github.com/dschmenk/PLASMA/blob/master/images/apple/PLASMA2-FPSOS.PO?raw=true) [PLASMA 2.0 Apple /// SOS Mame Boot and SANE floating point modules](https://github.com/dschmenk/PLASMA/blob/master/images/apple/PLASMA2-FPSOS.PO?raw=true)
[PLASMA 2.0 Alpha1 Apple /// Mame hard disk image](https://github.com/dschmenk/PLASMA/blob/master/images/apple/apple3.hd?raw=true) [PLASMA 2.0 Alpha1 Apple /// Mame hard disk image](https://github.com/dschmenk/PLASMA/blob/master/images/apple/apple3.hd?raw=true)
@@ -46,7 +46,7 @@ PLASMA can utilize the 16 bit features of the 65802 and 65816 processors to impr
## Apple /// ## Apple ///
The Apple /// gets the environment it always wanted: The ability to navigate the filesystem with a command line interface. The Apple /// always boots from the floppy drive, even if a hard disk is installed. The PLASMA.SOS floppy should be updated with the SOS.DRIVER configured for your machine. It contains the SOS.DRIVER configured for the Apple 3 Ready-To-Run Mame environment. Once booted, type `S /HARDISK/PLASMA` (or your install directory of choice) to change to, and set, the system directory. This can be automated by creating an `AUTORUN` file on the boot floppy with the above command in it. The Apple /// gets the environment it always wanted: The ability to navigate the filesystem with a command line interface. The Apple /// always boots from the floppy drive, even if a hard disk is installed. `PLASMA2-FPSOS.PO` is an Apple 3 bootable disk containing the SOS.DRIVER configured for the [Apple 3 Ready-To-Run Mame environment](https://github.com/datajerk/apple3rtr). `apple3.hd` is the pre-installed PLASMA hard disk image set up for [Apple 3 Ready-to-Run](https://github.com/datajerk/apple3rtr). For a physical Apple 3, the PLASMA2-FPSOS.PO floppy should be updated with the SOS.DRIVER configured for the machine. Once booted, type `S /HARDISK/PLASMA` (or your install directory of choice) to change to, and set, the system directory. This can be automated by creating an `AUTORUN` file on the boot floppy with the above command in it.
## PLASMA Command Line Shell ## PLASMA Command Line Shell
@@ -75,7 +75,7 @@ The shell is very brief with error messages. It is meant solely as a way to run
PLASMA comes with many library modules used by the tools, demos and sample code. The PLASMA system volume must remain in place for the duration of PLASMAs run otherwise it won't be able to find CMD or the system libraries. Probably the most useful included module is the editor. It is used for editing PLASMA source file, assembly source files, or any text file. Execute it with: PLASMA comes with many library modules used by the tools, demos and sample code. The PLASMA system volume must remain in place for the duration of PLASMAs run otherwise it won't be able to find CMD or the system libraries. Probably the most useful included module is the editor. It is used for editing PLASMA source file, assembly source files, or any text file. Execute it with:
``` ```
+ED [TEXT FILE] +ED [TEXT FILE] [GOTO LINE NUMBER]
``` ```
The file manipulation utilities to copy, delete, rename, create directories, and change file type and aux type remove the need for external programs to do the same. PLASMA can now be installed with the tools included on the PLASMA2-SYS boot floppy. They are: The file manipulation utilities to copy, delete, rename, create directories, and change file type and aux type remove the need for external programs to do the same. PLASMA can now be installed with the tools included on the PLASMA2-SYS boot floppy. They are:
``` ```
@@ -86,7 +86,7 @@ The file manipulation utilities to copy, delete, rename, create directories, and
+TYPE <FILENAME> [NEWTYPE [NEWAUX]] +TYPE <FILENAME> [NEWTYPE [NEWAUX]]
+CAT [-R] <FILEPATH] +CAT [-R] <FILEPATH]
``` ```
The ```-R``` option will operate on the directories recursively. Wildcard filenames can be specified with ```'*'``` matching zero or more characters, and ```'?'``` matching any character. The ```-R``` option will operate on the directories recursively. Wildcard filenames can be specified with ```'*'``` matching zero or more characters, and ```'?'``` matching any character. When copying files to the current directory, ```=``` can be used as a shortcut.
## Compiler Modules ## Compiler Modules
@@ -118,6 +118,16 @@ There is a [YouTube playlist](https://www.youtube.com/playlist?list=PLlPKgUMQbJ7
- The documentation is sparse and incomplete. Yep, could use your help... - The documentation is sparse and incomplete. Yep, could use your help...
# Changes in PLASMA for 2.0 Release
1. Fix command line buffer overflow
2. Use VBlank to blink editor cursor so not CPU speed dependent
3. Add ```=``` for ```+COPY``` current destination
4. Add //c support for DGRLIB and GRLIB wait-for-VBlank routines
# Changes in PLASMA for 2.0 Beta # Changes in PLASMA for 2.0 Beta
1. Compilers allows for including self imported defines 1. Compilers allows for including self imported defines

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

View File

@@ -6,6 +6,7 @@ import dgrlib
predef dgrTile(x, y, src)#0 predef dgrTile(x, y, src)#0
predef dgrTileStr(x, y, tilestr, strlen, tilebuff)#0 predef dgrTileStr(x, y, tilestr, strlen, tilebuff)#0
predef dgrFill(x, y, tile)#0 predef dgrFill(x, y, tile)#0
predef dgrVLB#0
predef dgrClear(clr)#0 predef dgrClear(clr)#0
predef dgrMode(mode)#1 predef dgrMode(mode)#1
predef dgrShow(page)#1 predef dgrShow(page)#1

View File

@@ -6,6 +6,7 @@ import grlib
predef grTile(x, y, src)#0 predef grTile(x, y, src)#0
predef grTileStr(x, y, tilestr, strlen, tilebuff)#0 predef grTileStr(x, y, tilestr, strlen, tilebuff)#0
predef grFill(x, y, tile)#0 predef grFill(x, y, tile)#0
predef dgrVLB#0
predef grClear(clr)#0 predef grClear(clr)#0
predef grMode(mode)#1 predef grMode(mode)#1
predef grShow(page)#1 predef grShow(page)#1

View File

@@ -492,39 +492,23 @@ asm _dgrFillTile
RTS RTS
end end
// //
// Wait for VLB - Only IIe/IIGS. // Wait for VLB
// //
asm vlbWait#0 export asm dgrVLB#0
PHP
SEI
STA $C079 ; Enable IOU access and reset VBL int on //c
STA $C05B ; Enable VBL int
- LDA $C019 - LDA $C019
STA $C079 ; Reset VBL int on //c
BMI - BMI -
- LDA $C019 - LDA $C019
BPL - BPL -
STA $C05A ; Disable VBL int on //c
STA $C078 ; Disable IOU access on //c
PLP
RTS RTS
end end
// Wait for VBL on IIc is entirely different from others.
// Setup, one-time *only* if polling will be used exclusively.
// Otherwise requires restoring the mode on exit,
// and setting up per-use instead.
// [php]
// sei ; otherwise interrupt is still raised
// sta $C07F ; enable access to VBL register
// sta $C05B ; enable VBL polling
// sta $C07E ; disable access to VBL register
//
// wait for VBL:
// - bit $C019
// bpl -
// lda $C070 ; $c019 bit 7 is sticky, reset it
//
// To allow other methods of VBL, restore access:
// - bit $C019
// bpl -
// lda $C070 ; $c019 bit 7 is sticky, reset it
// sta $C07F ; enable access to VBL register
// sta $C05A ; disable VBL polling
// sta $C07E ; disable access to VBL register
// [plp]
// //
// Clear the buffer // Clear the buffer
// //

View File

@@ -407,6 +407,28 @@ asm _grFillTile
RTS RTS
end end
// //
// Wait for VLB
//
export asm grVLB#0
LDA $BF98
AND #$C0
CMP #$80
BNE +
PHP
SEI
STA $C079 ; Enable IOU access and reset VBL int on //c
STA $C05B ; Enable VBL int
- LDA $C019
STA $C079 ; Reset VBL int on //c
BMI -
- LDA $C019
BPL -
STA $C05A ; Disable VBL int on //c
STA $C078 ; Disable IOU access on //c
PLP
+ RTS
end
//
// Clear the buffer // Clear the buffer
// //
export def grClear(clr)#0 export def grClear(clr)#0
@@ -458,6 +480,7 @@ export def grShow(page)#1
return page ^ 1 return page ^ 1
end end
export def grSwap#0 export def grSwap#0
//vlbWait
^(showpage1 + drawpage) ^(showpage1 + drawpage)
drawpage = drawpage ^ 1 drawpage = drawpage ^ 1
drawbuff = grbuff[drawpage] drawbuff = grbuff[drawpage]

View File

@@ -130,6 +130,7 @@ cp rel/apple/CONIOTST#FE1000 prodos/demos/CONIOTST.REL
cp rel/apple/ROD#FE1000 prodos/demos/ROD.REL cp rel/apple/ROD#FE1000 prodos/demos/ROD.REL
cp rel/RPNCALC#FE1000 prodos/demos/RPNCALC.REL cp rel/RPNCALC#FE1000 prodos/demos/RPNCALC.REL
cp rel/LZ4CAT#FE1000 prodos/demos/LZ4CAT.REL cp rel/LZ4CAT#FE1000 prodos/demos/LZ4CAT.REL
cp ../doc/ROGUE.LZ4.BIN prodos/demos/ROGUE.LZ4.BIN
cp rel/PRIMEGAP#FE1000 prodos/demos/PRIMEGAP.REL cp rel/PRIMEGAP#FE1000 prodos/demos/PRIMEGAP.REL
mkdir prodos/demos/rogue mkdir prodos/demos/rogue
@@ -195,7 +196,7 @@ cp samplesrc/playseq.pla prodos/bld/samples/PLAYSEQ.PLA.TXT
cp samplesrc/rpncalc.pla prodos/bld/samples/RPNCALC.PLA.TXT cp samplesrc/rpncalc.pla prodos/bld/samples/RPNCALC.PLA.TXT
cp samplesrc/fatcat.pla prodos/bld/samples/FATCAT.PLA.TXT cp samplesrc/fatcat.pla prodos/bld/samples/FATCAT.PLA.TXT
cp samplesrc/gfxdemo.pla prodos/bld/samples/GFXDEMO.PLA.TXT cp samplesrc/gfxdemo.pla prodos/bld/samples/GFXDEMO.PLA.TXT
cp samplesrc/lz4cat.pla prodos/bld/samples/Z4CAT.PLA.TXT cp samplesrc/lz4cat.pla prodos/bld/samples/LZ4CAT.PLA.TXT
cp samplesrc/sfm.pla prodos/bld/samples/SFM.PLA.TXT cp samplesrc/sfm.pla prodos/bld/samples/SFM.PLA.TXT
cp samplesrc/sfmsprt.pla prodos/bld/samples/SFMSPRT.PLA.TXT cp samplesrc/sfmsprt.pla prodos/bld/samples/SFMSPRT.PLA.TXT
cp samplesrc/fppow.pla prodos/bld/samples/FPPOW.PLA.TXT cp samplesrc/fppow.pla prodos/bld/samples/FPPOW.PLA.TXT

View File

@@ -1,62 +1,61 @@
#!/bin/bash #!/bin/bash
# Build tools # Build tools
echo "BLD/PLASM"; atftp $1 --put -l rel/PLASM#FE1000 -r $2/BLD/PLASM#FE1000 echo "BLD/PLASM"; atftp --option "disable windowsize" $1 --put -l rel/PLASM#FE1000 -r $2/BLD/PLASM#FE1000
echo "BLD/CODEOPT"; atftp $1 --put -l rel/CODEOPT#FE1000 -r $2/BLD/CODEOPT#FE1000 echo "BLD/CODEOPT"; atftp --option "disable windowsize" $1 --put -l rel/CODEOPT#FE1000 -r $2/BLD/CODEOPT#FE1000
#Build incs #Build incs
echo "BLD/INC/ARGS.PLH"; atftp $1 --put -l inc/args.plh -r $2/BLD/INC/ARGS.PLH#040000 echo "BLD/INC/ARGS.PLH"; atftp --option "disable windowsize" $1 --put -l inc/args.plh -r $2/BLD/INC/ARGS.PLH#040000
echo "BLD/INC/MATCHFILES.PLH"; atftp $1 --put -l inc/matchfiles.plh -r $2/BLD/INC/MATCHFILES.PLH#040000 echo "BLD/INC/MATCHFILES.PLH"; atftp --option "disable windowsize" $1 --put -l inc/matchfiles.plh -r $2/BLD/INC/MATCHFILES.PLH#040000
echo "BLD/INC/CMDSYS.PLH"; atftp $1 --put -l inc/cmdsys.plh -r $2/BLD/INC/CMDSYS.PLH#040000 echo "BLD/INC/CMDSYS.PLH"; atftp --option "disable windowsize" $1 --put -l inc/cmdsys.plh -r $2/BLD/INC/CMDSYS.PLH#040000
echo "BLD/INC/CONIO.PLH"; atftp $1 --put -l inc/conio.plh -r $2/BLD/INC/CONIO.PLH#040000 echo "BLD/INC/CONIO.PLH"; atftp --option "disable windowsize" $1 --put -l inc/conio.plh -r $2/BLD/INC/CONIO.PLH#040000
echo "BLD/INC/LINES.PLH"; atftp $1 --put -l inc/lines.plh -r $2/BLD/INC/LINES.PLH#040000 echo "BLD/INC/LINES.PLH"; atftp --option "disable windowsize" $1 --put -l inc/lines.plh -r $2/BLD/INC/LINES.PLH#040000
echo "BLD/INC/HGRTILE.PLH"; atftp $1 --put -l inc/hgrtile.plh -r $2/BLD/INC/HGRTILE.PLH#040000 echo "BLD/INC/HGRTILE.PLH"; atftp --option "disable windowsize" $1 --put -l inc/hgrtile.plh -r $2/BLD/INC/HGRTILE.PLH#040000
echo "BLD/INC/HGRFONT.PLH";atftp $1 --put -l inc/hgrfont.plh -r $2/BLD/INC/HGRFONT.PLH#040000 echo "BLD/INC/HGRFONT.PLH"; atftp --option "disable windowsize" $1 --put -l inc/hgrfont.plh -r $2/BLD/INC/HGRFONT.PLH#040000
echo "BLD/INC/HGRSPRITE.PLH";atftp $1 --put -l inc/hgrsprite.plh -r $2/BLD/INC/HGRSPRITE.PLH#040000 echo "BLD/INC/HGRSPRITE.PLH";atftp --option "disable windowsize" $1 --put -l inc/hgrsprite.plh -r $2/BLD/INC/HGRSPRITE.PLH#040000
echo "BLD/INC/HGRLIB.PLH"; atftp $1 --put -l inc/hgrlib.plh -r $2/BLD/INC/HGRLIB.PLH#040000 echo "BLD/INC/HGRLIB.PLH"; atftp --option "disable windowsize" $1 --put -l inc/hgrlib.plh -r $2/BLD/INC/HGRLIB.PLH#040000
echo "BLD/INC/GRLIB.PLH"; atftp $1 --put -l inc/grlib.plh -r $2/BLD/INC/GRLIB.PLH#040000 echo "BLD/INC/GRLIB.PLH"; atftp --option "disable windowsize" $1 --put -l inc/grlib.plh -r $2/BLD/INC/GRLIB.PLH#040000
echo "BLD/INC/DGRLIB.PLH"; atftp $1 --put -l inc/dgrlib.plh -r $2/BLD/INC/DGRLIB.PLH#040000 echo "BLD/INC/DGRLIB.PLH"; atftp --option "disable windowsize" $1 --put -l inc/dgrlib.plh -r $2/BLD/INC/DGRLIB.PLH#040000
echo "BLD/INC/FIBER.PLH"; atftp $1 --put -l inc/fiber.plh -r $2/BLD/INC/FIBER.PLH#040000 echo "BLD/INC/FIBER.PLH"; atftp --option "disable windowsize" $1 --put -l inc/fiber.plh -r $2/BLD/INC/FIBER.PLH#040000
echo "BLD/INC/FILEIO.PLH"; atftp $1 --put -l inc/fileio.plh -r $2/BLD/INC/FILEIO.PLH#040000 echo "BLD/INC/FILEIO.PLH"; atftp --option "disable windowsize" $1 --put -l inc/fileio.plh -r $2/BLD/INC/FILEIO.PLH#040000
echo "BLD/INC/INT32.PLH"; atftp $1 --put -l inc/int32.plh -r $2/BLD/INC/INT32.PLH#040000 echo "BLD/INC/INT32.PLH"; atftp --option "disable windowsize" $1 --put -l inc/int32.plh -r $2/BLD/INC/INT32.PLH#040000
echo "BLD/INC/FPSTR.PLH"; atftp $1 --put -l inc/fpstr.plh -r $2/BLD/INC/FPSTR.PLH#040000 echo "BLD/INC/FPSTR.PLH"; atftp --option "disable windowsize" $1 --put -l inc/fpstr.plh -r $2/BLD/INC/FPSTR.PLH#040000
echo "BLD/INC/FPU.PLH"; atftp $1 --put -l inc/fpu.plh -r $2/BLD/INC/FPU.PLH#040000 echo "BLD/INC/FPU.PLH"; atftp --option "disable windowsize" $1 --put -l inc/fpu.plh -r $2/BLD/INC/FPU.PLH#040000
echo "BLD/INC/GRAFIX.PLH"; atftp $1 --put -l inc/grafix.plh -r $2/BLD/INC/GRAFIX.PLH#040000 echo "BLD/INC/GRAFIX.PLH"; atftp --option "disable windowsize" $1 --put -l inc/grafix.plh -r $2/BLD/INC/GRAFIX.PLH#040000
echo "BLD/INC/INET.PLH"; atftp $1 --put -l inc/inet.plh -r $2/BLD/INC/INET.PLH#040000 echo "BLD/INC/JOYBUZZ.PLH"; atftp --option "disable windowsize" $1 --put -l inc/joybuzz.plh -r $2/BLD/INC/JOYBUZZ.PLH#040000
echo "BLD/INC/JOYBUZZ.PLH"; atftp $1 --put -l inc/joybuzz.plh -r $2/BLD/INC/JOYBUZZ.PLH#040000 echo "BLD/INC/INET.PLH"; atftp --option "disable windowsize" $1 --put -l inc/inet.plh -r $2/BLD/INC/INET.PLH#040000
echo "BLD/INC/LONGJUMP.PLH"; atftp $1 --put -l inc/longjmp.plh -r $2/BLD/INC/LONGJUMP.PLH#040000 echo "BLD/INC/LONGJUMP.PLH"; atftp --option "disable windowsize" $1 --put -l inc/longjmp.plh -r $2/BLD/INC/LONGJUMP.PLH#040000
echo "BLD/INC/LZ4.PLH"; atftp $1 --put -l inc/lz4.plh -r $2/BLD/INC/LZ4.PLH#040000 echo "BLD/INC/LZ4.PLH"; atftp --option "disable windowsize" $1 --put -l inc/lz4.plh -r $2/BLD/INC/LZ4.PLH#040000
echo "BLD/INC/MEMMGR.PLH"; atftp $1 --put -l inc/memmgr.plh -r $2/BLD/INC/MEMMGR.PLH#040000 echo "BLD/INC/MEMMGR.PLH"; atftp --option "disable windowsize" $1 --put -l inc/memmgr.plh -r $2/BLD/INC/MEMMGR.PLH#040000
echo "BLD/INC/MOUSE.PLH"; atftp $1 --put -l inc/mouse.plh -r $2/BLD/INC/MOUSE.PLH#040000 echo "BLD/INC/MOUSE.PLH"; atftp --option "disable windowsize" $1 --put -l inc/mouse.plh -r $2/BLD/INC/MOUSE.PLH#040000
echo "BLD/INC/PORTIO.PLH"; atftp $1 --put -l inc/portio.plh -r $2/BLD/INC/PORTIO.PLH#040000 echo "BLD/INC/PORTIO.PLH"; atftp --option "disable windowsize" $1 --put -l inc/portio.plh -r $2/BLD/INC/PORTIO.PLH#040000
echo "BLD/INC/SANE.PLH"; atftp $1 --put -l inc/sane.plh -r $2/BLD/INC/SANE.PLH#040000 echo "BLD/INC/SANE.PLH"; atftp --option "disable windowsize" $1 --put -l inc/sane.plh -r $2/BLD/INC/SANE.PLH#040000
echo "BLD/INC/SDFAT.PLH"; atftp $1 --put -l inc/sdfat.plh -r $2/BLD/INC/SDFAT.PLH#040000 echo "BLD/INC/SDFAT.PLH"; atftp --option "disable windowsize" $1 --put -l inc/sdfat.plh -r $2/BLD/INC/SDFAT.PLH#040000
echo "BLD/INC/SNDSEQ.PLH"; atftp $1 --put -l inc/sndseq.plh -r $2/BLD/INC/SNDSEQ.PLH#040000 echo "BLD/INC/SNDSEQ.PLH"; atftp --option "disable windowsize" $1 --put -l inc/sndseq.plh -r $2/BLD/INC/SNDSEQ.PLH#040000
echo "BLD/INC/SPIPORT.PLH"; atftp $1 --put -l inc/spiport.plh -r $2/BLD/INC/SPIPORT.PLH#040000 echo "BLD/INC/SPIPORT.PLH"; atftp --option "disable windowsize" $1 --put -l inc/spiport.plh -r $2/BLD/INC/SPIPORT.PLH#040000
echo "BLD/INC/TESTLIB.PLH"; atftp $1 --put -l inc/testlib.plh -r $2/BLD/INC/TESTLIB.PLH#040000 echo "BLD/INC/TESTLIB.PLH"; atftp --option "disable windowsize" $1 --put -l inc/testlib.plh -r $2/BLD/INC/TESTLIB.PLH#040000
# Sample sources # Sample sources
echo "BLD/SAMPLES/HELLO.PLA"; atftp $1 --put -l samplesrc/hello.pla -r $2/BLD/SAMPLES/HELLO.PLA#040000 echo "BLD/SAMPLES/HELLO.PLA"; atftp --option "disable windowsize" $1 --put -l samplesrc/hello.pla -r $2/BLD/SAMPLES/HELLO.PLA#040000
echo "BLD/SAMPLES/TESTLIB.PLA"; atftp $1 --put -l samplesrc/testlib.pla -r $2/BLD/SAMPLES/TESTLIB.PLA#040000 echo "BLD/SAMPLES/TESTLIB.PLA"; atftp --option "disable windowsize" $1 --put -l samplesrc/testlib.pla -r $2/BLD/SAMPLES/TESTLIB.PLA#040000
echo "BLD/SAMPLES/TEST.PLA"; atftp $1 --put -l samplesrc/test.pla -r $2/BLD/SAMPLES/TEST.PLA#040000 echo "BLD/SAMPLES/TEST.PLA"; atftp --option "disable windowsize" $1 --put -l samplesrc/test.pla -r $2/BLD/SAMPLES/TEST.PLA#040000
echo "BLD/SAMPLES/FIBERTEST.PLA"; atftp $1 --put -l samplesrc/fibertest.pla -r $2/BLD/SAMPLES/FIBERTEST.PLA#040000 echo "BLD/SAMPLES/MOUSETEST.PLA"; atftp --option "disable windowsize" $1 --put -l samplesrc/mousetest.pla -r $2/BLD/SAMPLES/MOUSETEST.PLA#040000
echo "BLD/SAMPLES/MOUSETEST.PLA"; atftp $1 --put -l samplesrc/mousetest.pla -r $2/BLD/SAMPLES/MOUSETEST.PLA#040000 echo "BLD/SAMPLES/FIBERTEST.PLA"; atftp --option "disable windowsize" $1 --put -l samplesrc/fibertest.pla -r $2/BLD/SAMPLES/FIBERTEST.PLA#040000
echo "BLD/SAMPLES/ROD.PLA"; atftp $1 --put -l samplesrc/rod.pla -r $2/BLD/SAMPLES/ROD.PLA#040000 echo "BLD/SAMPLES/ROD.PLA"; atftp --option "disable windowsize" $1 --put -l samplesrc/rod.pla -r $2/BLD/SAMPLES/ROD.PLA#040000
echo "BLD/SAMPLES/INT32TEST.PLA"; atftp $1 --put -l samplesrc/int32test.pla -r $2/BLD/SAMPLES/INT32TEST.PLA#040000 echo "BLD/SAMPLES/INT32TEST.PLA"; atftp --option "disable windowsize" $1 --put -l samplesrc/int32test.pla -r $2/BLD/SAMPLES/INT32TEST.PLA#040000
echo "BLD/SAMPLES/HGRTEST.PLA"; atftp $1 --put -l samplesrc/hgrtest.pla -r $2/BLD/SAMPLES/HGRTEST.PLA#040000 echo "BLD/SAMPLES/HGRTEST.PLA"; atftp --option "disable windowsize" $1 --put -l samplesrc/hgrtest.pla -r $2/BLD/SAMPLES/HGRTEST.PLA#040000
echo "BLD/SAMPLES/GRTEST.PLA"; atftp $1 --put -l samplesrc/grtest.pla -r $2/BLD/SAMPLES/GRTEST.PLA#040000 echo "BLD/SAMPLES/GRTEST.PLA"; atftp --option "disable windowsize" $1 --put -l samplesrc/grtest.pla -r $2/BLD/SAMPLES/GRTEST.PLA#040000
echo "BLD/SAMPLES/DGRTEST.PLA"; atftp $1 --put -l samplesrc/dgrtest.pla -r $2/BLD/SAMPLES/DGRTEST.PLA#040000 echo "BLD/SAMPLES/DGRTEST.PLA"; atftp --option "disable windowsize" $1 --put -l samplesrc/dgrtest.pla -r $2/BLD/SAMPLES/DGRTEST.PLA#040000
echo "BLD/SAMPLES/TILETEST.PLA"; atftp $1 --put -l samplesrc/tiletest.pla -r $2/BLD/SAMPLES/TILETEST.PLA#040000 echo "BLD/SAMPLES/TILETEST.PLA"; atftp --option "disable windowsize" $1 --put -l samplesrc/tiletest.pla -r $2/BLD/SAMPLES/TILETEST.PLA#040000
echo "BLD/SAMPLES/HGRTEST.PLA"; atftp $1 --put -l samplesrc/hgrtest.pla -r $2/BLD/SAMPLES/HGRTEST.PLA#040000 echo "BLD/SAMPLES/HGRTEST.PLA"; atftp --option "disable windowsize" $1 --put -l samplesrc/hgrtest.pla -r $2/BLD/SAMPLES/HGRTEST.PLA#040000
echo "BLD/SAMPLES/PLAYSEQ.PLA"; atftp $1 --put -l samplesrc/playseq.pla -r $2/BLD/SAMPLES/PLAYSEQ.PLA#040000 echo "BLD/SAMPLES/PLAYSEQ.PLA"; atftp --option "disable windowsize" $1 --put -l samplesrc/playseq.pla -r $2/BLD/SAMPLES/PLAYSEQ.PLA#040000
echo "BLD/SAMPLES/RPNCALC.PLA"; atftp $1 --put -l samplesrc/rpncalc.pla -r $2/BLD/SAMPLES/RPNCALC.PLA#040000 echo "BLD/SAMPLES/RPNCALC.PLA"; atftp --option "disable windowsize" $1 --put -l samplesrc/rpncalc.pla -r $2/BLD/SAMPLES/RPNCALC.PLA#040000
echo "BLD/SAMPLES/SIEVE.PLA"; atftp $1 --put -l samplesrc/sieve.pla -r $2/BLD/SAMPLES/SIEVE.PLA#040000 echo "BLD/SAMPLES/SIEVE.PLA"; atftp --option "disable windowsize" $1 --put -l samplesrc/sieve.pla -r $2/BLD/SAMPLES/SIEVE.PLA#040000
echo "BLD/SAMPLES/MEMTEST.PLA"; atftp $1 --put -l samplesrc/memtest.pla -r $2/BLD/SAMPLES/MEMTEST.PLA#040000 echo "BLD/SAMPLES/MEMTEST.PLA"; atftp --option "disable windowsize" $1 --put -l samplesrc/memtest.pla -r $2/BLD/SAMPLES/MEMTEST.PLA#040000
echo "BLD/SAMPLES/FATCAT.PLA"; atftp $1 --put -l samplesrc/fatcat.pla -r $2/BLD/SAMPLES/FATCAT.PLA#040000 echo "BLD/SAMPLES/FATCAT.PLA"; atftp --option "disable windowsize" $1 --put -l samplesrc/fatcat.pla -r $2/BLD/SAMPLES/FATCAT.PLA#040000
echo "BLD/SAMPLES/GFXDEMO.PLA"; atftp $1 --put -l samplesrc/gfxdemo.pla -r $2/BLD/SAMPLES/GFXDEMO.PLA#040000 echo "BLD/SAMPLES/GFXDEMO.PLA"; atftp --option "disable windowsize" $1 --put -l samplesrc/gfxdemo.pla -r $2/BLD/SAMPLES/GFXDEMO.PLA#040000
echo "BLD/SAMPLES/LZ4CAT.PLA"; atftp $1 --put -l samplesrc/lz4cat.pla -r $2/BLD/SAMPLES/LZ4CAT.PLA#040000 echo "BLD/SAMPLES/LZ4CAT.PLA"; atftp --option "disable windowsize" $1 --put -l samplesrc/lz4cat.pla -r $2/BLD/SAMPLES/LZ4CAT.PLA#040000
echo "BLD/SAMPLES/SFM.PLA"; atftp $1 --put -l samplesrc/sfm.pla -r $2/BLD/SAMPLES/SFM.PLA#040000 echo "BLD/SAMPLES/SFM.PLA"; atftp --option "disable windowsize" $1 --put -l samplesrc/sfm.pla -r $2/BLD/SAMPLES/SFM.PLA#040000
echo "BLD/SAMPLES/SFMSPRT.PLA"; atftp $1 --put -l samplesrc/sfmsprt.pla -r $2/BLD/SAMPLES/SFMSPRT.PLA#040000 echo "BLD/SAMPLES/SFMSPRT.PLA"; atftp --option "disable windowsize" $1 --put -l samplesrc/sfmsprt.pla -r $2/BLD/SAMPLES/SFMSPRT.PLA#040000
echo "BLD/SAMPLES/FPPOW.PLA"; atftp $1 --put -l samplesrc/fppow.pla -r $2/BLD/SAMPLES/FPPOW.PLA#040000 echo "BLD/SAMPLES/FPPOW.PLA"; atftp --option "disable windowsize" $1 --put -l samplesrc/fppow.pla -r $2/BLD/SAMPLES/FPPOW.PLA#040000
echo "BLD/SAMPLES/MON.PLA"; atftp $1 --put -l utilsrc/apple/mon.pla -r $2/BLD/SAMPLES/MON.PLA#040000 echo "BLD/SAMPLES/MON.PLA"; atftp --option "disable windowsize" $1 --put -l utilsrc/apple/mon.pla -r $2/BLD/SAMPLES/MON.PLA#040000

View File

@@ -1,44 +1,44 @@
#!/bin/bash #!/bin/bash
# Demos # Demos
echo "DEMOS/RPNCALC"; atftp $1 --put -l rel/RPNCALC#FE1000 -r $2/DEMOS/RPNCALC#FE1000 echo "DEMOS/RPNCALC"; atftp --option "disable windowsize" $1 --put -l rel/RPNCALC#FE1000 -r $2/DEMOS/RPNCALC#FE1000
echo "DEMOS/LZ4CAT"; atftp $1 --put -l rel/LZ4CAT#FE1000 -r $2/DEMOS/LZ4CAT#FE1000 echo "DEMOS/LZ4CAT"; atftp --option "disable windowsize" $1 --put -l rel/LZ4CAT#FE1000 -r $2/DEMOS/LZ4CAT#FE1000
echo "DEMOS/SIEVE"; atftp $1 --put -l rel/SIEVE#FE1000 -r $2/DEMOS/SIEVE#FE1000 echo "DEMOS/SIEVE"; atftp --option "disable windowsize" $1 --put -l rel/SIEVE#FE1000 -r $2/DEMOS/SIEVE#FE1000
echo "DEMOS/ROD"; atftp $1 --put -l rel/apple/ROD#FE1000 -r $2/DEMOS/ROD#FE1000 echo "DEMOS/ROGUE.LZ4"; atftp --option "disable windowsize" $1 --put -l ../doc/ROGUE.LZ4.BIN -r $2/DEMOS/ROGUE.LZ4#061000
echo "DEMOS/INT32TEST"; atftp $1 --put -l rel/INT32TEST#FE1000 -r $2/DEMOS/INT32TEST#FE1000 echo "DEMOS/ROD"; atftp --option "disable windowsize" $1 --put -l rel/apple/ROD#FE1000 -r $2/DEMOS/ROD#FE1000
echo "DEMOS/INT32TEST"; atftp --option "disable windowsize" $1 --put -l rel/INT32TEST#FE1000 -r $2/DEMOS/INT32TEST#FE1000
# Music demo # Music demo
echo "DEMOS/MUSIC/PLAYSEQ"; atftp $1 --put -l rel/apple/PLAYSEQ#FE1000 -r $2/DEMOS/MUSIC/PLAYSEQ#FE1000 echo "DEMOS/MUSIC/PLAYSEQ"; atftp --option "disable windowsize" $1 --put -l rel/apple/PLAYSEQ#FE1000 -r $2/DEMOS/MUSIC/PLAYSEQ#FE1000
atftp $1 --put -l mockingboard/ultima3.seq -r $2/DEMOS/MUSIC/ULTIMA3.SEQ#060000 atftp --option "disable windowsize" $1 --put -l mockingboard/ultima3.seq -r $2/DEMOS/MUSIC/ULTIMA3.SEQ#060000
atftp $1 --put -l mockingboard/startrek.seq -r $2/DEMOS/MUSIC/STARTREK.SEQ#060000 atftp --option "disable windowsize" $1 --put -l mockingboard/startrek.seq -r $2/DEMOS/MUSIC/STARTREK.SEQ#060000
# Rogue demo # Rogue demo
echo "DEMOS/ROGUE/ROGUE"; atftp $1 --put -l rel/ROGUE#FE1000 -r $2/DEMOS/ROGUE/ROGUE#FE1000 echo "DEMOS/ROGUE/ROGUE"; atftp --option "disable windowsize" $1 --put -l rel/ROGUE#FE1000 -r $2/DEMOS/ROGUE/ROGUE#FE1000
echo "DEMOS/ROGUE/ROGUEMAP"; atftp $1 --put -l rel/ROGUEMAP#FE1000 -r $2/DEMOS/ROGUE/ROGUEMAP#FE1000 echo "DEMOS/ROGUE/ROGUEMAP"; atftp --option "disable windowsize" $1 --put -l rel/ROGUEMAP#FE1000 -r $2/DEMOS/ROGUE/ROGUEMAP#FE1000
echo "DEMOS/ROGUE/ROGUECOMBAT"; atftp $1 --put -l rel/ROGUECOMBAT#FE1000 -r $2/DEMOS/ROGUE/ROGUECOMBAT#FE1000 echo "DEMOS/ROGUE/ROGUECOMBAT"; atftp --option "disable windowsize" $1 --put -l rel/ROGUECOMBAT#FE1000 -r $2/DEMOS/ROGUE/ROGUECOMBAT#FE1000
atftp $1 --put -l samplesrc/LEVEL0#040000 -r $2/DEMOS/ROGUE/LEVEL0#040000 atftp --option "disable windowsize" $1 --put -l samplesrc/LEVEL0#040000 -r $2/DEMOS/ROGUE/LEVEL0#040000
atftp $1 --put -l samplesrc/LEVEL1#040000 -r $2/DEMOS/ROGUE/LEVEL1#040000 atftp --option "disable windowsize" $1 --put -l samplesrc/LEVEL1#040000 -r $2/DEMOS/ROGUE/LEVEL1#040000
# Net demos # Net demos
echo "DEMOS/NET/HTTPD"; atftp $1 --put -l rel/HTTPD#FE1000 -r $2/DEMOS/NET/HTTPD#FE1000 echo "DEMOS/NET/HTTPD"; atftp --option "disable windowsize" $1 --put -l rel/HTTPD#FE1000 -r $2/DEMOS/NET/HTTPD#FE1000
atftp $1 --put -l samplesrc/index.html -r $2/DEMOS/NET/INDEX.HTML#040000 atftp --option "disable windowsize" $1 --put -l samplesrc/index.html -r $2/DEMOS/NET/INDEX.HTML#040000
# Apple 2 demos # Apple 2 demos
echo "DEMOS/APPLE2/TILETEST"; atftp $1 --put -l rel/apple/TILETEST#FE1000 -r $2/DEMOS/APPLE2/TILETEST#FE1000 echo "DEMOS/APPLE2/TILETEST"; atftp --option "disable windowsize" $1 --put -l rel/apple/TILETEST#FE1000 -r $2/DEMOS/APPLE2/TILETEST#FE1000
echo "DEMOS/APPLE2/HGRTEST"; atftp $1 --put -l rel/apple/HGRTEST#FE1000 -r $2/DEMOS/APPLE2/HGRTEST#FE1000 echo "DEMOS/APPLE2/HGRTEST"; atftp --option "disable windowsize" $1 --put -l rel/apple/HGRTEST#FE1000 -r $2/DEMOS/APPLE2/HGRTEST#FE1000
echo "DEMOS/APPLE2/GRTEST"; atftp $1 --put -l rel/apple/GRTEST#FE1000 -r $2/DEMOS/APPLE2/GRTEST#FE1000 echo "DEMOS/APPLE2/GRTEST"; atftp --option "disable windowsize" $1 --put -l rel/apple/GRTEST#FE1000 -r $2/DEMOS/APPLE2/GRTEST#FE1000
echo "DEMOS/APPLE2/DGRTEST"; atftp $1 --put -l rel/apple/DGRTEST#FE1000 -r $2/DEMOS/APPLE2/DGRTEST#FE1000 echo "DEMOS/APPLE2/DGRTEST"; atftp --option "disable windowsize" $1 --put -l rel/apple/DGRTEST#FE1000 -r $2/DEMOS/APPLE2/DGRTEST#FE1000
# Spiders from Mars # Spiders from Mars
echo "DEMOS/APPLE2/SPIDERS/SFM"; atftp $1 --put -l rel/apple/SFM#FE1000 -r $2/DEMOS/APPLE2/SPIDERS/SFM#FE1000 echo "DEMOS/APPLE2/SPIDERS/SFM"; atftp --option "disable windowsize" $1 --put -l rel/apple/SFM#FE1000 -r $2/DEMOS/APPLE2/SPIDERS/SFM#FE1000
echo "DEMOS/APPLE2/SPIDERS/SFMSPRT"; atftp $1 --put -l rel/apple/SFMSPRT#FE1000 -r $2/DEMOS/APPLE2/SPIDERS/SFMSPRT#FE1000 echo "DEMOS/APPLE2/SPIDERS/SFMSPRT"; atftp --option "disable windowsize" $1 --put -l rel/apple/SFMSPRT#FE1000 -r $2/DEMOS/APPLE2/SPIDERS/SFMSPRT#FE1000
# Arduino+SD card demos # Arduino+SD card demos
echo "DEMOS/APPLE2/SDUTILS/SPIPORT"; atftp $1 --put -l rel/apple/SPIPORT#FE1000 -r $2/DEMOS/APPLE2/SDUTILS/SPIPORT#FE1000 echo "DEMOS/APPLE2/SDUTILS/SPIPORT"; atftp --option "disable windowsize" $1 --put -l rel/apple/SPIPORT#FE1000 -r $2/DEMOS/APPLE2/SDUTILS/SPIPORT#FE1000
echo "DEMOS/APPLE2/SDUTILS/SDFAT"; atftp $1 --put -l rel/apple/SDFAT#FE1000 -r $2/DEMOS/APPLE2/SDUTILS/SDFAT#FE1000 echo "DEMOS/APPLE2/SDUTILS/SDFAT"; atftp --option "disable windowsize" $1 --put -l rel/apple/SDFAT#FE1000 -r $2/DEMOS/APPLE2/SDUTILS/SDFAT#FE1000
echo "DEMOS/APPLE2/SDUTILS/FATCAT"; atftp $1 --put -l rel/apple/FATCAT#FE1000 -r $2/DEMOS/APPLE2/SDUTILS/FATCAT#FE1000 echo "DEMOS/APPLE2/SDUTILS/FATCAT"; atftp --option "disable windowsize" $1 --put -l rel/apple/FATCAT#FE1000 -r $2/DEMOS/APPLE2/SDUTILS/FATCAT#FE1000
echo "DEMOS/APPLE2/SDUTILS/FATGET"; atftp $1 --put -l rel/apple/FATGET#FE1000 -r $2/DEMOS/APPLE2/SDUTILS/FATGET#FE1000 echo "DEMOS/APPLE2/SDUTILS/FATGET"; atftp --option "disable windowsize" $1 --put -l rel/apple/FATGET#FE1000 -r $2/DEMOS/APPLE2/SDUTILS/FATGET#FE1000
echo "DEMOS/APPLE2/SDUTILS/FATPUT"; atftp $1 --put -l rel/apple/FATPUT#FE1000 -r $2/DEMOS/APPLE2/SDUTILS/FATPUT#FE1000 echo "DEMOS/APPLE2/SDUTILS/FATPUT"; atftp --option "disable windowsize" $1 --put -l rel/apple/FATPUT#FE1000 -r $2/DEMOS/APPLE2/SDUTILS/FATPUT#FE1000
echo "DEMOS/APPLE2/SDUTILS/FATREADDSK"; atftp $1 --put -l rel/apple/FATREADDSK#FE1000 -r $2/DEMOS/APPLE2/SDUTILS/FATREADDSK#FE1000 echo "DEMOS/APPLE2/SDUTILS/FATREADDSK"; atftp --option "disable windowsize" $1 --put -l rel/apple/FATREADDSK#FE1000 -r $2/DEMOS/APPLE2/SDUTILS/FATREADDSK#FE1000
echo "DEMOS/APPLE2/SDUTILS/FATWRITEDSK"; atftp $1 --put -l rel/apple/FATWRITEDSK#FE1000 -r $2/DEMOS/APPLE2/SDUTILS/FATWRITEDSK#FE1000 echo "DEMOS/APPLE2/SDUTILS/FATWRITEDSK"; atftp --option "disable windowsize" $1 --put -l rel/apple/FATWRITEDSK#FE1000 -r $2/DEMOS/APPLE2/SDUTILS/FATWRITEDSK#FE1000

View File

@@ -1,8 +1,8 @@
#!/bin/bash #!/bin/bash
# SANE libraries # SANE libraries
echo "SYS/SANE"; atftp $1 --put -l rel/SANE#FE1000 -r $2/SYS/SANE#FE1000 echo "SYS/SANE"; atftp --option "disable windowsize" $1 --put -l rel/SANE#FE1000 -r $2/SYS/SANE#FE1000
echo "SYS/FPSTR"; atftp $1 --put -l rel/FPSTR#FE1000 -r $2/SYS/FPSTR#FE1000 echo "SYS/FPSTR"; atftp --option "disable windowsize" $1 --put -l rel/FPSTR#FE1000 -r $2/SYS/FPSTR#FE1000
echo "SYS/FPU"; atftp $1 --put -l rel/FPU#FE1000 -r $2/SYS/FPU#FE1000 echo "SYS/FPU"; atftp --option "disable windowsize" $1 --put -l rel/FPU#FE1000 -r $2/SYS/FPU#FE1000
echo "SYS/FP6502.CODE"; atftp $1 --put -l ../sysfiles/FP6502.CODE#060000 -r $2/SYS/FP6502.CODE#060000 echo "SYS/FP6502.CODE"; atftp --option "disable windowsize" $1 --put -l ../sysfiles/FP6502.CODE#060000 -r $2/SYS/FP6502.CODE#060000
echo "SYS/ELEMS.CODE"; atftp $1 --put -l ../sysfiles/ELEMS.CODE#060000 -r $2/SYS/ELEMS.CODE#060000 echo "SYS/ELEMS.CODE"; atftp --option "disable windowsize" $1 --put -l ../sysfiles/ELEMS.CODE#060000 -r $2/SYS/ELEMS.CODE#060000

View File

@@ -1,38 +1,38 @@
#!/bin/bash #!/bin/bash
# Core VM, CMDSYS, JITC files # Core VM, CMDSYS, JITC files
echo "PLASMA.SYSTEM"; atftp $1 --put -l rel/apple/PLASMA.SYSTEM#FF2000 -r $2/PLASMA.SYSTEM#FF2000 echo "PLASMA.SYSTEM"; atftp --option "disable windowsize" $1 --put -l rel/apple/PLASMA.SYSTEM#FF2000 -r $2/PLASMA.SYSTEM#FF2000
echo "PLVM.128"; atftp $1 --put -l rel/apple/PLVM.128#FF2000 -r $2/PLVM.128#FF2000 echo "PLVM.128"; atftp --option "disable windowsize" $1 --put -l rel/apple/PLVM.128#FF2000 -r $2/PLVM.128#FF2000
echo "PLVM16"; atftp $1 --put -l rel/apple/PLVM16#FF2000 -r $2/PLVM16#FF2000 echo "PLVM16"; atftp --option "disable windowsize" $1 --put -l rel/apple/PLVM16#FF2000 -r $2/PLVM16#FF2000
echo "CMD"; atftp $1 --put -l rel/apple/CMD#061000 -r $2/CMD#061000 echo "CMD"; atftp --option "disable windowsize" $1 --put -l rel/apple/CMD#061000 -r $2/CMD#061000
echo "CMD128"; atftp $1 --put -l rel/apple/CMD128#061000 -r $2/CMD128#061000 echo "CMD128"; atftp --option "disable windowsize" $1 --put -l rel/apple/CMD128#061000 -r $2/CMD128#061000
echo "SYS/JIT"; atftp $1 --put -l rel/apple/JIT#FE1000 -r $2/SYS/JIT#FE1000 echo "SYS/JIT"; atftp --option "disable windowsize" $1 --put -l rel/apple/JIT#FE1000 -r $2/SYS/JIT#FE1000
echo "SYS/JIT16"; atftp $1 --put -l rel/apple/JIT16#FE1000 -r $2/SYS/JIT16#FE1000 echo "SYS/JIT16"; atftp --option "disable windowsize" $1 --put -l rel/apple/JIT16#FE1000 -r $2/SYS/JIT16#FE1000
echo "SYS/JITUNE"; atftp $1 --put -l rel/apple/JITUNE#FE1000 -r $2/SYS/JITUNE#FE1000 echo "SYS/JITUNE"; atftp --option "disable windowsize" $1 --put -l rel/apple/JITUNE#FE1000 -r $2/SYS/JITUNE#disable FE1000
# Core libraries # Core libraries
echo "SYS/MATCHFILES"; atftp $1 --put -l rel/apple/MATCHFILES#FE1000 -r $2/SYS/MATCHFILES#FE1000 echo "SYS/MATCHFILES"; atftp --option "disable windowsize" $1 --put -l rel/apple/MATCHFILES#FE1000 -r $2/SYS/MATCHFILES#FE1000
echo "SYS/ARGS"; atftp $1 --put -l rel/ARGS#FE1000 -r $2/SYS/ARGS#FE1000 echo "SYS/ARGS"; atftp --option "disable windowsize" $1 --put -l rel/ARGS#FE1000 -r $2/SYS/ARGS#FE1000
echo "SYS/INT32"; atftp $1 --put -l rel/INT32#FE1000 -r $2/SYS/INT32#FE1000 echo "SYS/INT32"; atftp --option "disable windowsize" $1 --put -l rel/INT32#FE1000 -r $2/SYS/INT32#FE1000
echo "SYS/DHCP"; atftp $1 --put -l rel/DHCP#FE1000 -r $2/SYS/DHCP#FE1000 echo "SYS/DHCP"; atftp --option "disable windowsize" $1 --put -l rel/DHCP#FE1000 -r $2/SYS/DHCP#FE1000
echo "SYS/ETHERIP"; atftp $1 --put -l rel/ETHERIP#FE1000 -r $2/SYS/ETHERIP#FE1000 echo "SYS/ETHERIP"; atftp --option "disable windowsize" $1 --put -l rel/ETHERIP#FE1000 -r $2/SYS/ETHERIP#FE1000
echo "SYS/MOUSE"; atftp $1 --put -l rel/apple/MOUSE#FE1000 -r $2/SYS/MOUSE#FE1000 echo "SYS/MOUSE"; atftp --option "disable windowsize" $1 --put -l rel/apple/MOUSE#FE1000 -r $2/SYS/MOUSE#FE1000
echo "SYS/FIBER"; atftp $1 --put -l rel/FIBER#FE1000 -r $2/SYS/FIBER#FE1000 echo "SYS/FIBER"; atftp --option "disable windowsize" $1 --put -l rel/FIBER#FE1000 -r $2/SYS/FIBER#FE1000
echo "SYS/INET"; atftp $1 --put -l rel/INET#FE1000 -r $2/SYS/INET#FE1000 echo "SYS/INET"; atftp --option "disable windowsize" $1 --put -l rel/INET#FE1000 -r $2/SYS/INET#FE1000
echo "SYS/LONGJUMP"; atftp $1 --put -l rel/LONGJMP#FE1000 -r $2/SYS/LONGJMP#FE1000 echo "SYS/LONGJUMP"; atftp --option "disable windowsize" $1 --put -l rel/LONGJMP#FE1000 -r $2/SYS/LONGJMP#FE1000
echo "SYS/MEMMGR"; atftp $1 --put -l rel/MEMMGR#FE1000 -r $2/SYS/MEMMGR#FE1000 echo "SYS/MEMMGR"; atftp --option "disable windowsize" $1 --put -l rel/MEMMGR#FE1000 -r $2/SYS/MEMMGR#FE1000
echo "SYS/LZ4"; atftp $1 --put -l rel/LZ4#FE1000 -r $2/SYS/LZ4#FE1000 echo "SYS/LZ4"; atftp --option "disable windowsize" $1 --put -l rel/LZ4#FE1000 -r $2/SYS/LZ4#FE1000
echo "SYS/CONIO"; atftp $1 --put -l rel/apple/CONIO#FE1000 -r $2/SYS/CONIO#FE1000 echo "SYS/CONIO"; atftp --option "disable windowsize" $1 --put -l rel/apple/CONIO#FE1000 -r $2/SYS/CONIO#FE1000
echo "SYS/HGRTILE"; atftp $1 --put -l rel/apple/HGRTILE#FE1000 -r $2/SYS/HGRTILE#FE1000 echo "SYS/HGRTILE"; atftp --option "disable windowsize" $1 --put -l rel/apple/HGRTILE#FE1000 -r $2/SYS/HGRTILE#FE1000
echo "SYS/HGRFONT"; atftp $1 --put -l rel/apple/HGRFONT#FE1000 -r $2/SYS/HGRFONT#FE1000 echo "SYS/HGRFONT"; atftp --option "disable windowsize" $1 --put -l rel/apple/HGRFONT#FE1000 -r $2/SYS/HGRFONT#FE1000
echo "SYS/HGRSPRITE"; atftp $1 --put -l rel/apple/HGRSPRITE#FE1000 -r $2/SYS/HGRSPRITE#FE1000 echo "SYS/HGRSPRITE"; atftp --option "disable windowsize" $1 --put -l rel/apple/HGRSPRITE#FE1000 -r $2/SYS/HGRSPRITE#FE1000
echo "SYS/LINES"; atftp $1 --put -l rel/LINES#FE1000 -r $2/SYS/LINES#FE1000 echo "SYS/LINES"; atftp --option "disable windowsize" $1 --put -l rel/LINES#FE1000 -r $2/SYS/LINES#FE1000
echo "SYS/HGRLIB"; atftp $1 --put -l rel/apple/HGRLIB#FE1000 -r $2/SYS/HGRLIB#FE1000 echo "SYS/HGRLIB"; atftp --option "disable windowsize" $1 --put -l rel/apple/HGRLIB#FE1000 -r $2/SYS/HGRLIB#FE1000
echo "SYS/GRLIB"; atftp $1 --put -l rel/apple/GRLIB#FE1000 -r $2/SYS/GRLIB#FE1000 echo "SYS/GRLIB"; atftp --option "disable windowsize" $1 --put -l rel/apple/GRLIB#FE1000 -r $2/SYS/GRLIB#FE1000
echo "SYS/DGRLIB"; atftp $1 --put -l rel/apple/DGRLIB#FE1000 -r $2/SYS/DGRLIB#FE1000 echo "SYS/DGRLIB"; atftp --option "disable windowsize" $1 --put -l rel/apple/DGRLIB#FE1000 -r $2/SYS/DGRLIB#FE1000
echo "SYS/FILEIO"; atftp $1 --put -l rel/apple/FILEIO#FE1000 -r $2/SYS/FILEIO#FE1000 echo "SYS/FILEIO"; atftp --option "disable windowsize" $1 --put -l rel/apple/FILEIO#FE1000 -r $2/SYS/FILEIO#FE1000
echo "SYS/JOYBUZZ"; atftp $1 --put -l rel/apple/JOYBUZZ#FE1000 -r $2/SYS/JOYBUZZ#FE1000 echo "SYS/JOYBUZZ"; atftp --option "disable windowsize" $1 --put -l rel/apple/JOYBUZZ#FE1000 -r $2/SYS/JOYBUZZ#FE1000
echo "SYS/SNDSEQ"; atftp $1 --put -l rel/apple/SNDSEQ#FE1000 -r $2/SYS/SNDSEQ#FE1000 echo "SYS/SNDSEQ"; atftp --option "disable windowsize" $1 --put -l rel/apple/SNDSEQ#FE1000 -r $2/SYS/SNDSEQ#FE1000
echo "SYS/PORTIO"; atftp $1 --put -l rel/apple/PORTIO#FE1000 -r $2/SYS/PORTIO#FE1000 echo "SYS/PORTIO"; atftp --option "disable windowsize" $1 --put -l rel/apple/PORTIO#FE1000 -r $2/SYS/PORTIO#FE1000
echo "SYS/UTHERNET2";atftp $1 --put -l rel/apple/UTHERNET2#FE1000 -r $2/SYS/UTHERNET2#FE1000 echo "SYS/UTHERNET2";atftp --option "disable windowsize" $1 --put -l rel/apple/UTHERNET2#FE1000 -r $2/SYS/UTHERNET2#FE1000
echo "SYS/UTHERNET"; atftp $1 --put -l rel/apple/UTHERNET#FE1000 -r $2/SYS/UTHERNET#FE1000 echo "SYS/UTHERNET"; atftp --option "disable windowsize" $1 --put -l rel/apple/UTHERNET#FE1000 -r $2/SYS/UTHERNET#FE1000

View File

@@ -1,14 +1,14 @@
#!/bin/bash #!/bin/bash
# Core utilities # Core utilities
echo "SYS/ED"; atftp $1 --put -l rel/ED#FE1000 -r $2/SYS/ED#FE1000 echo "SYS/ED"; atftp --option "disable windowsize" $1 --put -l rel/ED#FE1000 -r $2/SYS/ED#FE1000
echo "SYS/TFTPD"; atftp $1 --put -l rel/TFTPD#FE1000 -r $2/SYS/TFTPD#FE1000 echo "SYS/TFTPD"; atftp --option "disable windowsize" $1 --put -l rel/TFTPD#FE1000 -r $2/SYS/TFTPD#FE1000
echo "SYS/COPY"; atftp $1 --put -l rel/apple/COPY#FE1000 -r $2/SYS/COPY#FE1000 echo "SYS/COPY"; atftp --option "disable windowsize" $1 --put -l rel/apple/COPY#FE1000 -r $2/SYS/COPY#FE1000
echo "SYS/DEL"; atftp $1 --put -l rel/apple/DEL#FE1000 -r $2/SYS/DEL#FE1000 echo "SYS/DEL"; atftp --option "disable windowsize" $1 --put -l rel/apple/DEL#FE1000 -r $2/SYS/DEL#FE1000
echo "SYS/REN"; atftp $1 --put -l rel/apple/REN#FE1000 -r $2/SYS/REN#FE1000 echo "SYS/REN"; atftp --option "disable windowsize" $1 --put -l rel/apple/REN#FE1000 -r $2/SYS/REN#FE1000
echo "SYS/CAT"; atftp $1 --put -l rel/apple/CAT#FE1000 -r $2/SYS/CAT#FE1000 echo "SYS/CAT"; atftp --option "disable windowsize" $1 --put -l rel/apple/CAT#FE1000 -r $2/SYS/CAT#FE1000
echo "SYS/NEWDIR"; atftp $1 --put -l rel/apple/NEWDIR#FE1000 -r $2/SYS/NEWDIR#FE1000 echo "SYS/NEWDIR"; atftp --option "disable windowsize" $1 --put -l rel/apple/NEWDIR#FE1000 -r $2/SYS/NEWDIR#FE1000
echo "SYS/TYPE"; atftp $1 --put -l rel/apple/TYPE#FE1000 -r $2/SYS/TYPE#FE1000 echo "SYS/TYPE"; atftp --option "disable windowsize" $1 --put -l rel/apple/TYPE#FE1000 -r $2/SYS/TYPE#FE1000
echo "SYS/MON"; atftp $1 --put -l rel/apple/MON#FE1000 -r $2/SYS/MON#FE1000 echo "SYS/MON"; atftp --option "disable windowsize" $1 --put -l rel/apple/MON#FE1000 -r $2/SYS/MON#FE1000
echo "SYS/SOS"; atftp $1 --put -l rel/apple/SOS#FE1000 -r $2/SYS/SOS#FE1000 echo "SYS/SOS"; atftp --option "disable windowsize" $1 --put -l rel/apple/SOS#FE1000 -r $2/SYS/SOS#FE1000
echo "SYS/ZIPCHIP"; atftp $1 --put -l rel/apple/ZIPCHIP#FE1000 -r $2/SYS/ZIPCHIP#FE1000 echo "SYS/ZIPCHIP"; atftp --option "disable windowsize" $1 --put -l rel/apple/ZIPCHIP#FE1000 -r $2/SYS/ZIPCHIP#FE1000

View File

@@ -993,11 +993,27 @@ def keyin3
return key | $80 return key | $80
end end
def keyin2e def keyin2e
byte key byte key, vbl
^$C079 = 0 // IOU enable and clear VBL int on //c
^$C05B = 0 // Enable VBL Ints on //c
vbl = ^$C019
repeat repeat
cursflash if flags & showcurs
if flash == 0
^cursptr = curschr
elsif flash == 128
^cursptr = underchr
fin
if vbl ^ ^$C019
flash = flash + 8
vbl = ^$C019
^$C079 = 0 // Clear VBL int on //c
fin
fin
key = ^keyboard key = ^keyboard
until key >= 128 until key >= 128
^$C05A = 0 // Disable VBL Ints on //c
^$C078 = 0 // IOU disable on //c
^keystrobe ^keystrobe
if ^pushbttn2 & 128 // Closed Apple pressed if ^pushbttn2 & 128 // Closed Apple pressed
when key when key
@@ -1615,7 +1631,7 @@ def cmdmode#0
word cmdptr, line word cmdptr, line
clrscrn clrscrn
puts("PLASMA Editor, Version 2.0 BETA\n") puts("PLASMA Editor, Version 2.0\n")
while not exit while not exit
puts(@filename) puts(@filename)
cmdptr = gets($BA) cmdptr = gets($BA)

View File

@@ -508,7 +508,7 @@ include "toolsrc/parse.pla"
// //
// Look at command line arguments and compile module // Look at command line arguments and compile module
// //
puts("PLASMA Compiler, Version 2.0 BETA\n") puts("PLASMA Compiler, Version 2.0\n")
arg = argNext(argFirst) arg = argNext(argFirst)
if ^arg and ^(arg + 1) == '-' if ^arg and ^(arg + 1) == '-'
opt = arg + 2 opt = arg + 2

View File

@@ -217,6 +217,9 @@ if not except(exit)
pathcpy(@dstpath, arg) pathcpy(@dstpath, arg)
arg = argNext(arg) arg = argNext(arg)
loop loop
if dstpath[0] == 1 and dstpath[1] == '='
fileio:getpfx(@dstpath)
fin
if not chkdstpath(@dstpath) and (srccnt > 1 or isWildName(srcfilelist)) if not chkdstpath(@dstpath) and (srccnt > 1 or isWildName(srcfilelist))
puts("Destination must be a directory: "); puts(@dstpath); putln puts("Destination must be a directory: "); puts(@dstpath); putln
return return

View File

@@ -5,6 +5,7 @@ include "inc/cmdsys.plh"
include "inc/inet.plh" include "inc/inet.plh"
include "inc/fileio.plh" include "inc/fileio.plh"
include "inc/conio.plh" include "inc/conio.plh"
sysflags nojitc // Keep JITC from compiling and pausing while transferring
// //
// TFTP values // TFTP values
// //
@@ -369,7 +370,7 @@ def volumes#0
next next
end end
puts("TFTP Server,Version 2.0\n") puts("TFTP Server, Version 2.0\n")
if !iNet:initIP() if !iNet:initIP()
return -1 return -1
fin fin

View File

@@ -72,7 +72,6 @@ byte hpalignstr = "HEAPALLOCALIGN"
byte hpallocstr = "HEAPALLOC" byte hpallocstr = "HEAPALLOC"
byte hprelstr = "HEAPRELEASE" byte hprelstr = "HEAPRELEASE"
byte hpavlstr = "HEAPAVAIL" byte hpavlstr = "HEAPAVAIL"
byte sysmods[] // overlay with exported strings
word memsetstr = "MEMSET" word memsetstr = "MEMSET"
byte memcpystr = "MEMCPY" byte memcpystr = "MEMCPY"
byte uisgtstr = "ISUGT" byte uisgtstr = "ISUGT"
@@ -84,7 +83,6 @@ byte divmodstr = "DIVMOD"
byte machidstr = "MACHID" byte machidstr = "MACHID"
byte sysstr = "SYSCALL" byte sysstr = "SYSCALL"
byte callstr = "CALL" byte callstr = "CALL"
byte prefix[] // overlay with exported symbols table
word exports = @sysmodstr, @version word exports = @sysmodstr, @version
word = @sysstr, @syscall word = @sysstr, @syscall
word = @callstr, @call word = @callstr, @call
@@ -98,6 +96,7 @@ word = @getcstr, @cin
word = @getsstr, @rdstr word = @getsstr, @rdstr
word = @toupstr, @toupper word = @toupstr, @toupper
word = @hpmarkstr, @markheap word = @hpmarkstr, @markheap
byte sysmods[] // overlay with exported strings
word = @hpallocstr,@allocheap word = @hpallocstr,@allocheap
word = @hpalignstr,@allocalignheap word = @hpalignstr,@allocalignheap
word = @hprelstr, @releaseheap word = @hprelstr, @releaseheap
@@ -1174,9 +1173,6 @@ def catalog(path)#0
byte i, type, len byte i, type, len
word entry word entry
if !^path
path = @prefix
fin
refnum = open(path) refnum = open(path)
if perr if perr
return return
@@ -1320,23 +1316,25 @@ end
// Command line processor // Command line processor
// //
def docmds#0 def docmds#0
strcpy(getlnbuf, @cmdln) word prefix
while 1
prefix = pfxop(heap, GET_PFX)
repeat
if ^getlnbuf if ^getlnbuf
strcpy(@cmdln, getlnbuf) strcpy(@cmdln, getlnbuf)
when toupper(parsecmd(getlnbuf)) when toupper(parsecmd(getlnbuf))
is 'C' is 'C'
catalog(getlnbuf) catalog(^getlnbuf ?? getlnbuf :: prefix)
break break
is 'P' is 'P'
pfxop(getlnbuf, SET_PFX) pfxop(getlnbuf, SET_PFX)
break break
is '/' is '/'
repeat repeat
prefix-- ^prefix--
until prefix[prefix] == '/' until ^(prefix + ^prefix) == '/'
if prefix > 1 if ^prefix > 1
pfxop(@prefix, SET_PFX) pfxop(prefix, SET_PFX)
fin fin
break break
is 'V' is 'V'
@@ -1346,6 +1344,9 @@ def docmds#0
execsys(getlnbuf) execsys(getlnbuf)
break break
is '+' is '+'
//
// Exec module
//
execmod(striptrail(getlnbuf)) execmod(striptrail(getlnbuf))
// //
// Clean up // Clean up
@@ -1361,9 +1362,9 @@ def docmds#0
crout() crout()
fin fin
fin fin
prstr(pfxop(@prefix, GET_PFX)) prstr(pfxop(prefix, GET_PFX))
rdstr($BA) rdstr($BA)
loop until 0
end end
// //
// Dummy definition to get free heap // Dummy definition to get free heap
@@ -1377,7 +1378,7 @@ heap = @lastdef
// //
// Print PLASMA version // Print PLASMA version
// //
prstr("PLASMA 2.0 BETA 64K\n")//; prbyte(version.1); cout('.'); prbyte(version.0); crout prstr("PLASMA 2.0 64K\n")//; prbyte(version.1); cout('.'); prbyte(version.0); crout
// //
// Init symbol table. // Init symbol table.
// //
@@ -1398,13 +1399,14 @@ syscmdln = @cmdln
autorun = open(@autorun) autorun = open(@autorun)
if autorun if autorun
cmdln = read(autorun, @cmdln+1, 81) cmdln = read(autorun, @cmdln+1, 81)
strcpy(getlnbuf, @cmdln)
close(0) close(0)
else else
^getlnbuf = 0
// //
// Print some startup info. // Print some startup info.
// //
prstr("MEM FREE:$"); prword(availheap); crout prstr("MEM FREE:$"); prword(availheap); crout
fin fin
pfxop(@prefix, GET_PFX)
docmds docmds
done done

View File

@@ -90,7 +90,6 @@ byte hpalignstr = "HEAPALLOCALIGN"
byte hpallocstr = "HEAPALLOC" byte hpallocstr = "HEAPALLOC"
byte hprelstr = "HEAPRELEASE" byte hprelstr = "HEAPRELEASE"
byte hpavlstr = "HEAPAVAIL" byte hpavlstr = "HEAPAVAIL"
byte sysmods[] // overlay with exported strings
word memsetstr = "MEMSET" word memsetstr = "MEMSET"
byte memcpystr = "MEMCPY" byte memcpystr = "MEMCPY"
byte uisgtstr = "ISUGT" byte uisgtstr = "ISUGT"
@@ -102,7 +101,6 @@ byte divmodstr = "DIVMOD"
byte machidstr = "MACHID" byte machidstr = "MACHID"
byte sysstr = "SYSCALL" byte sysstr = "SYSCALL"
byte callstr = "CALL" byte callstr = "CALL"
byte prefix[] // overlay with exported symbols table
word exports = @sysmodstr, @version word exports = @sysmodstr, @version
word = @sysstr, @syscall word = @sysstr, @syscall
word = @callstr, @call word = @callstr, @call
@@ -116,6 +114,7 @@ word = @getcstr, @cin
word = @getsstr, @rdstr word = @getsstr, @rdstr
word = @toupstr, @toupper word = @toupstr, @toupper
word = @hpmarkstr, @markheap word = @hpmarkstr, @markheap
byte sysmods[] // overlay with exported strings
word = @hpallocstr,@allocheap word = @hpallocstr,@allocheap
word = @hpalignstr,@allocalignheap word = @hpalignstr,@allocalignheap
word = @hprelstr, @releaseheap word = @hprelstr, @releaseheap
@@ -1239,9 +1238,6 @@ def catalog(path)#0
byte i, type, len byte i, type, len
word entry word entry
if !^path
path = @prefix
fin
refnum = open(path) refnum = open(path)
if perr if perr
return return
@@ -1387,26 +1383,28 @@ end
// Command line processor // Command line processor
// //
def docmds#0 def docmds#0
word prefix
loadmod(jitmod) // Cannot do this in init code - it will overwrite it! loadmod(jitmod) // Cannot do this in init code - it will overwrite it!
xheap = $0400 // Reset heap to point at low memory xheap = $0400 // Reset heap to point at low memory
xheaptop = $A000 // Top below JITC xheaptop = $A000 // Top below JITC
strcpy(getlnbuf, @cmdln) prefix = pfxop(heap, GET_PFX)
while 1 repeat
if ^getlnbuf if ^getlnbuf
strcpy(@cmdln, getlnbuf) strcpy(@cmdln, getlnbuf)
when toupper(parsecmd(getlnbuf)) when toupper(parsecmd(getlnbuf))
is 'C' is 'C'
catalog(getlnbuf) catalog(^getlnbuf ?? getlnbuf :: prefix)
break break
is 'P' is 'P'
pfxop(getlnbuf, SET_PFX) pfxop(getlnbuf, SET_PFX)
break break
is '/' is '/'
repeat repeat
prefix-- ^prefix--
until prefix[prefix] == '/' until ^(prefix + ^prefix) == '/'
if prefix > 1 if ^prefix > 1
pfxop(@prefix, SET_PFX) pfxop(prefix, SET_PFX)
fin fin
break break
is 'V' is 'V'
@@ -1438,9 +1436,9 @@ def docmds#0
crout() crout()
fin fin
fin fin
prstr(pfxop(@prefix, GET_PFX)) prstr(pfxop(prefix, GET_PFX))
rdstr($BA) rdstr($BA)
loop until 0
end end
// //
// Dummy definition to get free heap // Dummy definition to get free heap
@@ -1454,7 +1452,7 @@ heap = @lastdef
// //
// Print PLASMA version // Print PLASMA version
// //
prstr("PLASMA 2.0 BETA 128K\n")//; prbyte(version.1); cout('.'); prbyte(version.0); crout prstr("PLASMA 2.0 128K\n")//; prbyte(version.1); cout('.'); prbyte(version.0); crout
// //
// Init symbol table. // Init symbol table.
// //
@@ -1475,13 +1473,14 @@ syscmdln = @cmdln
autorun = open(@autorun) autorun = open(@autorun)
if autorun if autorun
cmdln = read(autorun, @cmdln+1, 81) cmdln = read(autorun, @cmdln+1, 81)
strcpy(getlnbuf, @cmdln)
close(0) close(0)
else else
^getlnbuf = 0
// //
// Print some startup info. // Print some startup info.
// //
prstr("MEM FREE:$"); prword(availheap); crout prstr("MEM FREE:$"); prword(availheap); crout
fin fin
pfxop(@prefix, GET_PFX)
docmds docmds
done done

View File

@@ -173,6 +173,7 @@ def shell#1
byte prefix[64] byte prefix[64]
byte err[] byte err[]
word cmdptr word cmdptr
// //
// Copy AUTORUN commmand line // Copy AUTORUN commmand line
// //
@@ -180,6 +181,7 @@ def shell#1
// //
// Handle commands. // Handle commands.
// //
getpfx(@prefix))
repeat repeat
if ^cmdptr if ^cmdptr
when toupper(parsecmd(cmdptr)) when toupper(parsecmd(cmdptr))
@@ -210,9 +212,7 @@ def shell#1
volumes volumes
break break
is '+' is '+'
//cmdsys:modexec(striptrail(cmdptr))
return striptrail(cmdptr) return striptrail(cmdptr)
//cmdsys:syswrite(cmdsys.refcons, @textmode, 3)
break break
otherwise otherwise
puts("?\n") puts("?\n")

View File

@@ -248,6 +248,7 @@ def shell#1
byte prefix[64] byte prefix[64]
byte err[] byte err[]
word cmdptr word cmdptr
// //
// Copy AUTORUN commmand line // Copy AUTORUN commmand line
// //
@@ -255,6 +256,7 @@ def shell#1
// //
// Handle commands. // Handle commands.
// //
getpfx(@prefix))
repeat repeat
if ^cmdptr if ^cmdptr
when toupper(parsecmd(cmdptr)) when toupper(parsecmd(cmdptr))
@@ -286,9 +288,7 @@ def shell#1
break break
is '+' is '+'
*jitcodeptr = jitcbuf *jitcodeptr = jitcbuf
//cmdsys:modexec(striptrail(cmdptr))
return striptrail(cmdptr) return striptrail(cmdptr)
//cmdsys:syswrite(cmdsys.refcons, @textmode, 3)
break break
otherwise otherwise
puts("?\n") puts("?\n")

View File

@@ -106,7 +106,6 @@ byte uisltstr[] = "ISULT"
byte uislestr[] = "ISULE" byte uislestr[] = "ISULE"
byte sextstr[] = "SEXT" byte sextstr[] = "SEXT"
byte divmodstr[] = "DIVMOD" byte divmodstr[] = "DIVMOD"
byte sysmods[] = "" // overlay sys path with exports
word exports[] = @sysmodstr, @version word exports[] = @sysmodstr, @version
word = @sysstr, @syscall word = @sysstr, @syscall
word = @callstr, @call word = @callstr, @call
@@ -119,6 +118,7 @@ word = @putwstr, @prword
word = @getcstr, @cin word = @getcstr, @cin
word = @getsstr, @rdstr word = @getsstr, @rdstr
word = @toupstr, @toupper word = @toupstr, @toupper
byte sysmods[] // overlay sys path with exports
word = @hpmarkstr, @markheap word = @hpmarkstr, @markheap
word = @hpallocstr,@allocheap word = @hpallocstr,@allocheap
word = @hpalignstr,@allocalignheap word = @hpalignstr,@allocalignheap
@@ -1263,7 +1263,7 @@ cmdlnptr = @cmdln
// Print PLASMA version // Print PLASMA version
// //
init_cons init_cons
prstr("PLASMA 2.0 BETA\n")//; putb(version.1); putc('.'); putb(version.0); putln prstr("PLASMA 2.0\n")//; putb(version.1); putc('.'); putb(version.0); putln
prstr("MEM:$"); prword(availheap); crout prstr("MEM:$"); prword(availheap); crout
// //
// Exec command line parser // Exec command line parser

View File

@@ -117,7 +117,6 @@ byte uisltstr[] = "ISULT"
byte uislestr[] = "ISULE" byte uislestr[] = "ISULE"
byte sextstr[] = "SEXT" byte sextstr[] = "SEXT"
byte divmodstr[] = "DIVMOD" byte divmodstr[] = "DIVMOD"
byte sysmods[] = "" // overlay sys path with exports
word exports[] = @sysmodstr, @version word exports[] = @sysmodstr, @version
word = @sysstr, @syscall word = @sysstr, @syscall
word = @callstr, @call word = @callstr, @call
@@ -130,6 +129,7 @@ word = @putwstr, @prword
word = @getcstr, @cin word = @getcstr, @cin
word = @getsstr, @rdstr word = @getsstr, @rdstr
word = @toupstr, @toupper word = @toupstr, @toupper
byte sysmods[] // overlay sys path with exports
word = @hpmarkstr, @markheap word = @hpmarkstr, @markheap
word = @hpallocstr,@allocheap word = @hpallocstr,@allocheap
word = @hpalignstr,@allocalignheap word = @hpalignstr,@allocalignheap
@@ -1286,7 +1286,7 @@ cmdlnptr = @cmdln
// Print PLASMA version // Print PLASMA version
// //
init_cons init_cons
prstr("PLASMA 2.0 BETA JITC\n")//; putb(version.1); putc('.'); putb(version.0); putln prstr("PLASMA 2.0 JITC\n")//; putb(version.1); putc('.'); putb(version.0); putln
prstr("MEM:$"); prword(availheap); crout prstr("MEM:$"); prword(availheap); crout
// //
// Exec command line parser // Exec command line parser