-
Posts
325 -
Joined
-
Last visited
-
Days Won
6
Content Type
Profiles
Forums
Downloads
Jobs Available
Server Database
Third-Party Services
Top Guides
Store
Crowdfunding
Everything posted by eJay
-
Simple NPC Shop Using PODS(Proof of Donation)
eJay replied to sync master's question in Script Requests
http://rathena.org/board/files/file/2757-proof-of-donation-npc/ //========================================= //By : louigui //Ver : 2.40.99 //========================================= - shop dyn_shop1 -1,501:50 //========================================= poring_w02,99,101,5 script Proof of Donation#1 955,{ mes "Your["+getitemname(.Cost)+"]["+countitem(.Cost)+"]"; mes "^E217171 Proof of Donation = $1 USD"; close2; callshop "dyn_shop"+.a,1; npcshopattach "dyn_shop"+.a; end; OnInit: set .a,strnpcinfo(2); //========================================= set .Cost,7179; //========================================= setarray .buy_id[0],607; setarray .buy_co[0],10; //========================================= npcshopitem "dyn_shop1",.buy_id[0],.buy_co[0]; for(set .ik,1;.ik<getarraysize(.buy_id);set .ik,.ik+1){ npcshopadditem "dyn_shop"+.a,.buy_id[.ik],.buy_co[.ik]; } end; OnBuyItem: getinventorylist; if(@bought_quantity[@i] <= 0){ goto OnEnrd; end; } for(set @i,0;@i<getarraysize(@bought_nameid);set @i,@i+1){ //KeyWorld set .@type, getiteminfo( @bought_nameid[.@i], 2 ); if ( .@type == 4 || .@type == 5 || .@type == 7 || .@type == 8 ) set .@count, .@count + 1; else { for( set .@j,0; .@j<@inventorylist_count; set .@j, .@j+1 ) if ( @inventorylist_id[.@i] == @bought_nameid[.@i] ) break; if ( .@j == @inventorylist_count ) set .@count, .@count+1 ; } for(set @i2,0;@i2<getarraysize(.buy_id);set @i2,@i2+1){ if(@bought_nameid[@i]==.buy_id[@i2]){ set @gh,@gh+.buy_co[@i2]*@bought_quantity[@i]; set @wh,@wh+getiteminfo(@bought_nameid[@i],6)*@bought_quantity[@i]; } } } if ( .@count + @inventorylist_count > 100 ) { announce "[D-Shop]: Can't hold more than 100 items.",bc_self; goto OnEnrd; } if(countitem(.Cost)<@gh){ announce "[D-Shop]:["+getitemname(.Cost)+"] isn't enough",bc_self; goto OnEnrd; end; }else{ if(@wh>(MaxWeight-Weight)){ announce "[D-Shop]:Too heavy",bc_self; goto OnEnrd; end; }else{ delitem .Cost,@gh; for(set @i,0;@i<getarraysize(@bought_nameid);set @i,@i+1){ getitem @bought_nameid[@i],@bought_quantity[@i]; } } } OnEnrd: set @gh,0; set @wh,0; set @i,0; set @i2,0; deletearray @bought_quantity,getarraysize(@bought_quantity); deletearray @bought_nameid,getarraysize(@bought_nameid); end; } -
can you give me a link for that
-
-
i'm looking for the best rA version or updated and fixing thnx Question for r17023: i don't have nocommand in my mapflag can you help me about that please
-
screenshot please?
-
try this this is working both in my server rathena and eathena - script poring#announcer -1,{ OnInit: disablenpc "poringevent"; hideonnpc "Poring Catcher#evnt2"; end; OnClock2000: OnClock5000: OnClock9000: OnClock1200: OnClock1600: OnClock1900: OnClock2300: announce "Poring Catcher : It's time to play some Poring Catcher!",0; killmonster "poring_w01","All"; sleep2 10000; announce "Poring Catcher : Please make your way to the centre of Prontera.",0; sleep2 10000; announce "Poring Catcher : After one minute the portal will close.",0; sleep2 10000; announce "Poring Catcher : Enter the warp portal now if you want to join.",0; enablenpc "poringevent"; initnpctimer; end; OnTimer30000: announce "Poring Catcher : Last 30 seconds.",0; sleep2 5000; announce "Poring Catcher : Hurry to the centre of Prontera if you want to join.",0; end; OnTimer50000: announce "Poring Catcher : Last 10 seconds.",0; end; OnTimer55000: announce "Poring Catcher : 5.",0; end; OnTimer56000: announce "Poring Catcher : 4.",0; end; OnTimer57000: announce "Poring Catcher : 3.",0; end; OnTimer58000: announce "Poring Catcher : 2.",0; end; OnTimer59000: announce "Poring Catcher : 1.",0; end; OnTimer60000: announce "Poring Catcher : Time's up. Portal Will Open again when a GM activates it.",0; end; OnTimer61000: disablenpc "poringevent"; donpcevent "Poring Catcher#evnt2::OnEnable"; stopnpctimer; end; } //-------------------------------------------------- prontera,163,187,0 warp poringevent 2,2,poring_w01,106,129 //-------------------------------------------------- poring_w01,100,127,4 script Poring Catcher#evnt2 715,{ //-------------------------------------------------- mes "[Poring Catcher]"; if(PORING == 1) goto L_PORING; mes "Please tell me your name"; next; input .@name$; if(.@name$ != strcharinfo(0)) { mes "[Poring Catcher]"; mes "Are you sure thats your character name?"; close; } mes "[Poring Catcher]"; mes "Congrats. You've won."; close2; announce "Poring Catcher : All laugh at, "+.@name$+". - This player tried to cheat the system. Muhahahahaha!",0; warp "prontera",155,182; end; L_PORING: mes "Please tell me your name"; next; input .@name$; if(.@name$ != strcharinfo(0)) { mes "[Poring Catcher]"; mes "Are you sure thats your character name?"; close; } mes "[Poring Catcher]"; mes "Congrats. You've won."; close2; announce "Poring Catcher : We have a winner, "+.@name$+".",0; getitem 17027,1; set #CASHPOINTS,#CASHPOINTS + 500; dispbottom "You have Won 500 Cash Points Total of = "+#CASHPOINTS+" Points."; set PORING,0; warp "prontera",155,182; hideonnpc "Poring Catcher#evnt2"; end; OnEnable: mapannounce "poring_w01","Poring Catcher : I will be summoning 100 different Porings.",0; sleep2 10000; mapannounce "poring_w01","Poring Catcher : Only one of these Porings is the correct Poring.",0; sleep2 10000; mapannounce "poring_w01","Poring Catcher : The correct Poring is called [ Poring ], all the other Porings have different names.",0; sleep2 10000; mapannounce "poring_w01","Poring Catcher : Take your time because if you kill the wrong Poring, your out of the game.",0; sleep2 10000; mapannounce "poring_w01","Poring Catcher : The first player to kill the correct Poring wins.",0; sleep2 10000; mapannounce "poring_w01","Poring Catcher : That's that.. Now let's play...",0; goto L_Start; end; L_Start: mapannounce "poring_w01","Poring Catcher : 5",0; sleep2 1000; mapannounce "poring_w01","Poring Catcher : 4",0; sleep2 1000; mapannounce "poring_w01","Poring Catcher : 3",0; sleep2 1000; mapannounce "poring_w01","Poring Catcher : 2",0; sleep2 1000; mapannounce "poring_w01","Poring Catcher : 1",0; sleep2 1000; mapannounce "poring_w01","Poring Catcher : Lets Do This!",0; areamonster "poring_w01",84,119,121,90,"Poring",1002,1,"poringwin::OnMobKilled"; areamonster "poring_w01",84,119,121,90,"Pouring",1002,10,"poringlose::OnMobKilled"; areamonster "poring_w01",84,119,121,90,"Proing",1002,10,"poringlose::OnMobKilled"; areamonster "poring_w01",84,119,121,90,"Poiring",1002,10,"poringlose::OnMobKilled"; areamonster "poring_w01",84,119,121,90,"Poing",1002,10,"poringlose::OnMobKilled"; areamonster "poring_w01",84,119,121,90,"I am not Poring",1002,5,"poringlose::OnMobKilled"; areamonster "poring_w01",84,119,121,90,"Gniriop",1002,1,"poringlose::OnMobKilled"; areamonster "poring_w01",84,119,121,90,"Poring",1113,1,"poringlose::OnMobKilled"; areamonster "poring_w01",84,119,121,90,"Poring",1062,1,"poringlose::OnMobKilled"; areamonster "poring_w01",84,119,121,90,"Poriiing",1002,10,"poringlose::OnMobKilled"; areamonster "poring_w01",84,119,121,90,"PoriNg",1002,10,"poringlose::OnMobKilled"; areamonster "poring_w01",84,119,121,90,"Porong",1002,10,"poringlose::OnMobKilled"; areamonster "poring_w01",84,119,121,90,"P0ring",1002,10,"poringlose::OnMobKilled"; areamonster "poring_w01",84,119,121,90,"Por1ng",1002,10,"poringlose::OnMobKilled"; areamonster "poring_w01",84,119,121,90,"Porng",1002,1,"poringlose::OnMobKilled"; end; } - script poringwin -1,{ OnMobKilled: dispbottom "Poring : Congratulations. You've got me."; set PORING,1; atcommand "@doommap"; killmonster "poring_w01","All"; mapannounce "poring_w01","Poring Catcher : Come to me and tell me your name.",0; hideoffnpc "Poring Catcher#evnt2"; end; } - script poringlose -1,{ OnMobKilled: dispbottom "Poring Catcher : Wahaha, your a loser! - I wasnt the correct Poring."; warp "que_moon",34,24; end; } // -- Mapflags poring_w01 mapflag nowarp poring_w01 mapflag nowarpto poring_w01 mapflag noteleport poring_w01 mapflag nosave poring_w01 mapflag nomemo poring_w01 mapflag nobranch poring_w01 mapflag noloot poring_w01 mapflag noskill poring_w01 mapflag nopenalty
-
I Just Want To Share My Web and Patcher Designs (FLUX, CERES, THOR)
eJay replied to ShogS's topic in Arts & Writings
how much for matic-ro design ? -
Paano po, mag disable ng items temporarily?
eJay replied to Frexorie's topic in Tulong para sa Server
just /re/folder -
2012-04-10 client problem, na rereject po pag tntry mag connect
eJay replied to Mang-Berto's topic in Tulong para sa Server
subukan mo munang tignan yung svn/src/common/mmo.h -
Ganun pa rin po. ayaw pa rin mag vend like 400m. Try mo i restart yung server bka hindi mo na reload.
-
This is filipino section you must allowed to use tagalog text. Mas maganda kung gagamit ka ng PFConfig for Serial Key or Activation key Then select your router then hanapin muna yung Ragnarok Online para ma port forward ng tama after non Open Port. <---- how to open port. madaming tutorial nyan sa youtube open 5121 - TCP and UDP open 6121 - TCP and UDP open 6900 - TCP and UDP
-
http://svn.games-service.net/ Server Files Download this 2 MySQL Files http://www.mediafire...y6gttl26c9x99p9
-
use this script
-
Hi friends, can you help me about WOR script. WOR - War over Rune 1. The NPC will broadcast " War Of Rune Registration will start at 5 minutes " 2. After 5 minutes, the NPC will broadcast again " War Of Rune registration has been started you may now register! in 5 minutes" 3. Player can start registering, after clicking the NPC "War of rune" it have 2 choices "Join or Leave" 4. If they choose join they will randomize join 50% to Green and 50% to Red Team ex. You will be in Green Team! *(change the cloth color to green - To show he is in green team. else You will be in Red Team! *(Change the cloth color to red - To show he is in Red Team. 5. After 5 minutes, The npc will broadcast "War of Rune Registration has been ended" at the same time all Green Team the 2 teams will have their own room then there will be an npc they can talk to to enter the arena if they die they goe back to their respective rooms exiting WoR was allowed but not allowed to rejoin the npc inside the respective team's rooms will have an option to show the current scores of the teams their total kills and deaths at the end each members from the winning team will receive 50 bonus kill points all the players who joined will be warped to a non-pk area like (que_moon 24,34_) the npc for exit will be there and gives them 20 Cash Points warped to poring_w02,99,72 bump*
-
How to disable all ground skill, dangerous soul collect etc.?
eJay replied to eJay's question in General Support
Problem solve. i edit the svn\src\config\renewal.h in line 29 -
i'll encrypt my grf using SecureGRF then when i use my grf all my item and all inside in my grf it doesn't work and can't read my grf, anyone can help me or any program that can secured grf ? Problem solve
-
i have a same problem.
-
do you have a pallete for kagerou and oboro ? :)
eJay replied to eJay's question in Graphics Support
Thnx Sryx -
do you have a pallete for kagerou and oboro ?
-
i don't have adobe photoshop to edit log in background can you give me please name of ro is "Nemesis Ragnarok Online
-
yeah, it's char_athena.conf LOL
-
Hello guys, meron akong problem about sa skill delay
eJay replied to eJay's topic in Tulong para sa Server
Thank you very much lelouch problem solve