Password Protection!

[Tibbles!]

I know this is rather simple and people have done it before, but I feel that a lot of people would benefit from this.

Behold....

[url]http://www.xfire.com/video/20d5f9/[/url]

Spawn the E2 and a keyboard, and wire the E2 S input to the screen's wirelink output, and the Key input to a keyboard.

Set the password up at the top of the code, and profit!

If the password is correct, it outputs 1 as Pass and clears the screen, so it's rather versatile.

@name Password
@inputs S:wirelink Key
@outputs Pass
@persist Hold Enter:string Out:string Caps Password:string Blink
if(first()){
    Password = "hello" #Set Password  
    #Screen Defaulting
    S:writeCell(2041,1)
    S:writeCell(2042,10)
    S:writeString("Enter PassEnter ",8,6,40)
    S:writeString("<>",14,7,50)
    Enter = ""
    Out = ""
}
#Blinking
timer("blink",500)
if(clk("blink")){Blink++}
if(Blink>1){Blink=0}
if($Blink&!Pass){
S:writeString("--Tibbles Password Protected--",0,0,40*!Blink)}
#Centering
Center = 14-round((Enter:length()/2))
#Making The String
if(Key==127|Key==154|Key==144|Key==158|Key==13){Hold=1}else{Hold=0} #No stupid characters
if(~Key&Key&!Hold&!Caps){
    Enter+=toChar(Key) 
}elseif(~Key&Key&!Hold&Caps){
    Enter +=toChar(Key):upper()
}
#Caps Check
if(Key==144){Caps++}
if(Caps>1){Caps=0}
if(Caps|Key==154){
    S:writeString("Capslock Active",8,9,60)
}else{S:writeString(" ":repeat(30),0,9)}
#Blurring The Password
if(~Key&Key&!Hold){Out+= "*"}
if(~Key&Key&!Pass){S:writeString("<" + Out + ">",Center,7,50)}
#Backspacing
if(Key==127){
    Enter  = Enter:left(Enter:length()-1)
    Out  = Out:left(Out:length()-1) 
    S:writeString(" ":repeat(30),0,7)
    S:writeString("<" + Out + ">",Center,7,50)
    S:writeString(" ",Center-1,7)
    
     
}
#String To Password Check
   if(Key==13&Enter==Password){
    Pass = 1
    S:writeCell(2041,1)
    S:writeCell(2042,0)
    }elseif(Key==13&Enter!=Password&!Pass){
    S:writeString(" ":repeat(30),0,7)
    Out = ""
    Enter = ""
    S:writeString("<>",14,7,50)
    S:writeString("Invalid Password",7,10,600,50)
    }

[Vicious713]

[img]http://static.howstuffworks.com/gif/corn-4.jpg[/img]
I can't read the word behold without first thinking of this =S

I'll have to give this e2 a try

[deadshot]

[QUOTE=Vicious713;20076776][IMG]http://static.howstuffworks.com/gif/corn-4.jpg[/IMG]
I can't read the word behold without first thinking of this =S

I'll have to give this e2 a try[/QUOTE]

:confused:

[Vicious713]

[QUOTE=deadshot;20091375]:confused:[/QUOTE]
It's from Aqua Team Hunger Force.. If you YouTube it, the most relative clip you find is some anime faggot failure from AMV Hell

[Gunnanmon]

Just watched it, and its pretty retarded. Blasphemy against ATHF in my opinion.

[Vicious713]

[QUOTE=Gunnanmon;20096872]Just watched it, and its pretty retarded. Blasphemy against ATHF in my opinion.[/QUOTE]
So about that ther E2 up thar.

[PacX]

[QUOTE=Vicious713;20097183]So about that ther E2 up thar.[/QUOTE]

This man is on-topic!