Jump to content

Sneaky

Members
  • Posts

    392
  • Joined

  • Last visited

Everything posted by Sneaky

  1. prontera,147,85,4 script NPC NEW GIFT 465,{ if(#sorry == 1) { mes "Hey! you Already Get Reward From Me."; mes "Sorry I Cant Give You Anymore Again More Than 1 Times."; next; mes "I dont Care You Crying Or Not. Tell You Mom Also Me not Scare~wu!!"; emotion e_bzz; close; } else { mes "Welcome To Diablo Ragnarok Online " + strcharinfo(0) + " !!"; next; mes "So You Is A New Player Here Right?"; next; mes "Take My Reward Now And Have Fun With DiabloRO"; getitem 7539,3000; getitem 30391,1; getitem 30392,1; getitem 30393,1; getitem 4302,1; getitem 4174,1; getitem 4403,1; atcommand "@cash 500"; //+500 Cash Points announce "DiabloRO : Happy New year To [ "+strcharinfo(0)+" ] !!",1; emotion e_thx; set #sorry,1; close; } end; OnInit: waitingroom "2012 GIFT",0; end; }
  2. Lol O_o I did reply you back, and yes I've been busy at least for a script THAT big I can't afford that amount of time atm. I haven't log in MSN lately, I'll log in a bit, if anything PM me, let's not go off-topic ^^;
  3. How would you like to punish 'em O_o
  4. You'll have to edit that directly from mob_db.txt or mob_db2.txt according to where the monster is located.
  5. Let me know if it worked, if not, well just post the script, easier for me to just edit the whole thing.
  6. Something like this I guess: Quest 1: if(quest_completed == 1) { //If quest was finished if(getgmlevel() >= 1) { end; } //Prevent from altering current GM Level query_sql "UPDATE `login` SET level = '1' WHERE account_id = "+getcharid(3)+""; mes "Your Acount Level [^ff0000"+strcharinfo(0)+"^000000] has been changed to ^ff00001^000000."; close2; atcommand "@kick "+strcharinfo(0); //Relog end; } Quest 2 (To upgrade from gm lvl 1 to 2): if(quest2_completed == 1) { //If quest 2 was finished if(getgmlevel() >= 1 && getgmlevel() <= 5) {//Prevent from altering current GM Level (if it's high GM like 60 or so) query_sql "UPDATE `login` SET level = '2' WHERE account_id = "+getcharid(3)+""; mes "Your Acount Level [^ff0000"+strcharinfo(0)+"^000000] has been changed to ^ff00001^000000."; close2; atcommand "@kick "+strcharinfo(0); //Relog end; } else { end; } }
  7. Sneaky

    Array

    Did you test it already?
  8. Sneaky

    Array

    like this? setarray .EquipID,2764, 23005,23006,23007; for( set .@i,0; .@i < getarraysize( .EquipID ); set .@i,.@i + 1 ) { if( (isequipped(.EquipID[.@i])) && (isequipped(2775)) ) set .@equip_ok,1; } if(.@equip_ok == 1) { specialeffect2 EF_BUBBLE; set .@fcast,20; if (isequipped(2550)) { //Fisher's_Muffler set .@fcast,.@fcast - 2; } if (isequipped(2443)) { //Fish_Shoes set .@fcast,.@fcast - 2; } if (isequipped(2764)) { //Small_Fishing_Rod set .@fcast,.@fcast - 3; } if (isequipped(2775)) { //Lure set .@fcast,.@fcast - 1; } end; }
  9. Sneaky

    Array

    You confused me already, Emistry's script should work just fine O.o you can edit the values if needed...or if not well, please do explain well..
  10. ^ Knew it! and yeah do what Judas said.
  11. < Wrong Section > moving to source support You should post your atcommand.c functions of those commands. Maybe you edited 'em. ACMD_FUNC(summon) ACMD_FUNC(clone) Another question, does it also happen the same thing when using @monster? Does any NPC appear in your server? Could also be a packet issue.
  12. As Arcenciel said: 1. MapName%TAB%mapflag%TAB%pvp_noparty 2. Can only be done by a custom source edit. You may request it here.
  13. It could also be that the ³²_file.spr is not the correct one though, check them with spr_conview program. I mean if you have the view ids set correctly it could be an option.
  14. < Wrong section, this is mostly a client issue > You should take a look here: http://rathena.org/wiki/Custom_Items
  15. Indeed, solved. -----------------------------------------------------------------
  16. I really don't speak tagalog haha but I guess you said thanks or something.. >_<
  17. Sneaky

    @main command

    you guys misinterprete his posts..... yes. i'm asking for this one >.< How so?
  18. Actually it's just ,909, without the [jellopy] thing. I'll open this again since It haven't been confirmed by manabeast that it worked.
  19. Sneaky

    @main command

    I think he meant to just restrict special characters when using @main so it wouldn't give you gravity error (with a custom line [386] msg_athena.conf) when the message is larger than 24 characters.
  20. Sneaky

    @fish

    eA/rA revision > src > map > atcommand.c Find: /*========================================== * atcommand_info[] structure definition *------------------------------------------*/ AtCommandInfo atcommand_info[] = { Add BEFORE: ACMD_FUNC(fish) { npc_event(sd,"fishwarp::OnFishMap",0); return 0; } add after this: /*========================================== * atcommand_info[] structure definition *------------------------------------------*/ AtCommandInfo atcommand_info[] = { this: { "fish", 0,0, atcommand_fish }, ------------------------------------------------------------- Add an NPC with this inside: - script fishwarp -1,{ end; OnFishMap: warp "brasilis",239,78; end; }
  21. < If you're going to post in english please post in the Script Requests area, this is for support in tagalog, not english > Poring Catcher: http://rathena.org/b...poring-catcher/ I have something similar to 'jumper' that I made around 8 Months ago (It's in the same map though). gonryun,157,185,4 script Treasure Trail 1354,{ OnClick: if(getgmlevel() >= 60) { set .tretrial,0; goto OnStart; } if(.tretrial == 0) { set .tretrial,1; mes "[^0000ffTreasure Trail^000000]"; mes "Congratulations! "+strcharinfo(0); mes "You found me!"; mes "Here's your prize, have fun!!"; announce "Treasure Trail (Gonryun): "+strcharinfo(0)+" has found the the treasure box!",0; getitem 29999,1; close2; disablenpc "Treasure Trail"; end; } else { dispbottom "Event haven't started yet"; end; } OnMinute30: OnStart: enablenpc "Treasure Trail"; while(1) { //Initiate an infinite loop set $@tx,rand(0,300); //Set a randon X coordinate set $@ty,rand(0,300); //Set a random Y coordinate if(checkcell("gonryun",$@tx,$@ty,cell_chkpass)) break; //If cell is walkable break out of the loop } movenpc "Treasure Trail",$@tx,$@ty; //move the NPC announce "Treasure Trail (Gonryun): have changed location!",0; set .tretrial,0; end; OnInit: disablenpc "Treasure Trail"; end; }
  22. Allowing rAthena SVN to support another extension for scripts. example (.ras, stands for .RAthenaScript): myscript.ras scripts_custom.conf npc: npc/custom/myscript.ras And not just for syntax coloring but it would be nice for rAthena to have its own extension, still supporting .txt files though.
  23. You may want to follow this up > http://rathena.org/board/tracker/issue-5124-eye-of-hellion-quest/page__gopid__6122#entry6122
×
×
  • Create New...