-   script  Sample  -1,{
OnPCLoginEvent:
if( #account_password$ == "" ){
    do{
        input .@input$;
    }while( getstrlen( .@input$ ) < 4 );
    set #account_password$,.@input$;
    message strcharinfo(0),"Created Password.";
}
mes "Enter your current Password.";
input .@input$;
if( .@input$ != #account_password$ )
    atcommand "@kick "+strcharinfo(0);
close;
}