mrlongshen
Members-
Content Count
1126 -
Joined
-
Last visited
-
Days Won
3
Content Type
Profiles
Forums
Downloads
Staff Applications
Calendar
Everything posted by mrlongshen
-
@@RagnarokOnline2015 Send to me also. Thanks you.
-
Follow this topic.
-
Derefine weapon, equipment, accesories and garment and headgear
mrlongshen posted a question in Script Requests
Hi all, may I request a simple script to derefine from +10 to 0 or low value than 10. From +10 to +9 the cost is 9m + tcg card and so on, (configurable) . I can choose whether to use zeny or item for the cost to derefine. -
[WIP] ZenkaiCP - Extraordinary Modern Control Panel.
mrlongshen replied to SinjiPrasetio's topic in Projects
@@SinjiPrasetio I want to test it ! And constant development.- 11 replies
-
- control panel
- website
-
(and 1 more)
Tagged with:
-
@@Aeromesi Thanks for your response. I want fix value. not random. huhu Later will online skype
-
how can i add soul link buffs on this script?
mrlongshen replied to Brynner's question in Script Support
@@quesoph thanks -
//===== Hercules Script ======================================//= Find the Mushroom//===== By: ==================================================//= Mysterious//===== Current Version: =====================================//= 3.6a//===== Description: =========================================//= Find the Mushroom - random amount of Mushrooms spawns in random maps.//= Players need to find these mushrooms and kill them to gain prizes!//===== Additional Comments: =================================//= 3.0 Fully Functional with Rewritten script. [Mysterious]//= 3.6a Slightly edited. [Euphy]//============================================================new_4-4,131,169,4 script Find the Mushroom BLACK_MUSHROOM,{ mes "[ Find The Mushroom ]"; if (!.Status) mes "There is no event at the moment!"; else { mes "There are "+.Spawn+" Mushrooms left in "+.Map$+"!"; mes "Find and kill the mushrooms to gain "+getitemname(.Prize)+"!"; } if (.Status || getgmlevel() < .GM) close; mes "Start the event?"; next; if(select("- No:- Yes") == 1) close; donpcevent strnpcinfo(0)+"::OnMinute55"; mes "[ Find The Mushroom ]"; mes "Event started!"; close;OnInit: set .Prize,674; // Reward item ID set .amount,1; // Reward item amount set .GM,60; // GM level required to access NPC setarray .maps$[0],"izlude","geffen","morocc","prontera"; // Possible maps end;OnMinute55: // Start time (every hour) if (.Status) end; set .Status,1; set .Spawn,rand(1,10); // How many Mushrooms should spawn? set .Map$,.maps$[rand(getarraysize(.maps$))]; killmonster .Map$,"All"; monster .Map$,0,0,"Please don't kill me!",1084,.Spawn,strnpcinfo(0)+"::OnMobKilled"; announce "Find the Mushroom : Total of "+.Spawn+" Mushrooms have been spawned in "+.Map$+"!",0; sleep 2500; announce "Find the Mushroom : Every Mushroom you kill will give you "+getitemname(.Prize)+"!",0; end;OnMobKilled: set .Spawn, .Spawn - 1; getitem .Prize, .amount; if (.Spawn) announce "[ "+strcharinfo(0)+" ] has killed a Mushroom. There are now "+.Spawn+" Mushroom(s) left.",bc_map; else { announce "The Find the Mushroom Event has ended. All the Mushrooms have been killed.",0; set .Status,0; } end;} How to insert multiple prize ? I want to insert event ticket, For now my player will get the mithril coins. set .Prize,674,7711; can it be like this ?
-
Item id 14517 unitskilluseid getcharid(3),237,5; 14518 unitskilluseid getcharid(3),235,5; 14519 unitskilluseid getcharid(3),236,5; 14520 unitskilluseid getcharid(3),234,5; I use it and nothing happen, and no effect like creator skill ? Can some check it ?
-
- protection
- scroll
-
(and 1 more)
Tagged with:
-
@@iwarez good ! Yeah
-
@@Samuel thanks you. +1 What is the max value ? can i make 999m ? hehe
-
There are 1 poring that contain specific item e.g poring coin. Poring spawn 100 poring 1st attack win and get the item, (broadcast) the winner
-
Currently all job are max tu 1m max hp. How to increase it ?
-
@@AnnieRuru is the value permanent ? what happen if player reset status ?
-
Run Or Die event ( aka. Poring Bomb )
mrlongshen replied to AnnieRuru's topic in Event & Game Releases
Im running on 255/120 My player will died when the bomb poring explode. Haha. Its default. -
@@iwarez let me know if anything happen.
-
Unequip after reach 1st job level and 2nd job and trans job
mrlongshen posted a question in Script Support
I made an item if( BaseLevel == 255 && JobLevel == 120 ) unequip 2; How to make if base level and job level of 1st job is full (archer,magician,and all) its will unequip ? and How to make if base level and job level of 2nd job is full (hunter,wizard and all) its will unequip ? or The item will unequip when level is range from 99~255, and job 50 for 1st job. The item will unequip when level is range from 99~255 and job 70 for 2nd job. and the item will unequip when level 255, job 120 at trans job. -
@@AnnieRuru Hahaha. Anti eathena.ws annie. Keep mad. huhu why ?
-
@@AnnieRuru Hehehe~ Sempoi. Thanks annie.
-
Request simple script when player wear item 12111 then automatic @cashmount on current job.
-
@@AnnieRuru Yeah. My player reporting it the script problem. I hope you can help me later. Thanks for the reply.
-
Can I request this addon ? About This Add-on Giveaway add-on works like mail feature in the game of Ragnarok Online where users can message other players even they are offline because the message are stored in their mailbox for good. By this wonderful addition to your control panel, trusted administrators may now send items and zenies as well as messages to your players without any hasle. Use this tool if you want to spread stuffs to your players as a token of appreciation to their s upport. You may also use this on events wherein you have to distribute items to selected winners or losers. Use this tool anyway you want, anywhere you want without limits. Features [*]Multiple character to send in single dispatch [*]Multiple Server Support ( Each allowed admins must have at least 1 character in each server ) [*]Search Character Names/Ids Filter by; [*]Individual Character [*]Characters in an Account [*]Character in with Group Level [*]Members in a Guild [*]Members in a Party [*]Search for Item name or id [*]Ajax search [*]Able to exclude account, character, group, guild, and party ids [*]Admins can send / dispatch the following as of now, ( still open for suggestions ) [*]Items [*]Elemental Equipments ( mainly weapons that can be forged ) [*]Equipments with card attached to it [*]Zeny Anyone have this ? might share ? or paid ? Tell me how much.
-
// --- ARTHistic's Property ---// --- Please visit http://thdesigns.co.nr ---// --- Scripted By: ARTHistic ---// --- Do Not Revomed the Credits ---- script PPE_inital -1,{ OnInit: set $@PoringEventChecker, 0; set $@PoringEventPrizeChecker, 0; set $PPEDefendingChampion$,"secret"; end;}new_4-4,150,180,5 script Poring Punch Event EF_EL_CHILLY_AIR,{ mes "[ Poring Punch Event ]"; mes "Hello, I'm the Poring Punch Event Manager. My record says that the defending champion on this event was "+$PPEDefendingChampion$+". Anyways, what do you want to do?"; next; menu "How does this work?",PPE_HowTo,"Host this Event",PPE_Host,"Join Event Now",PPE_Join,"Claim my reward",PPE_claim,"Nevermind",PPE_nvm; PPE_HowTo: mes "[ Poring Punch Event ]"; mes "This is an event where everyone can join in. All you have to do is to punch the right monsters and to avoid the wrong ones. Each kind of monster has its corresponsing points. You only have 5 minutes to earn points as much as you can. The Highest Scorer at the end of this event shall win Poring Coins"; mes "Reminder: No weapons, cart, and pets is allowed in this event."; close; PPE_Host: if ( $@PoringEventChecker != 0 ){ mes "[ Poring Punch Event ]"; mes "There is Poring Punch Event on-going. You can host this event if it is still on-going."; close; }else{ mes "[ Poring Punch Event ]"; mes "You need to pay 50 million to host this event. Would you like to pay to host this event?"; next; menu "Yes",PPE_HostYes,"No",-; mes "[ Poring Punch Event ]"; mes "Okay. Maybe next time."; close; PPE_HostYes: if ( Zeny >= 50000000 ){ mes "[ Poring Punch Event ]"; mes "Thanks "+strcharinfo(0)+", for hosting this event. It will start shortly."; set Zeny, Zeny-50000000; close2; set $@PoringEventChecker, 1; announce ""+strcharinfo(0)+" paid to host Poring Punch Event!", bc_all; killmonsterall "pvp_n_1-2"; sleep2 10000; initnpctimer; end; }else{ mes "[ Poring Punch Event ]"; mes "Sorry "+strcharinfo(0)+", you dont have enough zenies to host this event."; close; }end; }end; PPE_Join: if ( $@PoringEventChecker != 0 ){ if (gethominfo(2) != "null"){ mes "[ Poring Punch Event ]"; mes "No homunculus is allowed in this event! Sorry "+strcharinfo(0)+" but you can't join this event!"; close; } if (getpetinfo(2) != "null"){ mes "[ Poring Punch Event ]"; mes "No pet is allowed in this event! Sorry "+strcharinfo(0)+" but you can't join this event!"; close; } if (checkcart()){ mes "[ Poring Punch Event ]"; mes "[ Poring Punch Event ]"; mes "No cart is allowed! Sorry "+strcharinfo(0)+" but you can't join this event!"; close; } if (checkfalcon()){ mes "[ Poring Punch Event ]"; mes "No falcon is allowed! Sorry "+strcharinfo(0)+" but you can't join this event!"; close; } if (checkmount() == MOUNT_PECO){ mes "[ Poring Punch Event ]"; mes "[ Poring Punch Event ]"; mes "No riding is allowed! Sorry "+strcharinfo(0)+" but you can't join this event!"; close; } mes "[ Poring Punch Event ]"; mes "Good luck "+strcharinfo(0)+"."; close2; set @PoringPoints, 0; warp "1@dth3",0,0; end; }else{ mes "[ Poring Punch Event ]"; mes "Sorry. No Poring Punch Event is held at the moment."; close; }end; PPE_claim: if ($HighestPoringPointsName$ == strcharinfo(0) && $@PoringEventPrizeChecker == 1) { mes "[Poring Punch Event]"; mes "Congratulations "+strcharinfo(0)+". Here is your reward."; getitem 7539,20; set $HighestPoringPointsName$,""; set $HighestPoringPoints,0; set $@PoringEventPrizeChecker, 0; close; } else { mes "[ Poring Punch Event ]"; mes "Sorry "+strcharinfo(0)+". You're not the winner so you can't claim anything"; close; }end; PPE_nvm: mes "[ Poring Punch Event ]"; mes "Okay. Maybe next time."; close; OnPoringKill: if (getequipweaponlv(4)==0 && getequipweaponlv(3)==0){ set @PoringPoints,@PoringPoints+1; if (@PoringPoints > $HighestPoringPoints) { set $HighestPoringPointsName$,strcharinfo(0); set $PPEDefendingChampion$,strcharinfo(0); set $HighestPoringPoints,@PoringPoints; } dispbottom "You have "+@PoringPoints+" point(s)"; end; }else { dispbottom "You have to punch the monster without any weapon."; warp "prontera",156,179; end; } OnDropsKill: if (getequipweaponlv(4)==0 && getequipweaponlv(3)==0){ set @PoringPoints,@PoringPoints+3; if (@PoringPoints > $HighestPoringPoints) { set $HighestPoringPointsName$,strcharinfo(0); set $PPEDefendingChampion$,strcharinfo(0); set $HighestPoringPoints,@PoringPoints; } dispbottom "You have "+@PoringPoints+" point(s)"; end; }else { dispbottom "You have to punch the monster without any weapon."; warp "prontera",156,179; end; } OnPoporingKill: if (getequipweaponlv(4)==0 && getequipweaponlv(3)==0){ if (@PoringPoints < 10) { set @PoringPoints, 0; dispbottom "You have "+@PoringPoints+" point(s)"; end; }else { set @PoringPoints,@PoringPoints-10; dispbottom "You have "+@PoringPoints+" point(s)"; end; }end; }else { dispbottom "You have to punch the monster without any weapon."; warp "prontera",156,179; end; } OnSantaPoringKill: if (getequipweaponlv(4)==0 && getequipweaponlv(3)==0){ set @PoringPoints,@PoringPoints+5; if (@PoringPoints > $HighestPoringPoints) { set $HighestPoringPointsName$,strcharinfo(0); set $PPEDefendingChampion$,strcharinfo(0); set $HighestPoringPoints,@PoringPoints; } dispbottom "You have "+@PoringPoints+" point(s)"; end; }else { dispbottom "You have to punch the monster without any weapon."; warp "prontera",156,179; end; } OnMarinKill: if (getequipweaponlv(4)==0 && getequipweaponlv(3)==0){ set @PoringPoints,@PoringPoints+7; if (@PoringPoints > $HighestPoringPoints) { set $HighestPoringPointsName$,strcharinfo(0); set $PPEDefendingChampion$,strcharinfo(0); set $HighestPoringPoints,@PoringPoints; } dispbottom "You have "+@PoringPoints+" point(s)"; end; }else { dispbottom "You have to punch the monster without any weapon."; warp "prontera",156,179; end; }OnMinute17: if ( $@PoringEventChecker == 0 ) { set $@PoringEventChecker, 1; initnpctimer; end; }OnTimer10000: announce "Poring Punch Event has started.",0; monster "1@dth3",0,0,"1 Points",1002,10,"Poring Punch Event::OnPoringKill"; monster "1@dth3",0,0,"3 Points",1113,10,"Poring Punch Event::OnDropsKill"; monster "1@dth3",0,0,"5 Points",1062,10,"Poring Punch Event::OnSantaPoringKill"; monster "1@dth3",0,0,"7 Points",1595,10,"Poring Punch Event::OnMarinKill"; monster "1@dth3",0,0,"-10 Points",1031,70,"Poring Punch Event::OnPoporingKill"; monster "1@dth3",0,0,"-30 Points",1904,5,"Poring Punch Event::OnBombPoringKill"; end;OnTimer70000: mapannounce "1@dth3","Poring Punch Event: 4 minutes left.",0; monster "1@dth3",0,0,"1 Points",1002,10,"Poring Punch Event::OnPoringKill"; monster "1@dth3",0,0,"3 Points",1113,10,"Poring Punch Event::OnDropsKill"; monster "1@dth3",0,0,"5 Points",1062,10,"Poring Punch Event::OnSantaPoringKill"; monster "1@dth3",0,0,"7 Points",1595,10,"Poring Punch Event::OnMarinKill"; monster "1@dth3",0,0,"-10 Points",1031,70,"Poring Punch Event::OnPoporingKill"; monster "1@dth3",0,0,"-30 Points",1904,5,"Poring Punch Event::OnBombPoringKill"; end;OnTimer130000: mapannounce "1@dth3","Poring Punch Event: 3 minutes left.",0; monster "1@dth3",0,0,"1 Points",1002,10,"Poring Punch Event::OnPoringKill"; monster "1@dth3",0,0,"3 Points",1113,10,"Poring Punch Event::OnDropsKill"; monster "1@dth3",0,0,"5 Points",1062,10,"Poring Punch Event::OnSantaPoringKill"; monster "1@dth3",0,0,"7 Points",1595,10,"Poring Punch Event::OnMarinKill"; monster "1@dth3",0,0,"-10 Points",1031,70,"Poring Punch Event::OnPoporingKill"; monster "1@dth3",0,0,"-30 Points",1904,5,"Poring Punch Event::OnBombPoringKill"; end;OnTimer190000: mapannounce "1@dth3","Poring Punch Event: 2 minutes left.",0; monster "1@dth3",0,0,"1 Points",1002,10,"Poring Punch Event::OnPoringKill"; monster "1@dth3",0,0,"3 Points",1113,10,"Poring Punch Event::OnDropsKill"; monster "1@dth3",0,0,"5 Points",1062,10,"Poring Punch Event::OnSantaPoringKill"; monster "1@dth3",0,0,"7 Points",1595,10,"Poring Punch Event::OnMarinKill"; monster "1@dth3",0,0,"-10 Points",1031,70,"Poring Punch Event::OnPoporingKill"; monster "1@dth3",0,0,"-30 Points",1904,5,"Poring Punch Event::OnBombPoringKill"; end;OnTimer250000: mapannounce "1@dth3","Poring Punch Event: 1 minute left.",0; monster "1@dth3",0,0,"1 Points",1002,10,"Poring Punch Event::OnPoringKill"; monster "1@dth3",0,0,"3 Points",1113,10,"Poring Punch Event::OnDropsKill"; monster "1@dth3",0,0,"5 Points",1062,10,"Poring Punch Event::OnSantaPoringKill"; monster "1@dth3",0,0,"7 Points",1595,10,"Poring Punch Event::OnMarinKill"; monster "1@dth3",0,0,"-10 Points",1031,70,"Poring Punch Event::OnPoporingKill"; monster "1@dth3",0,0,"-30 Points",1904,5,"Poring Punch Event::OnBombPoringKill"; end;OnTimer310000: stopnpctimer; announce "Poring Punch Event has ended and the event Winner is "+$HighestPoringPointsName$+". Kindly please redeem your prize at me",0; killmonsterall "1@dth3"; set $@PoringEventChecker, 0; set $@PoringEventPrizeChecker, 1; sleep2 5000; mapannounce "1@dth3","You'll be warp at prontera in a short while.",16; sleep2 10000; mapwarp "1@dth3","prontera",155,166; end;}// MAPFLAGS1@dth3 mapflag nobranch1@dth3 mapflag noexp1@dth3 mapflag noskill1@dth3 mapflag nomemo//1@dth3 mapflag nopenalty1@dth3 mapflag pvp off1@dth3 mapflag nosave SavePoints1@dth3 mapflag noskill1@dth3 mapflag noteleport1@dth3 mapflag nowarp1@dth3 mapflag nowarpto1@dth3 mapflag noloot Hi. May someone fix this script for me. The NPC keep annouce the same winner.
-
@@iwarez Yes. You Still can use it. Just edit the the themes name and edit your application.php
-
@@pink8791 turn off your antivirus
-
@@iwarez just download the hercules fluxcp, and change your setting.