home *** CD-ROM | disk | FTP | other *** search
/ ftp.whtech.com / ftp.whtech.com.tar / ftp.whtech.com / club100 / pg / pgnode / node2 / save.nod < prev    next >
Text File  |  2006-10-19  |  677b  |  17 lines
  1.         SAVE.NOD by Paul Globman
  2.            Copyright (c) 1990
  3.  
  4. Save Model 100 files to the Node Datapac/RAMPAC directly from the M100 menu.
  5. Simply select the file to be saved with the M100 widebar cursor, and type...
  6.  
  7.      SAVE.BA<cr>
  8.  
  9. SAVE.BA and RAMDSK.CO must be in Model 100 RAM.  SAVE.BA can be converted to 
  10. SAVE with the CMD.BA utiltiy (DL8).
  11.  
  12. 0 REM SAVE.NOD (c) 1990 by Paul Globman
  13. 1 A=64929+2*PEEK(65006):A=PEEK(A)+256*PEEK(A+1):FORX=3TO10:F$=F$+CHR$(PEEK(A+X)):NEXT:F$=F$+CHR$(13)+CHR$(13)+"Y"
  14. 2 A=65450:POKEA,11:FORX=1TO11:POKEA+2*X,0:POKEA+2*X-1,ASC(MID$(F$,X)):NEXT:CLEAR99,61681:LOADM"RAMDSK":CALL61896
  15. 3 CALL62061:CLEAR0,MAXRAM:X$=INKEY$:MENU
  16.  
  17.