home *** CD-ROM | disk | FTP | other *** search
/ 64'er Special 43 / 64er_Magazin_Sonderheft_43_19xx_Markt__Technik_de_Side_A.d64 / mid$ (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  79b  |  6 lines

  1. 100 a$="drachen"
  2. 110 x=x+1
  3. 120 b$=mid$(a$,x,8-x)
  4. 130 printb$
  5. 140 if x<>len(a$) then 110
  6.