Hello, I would like to request a script, please read.

[FReyes]

Hello, I would like to request a script that will automaticaly broadcast and summon a one poring in random Towns

(ex. geffen, prontera, alberta, aldebaran) for 12;00am/pm, 3;00am/pm, 6:00am/pm and 9:00am/pm Time

that will gained zenny if player kills that poring.

 

Thanks! Please tell me if I have to do any server configuration, I guess I have to create a new poring mob who only gained that zeny right? Can you also tell me how? /help

Edited January 12, 2016 by d102791estiny

[FReyes]

 

Ahaha~ Fix the bug and add the min countdown~

try it

- script Poring Event -1,{
OnMinute00:
.h = gettime(3); // hour
.m = gettime(2); // min
.s = gettime(1); // sec


if(.h%3 == 0){
.Map$ = .Maplist$[rand(getarraysize(.Maplist$))];
.min = .min_before_start;
goto OnTimer60000;
}
end;


OnTimer60000:
stopnpctimer;
if(.min){
announce "A special poring will spawn in [ "+Strtoupper(.Map$)+" ] in "+.min+" minutes",bc_all;
.min--;
initnpctimer;
}else{
announce "A special poring has just spawn in [ "+Strtoupper(.Map$)+" ]",bc_all;
monster .Map$,0,0,"--ja--",1002,1,strnpcinfo(3)+.eventlabel$,0;
}
end;


OnPoring:
Zeny = Zeny + .zenygain;
dispbottom .zenygain+"z gain";
announce strcharinfo(0)+" has just kill the special poring in [ "+Strtoupper(.Map$)+" ]",bc_all;
end;


OnInit:
.zenygain = 1000;
setarray .Maplist$,"geffen","prontera","alberta","aldebaran";
.eventlabel$ = "::OnPoring";
.min_before_start = 3;
}

 

 

Thanks a lot i works...

but i did my own customization but nothing works...

 

this is the last request..

 

~~~Poring event wil start in 3 minutes...

~~~Poring event has just spawn in town (ex. izlude)..

 

 

xxx~~~not poring event will spawn in izlude in 3,2,2 minutes.. thanks a lot

 

 

Ahaha~ Fix the bug and add the min countdown~

try it

- script Poring Event -1,{
OnMinute00:
.h = gettime(3); // hour
.m = gettime(2); // min
.s = gettime(1); // sec


if(.h%3 == 0){
.Map$ = .Maplist$[rand(getarraysize(.Maplist$))];
.min = .min_before_start;
goto OnTimer60000;
}
end;


OnTimer60000:
stopnpctimer;
if(.min){
announce "A special poring will spawn in [ "+Strtoupper(.Map$)+" ] in "+.min+" minutes",bc_all;
.min--;
initnpctimer;
}else{
announce "A special poring has just spawn in [ "+Strtoupper(.Map$)+" ]",bc_all;
monster .Map$,0,0,"--ja--",1002,1,strnpcinfo(3)+.eventlabel$,0;
}
end;


OnPoring:
Zeny = Zeny + .zenygain;
dispbottom .zenygain+"z gain";
announce strcharinfo(0)+" has just kill the special poring in [ "+Strtoupper(.Map$)+" ]",bc_all;
end;


OnInit:
.zenygain = 1000;
setarray .Maplist$,"geffen","prontera","alberta","aldebaran";
.eventlabel$ = "::OnPoring";
.min_before_start = 3;
}

 

 

Thanks a lot i works...

but i did my own customization but nothing works...

 

this is the last request..

 

~~~Poring event wil start in 3 minutes...

~~~Poring event has just spawn in town (ex. izlude)..

 

 

xxx~~~not poring event will spawn in izlude in 3,2,2 minutes.. thanks a lot

 

 

SOLVED

announce "A special poring will spawn in [ "+Strtoupper(.Map$)+" ] in "+.min+" minutes",bc_all;

to

announce "A special poring will spawn in "+.min+" minutes",bc_all;

 

Thanks a lot guys

[yuchinin]

Just done it. give it a try~  
 

