home *** CD-ROM | disk | FTP | other *** search
/ Loadstar 95 / 095.d81 / catmeister / catmeister.a7ae (.txt)
Encoding:
Commodore BASIC  |  1992-01-01  |  2.3 KB  |  13 lines
  1. 10 print"[147]":dv=peek(186):ifdv<8thendv=8
  2. 20 poke53281,0:poke53280,0:sys4096,6,33,17,17,160,13:fori=1to7
  3. 30 sys4096,7-i,32+i,17-i,17+i,160,13:next:sys4096,0,39,10,10,160,1
  4. 40 sys4096,0,39,24,24,160,5
  5. 50 fori=1to11:reada$:poke214,11+i:poke211,20-len(a$)/2:sys58732:print"[153]"a$:next
  6. 60 print"[144]":sys4096+6,"disk menu",dv:end
  7. 70 data"[195] [193] [212] [205] [197] [201] [211] [212] [197] [210][160] [160][196][160][197][160][205] [207]","by [202]eff [202]ones"
  8. 80 data"([195])1992 by [211]oftdisk [208]ublishing",,"[212]his is the copyrighted work of
  9. 90 [131]"(NULL)(NULL)asc(NULL)str$right$(NULL)(NULL) (NULL)(NULL)peek(NULL)right$(NULL)left$right$(NULL)chr$. right$t is (NULL)(NULL)(NULL) intended
  10. 100 data"for distribution as public domain","or shareware.  [208]lease report illegal
  11. 110 [131]"distribution of this program by","calling (NULL)(NULL)asc(NULL)str$right$(NULL)(NULL) lenustomer service at:
  12. 120 data"1-800-831-2694 or 1-318-221-8718
  13.