home *** CD-ROM | disk | FTP | other *** search
/ Hacker Chronicles 2 / HACKER2.BIN / 710.INIT.BAS < prev    next >
BASIC Source File  |  1991-09-18  |  1KB  |  40 lines
  1. 10 PRINT"   INITIALIZE PROGRAM PARAMETERS FOR MECHAN"
  2. 20 OPEN "O",#1,"INIT"
  3. 30 PRINT
  4. 40 PRINT" Specify the DRIVE LETTER where data will be stored."
  5. 50 PRINT
  6. 60 PRINT" Example   c:"
  7. 70 PRINT
  8. 80 PRINT" Enter drive letter (with colon) ";
  9. 90 INPUT DRIVE$
  10. 100 PRINT" Specify the type of CRT DISPLAY you are using."
  11. 110 PRINT
  12. 120 PRINT" 0 - CGA or MONO "
  13. 130 PRINT" 1 - EGA or VGA  "
  14. 140 PRINT
  15. 150 PRINT" Enter 0 or 1 ";
  16. 160 INPUT DISPLAY$
  17. 170 PRINT
  18. 180 PRINT" Specify maximum number of positions allowed."
  19. 190 PRINT
  20. 200 PRINT" 15- Either KINEMATIC or DYNAMIC analysis"
  21. 210 PRINT" 20 - KINEMATIC analysis only"
  22. 220 PRINT
  23. 222 PRINT" If you get an OUT OF MEMORY message at run time"
  24. 223 PRINT" rerun INIT and specify a smaller number of positions."
  25. 224 PRINT
  26. 230 PRINT" Enter 15 or 20 ";
  27. 240 INPUT NUMPOS
  28. 250 PRINT
  29. 260 PRINT"  Specify initial information display flag."
  30. 270 PRINT
  31. 280 PRINT" 1 - Print description of program updates at start"
  32. 290 PRINT" 0 - Suppress printing of update info"
  33. 300 PRINT
  34. 310 PRINT" Enter 1 or 0 ";
  35. 320 INPUT PRNTFLAG
  36. 330 PRINT DRIVE$,DISPLAY$,NUMPOS,PRNTFLAG
  37. 340 WRITE #1,DRIVE$,DISPLAY$,NUMPOS,PRNTFLAG
  38. 350 CLOSE #1
  39. 360 END
  40.