ASSIGN(Password;"")
SHOWCODE(ClrScreen!)
Cancel(Off!)
WHILE(password<>"hello")
     GetString(Password;"Please Enter Password")
ENDWHILE
DisplayRewrite
