home *** CD-ROM | disk | FTP | other *** search
/ Loadstar 211 / 211.d81 / b.cwi (.txt) < prev    next >
Commodore BASIC  |  2022-08-26  |  604b  |  24 lines
  1. 10 dv=peek(186):ifdv<8thenpoke186,8:run
  2. 20 d=dv:gosub41000
  3. 70 a$="cwix"
  4. 80 print"[147]loada$,d,1
  5. 90 [153]"run":[151]631,13:[151]632,13:[151]198,2:[128]
  6. 10000 d[178][194](186):n$[178]"b.cwi":[159]15,d,15,"s0:"[170]n$:[160]15:[148]n$,d:[128]
  7. 41000 [151]53280,0:[151]53281,0:[151]53272,22:[153]"load"
  8. 41002 [151]214,14:[153]
  9. 41004 [153][163]1)"list                                     "
  10. 41005 [129]x[178]1[164]6
  11. 41006 [153][163]1)"print#                                     "
  12. 41007 [130]
  13. 41013 [153][163]1)"poke                                     "
  14. 41020 [129]x[178]1[164]4:[135]a$:[151]214,15[170]x:[153]
  15. 41022 [153][163]19[171][195](a$)[173]2)"print#"a$
  16. 41024 [130]
  17. 41030 t[178]ti[170]60
  18. 41031 [139]t[177]ti[167]41031
  19. 41032 [153]"":[142]
  20. 41050 [131]"left$(NULL)(NULL)val(NULL)(NULL)right$(NULL)(NULL) atn(NULL)str$ (NULL)atnleft$-chr$(NULL)(NULL)chr$
  21. 41051 data"by [195]ameron [203]aiser
  22. 41052 [131]"(c) 2002 by lenameron (NULL)aiser
  23. 41053 data"www.loadstar.com
  24.