Ingame second password script

[hadiesyafiq 7]

Hi all can someone teach me how to make this script?

script is like this

when we login system auto force we to make number password...after that when login system will always ask the number...if wrong we will disconnected from server...when we not put the number we will freeze,mute and stun...we cannot use any skill or telewing here the picture

[Coookie 1]

I believe this is the account locker 
 

- script AccountLocker -1,{

OnPCLoginEvent:
if (#setpw == 1) goto P_insert;
if (#dontp == 1) end;
mes "[Account Locker]";
mes "Do you want to set an Account locker?";
next;
menu "Set an Account Locker",P_check,"No",-;
mes "[Account Locker]";
mes "Are you sure you don't want to set an Account locker?";
mes "I will only ask this once !!";
next;
menu "Ok I want to set an account locker.",P_check,"Still No",-;
mes "[Account Locker]";
mes "Okay !!";
set #dontp,1;
close;

P_Check:
sc_start sc_berserk, 1000000000, 1;
mes "[Account Locker]";
mes "Input your password locker whatever you want. Can be letters or numbers. CASE SENSITIVE.";
next;
input #lockpw$;
next;
mes "[Account Locker]";
mes "Password Verification.";
mes "Please input the password you had entered.";
input #lockvpw$;
if (#lockvpw$ != #lockpw$) {
next;
mes "[Account Locker]";
mes "The verification password you had entered is incorrect.";
next;
goto P_Check;
} else {
next;
mes "[Account Locker]";
mes "Thank you. Please remember the password you had setted. I will ask for it again everytime you login.";
set #setpw,1;
sc_end sc_berserk;
close;
}


P_insert:
sc_start sc_berserk, 1000000000, 1;
mes "[Account Locker]";
mes "Please enter your locker password";
next;
input #insertlp$;
if (#insertlp$ == #lockpw$) goto P_pass;
mes "[Account Locker]";
mes "Invalid password. Try again.";
next;
input #insertlp$;
if (#insertlp$ == #lockpw$) goto P_pass;
mes "[Account Locker]";
mes "Invalid password. Try again.";
next;
mes "[Account Locker]";
mes "Invalid password. Try again.";
if (#insertlp$ == #lockpw$) goto P_pass;
atcommand "@kick "+strcharinfo(0);
end;

P_pass:
sc_end sc_berserk;
close;
}