{* Прыгающие слово *}

REM basic

' Прыгающие слово


SCREEN 7 
CLS
x = 1: y = 1
h = 1: w = 1
1 LOCATE x, y
COLOR n
PRINT "MAXIM"
For q = 1 To 45000
Next q
LOCATE x, y
COLOR 0
PRINT "     "
x = x + w
y = y + h
If x > 21 Then w = -w
If y > 35 Then h = -h
If x < 2 Then w = -w
If y < 2 Then h = -h
n = 9 + INT(RND * 7)
GoTo 1