home *** CD-ROM | disk | FTP | other *** search
/ 64'er Special 18 / 64er_Magazin_Sonderheft_18_19xx_Markt__Technik_de_Side_A.d64 / text_grafik (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  227b  |  9 lines
  1. 10 rem --- druck einer sinuskurve ---
  2. 20 rem ---       und text         ---
  3. 30 open 1,4
  4. 40 print#1,"das ist ";
  5. 50 print#1,chr$(27);"*";chr$(0);chr$(8);chr$(0);
  6. 60 a$=chr$(255):for i=1 to 6:a$=a$+chr$(129):next i:a$=a$+chr$(255)
  7. 70 print#1,a$;
  8. 80 print#1,"ein beispiel"
  9.