Jump to content

PapaZola

Members
 View Profile  See their activity

  • Posts

    925

  • Joined

  • Last visited

 Content Type 

Posts posted by PapaZola

    @afk Chat Room

    in Source Support

    Posted 

    /*==========================================
* @afk by Rad, built on by Tubby 
* same as autotrade, but works without vending
*------------------------------------------*/
ACMD_FUNC(afk)
{
nullpo_retr(-1, sd);
if( map[sd->bl.m].flag.autotrade == battle_config.autotrade_mapflag )
{


if (!message || !*message) {

chat_createpcchat(sd, "(@afk) mail me~", "", 1, 1);
trade_tradeack(sd,4);
sd->state.autotrade = 1;
if( battle_config.at_timeout )
{
int timeout = atoi(message);
status_change_start(&sd->bl, SC_AUTOTRADE, 10000, 0, 0, 0, 0, ((timeout > 0) ? min(timeout,battle_config.at_timeout) : battle_config.at_timeout) * 60000, 0);
}

clif_authfail_fd(fd, 15);

}


if((strlen(message) < 0)||(strlen(message) > 36)) {
chat_createpcchat(sd, "(@afk) mail me~", "", 1, 1);
trade_tradeack(sd,4);
sd->state.autotrade = 1;
if( battle_config.at_timeout )
{
int timeout = atoi(message);
status_change_start(&sd->bl, SC_AUTOTRADE, 10000, 0, 0, 0, 0, ((timeout > 0) ? min(timeout,battle_config.at_timeout) : battle_config.at_timeout) * 60000, 0);
}

clif_authfail_fd(fd, 15);

}
chat_createpcchat(sd, message, "", 1, 1);
trade_tradeack(sd,4);
sd->state.autotrade = 1;
if( battle_config.at_timeout )
{
int timeout = atoi(message);
status_change_start(&sd->bl, SC_AUTOTRADE, 10000, 0, 0, 0, 0, ((timeout > 0) ? min(timeout,battle_config.at_timeout) : battle_config.at_timeout) * 60000, 0);
}

clif_authfail_fd(fd, 15);




} else
clif_displaymessage(fd, "AFK is not allowed on this map.");

return 0;
}

    here jaypee

    @cash gift

    in Scripting Support

    Posted 

    prontera,147,85,4 script NPC NEW GIFT 465,{

if(##sorry == 1) goto L_1;
mes "Welcome To Diablo Ragnarok Online " + strcharinfo(0) + " !!";
next;
mes "So You Is A New Player Here Right?";
next;
mes "Take My Reward Now And Have Fun With DiabloRO";
next;
getitem 7539,3000;
getitem 30391,1;
getitem 30392,1;
getitem 30393,1;
getitem 4302,1;
getitem 4174,1;
getitem 4403,1;

announce "DiabloRO : Happy New year To [ "+strcharinfo(0)+" ] !!",1;
emotion e_thx;
set ##sorry,1;
close;
OnInit:
waitingroom "2012 GIFT",0;
end;
L_1:
mes "Hey! you Already Get Reward From Me.";
mes "Sorry I Cant Give You Anymore Again More Than 1 Times.";
next;
mes "I dont Care You Crying Or Not. Tell You Mom Also Me not Scare~wu!!";
emotion e_bzz;
close;
}

    how i can added gift +500 cash point

    Akatsuki Quest

    in Script Requests

    Posted

    ok sir emistry

    sorry

    but its not working

    ani_dun01,61,129,5 script Diablo Akatsuki Suit 718,{
setarray .Item[0],
   25000,100,
setarray .Map$[0],
  "pvp_n_1-3",
  "pvp_n_2-3",
  "pvp_n_3-3",
  "pvp_n_4-3",
  "pvp_n_5-3",
  "pvp_n_6-3",
  "pvp_n_7-3",
  "pvp_n_8-3";

for( set .@i,0; .@i < getarraysize( .Item ) - 1; set .@i,.@i + 2 )
if( countitem( .Item[.@i] ) < .Item[.@i + 1] ){
mes "You required "+.Item[.@i + 1]+" x "+getitemname( .Item[.@i] )+" .";
close;
}
mes "Go in Kill Kage to get Custom Suit ?";
if( select("Hunt Kage:Cancel") == 2 ) close;
mes "Which Room ?";
for( set .@i,0; .@i < getarraysize( .Map$ ); set .@i,.@i + 1 ){
set .@Menu$,.@Menu$ + .Map$[.@i]+":";
}
set @i,select( .@Menu$ ) - 1;
if( getmapusers( .Map$[@i] ) ){
mes "Room is Occupied.";
close;
}
killmonster .Map$[@i],"All";
monster .Map$[@i],0,0,"Akatsuki Quest",2252,1,strnpcinfo(0)+"::OnMobKill";
warp .Map$[@i],101,102;
attachnpctimer strcharinfo(0);
initnpctimer;
dispbottom "You have 10 Minutes to finish it.";
end;

OnTimer300000:
message strcharinfo(0),"Time's Up....",0;
stopnpctimer;
killmonster .Map$[@i],"All";
mapwarp .Map$[@i],"prontera",155,181;
end;
OnMobKill:
getitem 7539,100;
stopnpctimer;
warp "prontera",155,181;
end;
}

    Job Antibot

    in Script Requests

    Posted

    hello all

    i want request some antibot like this

    this script will work only for job bard,dancer,gpysy,clown

    if other job online no need type code

    if job bard,dancer,gpysy,clown online this job will freeze until player enter the code for antibot

    sorry for my bad english

    :D

×
×
  • Create New...