2 CLS:SETCOLOR 0,0,0:FILLRECT 0,0,176,220:GELLOAD "logo","/a/logo.png":GELLOAD "j","/a/j.png":GELLOAD "g","/a/g.png"
12 DRAWGEL "logo",2,201:SLEEP 800:DRAWGEL "j",6,81:SLEEP 1500:DRAWGEL "g",1,71:SLEEP 1200
13 CLS:PAS%=1111:INPUT "Введите ключ для доступа",P%:IF P%=PAS% THEN PLAYWAV "/z/on.mp3" and CALL "/RU/txt.bas"
14 TRAP 13
15 IF P%>1111 THEN PLAYWAV "/z/off.mp3" and print "Не верный ключ!":SLEEP 500
112 IF P%<1111 THEN 
PLAYWAV "/z/off.mp3" and print "Не верный ключ!":SLEEP 500