Jump to content

Skorm

Forum Moderator
  • Posts

    1282
  • Joined

  • Last visited

  • Days Won

    41

Everything posted by Skorm

  1. Doesn't the @whomap commands already do that? Anyways this will work like an @command warp to the map you'd like to know how many normal players are on and do @getusers... If you want to just input the map name that would probably require surfing your sqldb via script or something. - script user_count -1,{ OnUserGet: attachrid(.aid); addrid(1); if(getgmlevel()>20) end; set(.a,.a+1); end; OnEventDo: set(.aid, getcharid(3)); donpcevent "user_count::OnUserGet"; dispbottom(.a+" User(s) found on "+strcharinfo(3)+"."); set(.a,0); end; OnInit: bindatcmd "getusers","user_count::OnEventDo",99,99; } Remove ",99,99" if this command was intended for normal player use.
  2. After: set JobExp,getarg(2); Add: if(getarg(4,0)) getitem(getarg(4),getarg(5,1)); New callsub works like... //Buff, Zeny, BaseEXP, JobEXP, Food{, ItemID{, Amount }}. //Ex: callsub Buff,40000,80000,50000,5,501,10; //Gives 10 Red Potions callsub Buff,40000,80000,50000,5,501; //Gives 1 Red Potion callsub Buff,40000,80000,50000,5,501,1; //Also Gives 1 Red Potion callsub Buff,40000,80000,50000,5; //Gives no item. callsub Buff,0,0,0,0,501; //Gives no exp just one Red Potion ETC.
  3. Yeah I had thought about that but forgot (or just didn't mind) to change it and as for OnMinute I'd rather not type all that out... besides it just doesn't look very good... Anyways you can use npc variables to get the players and determine who is the last... I've also done something like this with dead-end co-routines doevent etc. The script is going to be stressful on the server either way... You're attaching every character to one script at practically the same time :/ That's why I suggested he find a different method.
  4. Wow thank you both I'm so glad we could re-release these wonderful sprites before they become lost forever!
  5. Although I recommend you fix the problem... Through other means. - script hp_sp_check -1,{ OnTimer60000: set .a, getusers(1); addrid(0); set .b, .b+1; if(playerattached()) { if(Hp>=100000||Sp>=5000) atcommand "@kick "+strcharinfo(0); } if(.a!=. end; OnInit: set .b, 0; initnpctimer; }
  6. Honestly the scripted worked unmodified for me and others whom I shared it with. Annie, question... In my most recent version of this script I have.... if(.@menu$=="") You changed it to... if( !getstrlen(.@menu$) ) It just seems like that would be slower because it's 2 actions instead of one but really it accomplishes the same thing.
  7. Amazing thank you, Annie. Sorry I wasn't able to see your post sooner. /data/sprite/Àΰ£Á·/¸öÅë/¿© À§Àúµå_h_¿©.spr À§Àúµå_¿©.spr ¸¶¹ý»ç_¿©.spr ¼¼ÀÌÁö_¿©.spr ¼¼ÀÌÁö_h_¿©.spr I think that's it.
  8. I see what you did there Lol I didn't know you could combine them like that I'm still working on bit wise things. @option 0 just removes all effects as opposed to one, and the variable was to stop the repeated messages etc, but I like the way you did it better. Regardless, this is something I'll remember if I ever need to use it. xD Although the whole thing was just thrown together with hardly any effort to begin with.
  9. A long time ago there was a sprite with female sage/mage class riding a broom, like a witch, but I'm not sure if this exist still any ideas? I've tried looking on Google and TSR to no avail perhaps someone knows a server that has them or maybe has a backup on there hard drive...
  10. Well it's rather hard to read your request but I think you're looking for a way to make the player invulnerable but also not able to attack right? This can be done without source mod. Equipped Script: { while(isequipped(<itemid>)) { if(checkoption(0x2)||checkoption(0x4)||checkoption(0x40)) { if(!.@a){ atcommand("@option 6"); setoption(0x40,1); set(.@a,1); } } else if(.@a){ atcommand("@option 0"); set(.@a,0); } sleep2(100); } } Unequipped Script: { atcommand("@option 0"); } Although using this method also makes the user unable to talk to npcs etc. May also be used to avoid status aliments... I guess the other downside to doing it this way is that you can't get out of it by Uncloaking because skills are disabled haha. Also it's pretty server intensive ... Overall this is bad option but hell it is doable without src mod and that's all that counts right? Wahahahahahaha *continues evil laugh whilst walking away into the distance* (click here if you need a visual)
  11. Skorm

    freebies

    - script script -1,{ OnPCBaseLvUpEvent: if(!freebie) if ( #freebie_quest && BaseLevel >= 230 ) { delitem 8000,1; delitem 8001,1; delitem 8002,2; delitem 8003,1; set(freebie,1); } }
  12. Skorm

    Random map

    Ok updated previous post.
  13. You can locate all item bonuses in doc/item_bonus.txt { bonus3 bAutoSpellWhenHit,378,10,10; bonus bMaxHPrate,-30; } { bonus4 bAutoSpell,361,10,10,0; } { bonus bNoRegen,2; bonus bIgnoreMDefRace,11; bonus bIntravision,1; bonus bVariableCastrate,100; bonus bFixedCastrate,100; } { set(Sp,Sp-2000); } { skill "LK_BERSERK",1; bonus bMaxHPrate,-50; } { bonus2 bHpDrainRate,50,20; bonus bHPrecovRate,-10; bonus bHit,1000; } { bonus bBreakWeaponRate,1000; bonus bBreakArmorRate,700; bonus3 bAutoSpell,42,10,10; }
  14. Skorm

    Random map

    Not sure what you mean anyways this will spawn Thanatos the 6th hour of every day. - script Thanatos_Event -1,{ OnHour06: killmonster .maps$[.rand],"Thanatos_Event::OnMobDead"; set .rand, rand(getarraysize(.maps$)); announce "Thanatos has appeared in "+setchar(.maps$[.rand], strtoupper(charat(.maps$[.rand],0)), 0)+"!",bc_all,0x0000FF; monster .maps$[.rand],0,0,"Thanatos",1708,1,"Thanatos_Event::OnMobDead"; end; OnMobDead: announce strcharinfo(0)+" has killed Thanatos!",bc_all,0xFF0000; end; OnInit: setarray .maps$, "prontera", "payon", "geffen", "morocc", "alberta", "izlude", "aldebaran", "comodo", "yuno", "amatsu", "gonryun", "umbala", "louyang"; }
  15. { set(.@r,-3*(getrefine()!=0?getrefine()/3:0)); bonus bDelayrate,-5+.@r; bonus bUseSPrate,-10+.@r; }
  16. Skorm

    Monster Hunting

    This can be done easily with Lilith's Extra Bonuses mod... http://rathena.org/board/topic/62150-extra-bonuses-without-items/ npc/custom/mission_points.txt (If points have to be exact.) - script mission_points -1,{ OnPCLoginEvent: switch(#Mission_Points) { case 100: set(EXTRA_BONUS,1); end; case 500: set(EXTRA_BONUS,2); end; case 1000: set(EXTRA_BONUS,3); } } npc/custom/mission_points.txt (Covers points in between.) - script mission_points -1,{ OnPCLoginEvent: setarray .@points, 100, 500, 1000; set .@len, getarraysize(.@points); for(set(.@a,0);.@a<.@len;set(.@a,.@a+1)) if(#Mission_Points<.@points[.@a]) break; set(EXTRA_BONUS,((.@a+1)==.@len?(.@a+1):.@a)); } db/extra_bonuses.txt // Extra Bonuses [Lilith] // If enable_extra_bonus is 1 this and below Extra bonuses will be received by all players // If enable_extra_bonus is 2 this Extra bonus will be received by players which have variable EXTRA_BONUS = 1 // If enable_extra_bonus is 2 this Extra bonus will be received by players which have variable EXTRA_BONUS = 2 // More bonuses...etc... { bonus bAllStats,1; } { bonus bAllStats,3; } { bonus bAllStats,5; }
  17. I wouldn't put anything up on the nexus and attach a price tag to it... Everything I've thrown in the nexus is for the entire community. Besides the last time I checked it was broken. :/ My responses to this particular topic end here... Wouldn't want to create any drama etc...
  18. Haha. I still like mine better. It isn't so much just based around his idea, as it has many different features that just happen encompass his. Doesn't mean I'm against releasing it to the public I'm just not so sure on the legality of the whole thing. If you want to optimize some of my old scripts I wouldn't be completely against that either. I can hardly find the time to do it myself.
  19. I already have something like this unfortunately it's in my paid selections :/
  20. Fixed.
  21. The script was never meant to hide the NPC. If you're getting an error please provide it. This is a rather old script of mine from eAthena so I wouldn't be surprised if something is bugged.
  22. Thank you KamiShi
  23. Thanks I'll keep that in mind.
  24. Cold brutal truth... I love it! This pretty much sums it up for me. ----------------------------------------------------------------------------- I liked team Emistry's because it felt festive and seasonal.
  25. I was able to locate a copy of this script thanks to Emistry. I've added a Mirrors section to the main post.
×
×
  • Create New...