home *** CD-ROM | disk | FTP | other *** search
/ Commodore Computer Club 13 / Commodore_Computer_Club_13_19xx_-_es.d64 / fronton (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  1KB  |  58 lines
  1. 5 a=a+1:ifa=1thenload"fronton cm",8,1
  2. 10 poke53280,0:poke53281,0:poke646,7
  3. 20 poke650,128
  4. 30 poke56,20:clr
  5. 40 v=53248
  6. 50 pokev+21,0
  7. 100 print"[147][172][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162]
  8. 110 [129]t[178]0[164]22:[153]"get"[163]30)"int":[130]
  9. 150 [141]250
  10. 160 [151]v[170]21,7
  11. 200 [137]500
  12. 250 [151]v[170]1,240:[151]v[170]3,210
  13. 260 [151]v[170]5,100
  14. 270 [151]v,100:[151]v[170]2,100
  15. 280 [151]v[170]4,100
  16. 290 [151]v[170]39,1:[151]v[170]40,1
  17. 295 [151]v[170]41,14:[151]v[170]42,14
  18. 300 [151]2040,13:[151]2041,13
  19. 305 [151]2042,14
  20. 310 [129]t[178]1[164]120:[151]837[170]t,0:[130]
  21. 320 [129]t[178]0[164]5:[151]832[170]t,255:[130]
  22. 330 [129]t[178]0[164]5:[151]898[170]3[172]t,255:[130]
  23. 350 [142]
  24. 500 [153]""[163]33)"forz izq"
  25. 520 [153][163]33)"/ der"
  26. 540 [153][163]33)"bolas 3"
  27. 570 [153][163]33)"contpuntos"
  28. 600 c[178]3:p[178]0
  29. 620 [161]g$:[139]g$[178]""[167]620
  30. 650 [151]820,0
  31. 651 [151]821,0
  32. 652 [151]822,0
  33. 653 [151]823,0
  34. 660 [151]825,200
  35. 670 [151]v[170]5,100
  36. 700 [158]32768
  37. 720 c[178]c[171]1
  38. 730 p[178]p[170][194](822)[170]256[172][194](823)
  39. 750 [151]1383,c[170]48
  40. 760 [153]""[163]192)"print"p
  41. 780 [139]c[178]0[167]900
  42. 800 [153]""[163]193)"printkey"
  43. 810 [151]198,0
  44. 820 [161]g$:[139]g$[178]""[167]820
  45. 850 [153][163]33)"ononon       "
  46. 860 [153][163]33)"       "
  47. 870 [137]650
  48. 900 [129]t[178]0[164]1500:[130]
  49. 910 [151]v[170]21,0
  50. 930 [153]"loadcont               game over"
  51. 950 [153]"              "p"listpuntos"
  52. 960 [129]t[178]0[164]1500:[130]
  53. 970 [153]"list          otra partida (s/n)"
  54. 980 [161]g$
  55. 990 [139]g$[178]"s"[167]10
  56. 992 [139]g$[178]"n"[167][128]
  57. 995 [137]980
  58.