Jump to content

goddameit

Members
  • Posts

    562
  • Joined

  • Days Won

    14

Everything posted by goddameit

  1. here http://rathena.org/board/topic/65197-capture-the-flag/
  2. Video + Introduction : --- More Introduction ? Capture the enemy flag and take it back to the base. Need a GM to activate event. http://bit.ly/Ur9SjU --- Download : CTF_2.rar CTF.rar --- Update : 2013/03/14 - Fixed --- Other : http://rathena.org/board/topic/66985-capture-the-flag-v2-custom-map-added/
  3. agit_controller.txt (gettime(4)==6) && (gettime(3)>=16 && gettime(3)<18)) { if (!agitcheck()) { AgitStart; set $guild_event,gettimetick(2);//add callsub S_DisplayOwners; } end; new head{ if(getd("$GuildSupply"+getcharid(2))!=$guild_event) { getitem 607,1; setd "$GuildSupply"+getcharid(2),$guild_event; } }
  4. I suggest you to write a new one
  5. Video : [media=] [/media]--- Introduction : This is script is used to let you exchange a new random hat by using two hats. --- Set : 1. Limit list must be on the exchange list . 2. This is limit list. 3. This is exchange list. 4. You can add more exchange list & use different <rand> to separate each ype. 5. There is no limit on how many type or hats in same type that you can add. 6. Only one limit is total rand value must be 1000 or it maybe fail by no type is chosen or discard type. 7. About how to choose the type and give you a hat. --- Download : Crafting.txt --- Special Thank To : Who give me a on Facebook. ---
  6. callfunc "LadderWatch","G_Own",5,0; set .@guild,getcharid(2); set @GuildOwning,0; setarray .@maps$[0],"prtg_cas01","prtg_cas02","prtg_cas03","prtg_cas04","prtg_cas05"; setarray .@maps$[5],"aldeg_cas01","aldeg_cas02","aldeg_cas03","aldeg_cas04","aldeg_cas05"; setarray .@maps$[10],"gefg_cas01","gefg_cas02","gefg_cas03","gefg_cas04","gefg_cas05"; setarray .@maps$[15],"payg_cas01","payg_cas02","payg_cas03","payg_cas04","payg_cas05"; for( set .@i, 0; .@i <= 19; set .@i, .@i+1 ) { set @GuildOwning,@GuildOwning+(getcastledata(.@maps$[.@i],1)==.@guild?1:0); } callfunc "LadderWork","G_Own",5,"@GuildOwning"; set @GuildOwning,0;
  7. so... you want me to ask 'What is top guild?' or just skip your changing
  8. add those function 'LadderWork' , 'LadderWatch' & 'SetLadder' http://bit.ly/qO3p2y add new npc prontera,155,180,4 script Top WoE Breaker 990,{ callfunc "LadderWatch","BR",10,0; close; } add new line in ''npc\guild\agit_main.txt'' sleep 500; // Slow down script execution slightly. if( agitcheck() ) donpcevent "Agit#"+strnpcinfo(2)+"::OnStartArena"; sleep 7000; announce "The [" + getcastlename(strnpcinfo(2)) + "] castle has been conquered by the [" + getguildName(.@GID) + "] guild.",bc_all|bc_woe; set WoEBreak,WoEBreak+1;//add callfunc "LadderWork","BR",10,"WoEBreak";//add end; // War of Emperium has ended. OnAgitEnd: if (strnpcinfo(0) == "Gld_Agit_Manager") end; GvgOff strnpcinfo(
  9. add in 'void DOTASWAPfu'
  10. Team Fortress 2 Others valve's game ... Battlefield 3(Not steam)
  11. Black Jack wiki Some photos Ruler Download 21.txt About 'Fooled' When you get Joker card from system, you will be asked which card you will let its point be zero. Set set .joinmax,2; <<--- Number of player set .bjcnmax,2; <<--- How many joker cards
  12. Send an e-mail to hotmail Send an e-mail to gmail with a attachment e-mail system logs file (time,operator,receiver,subject,body) Download Source Code : email.patch E-Mail System.txt Download VBScript (Must put into your server program folder) : sendemail.zip Set : Open sendemail.vbs (with txt), write your mail account into Const fromEmail and password into Const password. If your e-mail server is gmail (Google), you will not not need to do anything after that. if not, you have to search that server stmp and port. Script Sample : email "receiver","subject","body","attachment"; input .@a$; input .@s$; input .@b$; mes "To:"+.@a$; mes "Subject:"+.@s$; mes "Body:"+.@b$; select("OK"); //set .@att$,"D:/eAthena/UpgradeLog.XML"; //attachment email .@a$,.@s$,.@b$,.@att$; close; PS : Testing \ Works in Windows7 OS. Warning : If this lead to SPAM, CRASH or ANYTHING BAD, I will not help you and be responsible for it. So checking all before using it.
  13. so maybe I can give more damage in once hit?
  14. skill.c add a new function. void DOTASWAPfu (struct block_list *src, struct block_list *bl) { int x=0, y=0; x=src->x; y=src->y; unit_movepos(src, bl->x, bl->y, 1, 1); clif_slide(src,bl->x,bl->y); unit_movepos(bl, x, y, 1, 1); clif_slide(bl,x,y); clif_specialeffect(bl,34,AREA); clif_specialeffect(src,34,AREA); return; } add int skill_castend_nodamage_id (struct block_list *src, struct bl... { ... case MER_BLESSING: if (dstsd != NULL && tsc->data[sC_CHANGEUNDEAD]) { skill_attack(BF_MISC,src,src,bl,skillid,skilllv,tick,flag); break; } case DOTASWAP: //add DOTASWAPfu(src,bl); //add clif_skill_nodamage(src,bl,skillid,skilllv,0); //add break; //add case PR_SLOWPOISON: case PR_IMPOSITIO: case PR_LEXAETERNA: case PR_SUFFRAGIUM: ... skill.h add enum e_skill { DOTASWAP = 996, //add NV_BASIC = 1, Client http://goo.gl/BJ0uB db\skill_db,txt 996,9,6,1,0,0x1,0,1,0,yes,0,0,0,magic,0, DOTASWAP,DOTASWAP db\skill_require_db.txt 996,0,0,10,0,0,0,99,0,0,none,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 //DOTASWAP data\lua files\skillinfoz\skillid.lua DOTASWAP = 996, data\lua files\skillinfoz\skillinfolist.lua [sKID.DOTASWAP] = { "DOTASWAP"; SkillName = "DOTASWAP", },
  15. 2/3 chance plant the Critical stickybomb http://i.imgur.com/2oqnr.jpg Download Source Code STICKYBOMB.rar Download .GRF STICKYBOMB.grf db\\mob_db2.txt 2127,SOCCER_BALL,stickbomb,stickbomb,1,2000,0,0,0,1,0,0,0,0,1,1,1,1,1,1,1,1,0,3,86,0x0040,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 db\\mob_avail.txt 2127,1792 data\\lua files\\skillinfoz\\skillid.lua STICKYBOMB = 999, STICKYBOMBBOMB = 998, data\\lua files\\skillinfoz\\skillinfolist.lua [sKID.STICKYBOMB] = { "STICKYBOMB"; SkillName = "STICKYBOMB", MaxLv = 10, SpAmount = { 10, 10, 10, 10, 10, 10, 10, 10, 10, 10 }, }, [sKID.STICKYBOMBBOMB] = { "STICKYBOMBBOMB"; SkillName = "STICKYBOMBBOMB", }, battle.c http://pastebin.com/....php?i=5VizNY5g Find this function. int battle_calc_damage(struct block_l... go to the end. status_damage(src, s_bl, damage, 0, clif_damage(s_bl, s_bl, gettick(), 500, 500, damage, -1, 0, 0), 0); return ATK_NONE; } } } return damage; } add damage=stickybombdamage(src, bl, damage); top the return damage; and add new function int stickybombdamage(struct block_list *src, struct block_list *bl, int damage) { int _far=0, i=0; if(src->sbp==bl->sbp) return 0; for(i=0;i<=MAX_STICKYBOMB;i++) if(src->stickbomb[i]!=-1) break; if(i==MAX_STICKYBOMB) damage = damage*3; else { _far = distance_xy(src->x,src->y,bl->x,bl->y)+1; _far = _far >= 10 ? 10 : _far ; damage = damage/_far; } return damage; } map.c http://pastebin.com/....php?i=aKRM2P9V pc_makesavestatus(sd); pc_clean_skilltree(sd); chrif_save(sd,1); unit_free_pc(sd); killstickybmob(sd,0); //Add return 0; map.h http://pastebin.com/....php?i=UuyR67YF struct block_list { struct block_list *next,*prev; int id, sbp; //Add short m,x,y; enum bl_type type; int stickbomb[MAX_STICKYBOMB]; //Add }; mmo.h #define MAX_STICKYBOMB 8 //Add pc.c http://pastebin.com/....php?i=H2zxukgJ Add this function. void killstickybmob(struct map_session_data* sd, int t) { struct block_list *mb = NULL; int i=0; if(sd==NULL) return; for(;i <= MAX_STICKYBOMB ;i++) { mb=map_id2bl(sd->bl.stickbomb[i]); if(mb!=NULL) if(!t) status_kill(mb); else unit_skilluse_id(mb, mb->id, 173, 1); else continue; } return; } pc.h Add this define. void killstickybmob(struct map_session_data* sd, int t); skill.c http://pastebin.com/....php?i=4dGTqDri Add this function. void _STICKYBOMB(struct block_list *src, struct block_list *bl, int skillid, int skilllv) { int _x=0, _y=0, i=0, id=0; struct block_list *mb = NULL; switch(unit_getdir(bl)) { case 0: _x = 0; _y = 1; break; case 1: _x = -1; _y = 1; break; case 2: _x = -1; _y = 0; break; case 3: _x = -1; _y = -1; break; case 4: _x = 0; _y = -1; break; case 5: _x = 1; _y = -1; break; case 6: _x = 1; _y = 0; break; case 7: _x = 1; _y = 1; break; } _x = _x*(skilllv-1); _y = _y*(skilllv-1); clif_skill_nodamage(src,bl,skillid,skilllv,0); id=mob_once_spawn(BL_CAST(BL_PC, src),src->m,src->x+_x,src->y+_y,"StickBomb",2127,1,""); src->sbp++; if(src->sbp==MAX_STICKYBOMB) src->sbp=0; mb=map_id2bl(src->stickbomb[src->sbp]); if(mb!=NULL) unit_skilluse_id(mb, mb->id, 173, 1); src->stickbomb[src->sbp]=id; mb=map_id2bl(src->stickbomb[src->sbp]); mb->sbp=src->id; if(rand()%3) { for(i=0;i<MAX_STICKYBOMB;i++) mb->stickbomb[i]=-1; clif_specialeffect(mb, 47,AREA); }else for(i=0;i<MAX_STICKYBOMB;i++) mb->stickbomb[i]=0; return; } Go to this function int skill_castend_nodamage_id find this case SM_ENDURE: and add below case STICKYBOMB: _STICKYBOMB(src, bl, skillid, skilllv); break; case STICKYBOMBBOMB: clif_skill_nodamage(src,bl,skillid,skilllv,0); killstickybmob(map_id2sd(src->id),1); break; skill.h enum e_skill { STICKYBOMB = 999, //Add STICKYBOMBBOMB = 998, //Add NV_BASIC = 1, db\\skill_cast_db.txt 999,0,0,1000:1500:2000:2500:3000:3500:4000:4500:5000:5500,0,0,0 //Add db\\skill_require_db.txt 999,0,0,10,0,0,0,99,0,0,none,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 //STICKYBOMB //Add 998,0,0,10,0,0,0,99,0,0,none,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 //STICKYBOMBBOMB //Add
  16. I was killed by myself. so killedrid = killerrid = me - script PvPCasher -1,{ end; OnPCKillEvent: dispbottom "OnPCKillEvent:"+killedrid; end; OnPCDieEvent: dispbottom "OnPCDieEvent:"+killerrid; end; } http://i.imgur.com/EkS9v.jpg >> OnPCKillEvent: if(killedrid==getcharid(3)||!killedrid)end; set #CASHPOINTS,#CASHPOINTS + 2; dispbottom "You have recieved 2 Cash Points for killing "+rid2name(killedrid)+"."; dispbottom "Your Balance is now: "+#CASHPOINTS; set killedrid,0; end;
  17. Quote Download Map : koth01.grf Download Script : King of the Hill.txt 4.69K 203 downloads King of the Hill.txt 4.6K 296 downloads Quote Quote Quote Quote King of the Hill.txt King of the Hill.txt
  18. Team Fortress2 http://media.steampowered.com/apps/tf2/artwork/meet_the_christmas.jpg
×
×
  • Create New...