Chaotisch? |
13.05.2005, 06:21 | krzyzape | Auf diesen Beitrag antworten » |
Chaotisch? Ich möchte nur wissen ob mein Programm unter der Rubrik Chaostheorie einzuordnen ist. In Q-Basic geschrieben !! DEFDBL A-Z: DEF SEG = 0: CLS : SCREEN 12 600 RANDOMIZE TIMER KEY(11) ON ON KEY(11) GOSUB finn GOTO finn1 finn: END finn1: k = 1 y = .07 x = .071 bx=1:by=1 1000 y = y + .07 x = x + .07 k = k + 1 bx = ABS(bx + SIN(ABS(x ^ 2))) by = ABS(by + sin(ABS(y ^ 2))) GOTO sp11 LOCATE 20, 1: PRINT " "; LOCATE 20, 1: PRINT "bx="; bx; LOCATE 21, 1: PRINT " ": LOCATE 21, 1: PRINT "by="; by; LOCATE 22, 1: INPUT ; a7 IF a7 = 1 THEN END sp11: a = (bx + 1) MOD 640 b = (by + 1) MOD 480 PSET (a, b), 15 IF k = 70000 THEN LOCATE 25, 1: INPUT ; a7 IF a7 = 1 THEN END CLS : k = 1 END IF GOTO 1000 MfG |
||
13.05.2005, 14:57 | Leopold | Auf diesen Beitrag antworten » |
Da es sich um ein QBasic-Programm handelt, ist es selbstverständlich unter der Rubrik "Chaos" abzuhandeln. |
||
13.05.2005, 15:10 | mercany | Auf diesen Beitrag antworten » |
Wäre aber doch eher ein Thema fürs Info-Board |
|