home *** CD-ROM | disk | FTP | other *** search
/ 64'er 1987 October / 64er_Magazin_87-10_1987_Markt__Technik_de.d64 / pflanzen.zufall (.txt) < prev    next >
Encoding:
Commodore BASIC  |  1987-01-01  |  224 b   |  6 lines
  1. 120 se=12:xp=160:yp=150:w=-90
  2. 340 s=2*(se+.5*se*(rnd(1)-.5)):gosub 500: rem 'schreite'
  3. 360 s=-2*(se+.5*se*(rnd(1)-.5)):gosub 500: rem 'schreite'
  4. 380 s=se+.5*se*(rnd(1)-.5):gosub 500: rem 'schreite'
  5. 400 s=-se-.5*se*(rnd(1)-.5):gosub 500: rem 'schreite'
  6.