home *** CD-ROM | disk | FTP | other *** search
/ Ozsi 4 / Ozsi_04_1996-02_Cherry_Software_Side_A.d64 / menu (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  2KB  |  48 lines

  1. 10 rem remind tomz to give icelad **
  2. 11 rem a good kick up the backside**
  3. 12 rem         child abuse
  4. 13 rem   theres nothing like it
  5. 14 rem but what if its the other way
  6. 15 rem what about parential abuse??
  7. 16 rem "shut up and keep typing  tomz."
  8. 70 rem:
  9. 80 poke53280,0:poke53281,0:print"[147]";chr$(5);
  10. 85 print"[158]";
  11. 90 print"      oz systems information 64   "
  12. 95 print"[156]";
  13. 100 print"      [163][183][163][183][163][183][163][183][163][183][163][183][163][183][163][183][163][183][163][183][163][183][163][183][163]   "
  14. 105 print"      -keeping the dream alive-
  15. 110 [153]
  16. 120 [153]"";
  17. 130 [153]"        issue 4 fubruary 1996
  18. 140 print"[158]";
  19. 145 print"      [213][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][201]   "
  20. 150 print"      [194]   1.hi world!         [194]   "
  21. 160 print"      [194]   2.content.(are you?)[194]   "
  22. 170 print"      [194]   3.fifth ball (game) [194]   "
  23. 180 print"      [194]   4.music + nice pic. [194]   "
  24. 190 print"      [194]   5.escom (free disks)[194]   "
  25. 200 print"      [194]   6.future world prev.[194]   "
  26. 201 print"      [194]     from cherry soft. [194]   "
  27. 210 print"      [171][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][179]   "
  28. 220 print"      [194][213][195][195][195][195][178][195][195][195][195][195][195][201][213][195][195][201] [176][195][174] [158] [194]   "
  29. 221 print"      [194][194] [213][201] [194] [213][195][195][195][195][203][202][195][195][201] [194] [194] [158] [194]   "
  30. 230 print"      [194][194] [202][203] [194] [202][195][195][195][195][195][195][195][195][203] [173][195][189]  [158][194]   "
  31. 231 print"      [194][202][195][195][195][195][203] [184][184][184][184][184][184][184][184][184][184][184][184][184]  [158] [194]   "
  32. 235 print"      [171][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][179]   "
  33. 236 print"      [194][156] allgomera road.      [158] [194]   "
  34. 240 print"      [194][156] eungai creek.      [158]   [194]   "
  35. 241 print"      [194][156] n.s.w. 2441,australia[158] [194]   "
  36. 242 print"[158]      [202][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][203]   "
  37. 260 print"[159]"
  38. 270 input"which article do you require (1-6)";a$
  39. 280 rem:  *loading routines *
  40. 290 if a$="1"then load"a*",8,1
  41. 300 if a$="2"then load"b*",8,1
  42. 310 if a$="3"then load"c*",8,1
  43. 320 if a$="4"then load"d*",8,1
  44. 330 if a$="5"then load"e*",8,1
  45. 340 if a$="6"then load"f*",8,1
  46. 380 if a$="12"then load"x*",8,1
  47. 390 run
  48.