DRAGO, нечего делать, чтоли?

Ватафак мазафака

Фубля

Kiro (19.04.2011/18:39)
ФубляТебя Миха чтоли взломал? Гы

Всем привет
Скажите пожалуйста, почему когда я писал прогу у меня ошибки не было, а после запуска выдает?
10 CLS
20 X%=1:X1%=176
30 Y%=1:Y1%=1
31 FOR I%=0 TO 150
40 X%=X%+1:X1%=X1%-1
50 Y%=Y%+1:Y1%=Y1%+1
60 PLOT X%,Y%LOT X1%,Y1%
61 SLEEP 50
70 NEXT I%

FonSwong, а басик должен показать на какой строке ошибка

Тьфу ты, не то скопировал
Вот
10 CLS
15 R%=0
20 X%=1:X1%=176
30 Y%=1:Y1%=1
31 FOR I%=0 TO 150
40 X%=X%+1:X1%=X1%-1
50 Y%=Y%+1:Y1%=Y1%+1
55 R%=R%+25
56 SETCOLOR R%,0,0
60 PLOT X%,Y%LOT X1%,Y1%
65 SLEEP 50
66 IF R%>250 THEN R%=0
70 NEXT I%
Пишет что на 56 строке, вроде все правильно

FonSwong, поставь есле больше 255

У тебя не может r% быть больше 255, напиши там еще:
If r%>255 then r%=0

FonSwong, нет пиши р+1 а не 25 я проверял всё в норме