{* Надпись1 *}

REM basic

' Надпись ч/б


SCREEN 7{надпись ч/б
}CLS
a$ = "MAXIM"
21
For i = 1 To LEN(a$)
    For q = 1 To 15000
    Next q
If INKEY$ = " " Then End
COLOR 7
LOCATE 10, 16
PRINT a$
COLOR 15
LOCATE 10, i + 15
PRINT Mid$(a$, i, 1)
    For q = 1 To 37000
    Next q

COLOR 0
LOCATE 10, i + 15
PRINT Mid$(a$, i, 1)

Next i
GoTo 21