A password prompt, could be used for anything.

                                    ` This code was downloaded from The Game Creators
                                    ` It is reproduced here with full permission
                                    ` http://www.thegamecreators.com
                                    
                                    disable escapekey
disable systemkeys
start:
cls
print "Please enter the password"
print
input ">" ,password$
if password$ = "password"
end
else
goto wrong
endif

wrong:
cls
print "Password Incorrect, Access Denied"
wait 1000
goto start