home *** CD-ROM | disk | FTP | other *** search
/ Ahoy 1987 June / Ahoy_Magazine_87-06_1987_Double_L.d64 / Parm Pass 2 (.txt) < prev    next >
Encoding:
Commodore BASIC  |  1987-01-01  |  692 b   |  26 lines
  1. 0 rem << cd42-3 >>
  2. 1 rem ==================================
  3. 2 rem    commodares problem #38-1 :
  4. 3 print"[147]parm pass 2"
  5. 4 rem    solution by
  6. 5 rem    paul sobolik
  7. 6 rem ==================================
  8. 7 rem   --------method 2-----------
  9. 8 rem ----save line 10-30 as prog1------
  10. 10 input p1 : open 8,8,8,"parm.seq,s,w"
  11. 20 print#8,p1 : close 8
  12. 30 load"prog2",8
  13. 35 rem----save lines 40-60 as prog2-----
  14. 40 open 8,8,8,"parm.seq,s,r"
  15. 50 input#8,p2 : print"in prog2, p2=";p2
  16. 60 close 8
  17. 70 open 15,8,15,"s0:parm.seq":close 15
  18. 74 rem
  19. 75 rem  ---method 5 (c64 only)---
  20. 76 rem ----save lines 80-90 as prog3---
  21. 80 input p3 : print"[147]"p3
  22. 90 load"prog4",8
  23. 95 rem ----save lines 100-110 as prog4--
  24. 100 print"";:open 3,3 : input#3,p4
  25. 110 close 3 : print"in prog4, p4=";p4
  26.