home *** CD-ROM | disk | FTP | other *** search
/ Ozsi 4 / Ozsi_04_1996-02_Cherry_Software_Side_B.d64 / menu (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  2KB  |  52 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"                                  "
  12. 95 print"[156]";
  13. 100 print"                                  "
  14. 105 print"      - oz systems information -
  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.demo a.           [194]   "
  21. 160 print"      [194]   2.demo b.           [194]   "
  22. 170 print"      [194]   3.games pokes 1.    [194]   "
  23. 180 print"      [194]   4.games pokes 2.    [194]   "
  24. 190 print"      [194]   5.demo c.           [194]   "
  25. 200 print"      [194]   6.logic game        [194]   "
  26. 201 print"      [194]   7.kidz game         [194]   "
  27. 202 print"      [194]   8.diskmags          [194]   "
  28. 203 print"      [194]   9.epilogue          [194]   "
  29. 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]   "
  30. 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]   "
  31. 221 print"      [194][194] [213][201] [194] [213][195][195][195][195][203][202][195][195][201] [194] [194] [158] [194]   "
  32. 230 print"      [194][194] [202][203] [194] [202][195][195][195][195][195][195][195][195][203] [173][195][189]  [158][194]   "
  33. 231 print"      [194][202][195][195][195][195][203] [184][184][184][184][184][184][184][184][184][184][184][184][184]  [158] [194]   "
  34. 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]   "
  35. 236 print"      [194][156] allgomera road.      [158] [194]   "
  36. 240 print"      [194][156] eungai creek.      [158]   [194]   "
  37. 241 print"      [194][156] n.s.w. 2441,australia[158] [194]   "
  38. 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]   "
  39. 260 print"[159]"
  40. 270 input"which article do you require (1-9)";a$
  41. 280 rem:  *loading routines *
  42. 290 if a$="1"then load"a*",8,1
  43. 300 if a$="2"then load"b*",8,1
  44. 310 if a$="3"then load"c*",8,1
  45. 320 if a$="4"then load"d*",8,1
  46. 330 if a$="5"then load"e*",8,1
  47. 340 if a$="6"then load"f*",8,1
  48. 350 if a$="7"then load"g*",8,1
  49. 355 if a$="8"then load"h*",8,1
  50. 360 if a$="9"then load"x*",8,1
  51. 390 run
  52.