Не работает анимация движения самолета - QBasic

Формулировка задачи:

Всем привет! 3 месяца собрал мини-мультик, а сейчас запустить он не работает illegal call function, или неверный вызов функции.. Не пугайтесь это самолётик тип... который слева на право летит и всё

                    Листинг программы
                
 
                        
                          
                    
SCREEN 12
WINDOW (0, 0)-(640, 480)
COLOR 3
DIM A%(5000)
LINE (25, 430)-(150, 390), 11, B
LINE (75, 430)-(75, 470), 11 'BBePx KpuJIo
LINE (75, 470)-(115, 430), 11 'BBePx KpuJIo
LINE (75, 390)-(75, 350), 11 'Hu}I{Hee KPUJIO
LINE (75, 350)-(115, 390), 11 'Hu}I{HUU
LINE (150, 430)-(180, 410), 11 'Hoc
LINE (180, 410)-(150, 390), 11
GET (25, 470)-(180, 350), A%()
 
FOR x = 25 TO 480 STEP 10
    CLS
    PUT (x, 470), A%(), PSET
    SLEEP 1
NEXT x
END

12 строка ошибку дает (GET)

Решение задачи: «Не работает анимация движения самолета»

textual
                            Листинг программы 
                        
PUT (x, 200), A%, PSET

Оцени полезность:

14 голосов , оценка 3.786 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Похожие ответы