Jump to content

Bahmut

Members
  • Posts

    382
  • Joined

  • Last visited

Everything posted by Bahmut

  1. 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; }
  2. Please be more descriptive or post a screenshot of the error.
  3. Could you please show me the error message your mapserver throws when loading the npc.
  4. 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; } }
  5. 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; }
  6. Did you reload your mobdb with or restarted your server?
  7. Bahmut

    no msg

    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.
  8. http://rathena.org/board/topic/59767-solved-weird-fluxcp-error/
  9. Are you using MD5 for your database? If not, you have to turn it off in your FluxCP config as well.
  10. Bahmut

    coding

    What do you mean by coding? Do you already have a finished design or do you want a website created from scratch?
  11. Could you please write a description of the event/script you are requesting?
  12. then remove the comma at the end. I thougt you had less columns sry
  13. http://rathena.org/wiki/Adding_a_Script
  14. Could you please post the script in a readable form, not everything in one line.
  15. 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
  16. 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,,,,,,,,
  17. http://rathena.org/board/topic/62998-help-please/
  18. 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
  19. The Server Advertisement -> Rejected Server Advertisement section is marked as not read: But this section is empty:
  20. Hi and your font size is really small. It's very hard to read. Atleast on a high resolution (1920x1080 in my case)
  21. Thanks for uploading these maps. They are nice for events.
  22. 4888 downloads

    These are the old versions of Izlude and Alberta. Including map files (.gat | .gnd | .rsw) and minimaps (.bmp)
    Free
  23. no don't do this. Just search and replace # with --
×
×
  • Create New...