( emberk | 2011. 06. 30., cs – 20:09 )

Ha látnád a kódot. Valami rettenet, szerintem "nyugdíjas állásom" van.
Részlet:

IF i >= 167 AND i <= 188 AND j = 20 THEN GOSUB 600
IF i >= 168 AND i <= 188 AND j = 21 THEN GOSUB 600
IF i >= 169 AND i <= 188 AND j = 22 THEN GOSUB 600
IF i >= 170 AND i <= 188 AND j = 23 THEN GOSUB 600
IF i >= 172 AND i <= 188 AND j = 24 THEN GOSUB 600

IF i >= 132 AND i <= 164 THEN IF j = 19 THEN GOSUB 615
IF i >= 132 AND i <= 165 THEN IF j = 20 THEN GOSUB 615

IF i >= 158 AND i <= 166 THEN IF j = 21 THEN GOSUB 615
IF i >= 162 AND i <= 167 THEN IF j = 22 THEN GOSUB 615
IF i >= 166 AND i <= 168 THEN IF j = 23 THEN GOSUB 615

511 IF fo = -1 THEN ha = h2: hb = h1
512 FOR i = ha TO hb STEP fo
515 FOR j = 0 TO 60
IF i > 188 THEN u(i, j) = 0: GOTO 520
IF j > 30 THEN u(i, j) = u(i, 60 - j): GOTO 520
IF i = 0 OR i = 195 OR j = 0 OR j = 60 THEN u(i, j) = 0: GOTO 520
IF j = 30 THEN u(i, j) = (.5 * (u(i - 1, 30) + u(i + 1, 30)) + 2 * u(i, 29)) / 3: GOTO 516
------
3 fajta matematikus létezik. Aki tud számolni, és aki nem.