home *** CD-ROM | disk | FTP | other *** search
/ Brotikasten / BROTCD01.iso / c128 / c73.d64 / vdc-fraktal_272 (.txt) < prev    next >
Commodore BASIC  |  1995-08-08  |  719b  |  31 lines
  1. 100 REM LADEPROGRAMM FUER FRAKTALPRG.
  2. 110 REM MIT AUFLOESUNGS-ANPASSUNG
  3. 120 REM (640*272 BILDPUNKTE)
  4. 130 :
  5. 140 REM GESCHRIEBEN VON:
  6. 150 REM DIETMAR MEYER
  7. 160 REM TENSTEDTER STRASSE 19
  8. 170 REM D-W-4598 CAPPELN
  9. 180 :
  10. 190 IF A=0 THEN A=1: LOAD "VDC-FRAKTAL.COM",8,1
  11. 200 :
  12. 210 POKE 1015, 24: REM ZEILENABSTAND
  13. 220 POKE 1016,  1: REM DRUCK-MODUS
  14. 230 POKE 1017, 34: REM Y-AUFLOESUNG/8
  15. 240 POKE 1018, 32: REM FARBE
  16. 250 POKE 1019, 50: REM FARBE ZOOMBEREICH
  17. 260 :
  18. 270 REM DATAZEILEN FUER GRAFIKAUFLOESUNG
  19. 280 :
  20. 290 DATA 0,126, 1,80, 2,102, 3,73, 4,39, 5,224, 6,34, 7,37, 8,252, 9,231, 12,128
  21. 300 DATA 13,0, 20,213, 21,0, 22,120, 24,32, 25,199, 26,0, 27,0, 28,87, 34,125
  22. 310 DATA 255,255
  23. 320 :
  24. 330 READ RE,WE
  25. 340 IF RE=255 GOTO 390
  26. 350 POKE 54784,RE
  27. 360 POKE 54785,WE
  28. 370 GOTO 330
  29. 380 :
  30. 390 SYS 4231
  31.