🚀 go-pugleaf

[]

I got this on the STarter kit from John Franco, and I think it is so great
(and short) that I have to post it!  It is a RAMdisk program, written by
John Harris, and done right at last!  It is NOT a desk accessory.  It has
no graphics.  It is just an autobooting RAMdisk that will survive system
resets!!!

(It will also work with programs that have a fixed location in low memory,
e.g. Forth systems and applications written in Forth, since it installs in
high memory, as opposed to standard programs and most other RAMdisks.)

First, the doc file by John Harris:
------------------------------------------------------------------------

This program gives you a ramdisk between 64K and 768K, and will stay in
memory through screen resolution changes, and even system reset!  The
ramdisk code and data is placed at the top of memory, and the screen is
moved down below it.  The top of memory pointers are set below the ramdisk
driver, which should keep it safe from everything short of powering down.

The ramdisk install is actually a 2 step process.  The 1st time the
program is run, it will adjust memory pointers and set-up the ramdisk
driver.  It then exits through the system reset vector so that TOS can
adjust to the new memory size.  The 2nd time through, the driver will
be installed and ready to use.  The easiest way to accomplish this, is
simply put the ramdisk.prg into an AUTO folder.  That way both passes are
automatically performed, in other words, it will auto-boot with no user
interaction.  The ramdisk installs as drive D, and if you save the desktop
after you install drive D, then the boot process will be completely automatic.
The ramdisk size defaults to 192K, but can be changed by holding down key
combinations of the Right and Left Shift, Control, and Alternate keys.

Configurations are as follows:

R. Shift                  64K
L. Shift                 128K
R. & L. Shifts           192K
Cntl                     256K
Cntl & R. Shift          320K
Cntl & L. Shift          384K
Cntl & R. & L. Shifts    448K
Alt                      512K
Alt & R. Shift           576K
Alt & L. Shift           640K
Alt & R. & L. Shifts     704K
Alt & Cntl               768K

If your disk has many desk accessories on it, you should be careful to 
load a small enough ramdisk so that 128K will be left at the end of the
boot.

If the system does crash, put a disk with the ramdisk program in the AUTO 
folder in drive A, and push the system reset button.

Enjoy!     John Harris

--------------------------------------------------------------------------

Next, a hex dump of this little gem (all 640 bytes of it!)
(you can convert this to a binary file (call it rd192.prg) by using the
"htb" program I posted a while ago):
--------------------------------------------------------------------------
60 1A 00 00 02 0A 00 00 00 14 00 00 06 50 00 00
00 00 00 00 00 00 00 00 00 00 00 00 20 7C 00 00
02 0A 61 06 4E F9 00 00 00 2E 72 04 22 7C 00 00
06 22 32 D8 51 C9 FF FC 22 3C 00 00 02 0A 70 C8
4E 42 30 39 00 00 06 4C 4E 75 2A 4F 2E 7C 00 00
08 6A 2A 6D 00 04 20 2D 00 0C D0 AD 00 14 D0 AD
00 1C D0 BC 00 00 01 00 2F 00 2F 0D 3F 00 3F 3C
00 4A 4E 41 DF FC 00 00 00 0C 42 A7 3F 3C 00 20
4E 41 5C 8F 23 C0 00 00 06 66 28 7C 00 00 04 36
2A 7C 00 00 04 2E 22 55 0C 51 02 00 67 74 3F 3C
FF FF 3F 3C 00 0B 4E 4D 58 8F C0 BC 00 00 00 0F
66 02 70 03 48 40 22 00 74 0A E4 A9 92 7C 00 14  * change the 03 - see below
33 C1 00 00 01 50 22 00 D2 B9 00 00 04 32 D2 BC
00 02 00 00 B2 94 6C 74 91 94 91 95 23 F9 00 00
04 72 00 00 01 FA 23 F9 00 00 04 76 00 00 02 06
23 F9 00 00 04 7E 00 00 02 00 20 7C 00 00 01 42
22 55 7E 7F 22 D8 51 CF FF FC 20 79 00 00 00 04
4E D0 22 15 D2 BC 00 00 00 20 23 C1 00 00 04 72
22 15 D2 BC 00 00 00 32 23 C1 00 00 04 76 22 15
D2 BC 00 00 00 12 23 C1 00 00 04 7E 30 39 00 00
04 C4 08 C0 00 03 33 C0 00 00 04 C4 2F 39 00 00
06 66 3F 3C 00 20 4E 41 5C 8F 42 67 4E 41 02 00
00 02 04 00 00 07 00 05 00 06 00 12 01 EC 00 00
0C 6F 00 03 00 04 66 00 00 A2 70 00 4E 75 0C 6F
00 03 00 04 66 00 00 8E 20 39 00 00 04 2E 4E 75
0C 6F 00 03 00 0E 66 00 00 88 20 39 00 00 04 2E
D0 BC 00 00 02 00 20 40 22 6F 00 06 70 00 32 2F
00 0C 70 09 E1 A1 D1 C1 30 2F 00 0A 24 09 08 02
00 00 66 28 08 2F 00 00 00 05 66 02 C1 49 32 3C
00 0F 20 D9 20 D9 20 D9 20 D9 20 D9 20 D9 20 D9
20 D9 51 C9 FF EE 53 80 66 E4 4E 75 08 2F 00 00
00 05 66 02 C1 49 32 3C 00 3F 10 D9 10 D9 10 D9
10 D9 10 D9 10 D9 10 D9 10 D9 51 C9 FF EE 53 80
66 E4 4E 75 4E F9 00 00 00 00 4E F9 00 00 00 00
4E F9 00 00 00 00 00 00 00 00 00 00 00 00 00 00
00 00 00 00 00 00 00 00 00 00 00 00 00 02 08 08
0C 0A 0A 38 3C 20 0A 0A 06 52 00 4B 4B 4B 4B 4B * I dont think these 4B's
4B 4B 4B 4B 4B 4B 4B 4B 4B 4B 4B 4B 4B 4B 4B 4B * are needed but...
4B 4B 4B 4B 4B 4B 4B 4B 4B 4B 4B 4B 4B 4B 4B 4B
4B 4B 4B 4B 4B 4B 4B 4B 4B 4B 4B 4B 4B 4B 4B 4B
--------------------------------------------------------------------------

To change the default size of the RAMdisk, change the "03" entry on the
marked line:

	size, kbytes	hex value

	 64		01
	128		02
	192		03
	256		04
	320		05
	384		06
	448		07
	512		08
	576		09	<-- for development work using Megamax
	640		0A
	704		0B
	768		0C
-----------------------------------------------------------------------

- Moshe Braner

Corson Hall, Cornell University, Ithaca NY 14853
(607) 272-3487

For electronic mail, my address is:

	braner@amvax.tn.cornell.edu   (ARPANET)
	braner%amvax.tn.cornell.edu@WISCVM.BITNET (Bitnet)
	{decvax,ihnp4,cmcl2,vax135}!cornell!amvax!braner (USENET)  
------------------------------------------------------------------------