Jump to content

karazu

Members
  • Content Count

    1115
  • Joined

  • Last visited

  • Days Won

    3

Everything posted by karazu

  1. u edit it for me? thank you very much. EDIT: OnMinute01:sonicxxx: its in your code. hmm is that every 1 hour? or every 1st minute of the hour?
  2. Anyway how to make this event "Automated"?? I cannot post it via code because its to long. I will post it via txt. poringsoccerv3.txt
  3. I have my script below, but I am planning to add 1 additional map. How should i add 1? Can u guys edit it please? prontera,152,192,5 script PVP Warper 450,{if (!agitcheck() || !agitcheck2()) { if (select("Yes!","No thanks.") == 2) close; warp "guild_vs3",0,0; announce strcharinfo(0) + " : Come and get me here in the PVP area Punks.",0; announce "There are ["+getmapusers("guild_vs3")+"/30] players inside.",0; end; } end;}
  4. Thank you very much! gonna test it later
  5. Is it possible to add more? I want at least 2 map
  6. Hello, I pmed Goddameit a suggestion to make the script or edit to make it work in certain map only. but he doenst have time and just told me to put "onpckillevent" in it, well obviously i don't know how to. So I hope to anyone knows can insert it please? It will be like the Script will only count the kills in the certain map only. This is the script. //// Author Goddameit// Version 2013/12/03// Web__ http://goo.gl/igS14r//- script GD_PK_TITLE -1,{ function SETTILE ; function GETTILE { switch(getarg(0,0)) { case 1: return "[MVP]"; default: return ""; } }OnPCLoginEvent: for(set .@i,0; .@i<.SP_RANK; set .@i,.@i+1 ) { if( getcharid(0) == .SP_RN_CID[.@i] ) { set .@N$,GETTILE(.@i+1); if( .@N$ != "" ) { atcommand "@fakename "+.@N$+""+strcharinfo(0); set @PK_TITL_BOOL,1; } break; } } end;OnPCKillEvent: if( killedrid == getcharid(3) || !isloggedin(killedrid) ) end; set @GDCID,getcharid(0); query_sql "SELECT `char_id` FROM `GD_PK_TITLE` WHERE `char_id` = "+@GDCID+"",@GDTID; if( !@GDTID ) query_sql "INSERT `GD_PK_TITLE` VALUES("+@GDCID+",1)"; else query_sql "UPDATE `GD_PK_TITLE` SET `var` = `var`+1 WHERE `char_id` = "+@GDCID+""; set @GDTID,0; set @GDCID,0; end;OnInit: bindatcmd "delpktitle","GD_PK_TITLE::OnGMFActive1",99,99,0; bindatcmd "refhpktile","GD_PK_TITLE::OnGMFActive3",99,99,0; set .SP_RANK,2;OnGMFActive3: if( playerattached() ) { dispbottom "All date was refresh."; detachrid; }OnTimer60000: stopnpctimer; deletearray .TMP_SP_RN_CID[0],128; query_sql "SELECT `char_id` FROM `GD_PK_TITLE` ORDER BY `var` DESC LIMIT "+.SP_RANK,.TMP_SP_RN_CID; SETTILE(0); deletearray .SP_RN_CID[0],128; deletearray .SP_RN_VAR[0],128; query_sql "SELECT `char_id`,`var` FROM `GD_PK_TITLE` ORDER BY `var` DESC LIMIT "+.SP_RANK,.SP_RN_CID,.SP_RN_VAR; SETTILE(1); deletearray .TMP_SP_RN_CID[0],128; initnpctimer; end;OnGMFActive1: query_sql "TRUNCATE TABLE `GD_PK_TITLE`"; dispbottom "All date was cleaned."; end; function SETTILE { for(set .@i,0; .@i<.SP_RANK; set .@i,.@i+1 ) { query_sql "SELECT `account_id` FROM `char` WHERE `char_id` = "+.SP_RN_CID[.@i]+"",.@SP_RN_AID; if( attachrid(.@SP_RN_AID) ) { if( .TMP_SP_RN_CID[.@i] == .SP_RN_CID[.@i] && @PK_TITL_BOOL ) { detachrid; continue; } if( getarg(0,0) == 1 ) { set .@N$,GETTILE(.@i+1); if( .@N$ != "" ) { atcommand "@fakename "+.@N$+""+strcharinfo(0); set @PK_TITL_BOOL,1; } }else if( @PK_TITL_BOOL ) { atcommand "@fakename"; set @PK_TITL_BOOL,0; } detachrid; } } return; }}prontera,150,180,4 script Rank 100,{ mes "[Rank]"; set .@SP_RANK,getvariableofnpc(.SP_RANK,"GD_PK_TITLE"); for(set .@i,0; .@i<.@SP_RANK; set .@i,.@i+1 ) { set .@SP_RN_CID,getvariableofnpc(.SP_RN_CID[.@i],"GD_PK_TITLE"); set .@SP_RN_VAR,getvariableofnpc(.SP_RN_VAR[.@i],"GD_PK_TITLE"); if( !.@SP_RN_CID || !.@SP_RN_VAR ) break; query_sql "SELECT `name` FROM `char` WHERE `char_id` = "+.@SP_RN_CID+"",.@SP_RN_NAME$; mes "[#"+(.@i+1)+"] "+.@SP_RN_NAME$+" "+.@SP_RN_VAR+"p"; } close;}
  7. since my server is pk mode, a player can fees him self outside the pvp map... btw godamit repkied to me in facebook, he said just add onNpckillevent in the script, but i dont know how ro do that sorry for some typo iam just using phone edit: onpckillevent
  8. sevennz bro. can u edit the script please... that it will be available in certain map only? my server is pk mode and everyone can abuse it
  9. please use 2013/08/07 client and above
  10. Working script for this item please? EDIT: I think this will do 5825,Badge_Of_Order_Grace,Knight Of Honor Badge,5,0,,0,,1,,0,0xFFFFFFFF,63,2,136,,0,0,0,{ bonus2 bAddRace,RC_NonBoss,10; bonus2 bAddRace,RC_Boss,10; bonus bMatkRate,10; bonus bMaxHP,1500; bonus bMdef,1; },{},{} http://ratemyserver.net/index.php?iname=5825&page=item_db&quick=1&isearch=Search
  11. ,SC_MTF_RANGEATK is this mean will only work in range attack only? How to increase the chance btw? I did try but I think I am not lucky enough to activate it..
  12. I will try this later. thank you for the answer. EDIT: Thank you. it Worked
  13. Hello guys this is the default "config" of the thor patcher. Can u help me put a custom button for it please? [Config:Main]RootURL='http://127.0.0.1/patch/'RemoteConfigFile='main.ini'TimeOut=0StatusFile='server.dat'DefaultGRF='server.grf'ClientEXE='game.exe'ClientParameter='-1sak1'FinishOnConnectionFailure=false[Config:Window]AutoResize=trueStyle='none'Width=Height=DragHandling=trueBackground='images/bg.bmp'FadeOnDrag=false[Config:BGM]File=Loop=trueVolume=20Directory=[Config:Misc]Title='Thor Patcher'HideProgressBarWhenFinish=true[ProgressBar:bar1]Width=342Height=10Left=23Top=486BackColorStart=$009DEEEFBackColorEnd=$00C2F1F1FrontColorStart=$006ED5B0FrontColorEnd=$0080DDCAFrontImage=BackImage=Hook='ProgressChange'[Label:Status]AutoResize = falseWidth=369Height=Left=15Top=498Alignment='center'FontColor=$000000FontName = ''FontSize =Text=''Hook='StatusChange'[NoticeBox:Box0]Width=347Height=250Left=21Top=217URL='http://127.0.0.1/opatch/Notice.html'[Button:Start]Default='images/start1.png'OnHover='images/start2.png'OnDown='images/start3.png'Left=383Top=211Hook='Start'[Button:Exit]Default='images/Exit1.png'OnHover='images/Exit2.png'OnDown='images/Exit3.png'Left=383Top=244Hook='Exit'[Button:Cancel]Default='images/Exit1.png'OnHover='images/Exit2.png'OnDown='images/Exit3.png'Left=383Top=211Hook='Cancel' What I want to add is Register and button for website.
  14. Gonna make it as main City if its free
  15. thank you very much, gonna try it later, i will update u later bro.
  16. hello, bro thank you for the answer, i will try it later.. off topic: about our 3d mobs i will buy a new laptop 1st that can handle latest 3ds max hehehe... xmas gift for my self wew. any thnaks gonna ypdate u later
  17. You will mostly get errors if you use rA item_combo_db with hercules because, some(ahh, its many) of the items are there in rA , but not in hercules. Ok thank you. But in terms of Combo effect we only have same structure right?
  18. Thank you, because I saw a WOE Prize Giver before it gives everyday. error [Error]: Loading NPC file: npc/custom/MYNPC/WOEprizegiver.txtscript error on npc/custom/MYNPC/WOEprizegiver.txt line 25 parse_line: need ';' 23 : { 24 : function GetCastle;* 25 : set .@reward,671','1; //<Item_ID>,<Amount>{,...} 26 : set .@n$,"["+strnpcinfo(0)+"]"; 27 : mes "Your guild [^0000FF"+getguildname(getcharid(2))+"^000000] has conquered:"; 28 : for(set .@i,0;.@i<getarraysize(.Castles$);set .@i,.@i+1) 29 : if (getcastledata(.Castles$[.@i],1) == getcharid(2)) { 30 : mes " > "+getcastlena
  19. //===== rAthena Script =======================================//= Guild Prize Giveaway//===== By: ==================================================//= AnnieRuru / Mysterious / Joseph//===== Current Version: =====================================//= 1.7//===== 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]//= v1.6 - Fixed Agit on/off corruption. [Joseph]//= v1.7 - Fixed overweight issues [Joseph]//============================================================prontera,163,166,4 script Castle Rewards 871,{ function GetCastle; set .@reward,671,1; //<Item_ID>,<Amount>{,...} set .@n$,"["+strnpcinfo(0)+"]"; mes "Your guild [^0000FF"+getguildname(getcharid(2))+"^000000] has conquered:"; for(set .@i,0;.@i<getarraysize(.Castles$);set .@i,.@i+1) if (getcastledata(.Castles$[.@i],1) == getcharid(2)) { mes " > "+getcastlename(.Castles$[.@i])+""; set .@c,1; setarray .@uh$[getarraysize(.@uh$)],.Castles$[.@i],(1<<.@i); } if (!.@c) { mes " > No castles."; close; } next; if (select(((getguildmasterid(getcharid(2))==getcharid(0))?((agitcheck()||agitcheck2())?"":"Redeem Reward"):"")+":Close")==2) close; mes .@n$; mes "Please select a castle to redeem your guild reward."; for(set .@i,0;.@i<getarraysize(.@uh$);set .@i,.@i+2) set .@m$,.@m$+($castle_reward&(1<<GetCastle(atoi(.@uh$[.@i+1])))?"^0000FF":"^FF0000")+getcastlename(.@uh$[.@i])+"^000000:"; next; set .@m,select(.@m$)-1; if ($castle_reward&(1<<GetCastle(atoi(.@uh$[.@m*2+1])))) { mes .@n$; mes "Here's your reward for conquering ^0000FF"+getcastlename(.@uh$[.@m*2])+"^000000."; mes "You should divide these among your guild members."; for(set .@i,0;.@i<getarraysize(.@reward);set .@i,.@i+1) if (!checkweight(.@reward[.@i],.@reward[.@i+1])) { mes " "; mes "^FF0000Overweight!^000000"; close; } for(set .@i,0;.@i<getarraysize(.@reward);set .@i,.@i+1) getitem .@reward[.@i],.@reward[.@i+1]; set $castle_reward,$castle_reward^(1<<GetCastle(atoi(.@uh$[.@m*2+1]))); close; } mes .@n$; mes "It seems like you've redeemed the reward."; close; function GetCastle { for(set .@j,0;.@j<getarraysize(.Castles$);set .@j,.@j+1) { set .@c1,.@c2|(1<<.@j); if (getarg(0)==.@c1) return .@j; } return -1; }OnAgitEnd:OnAgitEnd2: for(set .@i,0;.@i<getarraysize($WOE_CONTROL);set .@i,.@i+4) if (gettime(4)==$WOE_CONTROL[.@i] && gettime(3)==$WOE_CONTROL[.@i+2] && $castle_reward&(1<<GetCastle($WOE_CONTROL[.@i+3])) == 0) set $castle_reward,$castle_reward|(1<<GetCastle($WOE_CONTROL[.@i+3])); end; OnInit: setarray .Castles$, "prtg_cas01","prtg_cas02","prtg_cas03","prtg_cas04","prtg_cas05", "payg_cas01","payg_cas02","payg_cas03","payg_cas04","payg_cas05", "gefg_cas01","gefg_cas02","gefg_cas03","gefg_cas04","gefg_cas05", "aldeg_cas01","aldeg_cas02","aldeg_cas03","aldeg_cas04","aldeg_cas05", "arug_cas01","arug_cas02","arug_cas03","arug_cas04","arug_cas05", "schg_cas01","schg_cas02","schg_cas03","schg_cas04","schg_cas05"; end;} Can someone analyze this Script please. Will this script give a prize everyday or only every after the WOE?
  20. The effects are working but it will not transform me to Atroce, what do u think is the mistake? 2959:18756,{ set .@i,3+(3*getequiprefinerycnt(EQI_HEAD_TOP)); autobonus "{ /* Active_Montransform ATROCE, SetDisappearSPAmount COMBIITEM_Shiba_Set 1 5 */ bonus bBaseAtk,30; }",.@i,5000,0,"{ specialeffect2 EF_POTION_BERSERK; }"; autobonus2 "{ /* Active_Montransform ATROCE, SetDisappearSPAmount COMBIITEM_Shiba_Set 1 5 */ bonus bBaseAtk,30; }",.@i,5000,BF_WEAPON,"{ specialeffect2 EF_POTION_BERSERK; }"; }
×
×
  • Create New...

Important Information

By using this site, you agree to our Terms of Use.