home *** CD-ROM | disk | FTP | other *** search
/ Loadstar 36 / 036.d81 / hello (.txt) < prev    next >
Commodore BASIC  |  2022-08-26  |  858b  |  44 lines
  1. 20 rem
  2. 25 rem
  3. 30 rem
  4. 35 rem
  5. 50 rem set up ddr and table
  6. 60 pb=56577
  7. 65 pokepb+2,191
  8. 70 dim m$(63)
  9. 75 fori=.to63
  10. 80 read m$(i)
  11. 85 next
  12. 90 rem **** data table ****
  13. 91 data pa1,pa2,pa3,pa4,pa5,oy,ay,eh,kk3
  14. 92 data pp,jh,nn1,ih,tt2,rr1,ax,mm,tt1
  15. 93 data dh1,iy,ey,dd1,uw1,ao,aa,yy2,ae
  16. 94 data hh1,bb1,th,uh,uw2,aw,dd2,gg3,vv
  17. 95 data gg1,sh,zh,rr2,ff,kk2,kk1,zz,ng
  18. 96 data ll,ww,xr,wh,yy1,ch,er1,er2,ow,dh2
  19. 97 data ss,nn2,hh2,or,ar,yr,gg2,el,bb2
  20. 99 rem **** end of speech table ****
  21. 145 gosub 10000
  22. 150 rem ** speech module **
  23. 151 rem hello
  24. 152 data hh1,eh,ll,ax,ow,pa1
  25. 153 g=g+1:ifg=7then 157
  26. 154 reada$
  27. 155 gosub 10000
  28. 156 goto 153 : rem  return to counting line
  29. 157 g=0:rem   reset g
  30. 158 rem continue main program
  31. 159 print"[147]"
  32. 160 print"program would continue here"
  33. 161 print"type run the press return
  34. 162 [153]"to do again"
  35. 9999 [128]
  36. 10000 [129]i[178].[164]63
  37. 10005 [139] m$(i)[178]a$[167][141]10050:[142]
  38. 10010 [130]i
  39. 10015 [142]
  40. 10050 [139] [194](pb)[178]128 [167] 10050
  41. 10055 [151]pb,i
  42. 10060 [151]pb,128
  43. 10065 [142]
  44.