Hi ! I need help with this script by @Akkarin ... On how to add command @NOKS ..where It will ask the target of the command if it is [SELF/PARTY/GUILD] .. Thankyou so much !
//===== rAthena Script =======================================
//= OnPCLogin NPC
//===== By: ==================================================
//= Akkarin
//===== Current Version: =====================================
//= 2.0
//===== Compatible With: =====================================
//= rAthena Project
//===== Description: =========================================
//= This NPC saves your settings so the next time you login, it
//= will auto perform the commands you selected. Easy to edit
//= or duplicate/modify based on cmds you want to allow.
//===== Additional Comments: =================================
//= 1.0 First Version.
//= 2.0 Complete rewrite to make use of binary values and
// switch(select()) instead of menu();
//============================================================
//prontera,147,175,5 script Settings 61,{
- script save_cmd -1,{
OnInit:
bindatcmd("savecmd","save_cmd::OnCommand");
OnCommand:
UserMenu:
set .@reset$,"^000000";
set .@disabled$,"^BE1C1C";
set .@enabled$,"^0DB40D";
mes "[^484848Settings^000000]";
mes "Note: These are all account based, not per-character.";
mes "Note 2: You must relog for them to take effect.";
if (#pcloginflag&1) { set .@st_autoloot$,.@enabled$+#pcloginalp+"%"+.@reset$; } else { set .@st_autoloot$,.@disabled$+"Off"+.@reset$; }
if (#pcloginflag&2) { set .@st_showdelay$,.@enabled$+"On"+.@reset$; } else { set .@st_showdelay$,.@disabled$+"Off"+.@reset$; }
if (#pcloginflag&4) { set .@st_rates$,.@enabled$+"On"+.@reset$; } else { set .@st_rates$,.@disabled$+"Off"+.@reset$; }
if (#pcloginflag&8) { set .@st_showexp$,.@enabled$+"On"+.@reset$; } else { set .@st_showexp$,.@disabled$+"Off"+.@reset$; }
if (#pcloginflag&16) { set .@st_showzeny$,.@enabled$+"On"+.@reset$; } else { set .@st_showzeny$,.@disabled$+"Off"+.@reset$; }
if (#pcloginflag&32) { set .@st_uptime$,.@enabled$+"On"+.@reset$; } else { set .@st_uptime$,.@disabled$+"Off"+.@reset$; }
next;
switch(select("Auto Loot ["+.@st_autoloot$+"]:Show Delay ["+.@st_showdelay$+"]:Rates on login ["+.@st_rates$+"]:Show Exp ["+.@st_showexp$+"]:Show Zeny ["+.@st_showzeny$+"]:Uptime on login ["+.@st_uptime$+"]")){
case 1:
mes "[^484848Settings^000000]";
mes "Auto Loot is currently "+.@st_autoloot$;
mes "Desc: Auto loot adds items to your inventory automatically.";
next;
switch(select("Toggle:Back")){
case 1:
if (#pcloginflag&1) { set #pcloginflag, #pcloginflag &~ 1; } else {
mes "[^484848Settings^000000]";
mes "Auto Loot is currently "+.@st_autoloot$;
mes "Enter the minimum rate an item must drop at before it it looted, 100 will loot all items, 99 will only loot cards, 0 disables it.";
next;
input .@rate;
if ((.@rate >= 0) && (.@rate <= 100)) set #pcloginalp,.@rate;
set #pcloginflag, #pcloginflag | 1;
}
break;
case 2: break;
}
break;
case 2:
mes "[^484848Settings^000000]";
mes "Show Delay is currently "+.@st_showdelay$;
mes "Desc: When a skill fails because of delay, it will be hidden.";
next;
switch(select("Toggle:Back")){
case 1:
if (#pcloginflag&2) { set #pcloginflag, #pcloginflag &~ 2; } else { set #pcloginflag, #pcloginflag | 2; }
break;
case 2: break;
}
break;
case 3:
mes "[^484848Settings^000000]";
mes "Rates on login is currently "+.@st_rates$;
mes "Desc: Displays the current server rates on login.";
next;
switch(select("Toggle:Back")){
case 1:
if (#pcloginflag&4) { set #pcloginflag, #pcloginflag &~ 4; } else { set #pcloginflag, #pcloginflag | 4; }
break;
case 2: break;
}
break;
case 4:
mes "[^484848Settings^000000]";
mes "Show Exp is currently "+.@st_showexp$;
mes "Desc: When you gain exp, it will be displaied.";
next;
switch(select("Toggle:Back")){
case 1:
if (#pcloginflag&8) { set #pcloginflag, #pcloginflag &~ 8; } else { set #pcloginflag, #pcloginflag | 8; }
break;
case 2: break;
}
break;
case 5:
mes "[^484848Settings^000000]";
mes "Show Zeny is currently "+.@st_showzeny$;
mes "Desc: When you gain zeny, it will be displaied.";
next;
switch(select("Toggle:Back")){
case 1:
if (#pcloginflag&16) { set #pcloginflag, #pcloginflag &~ 16; } else { set #pcloginflag, #pcloginflag | 16; }
break;
case 2: break;
}
break;
case 6:
mes "[^484848Settings^000000]";
mes "Uptime on login is currently "+.@st_uptime$;
mes "Desc: When you log in, server uptime will be displaied.";
next;
switch(select("Toggle:Back")){
case 1:
if (#pcloginflag&32) { set #pcloginflag, #pcloginflag &~ 32; } else { set #pcloginflag, #pcloginflag | 32; }
break;
case 2: break;
}
break;
}
goto UserMenu;
OnPCLoginEvent:
sleep2 1000;
if (#pcloginflag&1) atcommand "@autoloot " + #pcloginalp;
if (#pcloginflag&2) atcommand "@showdelay";
if (#pcloginflag&4) atcommand "@rates";
if (#pcloginflag&8) atcommand "@showexp";
if (#pcloginflag&16) atcommand "@showzeny";
if (#pcloginflag&32) atcommand "@uptime";
end;
}
Question
Eross
Hi ! I need help with this script by @Akkarin ... On how to add command @NOKS ..where It will ask the target of the command if it is [SELF/PARTY/GUILD] .. Thankyou so much !
//===== rAthena Script ======================================= //= OnPCLogin NPC //===== By: ================================================== //= Akkarin //===== Current Version: ===================================== //= 2.0 //===== Compatible With: ===================================== //= rAthena Project //===== Description: ========================================= //= This NPC saves your settings so the next time you login, it //= will auto perform the commands you selected. Easy to edit //= or duplicate/modify based on cmds you want to allow. //===== Additional Comments: ================================= //= 1.0 First Version. //= 2.0 Complete rewrite to make use of binary values and // switch(select()) instead of menu(); //============================================================ //prontera,147,175,5 script Settings 61,{ - script save_cmd -1,{ OnInit: bindatcmd("savecmd","save_cmd::OnCommand"); OnCommand: UserMenu: set .@reset$,"^000000"; set .@disabled$,"^BE1C1C"; set .@enabled$,"^0DB40D"; mes "[^484848Settings^000000]"; mes "Note: These are all account based, not per-character."; mes "Note 2: You must relog for them to take effect."; if (#pcloginflag&1) { set .@st_autoloot$,.@enabled$+#pcloginalp+"%"+.@reset$; } else { set .@st_autoloot$,.@disabled$+"Off"+.@reset$; } if (#pcloginflag&2) { set .@st_showdelay$,.@enabled$+"On"+.@reset$; } else { set .@st_showdelay$,.@disabled$+"Off"+.@reset$; } if (#pcloginflag&4) { set .@st_rates$,.@enabled$+"On"+.@reset$; } else { set .@st_rates$,.@disabled$+"Off"+.@reset$; } if (#pcloginflag&8) { set .@st_showexp$,.@enabled$+"On"+.@reset$; } else { set .@st_showexp$,.@disabled$+"Off"+.@reset$; } if (#pcloginflag&16) { set .@st_showzeny$,.@enabled$+"On"+.@reset$; } else { set .@st_showzeny$,.@disabled$+"Off"+.@reset$; } if (#pcloginflag&32) { set .@st_uptime$,.@enabled$+"On"+.@reset$; } else { set .@st_uptime$,.@disabled$+"Off"+.@reset$; } next; switch(select("Auto Loot ["+.@st_autoloot$+"]:Show Delay ["+.@st_showdelay$+"]:Rates on login ["+.@st_rates$+"]:Show Exp ["+.@st_showexp$+"]:Show Zeny ["+.@st_showzeny$+"]:Uptime on login ["+.@st_uptime$+"]")){ case 1: mes "[^484848Settings^000000]"; mes "Auto Loot is currently "+.@st_autoloot$; mes "Desc: Auto loot adds items to your inventory automatically."; next; switch(select("Toggle:Back")){ case 1: if (#pcloginflag&1) { set #pcloginflag, #pcloginflag &~ 1; } else { mes "[^484848Settings^000000]"; mes "Auto Loot is currently "+.@st_autoloot$; mes "Enter the minimum rate an item must drop at before it it looted, 100 will loot all items, 99 will only loot cards, 0 disables it."; next; input .@rate; if ((.@rate >= 0) && (.@rate <= 100)) set #pcloginalp,.@rate; set #pcloginflag, #pcloginflag | 1; } break; case 2: break; } break; case 2: mes "[^484848Settings^000000]"; mes "Show Delay is currently "+.@st_showdelay$; mes "Desc: When a skill fails because of delay, it will be hidden."; next; switch(select("Toggle:Back")){ case 1: if (#pcloginflag&2) { set #pcloginflag, #pcloginflag &~ 2; } else { set #pcloginflag, #pcloginflag | 2; } break; case 2: break; } break; case 3: mes "[^484848Settings^000000]"; mes "Rates on login is currently "+.@st_rates$; mes "Desc: Displays the current server rates on login."; next; switch(select("Toggle:Back")){ case 1: if (#pcloginflag&4) { set #pcloginflag, #pcloginflag &~ 4; } else { set #pcloginflag, #pcloginflag | 4; } break; case 2: break; } break; case 4: mes "[^484848Settings^000000]"; mes "Show Exp is currently "+.@st_showexp$; mes "Desc: When you gain exp, it will be displaied."; next; switch(select("Toggle:Back")){ case 1: if (#pcloginflag&8) { set #pcloginflag, #pcloginflag &~ 8; } else { set #pcloginflag, #pcloginflag | 8; } break; case 2: break; } break; case 5: mes "[^484848Settings^000000]"; mes "Show Zeny is currently "+.@st_showzeny$; mes "Desc: When you gain zeny, it will be displaied."; next; switch(select("Toggle:Back")){ case 1: if (#pcloginflag&16) { set #pcloginflag, #pcloginflag &~ 16; } else { set #pcloginflag, #pcloginflag | 16; } break; case 2: break; } break; case 6: mes "[^484848Settings^000000]"; mes "Uptime on login is currently "+.@st_uptime$; mes "Desc: When you log in, server uptime will be displaied."; next; switch(select("Toggle:Back")){ case 1: if (#pcloginflag&32) { set #pcloginflag, #pcloginflag &~ 32; } else { set #pcloginflag, #pcloginflag | 32; } break; case 2: break; } break; } goto UserMenu; OnPCLoginEvent: sleep2 1000; if (#pcloginflag&1) atcommand "@autoloot " + #pcloginalp; if (#pcloginflag&2) atcommand "@showdelay"; if (#pcloginflag&4) atcommand "@rates"; if (#pcloginflag&8) atcommand "@showexp"; if (#pcloginflag&16) atcommand "@showzeny"; if (#pcloginflag&32) atcommand "@uptime"; end; }
Link to comment
Share on other sites
0 answers to this question
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.