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