

Bahmut
Members-
Posts
382 -
Joined
-
Last visited
Content Type
Profiles
Forums
Downloads
Jobs Available
Server Database
Third-Party Services
Top Guides
Store
Everything posted by Bahmut
-
Here: //===== rAthena Script ======================================= //= Poring Summoner //===== By: ================================================== //= Bahmut (Made it automated) //= MoonlightRO (Original) //===== Current Version: ===================================== //= 1.4 //===== Compatible With: ===================================== //= TXT & SQL //===== Link to orginal: ===================================== //= http://www.eathena.ws/board/index.php?showtopic=236779 //============================================================ - script Poring Summoner -1,{ OnInit: //---- NPC Config ----- set .ItemID,1000; set .SpecialPorings,2; set .NormalPorings,2; //--------------------- initnpctimer; end; OnSpecialKill: set .SpecialPorings[1],.SpecialPorings[1]-1; announce strcharinfo(0) + " got a " + getitemname(.ItemID) + "!",bc_map; getitem .ItemID,1; goto PoringCount; OnNormalKill: set .NormalPorings[1],.NormalPorings[1]-1; goto PoringCount; PoringCount: announce "Special Poring: " + .SpecialPorings[1] + " || Normal Poring: " + .NormalPorings[1],bc_map; if(!.SpecialPorings[1]) goto EndEvent; end; OnTimer216000000: RestartEvent: killmonster .Map$,"All"; set .Event,0; set .SpecialPorings[1],0; set .NormalPorings[1],0; removemapflag .Map$,mf_noskill; set $@ran, rand(1,10); if ($@ran == 10) set .Map$,"lighthalzen"; if ($@ran == 9) set .Map$,"louyang"; if ($@ran == 8) set .Map$,"comodo"; if ($@ran == 7) set .Map$,"xmas"; if ($@ran == 6) set .Map$,"aldebaran"; if ($@ran == 5) set .Map$,"izlude"; if ($@ran == 4) set .Map$,"payon"; if ($@ran == 3) set .Map$,"geffen"; if ($@ran == 2) set .Map$,"morocc"; if ($@ran == 1) set .Map$,"prontera"; setmapflag .Map$,mf_noskill; monster .Map$,0,0,"Poring",1002,.SpecialPorings,"Poring Summoner::OnSpecialKill"; monster .Map$,0,0,"Poring",1002,.NormalPorings,"Poring Summoner::OnNormalKill"; set .SpecialPorings[1],.SpecialPorings; set .NormalPorings[1],.NormalPorings; announce "The Poring Event has begun!",bc_all; announce "Location: " + .Map$,bc_all; announce "Special Poring: " + .SpecialPorings,bc_all; announce "Normal Poring: " + .NormalPorings,bc_all; setnpctimer 0; end; }
-
Please be more descriptive or post a screenshot of the error.
-
Need NPC jobchange For Kagerou and Oborou
Bahmut replied to IusReservoir's question in Script Requests
Could you please show me the error message your mapserver throws when loading the npc. -
This should work. But I haven't tested it: //===== rAthena Script ======================================= //= Stat Point Seller //===== By: ================================================== //= Bahmut //===== Current Version: ===================================== //= 1.0 //===== Description: ========================================= //= Sells Stat Points to Players //= - 1 Stat Point for 300.000 zeny //= - 10 Stat Points for 3.000.000 zeny //============================================================ prontera,146,174,4<tab>script<tab>Stat Point Seller<tab>727,{ mes "[stat Point Seller]"; mes "How many Stat Points do you want to buy?"; switch(select("1 Stat Point for 300.000 zeny","10 Stat Points for 3.000.000 zeny")) { case 1: mes "[stat Point Seller]"; mes "This will cost you 300.000 zeny. Is this ok?"; next; if (select("Yes:No") == 2) close; mes "[stat Point Seller]"; if (Zeny < 300000) { mes "You do not have enough zeny!"; close; } set StatusPoint,StatusPoint + 1; set Zeny,Zeny - 300000; mes "Thank you for your purchase."; close; case 2: mes "[stat Point Seller]"; mes "This will cost you 3.000.000 zeny. Is this ok?"; next; if (select("Yes:No") == 2) close; mes "[stat Point Seller]"; if (Zeny < 3000000) { mes "You do not have enough zeny!"; close; } set StatusPoint,StatusPoint + 10; set Zeny,Zeny - 3000000; mes "Thank you for your purchase."; close; } }
-
This should work. But I haven't tested it yet so report any error. Also I want to recommend you to learn the rA scripting language by yourself. Because you are requesting quite a lot of scripts lately. //===== rAthena Script ======================================= //= Poring Summoner //===== By: ================================================== //= Bahmut (Made it automated) //= MoonlightRO (Original) //===== Current Version: ===================================== //= 1.3 //===== Compatible With: ===================================== //= TXT & SQL //===== Link to orginal: ===================================== //= http://www.eathena.ws/board/index.php?showtopic=236779 //============================================================ - script Poring Summoner -1,{ OnInit: //---- NPC Config ----- set .ItemID,1000; set .SpecialPorings,2; set .NormalPorings,2; //--------------------- initnpctimer; end; OnSpecialKill: set .SpecialPorings[1],.SpecialPorings[1]-1; announce strcharinfo(0) + " got a " + getitemname(.ItemID) + "!",bc_map; getitem .ItemID,1; goto PoringCount; OnNormalKill: set .NormalPorings[1],.NormalPorings[1]-1; goto PoringCount; PoringCount: announce "Special Poring: " + .SpecialPorings[1] + " || Normal Poring: " + .NormalPorings[1],bc_map; if(!.SpecialPorings[1]) goto EndEvent; end; OnTimer216000000: RestartEvent: killmonster .Map$,"All"; set .Event,0; set .SpecialPorings[1],0; set .NormalPorings[1],0; set $@ran, rand(1,10); if ($@ran == 10) set .Map$,"lighthalzen"; if ($@ran == 9) set .Map$,"louyang"; if ($@ran == 8) set .Map$,"comodo"; if ($@ran == 7) set .Map$,"xmas"; if ($@ran == 6) set .Map$,"aldebaran"; if ($@ran == 5) set .Map$,"izlude"; if ($@ran == 4) set .Map$,"payon"; if ($@ran == 3) set .Map$,"geffen"; if ($@ran == 2) set .Map$,"morocc"; if ($@ran == 1) set .Map$,"prontera"; monster .Map$,0,0,"Poring",1002,.SpecialPorings,"Poring Summoner::OnSpecialKill"; monster .Map$,0,0,"Poring",1002,.NormalPorings,"Poring Summoner::OnNormalKill"; set .SpecialPorings[1],.SpecialPorings; set .NormalPorings[1],.NormalPorings; announce "The Poring Event has begun!",bc_all; announce "Location: " + .Map$,bc_all; announce "Special Poring: " + .SpecialPorings,bc_all; announce "Normal Poring: " + .NormalPorings,bc_all; setnpctimer 0; end; }
-
Did you reload your mobdb with or restarted your server?
-
Könntest du vllt einen link zu diesem Clienten posten. Hätte den auch gerne Welches Client Datum verwendest du? Die meldung kommt daher das deine msgstringtable.txt nicht zu deiner exe passt.
-
http://rathena.org/board/topic/59767-solved-weird-fluxcp-error/
-
Are you using MD5 for your database? If not, you have to turn it off in your FluxCP config as well.
-
What do you mean by coding? Do you already have a finished design or do you want a website created from scratch?
-
Could you please write a description of the event/script you are requesting?
-
then remove the comma at the end. I thougt you had less columns sry
-
http://rathena.org/wiki/Adding_a_Script
-
have the same issue
-
Could you please post the script in a readable form, not everything in one line.
-
File Name: Old Izlude and Alberta File Submitter: Bahmut File Submitted: 17 May 2012 File Category: Maps & Textures Content Author: Gravity These are the old versions of Izlude and Alberta. Including map files (.gat | .gnd | .rsw) and minimaps (.bmp) Click here to download this file
-
2309,Bungisngis@CR_AUTOGUARD,attack,249,10,500,0,300000,yes,self,always,0,,,,,,, 2309,Bungisngis@AS_VENOMDUST,chase,140,1,1000,0,5000,no,target,always,0,,,,,,, to: 2309,Bungisngis@CR_AUTOGUARD,attack,249,10,500,0,300000,yes,self,always,0,,,,,,, 2309,Bungisngis@AS_VENOMDUST,chase,140,1,1000,0,5000,no,target,always,0,,,,,,, and then add a comma at the end: 2309,Bungisngis@CR_AUTOGUARD,attack,249,10,500,0,300000,yes,self,always,0,,,,,,,, 2309,Bungisngis@AS_VENOMDUST,chase,140,1,1000,0,5000,no,target,always,0,,,,,,,,
-
http://rathena.org/board/topic/62998-help-please/
-
I own mainly every game I have on steam so it's hard to determine a favorite, but here are a few of my favorite ones: Counter Strike: Global Offensive Recettear Portal 1+2 Half Life 1+2+Ep1+Ep2 Skyrim Left 4 Dead 2 All 3 S.T.A.L.K.E.R. games And much more Here is the full list: http://steamcommunity.com/id/Bahmut/games?tab=all
-
The Server Advertisement -> Rejected Server Advertisement section is marked as not read: But this section is empty:
-
Hi and your font size is really small. It's very hard to read. Atleast on a high resolution (1920x1080 in my case)
-
Poring Maps (poring_c01 and poring_c02)
Bahmut replied to Eurydice's topic in Maps & 3D Resources Downloads
Thanks for uploading these maps. They are nice for events. -
-
no don't do this. Just search and replace # with --