Jump to content

PapaZola

Members
  • Posts

    925
  • Joined

  • Last visited

Everything posted by PapaZola

  1. im not try yet this one i used from goddameit
  2. hello all i want make 1 guild max member 20 how i can edit the source i already try change at mmo.h #define MAX_GUILD 16+1*6 // increased max guild members +6 per 1 extension levels [Lupus] but still same anyone can help me?
  3. - script Revenge -1,{ OnInit: disablenpc "The King"; end; OnWhisperGlobal: if ( getgmlevel() < 99 ) end; else if ( compare ( @whispervar0$, "on" ) ) goto L_start; else if ( compare ( @whispervar0$, "off" ) ) goto L_end; else end; L_end: OnTue2200: OnWed2200: OnThu2200: announce "The King of Emperium Hill is over!", 0; agitend; enablenpc "Hamavel"; disablenpc "The King"; killmonsterall "bat_a01"; end; L_start: OnTue2100: OnWed2100: OnThu2100: announce "The King of Emperium Hill has begun!", 0; agitstart; enablenpc "The King"; disablenpc "Hamavel"; setcastledata "bat_a01", 1, 0; // getcastledata "bat_a01", 0, "::OnRevRevenge"; // I think this command broken donpcevent "::OnRevRevenge"; maprespawnguildid "bat_a01", 0, 7; monster "bat_a01",168,345,"EMPERIUM",1288,1,"Revenge::OnEmpDead"; end; OnEmpDead: set .@gid, getcharid(2); setcastledata "bat_a01", 1, .@gid; announce "The current King of Emperium Hill is the [" + strcharinfo(2) + "] guild.", 0; // getcastledata "bat_a01", 0, "::OnRevRevenge"; donpcevent "::OnRevRevenge"; maprespawnguildid "bat_a01", .@gid, 6; sleep 500; if ( agitcheck() == 1 ) monster "bat_a01",168,345,"EMPERIUM",1288,1,"Revenge::OnEmpDead"; end; } // KoE Entrance prontera,166,190,4 script The King 58,{ mes "[The King]"; if ( getcharid(2) == 0 ) { mes "You must have a guild to participate in the ^FF0000King of Emperium Hill Tournament^000000."; close; } mes "Hello."; mes "Would you like to participate in the ^FF0000King of Emperium Hill Tournament^000000?"; if ( select ( "Yes", "No" ) == 2 ) close; switch( rand(1,4) ){ case 1: warp "bat_a01", 50, 88; end; case 2: warp "bat_a01", 88, 50; end; case 3: warp "bat_a01", 50, 11; end; case 4: warp "bat_a01", 11, 50; end; } } // KoE Exit guild_vs1,57,49,5 script Hamavel 453,{ mes "Hamavel"; mes "Thanks for join ValhallaRO, See ya "; if ( getcharid(2) == getcastledata("guild_vs1",1) ) getitem 501, 400; // configure prize here next; warp "Save",0,0; close; } // Flags prontera.gat,153,190,4 script King of Emperium Hill#1::koe_flag 722,{ set .@gid, getcastledata("bat_a01",1); if ( .@gid == 0 ) end; mes "[King of Emperium Hill]"; mes "The Current King of Emperium Hill is the ["+ getguildname(.@gid) +"] guild."; close; OnRevKoE: flagemblem getcastledata("bat_a01",1); end; } guild_vs1,61,49,6 duplicate(koe_flag) King of Emperium Hill#2 722 guild_vs1,38,49,2 duplicate(koe_flag) King of Emperium Hill#3 722 guild_vs1,49,61,0 duplicate(koe_flag) King of Emperium Hill#4 722 bat_a01 mapflag gvg_castle bat_a01 mapflag nobranch bat_a01 mapflag nomemo bat_a01 mapflag nopenalty bat_a01 mapflag noreturn bat_a01 mapflag nosave SavePoint bat_a01 mapflag noteleport bat_a01 mapflag pvp_noparty bat_a01 mapflag nowarp bat_a01 mapflag nowarpto here my castle_db 0,bat_a01,RevengeBattleground,Agit#bat_a01,1 // kRO : Hohensyubangawoo the problem logo guild notshow up how to make show the logo guld
  4. solved thx llith can help me about this? http://rathena.org/board/topic/65077-custom-woe/
  5. Skill Apple Of Idun Normal 20 Second + Poem Of Brag 3 minutes maybe how i can make it to 1 minutes only?
  6. i have a little problem how i can make guardian stone auto spawn after other guild break it im using schg_cas02 map
  7. i hope german will won this euro xD i also have some screen shot on my server sorry if the flag look ugly.ehehhe me newbie
  8. hello all its possible for make woe using 2 emperium? and this script will see what guild will break 1st
  9. like luffy always said seeekeeqqqqqqqqqqqqq!!!!!!!!!!!!!!!!!!!!!!!!!!!
  10. nice map can be used fo race map also hahaha 9/10
  11. how to add to mapflag like bat_a01? coz me use the map for gvg
  12. hello can i know how to make some makeflag reduce damage like woe? like this
  13. hello can i request script funtion like this? 1-will have 2 Team Fight This Battle(using emperium) -Red Team(team red need break blue team emperium) -Blue Team(team blue need break red team emperium) 2-This Battle will set by 10 Round and this script will annoucement result after finish 10 round like team red-7 team blue 3(like poring ball) -after break emperium player will sent to the 1st place start sorry for my bad english
  14. check post by annie http://www.eathena.ws/board/index.php?showtopic=174222&st=60&p=1031483entry1031483
  15. as me now if apple + poem of bragi will make a apple of idun long duration like 180 seconds maybe its possible if i wanna make like 10 seconds? i read from here http://ratemyserver.net/index.php?page=skill_db&skid=321
  16. Hello guys i just wanna ask about custom weapon i already make a folder data\sprite\Àΰ£Á·\¿¬±Ý¼ú»ç(for alchemist) and i rename the sprite to ¿¬±Ý¼ú»ç _¿©_1309 (1309 for orcish axe) ¿¬±Ý¼ú»ç _³²_1309(1309 for orcish axe) but when i used my weapon sprite not show what must i changed? solved
  17. how i can make add cash point 500 on this npc morocc_in,80,100,4 script Gunslinger Quest 523,{ mes "[Dynamic Quest NPC]"; mes "Which quest would you like to do?"; mes "^FF0000Visit Our Forum To Know Effect Quest^000000"; mes "^FF0000www.1worldro.com/forum^000000"; set .i,select(.Menu$); next; goto Quest_Setup; OnInit: waitingroom "Gunslinger Set",0; set .BuildQuest,1; set .Menu$,""; set .i,1; goto Quest_Setup; Quest_Display: if(.BuildQuest) { if(compare(getarg(0),"Stop Quest Loading")) { set .BuildQuest,0; end; } set .Menu$,.Menu$+getarg(0)+":"; set .i,.i+1; goto Quest_Setup; } mes "[" + getarg(0) + "]"; mes "I require the following:"; for(set @i,1; getarg(@i)!=0; set @i,@i+2) mes "^FF0000"+((countitem(getarg(@i))>=getarg(@i+1))? "^00FF00":"") + "" + getarg(@i+1) + " " + getitemname(getarg(@i)) + " [" + countitem(getarg(@i)) + "/" + getarg(@i+1) + "]"; mes "^000000In exchange, I will give you:^0000FF"; for(set @i,@i+1; getarg(@i)!=0; set @i,@i+2) mes getarg(@i+1) + " " + getitemname(getarg(@i)); if(select("Exchange:No thanks")==2) close; for(set @i,1; getarg(@i)!=0; set @i,@i+2) if(countitem(getarg(@i)) < getarg(@i+1)) { next; mes "You have " + countitem(getarg(@i)) + " " + getitemname(getarg(@i)) + ", while I require " + getarg(@i+1) + "."; mes "Please obtain ^FF0000" + (getarg(@i+1)-countitem(getarg(@i))) + " more " + getitemname(getarg(@i)) + "^000000."; close; } for(set @i,1; getarg(@i)!=0; set @i,@i+2) delitem getarg(@i),getarg(@i+1); for(set @i,@i+1; getarg(@i)!=0; set @i,@i+2) getitem getarg(@i),getarg(@i+1); close; Quest_Setup: switch(.i) { case 1: callsub Quest_Display,"^FF9900Gunslinger Set[1]^000000^CC00FF3 Items Will Get^000000",949,150,7510,10,7562,2,20003,10,20004,10,20005,5,0,28022,1,28023,1,28024,1,0; default: callsub Quest_Display,"Stop Quest Loading"; } }
×
×
  • Create New...