personal account warp

[IvanD]

can i request this personal warp script?

NPC that only recognize account id 2000001,2000002,2000003 and a choice to (warp prontera or change password)

and a pub that says "warper"

Edited December 29, 2020 by IvanD

[IvanD]

bump ---- advance happy new year!

bumpy bumpy  .. i hope someone noticed

[Haruka Mayumi]

Good for you I noticed it

[Emistry]

prontera,155,181,5	script	Sample	757,{
	if (getcharid(3) >= 2000001 && getcharid(3) <= 2000003) {
		switch(select("Warp", "Change Password")) {
			case 1:
				warp "prontera", 155, 180;
				end;
			case 2:
				mes "Enter new password.";
				input .@new_password$;
				if (getstrlen(.@new_password$) < 5 || getstrlen(.@new_password$) > 30) {
					mes "Between 5 ~ 30 characters.";
				}
				else {
					if (.md5) {
						.@new_password$ = "MD5('"+.@new_password$+"')";
					}
					else {
						.@new_password$ = "'"+.@new_password$+"'";
					}
					query_sql("UPDATE `login` SET `user_pass` = "+.@new_password$+" WHERE `account_id` = "+getcharid(3)+" LIMIT 1");
				}
				break;
		}
		close;
	}
	end;
	
	OnInit:
		.use_md5 = 1;
		waitingroom "Warper", 0;
		end;
}