Jump to content

uDe

Members
  • Posts

    400
  • Joined

  • Last visited

  • Days Won

    1

Everything posted by uDe

  1. Starting from line 15, there's the $@Variables.. switch(select("Item [" + getitemname($@SatanReward) + "]:Start Event")) {
  2. - script VIPLuckyPick -1,{ OnInit: OnClock0000: set .LuckyTime,rand(24); OnMinute00: if( gettime(3) == .LuckyTime ){ set .DelayMin,rand(60); sleep ( .DelayMin * 60000 ); while(1){ query_sql "select account_id from `char` where online = 1 order by rand() limit 1", .@aid; attachrid .@aid; if( CheckVending() || !getgmlevel() || @afk == 15 ){ DetachRID(); continue; } announce strcharinfo(0) +" won in Lucky Pick Event.", 0; getitem 7539,1000; break; } } end; } I get this from @Emistry , I know that's not for 15 minutes like you ask. It's for random hours & minutes. The script working perfectly for me. Maybe other scripters will help you to change it to 15 minutes like you ask.
  3. uDe

    server time

    Really? I'm sorry.. My time now is 10AM in the morning. So, just simply gave you the script without testing it. Have you tried his script : http://rathena.org/board/topic/85549-server-time/#entry213138 ?
  4. uDe

    server time

    prontera,167,196,3 script nRO Server Time 864,{ end; OnInit: while( 1 ){ delwaitingroom; waitingroom " "+gettimestr( "%H:%M:%S %p",21 ),0; sleep 1000; } end; }
  5. uDe

    Requesting

    Any guide how to add tables? Follow these steps :
  6. uDe

    script for mute

    If it's not working, please post the details about error at map-flag. Don't just simply say "it's not work!". Nobody will help you then. The more same thread you created, the more members will ignore. It's kinda annoying.
  7. How to remove/kill the Dimik's and Venatu's when player relog?
  8. uDe

    script for mute

    Isn't this same? http://rathena.org/board/topic/85386-jailtime/ Why are you creating many thread?
  9. I'm also interested with this idea. But, when @fakename are used. Other player can't invite party/guild, add friends etc.. How to fix that problems?
  10. Thank you for the post... I actually already have a script a lot like this... Even though it says mvpspawner it works for all monsters. You can even add multiple drop lists and save them with rates I think you might find it useful. http://code.google.com/p/ea-addicts/downloads/detail?name=mvpspawner.txt&can=2&q= Woah~ This is nice. Thank you very much!!
  11. Of course it'll work. Just insert the lines given into your PVP Warper NPC. When WOE start, PVP Warper NPC will hiding and when WOE end, PVP Warper NPC will appear. So, your players can't go to PVP while WOE.
  12. It's working. For those who need automatic Poring Summoner script here it is. Working_Poring_Summoner.txt
  13. Thanks for the help Capuche Edited script : ////////////// //OLD SCRIPT// ////////////// //Made by Light from MoonlightRO //quiz_01,45,180,5 script Poring Summoner 99,{ - script Poring Summoner -1,{ OnInit: //---- NPC Config ----- set .ItemID, 7539; set .SpecialPorings, 30; set .NormalPorings, 150; set .Map$, "morocc"; //setarray .Map$[0], "morocc"; //setarray .Map$[0], "lighthalzen","louyang","comodo","xmas","aldebaran","izlude","payon","geffen","morocc","prontera"; //--------------------- end; OnWhisperGlobal: mes "[Poring Summoner]"; if(getgmlevel() < 99) { if(.Event) mes "There is no Poring Summon Event on now."; else { mes "There is a Poring Summon Event on now!"; mes "Location: " + .Map$; mes "Special Porings: " + .SpecialPorings[1]; mes "Normal Porings: " + .NormalPorings[0]; } close; } mes "Please customize the Poring Summon Event:"; Main: next; mes "[Poring Summoner]"; switch(select("Item [" + getitemname(.ItemID) + "]:Location [" + .Map$ + "]:Special Porings [" + .SpecialPorings + "]:Normal Porings [" + .NormalPorings + "]:Start Event:End Event")) { case 1: mes "Which item would you like Special Porings to drop?"; mes "Please input the item ID:"; input .ItemID; goto Main; case 2: mes "Which map would you like me to host this event?"; input .Map$; goto Main; case 3: mes "How many Special Porings would you like me to summon?"; input .SpecialPorings; goto Main; case 4: mes "How many Normal Porings would you like me to summon?"; input .NormalPorings; goto Main; case 5: mes "Starting the event now..."; donpcevent strnpcinfo(0) +"::Onstartevent"; close; case 6: mes "Ending the event now..."; donpcevent strnpcinfo(0) +"::Onendevent"; } OnMinute17: if ( .Event ) donpcevent strnpcinfo(0) +"::Onendevent";// stop the event if already on donpcevent strnpcinfo(0) +"::Onstartevent"; end; Onstartevent: set .Event,1; monster .Map$,0,0,"Poring",1725,.SpecialPorings,"Poring Summoner::OnSpecialKill"; monster .Map$,0,0,"Poring",1725,.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 Porings: " + .SpecialPorings,bc_all; announce "Normal Porings: " + .NormalPorings,bc_all; end; OnSpecialKill: set .SpecialPorings[1],.SpecialPorings[1]-1; announce strcharinfo(0) + " got a " + getitemname(.ItemID) + "!",bc_map; getitem .ItemID,5; goto PoringCount; OnNormalKill: set .NormalPorings[1],.NormalPorings[1]-1; goto PoringCount; PoringCount: announce "Special Porings: " + .SpecialPorings[1] + " || Normal Porings: " + .NormalPorings[1],bc_map; if(!.SpecialPorings[1]) goto Onendevent; end; Onendevent: if(.Event) announce "The Poring Summon Event is now over!",bc_all; killmonster .Map$,"All"; set .Event,0; set .SpecialPorings[1],0; set .NormalPorings[1],0; close; } morocc mapflag nowarp morocc mapflag noteleport morocc mapflag nomemo morocc mapflag nosave SavePoint morocc mapflag nobranch morocc mapflag noskill Error when I manually use End Event (by whisper) : [22/Jul 12:16][Error]: script_rid2sd: fatal error ! player not attached! [22/Jul 12:16][Debug]: Function: close (no parameters) [22/Jul 12:16][Debug]: Source (NPC): Poring Summoner (invisible/not on a map) I'm a bit confuse with your edit about this : - EndEvent: - Onendvent: if(.Event) announce "The Poring Summon Event is now over!",bc_all; killmonster .Map$,"All"; set .Event,0; set .SpecialPorings[1],0; set .NormalPorings[1],0; - close; + end; Is there any typo about "Onendvent" ? if(!.SpecialPorings[1]) goto Onendevent; I need to change it like that right?
  14. Ah. My bad. I didn't apply the .diff provided. Thank you very much. My problem solved.
  15. uDe

    Guild broadcast

    Yes, I've tried it using a new member. But, I've relog too. Still can't view the message.
  16. Hello, I've got some error for this script : //Made by Light from MoonlightRO //quiz_01,45,180,5 script Poring Summoner 99,{ - script Poring Summoner -1,{ OnInit: //---- NPC Config ----- set .ItemID, 7539; set .SpecialPorings, 30; set .NormalPorings, 150; set .Map$, "morocc"; //setarray .Map$[0], "morocc"; //setarray .Map$[0], "lighthalzen","louyang","comodo","xmas","aldebaran","izlude","payon","geffen","morocc","prontera"; //--------------------- end; OnWhisperGlobal: mes "[Poring Summoner]"; if(getgmlevel() < 99) { if(.Event) mes "There is no Poring Summon Event on now."; else { mes "There is a Poring Summon Event on now!"; mes "Location: " + .Map$; mes "Special Porings: " + .SpecialPorings[1]; mes "Normal Porings: " + .NormalPorings[0]; } close; } mes "Please customize the Poring Summon Event:"; Main: next; mes "[Poring Summoner]"; switch(select("Item [" + getitemname(.ItemID) + "]:Location [" + .Map$ + "]:Special Porings [" + .SpecialPorings + "]:Normal Porings [" + .NormalPorings + "]:Start Event:End Event")) { case 1: mes "Which item would you like Special Porings to drop?"; mes "Please input the item ID:"; input .ItemID; goto Main; case 2: mes "Which map would you like me to host this event?"; input .Map$; goto Main; case 3: mes "How many Special Porings would you like me to summon?"; input .SpecialPorings; goto Main; case 4: mes "How many Normal Porings would you like me to summon?"; input .NormalPorings; goto Main; case 5: mes "Starting the event now..."; OnMinute17: set .Event,1; monster .Map$,0,0,"Poring",1725,.SpecialPorings,"Poring Summoner::OnSpecialKill"; monster .Map$,0,0,"Poring",1725,.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 Porings: " + .SpecialPorings,bc_all; announce "Normal Porings: " + .NormalPorings,bc_all; close; case 6: mes "Ending the event now..."; goto EndEvent; } OnSpecialKill: set .SpecialPorings[1],.SpecialPorings[1]-1; announce strcharinfo(0) + " got a " + getitemname(.ItemID) + "!",bc_map; getitem .ItemID,5; goto PoringCount; OnNormalKill: set .NormalPorings[1],.NormalPorings[1]-1; goto PoringCount; PoringCount: announce "Special Porings: " + .SpecialPorings[1] + " || Normal Porings: " + .NormalPorings[1],bc_map; if(!.SpecialPorings[1]) goto EndEvent; end; EndEvent: if(.Event) announce "The Poring Summon Event is now over!",bc_all; killmonster .Map$,"All"; set .Event,0; set .SpecialPorings[1],0; set .NormalPorings[1],0; close; } morocc mapflag nowarp morocc mapflag noteleport morocc mapflag nomemo morocc mapflag nosave SavePoint morocc mapflag nobranch morocc mapflag noskill This is the error at map-server : [22/Jul 11:17][Error]: script_rid2sd: fatal error ! player not attached! [22/Jul 11:17][Debug]: Function: close (no parameters) [22/Jul 11:17][Debug]: Source (NPC): Poring Summoner (invisible/not on a map)
  17. parse_line: need ';' 31 : // if .msgToChat is enabled, send the list directly to the chat 32 : if (.msgToChat) { 33 : 34 : dispbottom "GM List:"; 35 : for (.@i = 0; .@i < getarraysize(.online$); .@i += 1) { * 36 : dispbottom "[" + groupIdToName'('.group[.@i]) + "] " +.name$[.@i] + ": " + (("0" != .online$[.@i]) ? "online" : "offline" + ((.showLastOnline) ? ", last online at " + .date$[.@i] + " " + .time$[.@i] : "")); 37 : } 38 : end; 39 : } 40 : 41 : mes "[GM List]", ""; This is from gm_status_v2_1.txt
  18. uDe

    Guild broadcast

    Hello, I found this was very useful. But when I'm test the script form post #11 , I'll just announce to my self.. Other guild member can't receive any message. Here's the screen shot : Thanks for the idea. EDIT : It's working after server restart. Thank you very much for this.
  19. uDe

    PVP Ladder

    -<TAB>script<TAB>PVPLADDEROPTIONS<TAB>-1,{ http://rathena.org/board/topic/82874-pvp-warper-w-dota-sound-and-ladder-global/?p=200249 Seems like he can't understand the easiest part.
  20. uDe

    GM = NPC

    Use /where then you can guess the coordinate around you and then use @warp <map> <coordinate that you discover from guess before>. You can only walk base on the gat of the map I think. *Correct me if I'm wrong.
  21. I've got some error for this src.. Need some help... CC atcommand.c atcommand.c: In function 'atcommand_item': atcommand.c:1169:5: warning: 'flag' may be used uninitialized in this function [-Wuninitialized] atcommand.c:1146:5: warning: 'itemid' may be used uninitialized in this function [-Wuninitialized] atcommand.c:1146:24: warning: 'group_id' may be used uninitialized in this function [-Wuninitialized] I'm using this src : http://rathena.org/board/topic/67383-item-mod-from-eathena/#entry119245 BUMP BUMP
  22. Hello.. I've tried to remove the patch manually. But only this error appear. Anyone know how to fix this? vending.c: In function 'vending_purchasereq': vending.c:190:32: error: macro "msg_txt" passed 2 arguments, but takes just 1 vending.c:190:18: error: 'msg_txt' undeclared (first use in this function) vending.c:190:18: note: each undeclared identifier is reported only once for each function it appears in make[1]: *** [obj_sql/vending.o] Error 1 My SVN : r17227 Source : http://rathena.org/board/topic/60817-extended-vending-system-18/ EDIT : Attached my vending.c vending.rar Update : Problem solved. Just found it out, Change sprintf(temp, msg_txt(sd,265), sd->status.name); to sprintf(temp, msg_txt(265), sd->status.name); I don't know how this works. But, no more errors from map server.
×
×
  • Create New...