- script Poring Event -1,{
OnMinute00:
.h = gettime(3); // hour
.m = gettime(2); // min
.s = gettime(1); // sec


.Map$ = .Maplist$[getarraysize(.Maplist$)];
if(.h%3 == 0){
announce "A special poring has just spawn in [ "+Strtoupper(.Map$)+" ]",bc_all;
monster .Map$,0,0,"--ja--",1002,1,strnpcinfo(3)+.eventlabel$,0;
}
end;


OnPoring:
Zeny = Zeny + .zenygain;
dispbottom .zenygain+"z gain";
announce strcharinfo(0)+" has just kill the special poring in [ "+Strtoupper(.Map$)+" ]",bc_all;
end;


OnInit:
.zenygain = 1000;
setarray .Maplist$,"geffen","prontera","alberta","aldebaran";
.eventlabel$ = "::OnPoring";
}

Edited January 12, 2016 by yuchinin

[FReyes]

 

Just done it. give it a try~  

 

- script Poring Event -1,{
OnMinute00:
.h = gettime(3); // hour
.m = gettime(2); // min
.s = gettime(1); // sec


.Map$ = .Maplist$[getarraysize(.Maplist$)];
if(.h%3 == 0){
announce "A special poring has just spawn in [ "+Strtoupper(.Map$)+" ]",bc_all;
monster .Map$,0,0,"--ja--",1002,1,strnpcinfo(3)+.eventlabel$,0;
}
end;


OnPoring:
Zeny = Zeny + .zenygain;
dispbottom .zenygain+"z gain";
announce strcharinfo(0)+" has just kill the special poring in [ "+Strtoupper(.Map$)+" ]",bc_all;
end;


OnInit:
.zenygain = 1000;
setarray .Maplist$,"geffen","prontera","alberta","aldebaran";
.eventlabel$ = "::OnPoring";
}

 

how to set ? 12;00am/pm, 3;00am/pm, 6:00am/pm and 9:00am/pm Time

[yuchinin]

Already did isn't it ?

 

OnMinute00:                 // This label will trigger when the server minutes hit 0, that mean it will trigger every hour on 0 min.

 

.h = gettime(3);             // This get the time in hour

 

if(.h%3 == 0)                 // that mean when the variable < .h > is 3 6 9 12 15 18 21 24 % 3 will always get 0

 

Thumb up if this help 

If you don't know that logic you can simply use the

OnHour00:

OnHour03:

OnHour06:

OnHour09:

...

 

got it? 

[FReyes]

Already did isn't it ?

 

OnMinute00:                 // This label will trigger when the server minutes hit 0, that mean it will trigger every hour on 0 min.

 

.h = gettime(3);             // This get the time in hour

 

if(.h%3 == 0)                 // that mean when the variable < .h > is 3 6 9 12 15 18 21 24 % 3 will always get 0

 

Thumb up if this help 

If you don't know that logic you can simply use the

OnHour00:

OnHour03:

OnHour06:

OnHour09:

...

 

got it? 

 

no town name indicate

 

 

additional sir that will anounce like poring event will start ing 3 minutes,

 

thank you a lot for the replies

Edited January 12, 2016 by d102791estiny

[PandaLovesHamster]

It lacks an array where you list out the map names I think?

[yuchinin]

Ahaha~ Fix the bug and add the min countdown~

try it

- script Poring Event -1,{
OnMinute00:
.h = gettime(3); // hour
.m = gettime(2); // min
.s = gettime(1); // sec


if(.h%3 == 0){
.Map$ = .Maplist$[rand(getarraysize(.Maplist$))];
.min = .min_before_start;
goto OnTimer60000;
}
end;


OnTimer60000:
stopnpctimer;
if(.min){
announce "A special poring will spawn in [ "+Strtoupper(.Map$)+" ] in "+.min+" minutes",bc_all;
.min--;
initnpctimer;
}else{
announce "A special poring has just spawn in [ "+Strtoupper(.Map$)+" ]",bc_all;
monster .Map$,0,0,"--ja--",1002,1,strnpcinfo(3)+.eventlabel$,0;
}
end;


OnPoring:
Zeny = Zeny + .zenygain;
dispbottom .zenygain+"z gain";
announce strcharinfo(0)+" has just kill the special poring in [ "+Strtoupper(.Map$)+" ]",bc_all;
end;


OnInit:
.zenygain = 1000;
setarray .Maplist$,"geffen","prontera","alberta","aldebaran";
.eventlabel$ = "::OnPoring";
.min_before_start = 3;
}