//===== rAthena Script ======================================= //= Guild Prize Giveaway //===== By: ================================================== //= AnnieRuru / Mysterious //===== Current Version: ===================================== //= 1.5 //===== Compatible With: ===================================== //= rAthena SVN //===== Description: ========================================= //= Rewards guild masters of castle owners after each //= War of Emperium session. //===== Additional Comments: ================================= //= v1.0 - Intitial Re-release [Mysterious] //= v1.1 - Language structures [Mysterious] //= v1.2 - Added divisions [Mysterious] //= v1.3 - Added proper information [Mysterious] //= v1.4 - Optimized! [Euphy] //= v1.5 - Little bit of cleaning [Mysterious] //============================================================
prontera,135,188,5 script Scarlet Palace 871,{
mes "[Castle Rewards]"; if (agitcheck() || agitcheck2()) { mes "WoE is currently still in progress."; close; } mes "Please select a castle:"; next; for(set .@i,0; .@i<30; set .@i,.@i+1) set .@menu$, .@menu$+getcastlename(.Castles$[.@i])+":"; set .@i, select(.@menu$)-1; mes "[Castle Rewards]"; if (getcastledata(.Castles$[.@i],1) != getcharid(2)) { mes "You aren't the owner of this castle."; close; } if (getguildmasterid(getcharid(2)) != getcharid(0)) { mes "Only the guild master can claim the reward."; close; } if ($castle_claimed&(1<<.@i)) { mes "You've already claimed this castle's reward!"; close; } mes "Here's your reward for conquering "+getcastlename(.Castles$[.@i])+"."; set $castle_claimed, $castle_claimed | (1<<.@i);
Question
itsmeyoe
//===== rAthena Script =======================================
//= Guild Prize Giveaway
//===== By: ==================================================
//= AnnieRuru / Mysterious
//===== Current Version: =====================================
//= 1.5
//===== Compatible With: =====================================
//= rAthena SVN
//===== Description: =========================================
//= Rewards guild masters of castle owners after each
//= War of Emperium session.
//===== Additional Comments: =================================
//= v1.0 - Intitial Re-release [Mysterious]
//= v1.1 - Language structures [Mysterious]
//= v1.2 - Added divisions [Mysterious]
//= v1.3 - Added proper information [Mysterious]
//= v1.4 - Optimized! [Euphy]
//= v1.5 - Little bit of cleaning [Mysterious]
//============================================================
prontera,135,188,5 script Scarlet Palace 871,{
mes "[Castle Rewards]";
if (agitcheck() || agitcheck2()) { mes "WoE is currently still in progress."; close; }
mes "Please select a castle:";
next;
for(set .@i,0; .@i<30; set .@i,.@i+1)
set .@menu$, .@menu$+getcastlename(.Castles$[.@i])+":";
set .@i, select(.@menu$)-1;
mes "[Castle Rewards]";
if (getcastledata(.Castles$[.@i],1) != getcharid(2)) { mes "You aren't the owner of this castle."; close; }
if (getguildmasterid(getcharid(2)) != getcharid(0)) { mes "Only the guild master can claim the reward."; close; }
if ($castle_claimed&(1<<.@i)) { mes "You've already claimed this castle's reward!"; close; }
mes "Here's your reward for conquering "+getcastlename(.Castles$[.@i])+".";
set $castle_claimed, $castle_claimed | (1<<.@i);
if (rand(100) <2) {
setarray .RandItem,5518,5374,5377,5548,5483,1230; //2%
}
else if (rand(100) < 49) {
setarray .RandItem,5013,2383,2410;
}
else {
setarray .RandItem,2629,2630,2541; //10
}
getitem 7227,10;
getitem 7199,10;
getitem 674,2;
getitem .RandItem[rand(getarraysize(.RandItem))], 1; //Set your prize here!
close;
OnAgitEnd:
set $castle_claimed, 0;
end;
OnInit:
setarray .Castles$[0],
"payg_cas02";
end;
}
I want to make this script start at Friday 13:00 Ends 23:59 pleae help me thanks in advance.
Link to comment
Share on other sites
3 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.