Autor Thema: Valentineliner  (Gelesen 55 mal)

0 Mitglieder und 1 Gast betrachten dieses Thema.

Offline Devilmarkus

  • Administrator
  • CPC 464+
  • *****
  • Beiträge: 1134
  • Liked: 375
  • Karma: +39/-0
Valentineliner
« am: 15. Februar 2021, 11:56:59 »
Für nächstes Jahr ;)

10 MODE 2:M=313:P=50:J=1:INK 0,0:INK 1,6:FOR I=0 TO 1.55 STEP 0.00055:J=-J:PLOT 160+ABS(P*(J*I+3)),300-P*(2+I^0.01*ABS(COS(I))^0.5*COS(M*I)-I^0.3),1:NEXT
Größer:
10 MODE 2:M=313:P=100:J=1:INK 0,0:INK 1,6:FOR I=0 TO 1.55 STEP 0.00025:J=-J:PLOT 20+ABS(P*(J*I+3)),360-P*(2+I^0.01*ABS(COS(I))^0.5*COS(M*I)-I^0.3),1:NEXT
« Letzte Änderung: 15. Februar 2021, 12:08:41 von Devilmarkus »
http://cpcwiki.de
Dein Deutsches CPCWiki!