Графика в Qbasic, блин...

[danekne]

"программа расчитывает долетит ли предмет до стены или нет..."
"пользователь задает скорость броска и угол..."
"нужно привязать графически стену и брошенный предмет, что бы паказывал куда попал предмет"

Написал код:

CLS
s = 100
h = 100
g = 9.8
v = 0
a = 0
DO WHILE 1
INPUT "vvedite skopost bposka =", v
INPUT "vvedite ugol bposka =", a
IF v * COS(a) = 0 THEN
PRINT "vvedeni ne vernie dannie"
ELSE
t = s / (v * COS(a))
i = (v * SIN(a)) * t - (g * t * t / 2)
IF i < 0 THEN
PRINT "nedolet"
ELSEIF i < h THEN
PRINT "popal"
EXIT DO
ELSE
PRINT "perelet"
END IF
END IF
LOOP

Вопрос: как по полученным результатам рисовать бросок с полученным углом и скоростью?