Немного другой мандельброт:
Код:20 X1=59:Y1=21 30 I1=-1:I2=1:R1=-2:R2=1 40 S1=(R2-R1)/X1:S2=(I2-I1)/Y1 50 FOR Y=0 TO Y1 60 I3=I1+S2*Y 70 FOR X=0 TO X1 80 R3=R1+S1*X:Z1=R3:Z2=I3 90 FOR N=0 TO 30 100 A=Z1*Z1:B=Z2*Z2 110 IF A+B>4 THEN GOTO 140 120 Z2=2*Z1*Z2+I3:Z1=A-B+R3 130 NEXT N 140 PRINT CHR$(63-N); 150 NEXT X 160 PRINT 170 NEXT Y 180 END
- - - Добавлено - - -
А у меня тоже назрел вопрос по /RTS. Что-то не работает у меня это. Ну, то есть если я в бейсик копирую текст из буфера обмена, то проскакивают некорректные символы. Это если Flow control = OFF. Если же поставить Flow control = RTS/CTS, то не могу даже активировать консоль в мониторе, потому что не принимает клавишу 'Space'. Вообще, как это должно работать?




Ответить с цитированием