Jump to content
The forums will be going offline for an extended maintenance period at 1400hrs GMT on 19th June 2025. The number of hours for this downtime is intentionally not advertised due to the nature of these upgrades. ×

PapaZola

Members
  • Posts

    925
  • Joined

  • Last visited

  • Days Won

    1

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...