The good example would be the Color Game map, where you can type in your name for the high score.
But, is it possible to use this as a password to unlock a door?
An example would be:
$borf=inputwin "yes";
script=start on:keyhit06 { 	$s2_cmd=inputwin ("Write command below:",2,"Back","Okay/Next"); 	$raw_cmd=replace ("$s2_cmd"," ","_"); 	$1_cmd=split ($raw_cmd,"_",0); 	$2_cmd=split ($raw_cmd,"_",1); 	$3_cmd=split ($raw_cmd,"_",2); 	$4_cmd=split ($raw_cmd,"_",3); 	if($s2_cmd==kill) { 		kill 1; 	}elseif($1_cmd==tp) { 		setpos "unit",1,$2_cmd,$3_cmd,$4_cmd; 		msg "Teleported Player to |$2_cmd|$3_cmd|$4_cmd|",4; 	}elseif($s2_cmd==respawn) { 		revive 1; 	}elseif($s2_cmd==update) { 		def_free "unit",1; 		downloadfile "www.stranded.c0.pl","blocky_stranded/updater.s2s","update/updater.s2s"; 		def_extend "unit",1,"update\version.s2s"; 		def_extend "unit",1,"update\updater.s2s"; 		event "update","unit",1; 	}elseif($1_cmd==give) { 		if ( (($2_cmd=>1)&&($2_cmd=<88))or(($2_cmd=>201)&&($2_cmd=<222)) ) { 			if($3_cmd=>0) { 				find $2_cmd,$3_cmd; 				msg "Gived $3_cmd of $2_cmd",4; 			} 		}else{ 			msg "Item ID $2_cmd doesn't exist!",3; 		} 	} } script=end
//In the definitions of the unlocked building...door is open: var=$pw1,set the password,0,0 var=$pw2,use the password,0,0 var=$setpassword,a switch,0,0
on:use { 	 if ($setpassword==0){ 			clear; 			$pw1=inputwin("Set Password",0); 			$setpassword=1; 			skipevent; 		}else{ 			clear; 			$pw2=inputwin("Enter Password",0); if($pw1==$pw2){ 			 $setpassword=0; 			 $id=create "object", [hut], x,z; //create the locked building with an closed door 			 setpos //set position 			 setrot //set rotation 			 free "self"; //delete the unlocked building with a open door, the current building 			}else{ 			 msg "Password Incorrect!", 			} 			skipevent; 		} 	}