home *** CD-ROM | disk | FTP | other *** search
/ Compute! Gazette 1986 June / 1986-06.d64 / multi-strats (.txt) < prev    next >
Commodore BASIC  |  2022-09-20  |  2KB  |  43 lines
  1. 20 poke53272,23:poke53280,7:poke53281,7:print"[147]"tab(8)" [194]anana [211]oftware, [201]nc."
  2. 21 print" ":printtab(12)"1986 [193]dvertisers":print"[196]aily [210]acing [198]orm ** [199]amblin";
  3. 22 print"g [212]imes **":print"[212]horoughbred [194]usiness ** [210].[210]. [194]owker ** [195]omputer [211]";
  4. 23 print"hopper ** [208][195] [215]orld ** [195]ompute!":printtab(7)" [198]ifteen [212]imes [212]h";
  5. 24 print"e [208]ower! ":printtab(7)" 99.99%  [195]onfidence [204]evel ":print
  6. 25 print"[215]hy purchase only 1 thoroughbred handi- capping strategy when you ca";
  7. 26 print"n have the  [208][207][215][197][210] of the 15 most popular handicap-  ping strategies";
  8. 27 print" available?":print:print"[193] new computer program, designed by an  [205].[194]";
  9. 28 print".[193]. of [198]inance, combines improved    variations of the 15 most popul";
  10. 29 print"ar strat-egies into one easy program. [212]his [208][207][215][197][210]-[198][213][204] program called";
  11. 30 print" [205][213][204][212][201]-[211][212][210][193][212][211] can an- alyze a race using 15 strategies in a   fracti";
  12. 31 print"on of the time you analyze a race using just 1 strategy.":print
  13. 32 printtab(12)" [208]ress [193]ny [203]ey [146]";
  14. 33 geta$:ifa$=""then33
  15. 34 print"[147]"tab(8)" [194]anana [211]oftware, [201]nc. [146]":print
  16. 35 print"[211]imply type in the answers to the pro-  gram questions.  [193]ll the ";
  17. 36 print"info is in the [196]aily [210]acing [198]orm.  [212]he results of the  15 strategies";
  18. 37 print" will appear on your screenor printer.  [205]ulti-[211]trats then tabulates";
  19. 38 print"the 15 strategy totals to give you an   ultimate number for each ";
  20. 39 print"horse.":print:print"[215]hen all 15 strategies select the same  horse to";
  21. 40 print" win, that horse has a 99.99%   chance of winning!":print
  22. 41 printtab(9)" [205]ulti-[211]trats [208]ackage [146]":print:print"15 strategies ** 50 page";
  23. 42 print" booklet (with  money management) ** disk or tape **    telephone ";
  24. 43 print"hotline number ** immediate   first class delivery ** [194][207][206][213][211] #1 audio "
  25. 44 print"seminar ** [194][207][206][213][211] #2 [204]ottery program **  10 day money back guarantee ";
  26. 45 print"** [193]ll for  $125.":print
  27. 46 printtab(12)" [208]ress [193]ny [203]ey [146]";
  28. 47 geta$:ifa$=""then47
  29. 48 print"[147]"tab(8)" [194]anana [211]oftware, [201]nc. [146]":print
  30. 49 print"[207]rder by [205]oney [207]rder, [195]heck, [214]isa, [205][195],  [193][205][197][216], or [195].[207].[196]. to:":print
  31. 50 printtab(8)"[176][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][174]"
  32. 51 printtab(8)"[221] [194]anana [211]oftware, [201]nc. [221]"spc(15)"[221] [196]ept. [211][196]              [221]"
  33. 52 printtab(8)"[221] 6531 [208]ark [193]venue      [221]"spc(15)"[221] [203]ent, [207]hio 44240      [221]"
  34. 53 printtab(8)"[173][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][189]":print
  35. 54 print"[208][200][207][206][197][160][207][210][196][197][210][211]: (216) 673-6969"
  36. 55 print"   [201][206][209][213][201][210][201][197][211]: (216) 673-6167 [recording]"
  37. 56 printtab(13)" [193][204][204][160][205][207][196][197][204][211] [146]":printtab(6)"[195][207][205][205][207][196][207][210][197] ** [193]pple ** [193]tari"
  38. 57 printtab(6)"[201][194][205] ** [210]adio [211]hack ** [195]oleco":print:print"[211]maller computers ";
  39. 58 print"use 5 strats for $90.":print
  40. 59 printtab(6)"[195][207][205][205][207][196][207][210][197] ** [212]imex [211]inclair"spc(13)"[212]exas [201]nstruments ** [193]tari"
  41. 60 print:printtab(12)" [208]ress [193]ny [203]ey [146]";
  42. 61 geta$:ifa$=""then61
  43.