home *** CD-ROM | disk | FTP | other *** search
/ Power Disk 64 1996 1 / Power_Disk_64_96-01_1996_Lagune_de_Side_B.d64 / sprint (.txt) < prev    next >
Encoding:
Commodore BASIC  |  1996-01-01  |  972 b   |  27 lines
  1. 0 print"[147]":gosub100:rem sprint           close
  2. 1 b$="":c$="":inputb$
  3. 2 inputc$
  4. 3 print"[196]rucken ([202]/[206]) ?"
  5. 4 geta$:ifa$=""then4
  6. 5 ifa$="j"then10
  7. 6 ifa$="n"then1
  8. 7 goto4
  9. 10 open4,4,7
  10. 11 print#4,b$+" "+c$
  11. 12 close4
  12. 13 print"weiter ([202]/[206]) ?"
  13. 14 geta$:ifa$=""then14
  14. 15 ifa$="j"then1
  15. 16 ifa$="n"thenend
  16. 17 goto13
  17. 100 print"[211][208]rint:[196]ies ist ein ziemlich billiges   [183][183][183][183][183][183] [196]ruckprogramm.[211]ie duerfen"
  18. 101 print"       keine [203]ommas oder so eingeben und       muessen daher den ausge-"
  19. 102 print"       druckten [212]ext nachbearbeiten.           [211][208]rint ist also nur ein ganz
  20. 103 [153]"       kleines (NULL)rogramm,eine atnrt (NULL)ot-          (NULL)flaster.(NULL)enn (NULL)ie eine (NULL)eile
  21. 104 print"       eingegeben haben,dann muessen [211]ie       [201][206] [196][201][197][211][197][210] [218][197][201][204][197] [210]eturn"
  22. 105 print"       druecken ! [206]ach je 2 [218]eilen (1          [218]eile auf [208]apier) kommt die"
  23. 106 print"       [198]rage [196][210][213][195][203][197][206] ([202]/[206]) ? - wenn [211]ie        nach einer [218]eile einen"
  24. 107 print"       [198]ehler angezeigt bekommen haben,        dann druecken [211]ie besser [206],"
  25. 108 print"       damit auch alles richtig ausge-         druckt wird."
  26. 109 return
  27.