00000000: 46 49 4C 45 3A 20 76 64 63 20 72 61 6D 64 69 73 |FILE: vdc ramdis|
00000010: 6B 2E 73 64 61 20 20 20 20 20 20 20 20 20 20 20 |k.sda |
00000020: 20 28 52 34 29 20 20 46 52 4F 4D 3A 20 44 6F 6E | (R4) FROM: Don|
00000030: 61 6C 64 42 34 37 20 20 20 30 34 2F 32 32 2F 38 |aldB47 04/22/8|
00000040: 39 20 20 20 53 23 3A 20 38 31 34 34 34 36 20 20 |9 S#: 814446 |
00000050: 20 20 20 20 20 20 0A 53 55 42 4A 45 43 54 3A 20 | .SUBJECT: |
00000060: 56 44 43 20 52 41 4D 44 69 73 6B 20 77 2F 53 6F |VDC RAMDisk w/So|
00000070: 75 72 63 65 0A 0A 54 59 50 45 3A 20 20 20 20 20 |urce..TYPE: |
00000080: 20 20 20 20 20 70 72 67 0A 42 4C 4F 43 4B 53 3A | prg.BLOCKS:|
00000090: 20 20 20 20 20 20 20 20 36 32 0A 44 4F 57 4E 4C | 62.DOWNL|
000000A0: 4F 41 44 53 3A 20 20 20 20 20 31 33 37 0A 45 53 |OADS: 137.ES|
000000B0: 54 2E 20 44 2F 4C 20 54 49 4D 45 3A 20 33 30 30 |T. D/L TIME: 300|
000000C0: 3A 20 31 34 3A 30 31 20 31 32 30 30 3A 20 30 33 |: 14:01 1200: 03|
000000D0: 3A 36 30 20 0A 45 51 55 49 50 4D 45 4E 54 3A 20 |:60 .EQUIPMENT: |
000000E0: 20 20 20 20 43 31 32 38 20 69 6E 20 36 34 20 4D | C128 in 64 M|
000000F0: 6F 64 65 0A 20 20 20 20 20 20 20 20 20 20 20 20 |ode. |
00000100: 20 20 20 36 34 4B 20 56 44 43 20 64 65 73 69 72 | 64K VDC desir|
00000110: 61 62 6C 65 2C 20 62 75 74 0A 46 49 4C 45 53 20 |able, but.FILES |
00000120: 4E 45 45 44 45 44 3A 20 20 50 41 4C 20 74 6F 20 |NEEDED: PAL to |
00000130: 61 73 73 65 6D 62 6C 65 20 74 68 65 0A 20 20 20 |assemble the. |
00000140: 20 20 20 20 20 20 20 20 20 20 20 20 53 6F 75 72 | Sour|
00000150: 63 65 20 43 6F 64 65 2E 0A 0A 20 20 20 54 68 69 |ce Code... Thi|
00000160: 73 20 69 73 20 61 6E 20 75 70 64 61 74 65 64 20 |s is an updated |
00000170: 76 65 72 73 69 6F 6E 20 6F 66 20 56 44 43 0A 52 |version of VDC.R|
00000180: 41 4D 44 49 53 4B 31 2E 35 2C 20 74 68 65 20 46 |AMDISK1.5, the F|
00000190: 52 41 4D 28 30 29 20 66 75 6E 63 74 69 6F 6E 20 |RAM(0) function |
000001A0: 62 75 67 0A 68 61 73 20 62 65 65 6E 20 66 69 78 |bug.has been fix|
000001B0: 65 64 2E 20 41 6C 6F 6E 67 20 77 69 74 68 20 74 |ed. Along with t|
000001C0: 68 65 20 70 72 6F 67 72 61 6D 0A 49 20 69 6E 63 |he program.I inc|
000001D0: 6C 75 64 65 20 74 68 65 20 73 6F 75 72 63 65 20 |lude the source |
000001E0: 63 6F 64 65 2C 20 69 6E 20 50 41 4C 0A 66 6F 72 |code, in PAL.for|
000001F0: 6D 61 74 2E 20 4C 6F 61 64 20 74 68 65 20 70 72 |mat. Load the pr|
00000200: 6F 67 72 61 6D 20 61 6E 64 20 6C 65 74 20 69 74 |ogram and let it|
00000210: 0A 64 65 2D 41 52 43 20 69 74 73 65 6C 66 20 74 |.de-ARC itself t|
00000220: 6F 20 61 20 64 69 73 6B 2E 20 54 68 65 6E 20 79 |o a disk. Then y|
00000230: 6F 75 20 63 61 6E 0A 6C 6F 61 64 22 56 44 43 20 |ou can.load"VDC |
00000240: 52 41 4D 44 49 53 4B 31 2E 35 22 2C 38 2C 31 20 |RAMDISK1.5",8,1 |
00000250: 61 6E 64 20 73 79 73 20 34 39 31 35 32 0A 74 6F |and sys 49152.to|
00000260: 20 67 65 74 20 69 74 20 77 6F 72 6B 69 6E 67 2E | get it working.|
00000270: 20 46 6F 72 20 46 52 41 4D 28 30 29 20 74 6F 0A | For FRAM(0) to.|
00000280: 66 75 6E 63 74 69 6F 6E 20 70 72 6F 70 65 72 6C |function properl|
00000290: 79 20 74 68 65 20 72 61 6D 64 69 73 6B 20 6D 75 |y the ramdisk mu|
000002A0: 73 74 20 62 65 0A 69 6E 69 74 69 61 6C 69 7A 65 |st be.initialize|
000002B0: 64 20 77 69 74 68 20 52 49 4E 49 54 2E 0A 0A 20 |d with RINIT... |
000002C0: 20 20 41 67 61 69 6E 20 74 68 65 20 63 6F 6D 6D | Again the comm|
000002D0: 61 6E 64 73 20 61 72 65 3A 0A 0A 52 49 4E 49 54 |ands are:..RINIT|
000002E0: 0A 20 20 20 49 6E 69 74 69 61 6C 69 7A 65 20 74 |. Initialize t|
000002F0: 68 65 20 72 61 6D 20 64 69 73 6B 0A 0A 52 43 41 |he ram disk..RCA|
00000300: 54 0A 20 20 20 44 69 73 70 6C 61 79 20 74 68 65 |T. Display the|
00000310: 20 72 61 6D 64 69 73 6B 20 64 69 72 65 63 74 6F | ramdisk directo|
00000320: 72 79 0A 0A 52 53 41 56 22 66 69 6C 65 6E 61 6D |ry..RSAV"filenam|
00000330: 65 22 0A 20 20 20 53 61 76 65 20 61 20 62 61 73 |e". Save a bas|
00000340: 69 63 20 70 72 6F 67 72 61 6D 20 74 6F 20 72 61 |ic program to ra|
00000350: 6D 64 69 73 6B 0A 0A 52 53 41 56 22 66 69 6C 65 |mdisk..RSAV"file|
00000360: 6E 61 6D 65 22 2C 73 74 61 72 74 2C 65 6E 64 20 |name",start,end |
00000370: 61 64 64 72 65 73 73 65 73 0A 20 20 20 53 61 76 |addresses. Sav|
00000380: 65 20 61 20 62 69 6E 61 72 79 20 66 69 6C 65 20 |e a binary file |
00000390: 74 6F 20 72 61 6D 64 69 73 6B 0A 0A 52 4C 4F 41 |to ramdisk..RLOA|
000003A0: 22 66 69 6C 65 6E 61 6D 65 22 0A 20 20 20 4C 6F |"filename". Lo|
000003B0: 61 64 20 61 20 66 69 6C 65 20 66 72 6F 6D 20 72 |ad a file from r|
000003C0: 61 6D 64 69 73 6B 20 74 6F 20 6F 72 69 67 69 6E |amdisk to origin|
000003D0: 61 6C 0A 6D 65 6D 6F 72 79 20 6C 6F 61 63 61 74 |al.memory loacat|
000003E0: 69 6F 6E 0A 0A 46 52 41 4D 28 30 29 0A 20 20 20 |ion..FRAM(0). |
000003F0: 50 72 6F 67 72 61 6D 20 6D 6F 64 65 20 66 75 6E |Program mode fun|
00000400: 63 74 69 6F 6E 20 77 68 69 63 68 20 72 65 74 75 |ction which retu|
00000410: 72 6E 73 0A 74 68 65 20 61 6D 6F 75 6E 74 20 6F |rns.the amount o|
00000420: 66 20 66 72 65 65 20 72 61 6D 64 69 73 6B 20 6D |f free ramdisk m|
00000430: 65 6D 6F 72 79 0A 72 65 6D 61 69 6E 69 6E 67 2E |emory.remaining.|
00000440: 20 54 79 70 69 63 61 6C 20 75 73 65 20 77 6F 75 | Typical use wou|
00000450: 6C 64 20 62 65 3A 0A 20 20 20 58 3D 46 52 41 4D |ld be:. X=FRAM|
00000460: 28 30 29 2C 20 74 68 65 6E 20 58 20 77 6F 75 6C |(0), then X woul|
00000470: 64 20 62 65 20 65 71 75 61 6C 20 74 6F 0A 74 68 |d be equal to.th|
00000480: 65 20 61 6D 6F 75 6E 74 20 6F 66 20 66 72 65 65 |e amount of free|
00000490: 72 61 6D 2E 0A 0A 20 20 20 54 68 61 6E 6B 73 20 |ram... Thanks |
000004A0: 74 6F 20 46 72 61 6E 6B 4C 31 34 20 66 6F 72 20 |to FrankL14 for |
000004B0: 70 6F 69 6E 74 69 6E 67 20 6F 75 74 0A 74 68 65 |pointing out.the|
000004C0: 20 62 75 67 20 69 6E 20 46 52 41 4D 28 30 29 2E | bug in FRAM(0).|
000004D0: 20 49 20 77 69 6C 6C 20 61 6C 73 6F 20 66 6F 6C | I will also fol|
000004E0: 6C 6F 77 0A 68 69 73 20 61 64 76 69 63 65 20 63 |low.his advice c|
000004F0: 6F 6E 63 65 72 6E 69 6E 67 20 61 20 56 44 43 20 |oncerning a VDC |
00000500: 52 41 4D 44 49 53 4B 20 66 6F 72 0A 31 32 38 20 |RAMDISK for.128 |
00000510: 6D 6F 64 65 2E 0A 0A 0A 20 3C 3C 20 20 20 50 52 |mode.... << PR|
00000520: 45 53 53 20 46 37 20 46 4F 52 20 44 4F 57 4E 4C |ESS F7 FOR DOWNL|
00000530: 4F 41 44 20 4D 45 4E 55 20 20 20 20 3E 3E 20 00 |OAD MENU >> .|
FILE: VDC RAMDISK.SDA (R4) F
ROM: DONALDB47 04/22/89 S#: 814446
.SUBJECT: VDC RAMDISK W/SOURCE..TY
PE: PRG.BLOCKS: 62.DOWNL
OADS: 137.EST. D/L TIME: 300: 14:01
1200: 03:60 .EQUIPMENT: C128 IN 64 M
ODE. 64K VDC DESIRABLE, BU
T.FILES NEEDED: PAL TO ASSEMBLE THE.
SOURCE CODE... THIS IS AN
UPDATED VERSION OF VDC.RAMDISK1.5, THE F
RAM(0) FUNCTION BUG.HAS BEEN FIXED. ALON
G WITH THE PROGRAM.I INCLUDE THE SOURCE
CODE, IN PAL.FORMAT. LOAD THE PROGRAM AN
D LET IT.DE-ARC ITSELF TO A DISK. THEN Y
OU CAN.LOAD"VDC RAMDISK1.5",8,1 AND SYS
49152.TO GET IT WORKING. FOR FRAM(0) TO.
FUNCTION PROPERLY THE RAMDISK MUST BE.IN
ITIALIZED WITH RINIT... AGAIN THE COMM
ANDS ARE:..RINIT. INITIALIZE THE RAM D
ISK..RCAT. DISPLAY THE RAMDISK DIRECTO
RY..RSAV"FILENAME". SAVE A BASIC PROGR
AM TO RAMDISK..RSAV"FILENAME",START,END
ADDRESSES. SAVE A BINARY FILE TO RAMDI
SK..RLOA"FILENAME". LOAD A FILE FROM R
AMDISK TO ORIGINAL.MEMORY LOACATION..FRA
M(0). PROGRAM MODE FUNCTION WHICH RETU
RNS.THE AMOUNT OF FREE RAMDISK MEMORY.RE
MAINING. TYPICAL USE WOULD BE:. X=FRAM
(0), THEN X WOULD BE EQUAL TO.THE AMOUNT
OF FREERAM... THANKS TO FRANKL14 FOR
POINTING OUT.THE BUG IN FRAM(0). I WILL
ALSO FOLLOW.HIS ADVICE CONCERNING A VDC
RAMDISK FOR.128 MODE.... << PRESS F7 F
OR DOWNLOAD MENU >> .
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL