home *** CD-ROM | disk | FTP | other *** search
/ DP Tool Club 17 / CD_ASCQ_17_101194.iso / vrac / vester_e.zip / 960TOTX.BAS < prev    next >
BASIC Source File  |  1994-08-08  |  1KB  |  23 lines
  1. 10 CLEAR,32768!:KEY OFF:CLS
  2. 20 X$="system":KEY 10,X$
  3. 30 PRINT"                    .960 to .TX FILE CONVERSION":PRINT
  4. 40 PRINT"       This program converts a picture file captured by WXPIX.BAS pro-"
  5. 50 PRINT"   gram with a suffix of .960 into another file with the same name but"
  6. 60 PRINT"   with a suffix of .TX. This second file is in the format to be trans-"
  7. 70 PRINT"   mitted using the TX16.BAS program. It will need to be transferred "
  8. 80 PRINT"   to the RAMDISK as PIX.WX to be transmitted."
  9. 100 PRINT:PRINT:PRINT:INPUT"   What is the PATH/FILENAME (program will add suffix)";PIX$
  10. 110 IF PIX$="" THEN GOTO 100
  11. 120 OF$=PIX$+".960"
  12. 130 DEF SEG=&H5F00
  13. 140 BLOAD "960totx.asm",&H100
  14. 200 NF$=PIX$+".tx"
  15. 220 PRINT:PRINT:PRINT:INPUT"   Do you want to go directly to RAMDISK-Y or N (default=Y)";R$
  16. 230 IF R$="n" THEN GOTO 280
  17. 240 PRINT:PRINT:PRINT:INPUT"   What is your RAMDISK designation (default=D)";DR$
  18. 250 IF DR$="" THEN DR$="d"
  19. 260 NF$=DR$+":pix.wx"
  20. 280 K=&H100:CALL K(K%,L%,OF$,NF$)
  21. 290 PRINT:PRINT:PRINT:PRINT"    New file placed. Hit F2 for converting another. Hit F10 & ENTER for DOS"
  22. 300 END
  23.