Jump to content

mrlongshen

Members
  • Content Count

    1126
  • Joined

  • Last visited

  • Days Won

    3

Everything posted by mrlongshen

  1. Are you using centos right? If yes > Visit If no > Visit By the way, you are in wrong section. ._.
  2. can add at anywhere right ? @@Alayne thanks done tested. its working.
  3. new_4-4,147,190,3 script Monster Wiki 439,{while( 1 ){mes "Event Status : "+((!.WikiStatus )?"^FF0000OFF":"^0000FFON")+" ^000000";mes "^00FF00_______________________________^000000";mes "How may i assist you, ^0000FF"+strcharinfo(0)+"^000000 ?";next;switch( select( ( !.WikiStatus || !.MonsterID )?"":"Write Answer", "^00FF00Information^000000", ( getgmlevel() < 60 )?"":"^FF0000[GM]^000000 "+(( !.WikiStatus )?"Start Event":"Stop Event"), ( getgmlevel() < 80 )?"":"^FF0000[GM]^000000 Setting" )){case 1: if( getgmlevel() >= 80 ) mes "Answer : ^FF0000"+.Answer$+"^000000"; switch( .Mode ){ case 0: mes "Please Input the ^FF0000NAME^000000 of monster."; mes "^0000FFRemind^000000 : It is ^FF0000case-Sensitive^000000"; mes "Example : ^0000FFPoring^000000"; break; case 1: mes "Please Input the ^FF0000LEVEL^000000 of monster."; mes "Example. ^0000FF10 / 20 / 35 / 75^000000"; set .Hint,getmonsterinfo( .MonsterID,1 ) - rand(30); mes "^FF0000Hint^000000 : Between "+( (( .Hint ) < 1 )?"0":.Hint)+" ~ "+( getmonsterinfo( .MonsterID,1 ) + rand(30) )+" "; break; case 2: mes "Please Input the ^FF0000SIZE^000000 of monster."; mes "^0000FFRemind^000000 : It is ^FF0000case-Sensitive^000000"; mes "Example. ^0000FFSmall / Medium / Large^000000"; break; case 3: mes "Please Input the ^FF0000RACE^000000 of monster."; mes "^0000FFRemind^000000 : It is ^FF0000case-Sensitive^000000"; mes "^FF0000List of Available Answer^000000"; mes "^00FF00_______________________________^000000"; for( set .@i,0; .@i < getarraysize( .Race$ ); set .@i,.@i + 1 ){ mes " - ^0000FF"+.Race$[.@i]+"^000000"; } break; case 4: mes "Please Input the ^FF0000ELEMENT^000000 of monster."; mes "^0000FFRemind^000000 : It is ^FF0000case-Sensitive^000000"; mes "^FF0000List of Available Answer^000000"; mes "^00FF00_______________________________^000000"; for( set .@i,0; .@i < getarraysize( .Element$ ); set .@i,.@i + 1 ){ mes " - ^0000FF"+.Element$[.@i]+"^000000"; } break; } input @Guess$; if( .MonsterID == 0 || @Guess$ != .Answer$ ){ mes "Sorry, you are ^FF0000WRONG^000000 or ^FF0000Too Late^000000 for the Answer."; close; }else{ mes "^FF0000Correct^000000 !! I wonder how good are you in this."; stopnpctimer; getitem $WikiItemID,$WikiAmount; close2; setnpcdisplay( strnpcinfo(0),rand( 436,439 ) ); announce "You're Right [ "+strcharinfo(0)+" ] . The Answer is [ "+.Answer$+" ]",bc_npc,0xED1ADC; set .MonsterID,0; doevent strnpcinfo(0)+"::OnStart"; } end; case 2: mes "This is a ^FF0000Monster Wiki^000000"; mes "I will ask you everything about ^FF0000Monster^000000."; mes "^00FF00_______________________________^000000"; mes "The ^0000FFQuestions^000000 could be either in ^FF0000Name , Race , Element , Level , Size ^000000 of Monster."; next; break;case 3: if( !$WikiRound || getitemname( $WikiItemID ) == "null" ){ mes "Please Configure your ^FF0000NPC Setting^000000 before you start."; next; break; } set .WikiStatus,( .WikiStatus )?"0":"1"; mes "Event is now "+( .WikiStatus )?"^0000FFStarted":"^FF0000Stopped"+"^000000"; announce "Monster Wiki Event is now "+( .WikiStatus )?"Started":"Stopped"+"^000000",bc_blue; close2; if( .WikiStatus ){ set .Round,0; doevent strnpcinfo(0)+"::OnStart"; } end;case 4: while( 1 ){ mes "How can i assist you ^FF0000GM^000000?"; next; switch( select( "Prize [ ^0000FF"+$WikiAmount+" x "+getitemname( $WikiItemID )+"^000000 ]", "Round [ ^0000FF"+$WikiRound+"^000000 ]", "^0000FFBack^000000" )){ case 1: mes "Input the ^FF0000Item ID^000000"; do{ input $WikiItemID,501,32767; }while( getitemname( $WikiItemID ) == "null" ); mes "Input the ^FF0000Amount^000000"; input $WikiAmount,1,32767; next; break; case 2: mes "Input the ^FF0000Max. Round^000000"; input $WikiRound,1,50; next; break; case 3: mes "Redirect back to menu..."; next; } break; } break; }}OnMinute35: //Event start every 12.35, 1.35 etcfor( set .@i,3; .@i > 0 ; set .@i,.@i - 1 ){announce "Monster Wiki Event will take place in Event Room within "+.@i+" Minutes",bc_blue;sleep 60000;}set .Round,0;set .WikiStatus,1;OnStart:sleep2 5000;set .Round,.Round + 1;if( .Round > $WikiRound ){mapannounce .Map$,"Monster Wiki Event has Ended. Thank for Participate in this Event.",bc_map,0x7766EE;set .WikiStatus,0;sleep2 5000;mapwarp .Map$,"prontera",155,171;setnpcdisplay( strnpcinfo(0),rand( 436,439 ) );}else{npctalk "Round [ "+.Round+" ] within 5 Seconds.";sleep2 5000; do{ set .MonsterID,rand( 1001,2380 ); }while( getmonsterinfo( .MonsterID,0 ) == "null" || getmonsterinfo( .MonsterID,0 ) == "" || getmonsterinfo( .MonsterID,1 ) == -1 ); set .Mode,rand(5); switch( .Mode ){ case 0: set .Answer$, getmonsterinfo( .MonsterID,0 ); break; // Name case 1: set .Answer$, getmonsterinfo( .MonsterID,1 ); break; // Level case 2: set .Answer$, .Size$[ getmonsterinfo( .MonsterID,18 ) ]; break; // Size case 3: set .Answer$, .Race$[ getmonsterinfo( .MonsterID,19 ) ]; break; // Race case 4: set .Answer$, .Element$[ getmonsterinfo( .MonsterID,20 ) ]; break; // Element } setnpcdisplay( strnpcinfo(0),.MonsterID ); npctalk "Click me to view the Question of this Round.."; initnpctimer;}end;OnTimer10000: npctalk "20 Seconds to go..."; end;OnTimer20000: npctalk "10 Seconds to go..."; end;OnTimer30000:mapannounce .Map$,"Time's Up. All Failed in this Round.",bc_map,0x00FF00;donpcevent strnpcinfo(0)+"::OnStart";set .MonsterID,0;stopnpctimer;end;OnInit:OnWhisperGlobal:set .Map$,"prontera";setarray .Size$[0],"Small","Medium","Large";setarray .Race$[0],"Formless","Undead","Brute","Plant","Insect","Fish","Demon","Demi Human","Angel","Dragon";setarray .Element$[0],"Neutral","Water","Earth","Fire","Wind","Poison","Holy","Dark","Spirit","Undead";end; } Hello everyone, may I ask, how to add ad new list as a blacklist, so that this script wont load the blacklist number. I hate when many error appears on console such like this. [Error]: buildin_getmonsterinfo: Wrong Monster ID: 2203[Error]: buildin_getmonsterinfo: Wrong Monster ID: 2203[Error]: buildin_getmonsterinfo: Wrong Monster ID: 2203[Error]: buildin_getmonsterinfo: Wrong Monster ID: 2228[Error]: buildin_getmonsterinfo: Wrong Monster ID: 2228[Error]: buildin_getmonsterinfo: Wrong Monster ID: 2228[Error]: buildin_getmonsterinfo: Wrong Monster ID: 2267[Error]: buildin_getmonsterinfo: Wrong Monster ID: 2267[Error]: buildin_getmonsterinfo: Wrong Monster ID: 2267[Error]: buildin_getmonsterinfo: Wrong Monster ID: 2314[Error]: buildin_getmonsterinfo: Wrong Monster ID: 2314[Error]: buildin_getmonsterinfo: Wrong Monster ID: 2314[Error]: buildin_getmonsterinfo: Wrong Monster ID: 2180[Error]: buildin_getmonsterinfo: Wrong Monster ID: 2180[Error]: buildin_getmonsterinfo: Wrong Monster ID: 2180[Error]: buildin_getmonsterinfo: Wrong Monster ID: 2195[Error]: buildin_getmonsterinfo: Wrong Monster ID: 2195[Error]: buildin_getmonsterinfo: Wrong Monster ID: 2195[Error]: buildin_getmonsterinfo: Wrong Monster ID: 2297[Error]: buildin_getmonsterinfo: Wrong Monster ID: 2297[Error]: buildin_getmonsterinfo: Wrong Monster ID: 2297[Error]: buildin_getmonsterinfo: Wrong Monster ID: 2333[Error]: buildin_getmonsterinfo: Wrong Monster ID: 2333[Error]: buildin_getmonsterinfo: Wrong Monster ID: 2333[Error]: buildin_getmonsterinfo: Wrong Monster ID: 1006[Error]: buildin_getmonsterinfo: Wrong Monster ID: 1006[Error]: buildin_getmonsterinfo: Wrong Monster ID: 1006[Error]: buildin_getmonsterinfo: Wrong Monster ID: 2261[Error]: buildin_getmonsterinfo: Wrong Monster ID: 2261[Error]: buildin_getmonsterinfo: Wrong Monster ID: 2261[Error]: buildin_getmonsterinfo: Wrong Monster ID: 2037[Error]: buildin_getmonsterinfo: Wrong Monster ID: 2037[Error]: buildin_getmonsterinfo: Wrong Monster ID: 2037 I believe it from this line set .MonsterID,rand( 1001,2380 ); Someone can edit it ?
  4. have you edit the item id ? iteminfo ? perhaps you put at wrong position ?
  5. @@Kong Did you found bugs server crash ? when using this plugins ? @@Dastgir ahh oic, you are busy in real life. nvm sir. plugins are pending for new update. take noted all.
  6. @@Kong but my player happy using that bugs. pfffftt hahaha
  7. I found a bugs on critical magic attack, the item drops from mobs will be double. ._.
  8. @@IeYasuru thanks for sharing. Im using it now.
  9. @@Happy can you updated this script with dota announcer ?
  10. How you do that ? Mind share ? @@xathenx
  11. Yeah, default value. if possible manual enter the vale and default value. If possible.. @@Alayne Becoz every time I reload my script, the value will become null. Is that other things can make the value permanent ?
  12. //===== Hercules Script =======================================//= Poring Summoner//===== Created By: ===========================================//= Mysterious//===== Current Version: ======================================//= 1.2//===== Link: =================================================//= Old - http://www.eathena.ws/board/index.php?showtopic=236779//===== Description: ==========================================//= Basically what this event does is summon a set of Normal//= and Special Porings. Normal Porings don't drop anything,//= Special Porings do.//=============================================================new_4-4,148,169,4 script Poring Summoner 99,{mes "[Poring Summoner]";if(getgroupid() < 10) { 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) + "]: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 "How many Special Porings would you like me to summon?"; input .SpecialPorings; goto Main; case 3: mes "How many Normal Porings would you like me to summon?"; input .NormalPorings; goto Main; case 4: mes "Starting the event now...";OnMinute30: //Triggers at each new hour, so 1:30, 2:30, 3:30, 4:30 etc. set $@ran, rand(1,7); if ($@ran == 7) set .Map$,"dic_fild01"; if ($@ran == 6) set .Map$,"dic_fild02"; 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"; set .Event,1; 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 Porings: " + .SpecialPorings,bc_all; announce "Normal Porings: " + .NormalPorings,bc_all; close; case 5: mes "Ending the event now..."; goto EndEvent; }OnTimer216000000: announce "Poring Summoner has ended. No one killed the Porings.",bc_all; killmonster .Map$,"All"; set .Event,0; stopnpctimer; 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 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;} Hi everyone, as you can see, this script can entered manual item id, item amount, how many special poring and normal poring, my simple question is where to edit specific item id, item amount, special poring and normal poring. And the value are fix. Can someone edit it for me ? thanks
  13. @@karazu then what will happen on if your player are hunting item and want to sell them all is 0 the value. For example farming gold ? hmm
  14. @evilpuncker items[i].value = value; This one forces all the items to be sold from NPC to Players as 0. How about forces all the items to be sold from Players to NPC as 0? wahhh ! what project are you trying to do. It will make your server messy. huhu
  15. - script mvp_command -1,{OnInit: // Configurations: .cmdname$ = "mvp"; // Name of the command? .useLevel = 70; // Who can use this command? // Random mobs that will come out of the command // Fill up with mob IDs setarray .mobids[0],1002,1003; // Add or change Mob IDs here // Don't edit past here bindatcmd .cmdname$, strnpcinfo(3)+"::OnAtcommand",.useLevel; end;OnAtcommand: //Use custom spawn set monster "this",-1,-1,"--ja--",.mobids[rand(getarraysize(.mobids))],1,""; dispbottom "A random MvP was summoned!"; end;} based on this script, how to display the spawned MVP name instead of A random MVP was summoned ?
  16. Yey. I love server database editor by tokeiburu ! Its was awesome tools ! Yeaaahh easy editing item now hehehe

  17. kindly I believe it happen from script. maybe bonus / skill script ?
  18. @@evilpuncker agree with evil. that a warning. not an error I think it should be work. maybe he will get many warning HAHAHAHA @@karazu I understand your feeling, Same with me, I dont like yellow warning in console. wait for any developer help you. Because I dont know about source editing. hehe maybe have some source that can disable the warning.
  19. @@Namine @@Aeromesi @@Sense Can you make a plugin for this. I dont like to editing the sources.
  20. Same with me ! Crash . Fixed @v1.3b Thanks for reporting (many) bugs xD. Nice. Fast update.
×
×
  • Create New...

Important Information

By using this site, you agree to our Terms of Use.