home *** CD-ROM | disk | FTP | other *** search
/ Tiger Disk 5 / Tiger_Disk_005_19xx_Tiger-Crew-Disk_de_Side_A.d64 / mythos-info (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  724b  |  22 lines
  1. 10 print"[147]":poke 53280,0:poke 53281,0
  2. 50 m$="**************************"
  3. 60 n$="*                        *"
  4. 70 printtab(6)m$:printn$:printn$:printn$:printtab(6)m$
  5. 80 print"[145][145][145]";
  6. 90 forb=1to21:readb$:forz=1to50:nextz
  7. 100 ifb$="x"thenprint" ";:next
  8. 110 printtab(8)b$;:nextb
  9. 111 print:print"nach programmstart stehen dir durch das"
  10. 112 print"druecken der nachstehenden funktions-"
  11. 113 print"tasten diese funktionen zur verfuegung:"
  12. 120 print"f1 = list           f2 = open
  13. 130 [153]"f3 = run            f4 = close
  14. 140 print"f5 = load           f6 = sys
  15. 150 [153]"f7 = directory      f8 = save
  16. 160 get w$:ifw$=" "thenpoke53265,11:goto180
  17. 170 goto 160
  18. 180 print"load";chr$(34);"mythos-load";chr$(34);",8,1[145][145][145]"
  19. 190 poke631,13:poke632,82:poke633,85
  20. 200 poke634,78:poke635,13:poke198,5:end
  21. 1000 data m,x,y,x,t,x,h,x,o,x,s,x,-,x,l,x,o,x,a,x,d
  22.