mrlongshen
Members-
Content Count
1126 -
Joined
-
Last visited
-
Days Won
3
Content Type
Profiles
Forums
Downloads
Staff Applications
Calendar
Everything posted by mrlongshen
-
@@Dastgir Its good to hear that
-
Are you using centos right? If yes > Visit If no > Visit By the way, you are in wrong section. ._.
-
can add at anywhere right ? @@Alayne thanks done tested. its working.
-
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 ?
-
Some Headgear gives me Sprite Errors T.T HELP
mrlongshen replied to binbinH's question in Client-Side Support
have you edit the item id ? iteminfo ? perhaps you put at wrong position ? -
@@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.
-
@@Kong but my player happy using that bugs. pfffftt hahaha
-
I found a bugs on critical magic attack, the item drops from mobs will be double. ._.
-
@@IeYasuru thanks for sharing. Im using it now.
-
@@Happy can you updated this script with dota announcer ?
-
How you do that ? Mind share ? @@xathenx
-
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 ?
-
//===== 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
-
@@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
-
@@Alayne thanks so much
-
@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
-
- 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 ?
-
Yey. I love server database editor by tokeiburu ! Its was awesome tools ! Yeaaahh easy editing item now hehehe
-
@@Aeromesi its ok. hihi
-
Happy Devs: Bring out the best Ragnarok in you.
mrlongshen replied to Happy's topic in Paid Services
@@Happy your inbox is full, i cant pm u- 115 replies
-
kindly I believe it happen from script. maybe bonus / skill script ?
-
@@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.
-
automatic @at after creating a vending shop
mrlongshen replied to Lord Ganja's question in Source Support
@@karazu I agree with you. -
@@Namine @@Aeromesi @@Sense Can you make a plugin for this. I dont like to editing the sources.
-
Same with me ! Crash . Fixed @v1.3b Thanks for reporting (many) bugs xD. Nice. Fast update.
- 47 replies