Jump to content

madtoyz

Members
  • Posts

    146
  • Joined

  • Last visited

  • Days Won

    1

Posts posted by madtoyz

  1. @mrfiziTak mampu nak onlinekan sebab banyak urusan sekarang tak seperti dulu kala 😆

    @Akbare-2ndkamu masih juga aktif giat dalam rathena ? sepertinya saya jauh ketinggalan 🫠

     

    Sekarang cuma bermain secara offline mode saja hahaha..Banyak perubahan ketara dalam emulator rathena dan juga hercules. Dulu cerita pasal 3rd job, sekarang ragnarok sudah di fasa 4th job. Sepertinya game ini sahaja yang masih bertahan sehingga kini walau mencecah 2 dekad,

  2. Assalamualaikum dan salam sejahtera, Kali terakhir disini tahun 2013. Tengah malam tadi godek komputer tengok ada client offline dalam folder dan teringat dengan forum ni........

  3. bonus bAllStats,3; bonus2 bSubRace,7,10; bonus3 bAutoSpell,"MG_SAFETYWALL",1,2; if(readparam(bStr)>=100) { bonus bBaseAtk,20; };
    
    bonuse bAllStats,2; bonus2 bAddRace,7,15; bonus2 bSubRace,7,-7; bonus bMaxHPrate,2; bonus bMaxSPrate,2; bonus3 bAutoSpell,"NPC_CRITICALWOUND",1,30;
    
    bonus bAllStats,2; bonus bLongAtkRate,7; if(readparam(bStr)>=105) { bonus bLongAtkRate,3; }; if(readparam(bDex)>=85) { bonus bLongAtkRate,5; }; bonus bMaxHPrate,2; bonus bMaxSPrate,2;
    

     

    thanks 2834


    1. Reduce damage taken from DemiHuman monster by 10%..Add a chance of auto casting Level 1 Safety Wall when dealing physical damage(0.02%).Allstat +3..str more than 100(without modifier) add damage/attack 20%
    2. Increases physical attack against DemiHuman monster by 15%..Receive Physical Damage From Demi-Human 7% ...allstat +2..Hp/Sp Increment 5% ...Autocasting lvl1 Critical Wound while melee Attacking
    3. Add Range Damage 7% .. Str More Than 105(Without Modifier) Add 3% ...Dex More Than 85(Without Modifier) add 5% ..AllStat +2 Hp/Sp Increment 3%
  4. Hmmm, even with this guide, it only works for 3 Garment Id right?

    If you replace the official Wings and Backpack only right?

    Or this guide is for adding unlimited garment as long as you keep renaming? :o

     

    unlimited... all items can use,as long as you do step step 4(copy paste item ¾Ç¼¼»ç¸® to ·Îºê),

    certain server do this for weapon but im use it for garment 

    577178_10200689869428883_1462178400_n.jp

     

    and also can make it become costume garment. (do the same guide but only change numID at item_db2.txt)

    1098324_10200691961081173_1935358614_n.j

    Now I finished making and positioning my Sprite. And I have no Idea how to add it to my offline server. I tried the guides but I have no luck. I tried replacing one with mine, but I get errors

     

    what the problem you get ?

  5.                     Announce "Satan Catcher Event is being held!",bc_all;
                        sleep 5000;
                        Announce "The warp portal has appeared in izlude infront of me!",bc_all;
                        enablenpc "satanevent";
                        initnpctimer;
                        end;
    

    Right above that, so it will look like this:

    case 2: next;
                        mes .@name$;
                        mes "Starting Event...";
                        close2;
                        OnClockXXXX: //Placing this here, will have it start the NPC event.
                        Announce "Satan Catcher Event is being held!",bc_all;
                        sleep 5000;
                        Announce "The warp portal has appeared in izlude infront of me!",bc_all;
                        enablenpc "satanevent";
                        initnpctimer;
                        end;
    

    *Note - While this WILL make it auto-start. It will also error out the script, because the rewards aren't set. To fix this, simply change the $@Variables   into    $Variables.  This is because $@ is a Temp-Global var, and well, with an event like this that will continue to run and be on the server, you might as well use perm-global vars. 2 or 3 of these isn't gonna hurt your servers performancec at all.

     

    when i find (ctrl+f) in script..i dont find any $@Variables ..

    this is my script after editing OnClock

    //Made by Karul
    //==========Start/Announcer NPC
    izlude,142,184,3	script	Satan Catcher Event	793,{
    
    set .@name$,"^9932CC[Satan Catcher] ^000000";
    
    if(getgmlevel() < 80) { 
    	mes .@name$;
    	mes "Sorry you are no Level 80 GM";
    	close;
    	} else {
    	L_Main:
    	mes .@name$;
    	mes "What do you want to do?";
    	switch(select("Item [" + getitemname($@SatanReward)  + "]:Start Event")) {
    			case 1: next;
    					mes .@name$;
    					mes "What item do you want as the reward?";
    					input $@SatanReward;
    					next;
    					mes .@name$;
    					mes "How many of that item(s) do you want to give?";
    					input $@SatanRewardItems;
    					next;
    					mes .@name$;
    					mes "This is your amount:";
    					mes ""+$@SatanRewardItems+"";
    					next;
    					goto L_Main;
    			case 2: next;
    					mes .@name$;
                        mes "Starting Event...";
                        close2;
                        OnClock0000: //Placing this here, will have it start the NPC event.
    					OnClock0200:
    					OnClock0400:
    					OnClock0600:
    					OnClock0800:
    					OnClock1000:
    					OnClock1200:
    					OnClock1400:
    					OnClock1600:
    					OnClock1800:
    					OnClock2000:
    					OnClock2200:
                        Announce "Satan Catcher Event is being held!",bc_all;
                        sleep 5000;
                        Announce "The warp portal has appeared in izlude infront of me!",bc_all;
                        enablenpc "satanevent";
                        initnpctimer;
                        end;
    					
    					OnTimer30000:
    							Announce "Thirty Seconds Have Passed By!",bc_all;
    							sleep 5000;
    							Announce "Hurry to infront of me if you want to join!",bc_all;
    							end;
    							
    					OnTimer40000:
    							Announce "Twenty seconds left!",bc_all;
    							end;
    							
    					OnTimer50000:
    							Announce "Ten seconds left!",bc_all;
    							end;
    							
    					OnTimer55000:
    							Announce "5!",bc_all;
    							sleep 1000;
    							Announce "4!",bc_all;
    							sleep 1000;
    							Announce "3!",bc_all;
    							sleep 1000;
    							Announce "2!",bc_all;
    							sleep 1000;
    							Announce "1!",bc_all;
    							sleep 1000;
    							Announce "0!",bc_all;
    							sleep 1000;
    							disablenpc "satanevent";
    							donpcevent "Rewarder::OnEnable";
    							stopnpctimer;
    							end;
    		}
    	}
    OnInit:
            disablenpc "satanevent";
            hideonnpc "Rewarder";
    }
    
    //=================Warp NPC
    izlude,140,182,0	warp	satanevent	1,1,2008rwc_08,50,51
    
    //=================Reward NPC
    2008rwc_08,50,51,5	script	Rewarder	793,{
    
    set .@sname$,"[Rewarder]";
    
    	mes .@sname$;
    	if(.@SATAN == 1) goto L_SATAN;
    	mes "Please tell me your name.";
    	next;
    	input .@charname$;
    	if(.@charname$ != strcharinfo(0)) {
    		mes .@name$;
    		mes "Are you sure that is your character name?";
    		close;
    	}
    	mes .@name$;
    	mes "Congratulations You Have Won!";
    	Announce "Congratulations to " + .@charname$ + "! He / She has won " + $@SatanRewardItems + " " + getitemname($@SatanReward)  + "(s)!",bc_all;
    	getitem $@SatanReward,$@SatanRewardItems;
    	atcommand "@go 0";
    	hideonnpc "Rewarder";
    	end;
    	
    L_SATAN:
    	mes .@sname$;
    	mes "Please tell me your name";
    	next;
    	input .@charname$;
    	if(.@charname$ != strcharinfo(0)) {
    		mes .@name$;
    		mes "Are you sure that is your character name?";
    		close;
    	}
    	mes .@name$;
    	mes "Congratulations You Have Won!";
    	Announce "Congratulations to " + .@charname$ + "! He / She has won " + $@SatanRewardItems + " " + getitemname($@SatanReward)  + "(s)!",bc_all;
    	getitem $@SatanReward,$@SatanRewardItems;
    	set SATAN,0;
    	atcommand "@go 0";
    	hideonnpc "Rewarder";
    	end;
    	
    OnEnable:
    	set .@aname$,"[Rewarder]";
    	
    	mapannounce "2008rwc_08","" + .@aname$ + ": I will be summoning 100 different kinds of Satan Morroc.",16;
    	sleep 5000;
    	mapannounce "2008rwc_08","" + .@aname$ + ": Only one of these Satan Morrocs are the real one.",16;
    	sleep 5000;
    	mapannounce "2008rwc_08","" + .@aname$ + ": The correct one will be called 'Satan Morroc'.",16;
    	sleep 5000;
    	mapannounce "2008rwc_08","" + .@aname$ + ": Kill the wrong one, you're out. Kill the right one, you win.",16;
    	sleep 5000;
    	mapannounce "2008rwc_08","" + .@aname$ + ": Now let's play!",16;
    	goto L_Start;
    	end;
    
    L_Start:
    	set .@aname$,"[Rewarder]";
    
    	mapannounce "2008rwc_08","" + .@aname$ + ": 5!",16;
    	sleep 1000;
    	mapannounce "2008rwc_08","" + .@aname$ + ": 4!",16;
    	sleep 1000;
    	mapannounce "2008rwc_08","" + .@aname$ + ": 3!",16;
    	sleep 1000;
    	mapannounce "2008rwc_08","" + .@aname$ + ": 2!",16;
    	sleep 1000;
    	mapannounce "2008rwc_08","" + .@aname$ + ": 1!",16;
    	sleep 1000;
    	mapannounce "2008rwc_08","" + .@aname$ + ": GO!",16;
    	sleep 1000;
    	areamonster "2008rwc_08",39,63,63,45,"Satan Morroc",4200,1,"satanwin::OnMobKilled";
    	areamonster "2008rwc_08",63,63,37,46,"Satanic Morroc",4200,10,"satanlose::OnMobKilled";
    	areamonster "2008rwc_08",39,63,63,45,"Satan Moroc",4200,10,"satanlose::OnMobKilled";
    	areamonster "2008rwc_08",63,63,37,46,"Satan Morocc",4200,10,"satanlose::OnMobKilled";
    	areamonster "2008rwc_08",39,63,63,45,"Satin Mrroc",4200,10,"satanlose::OnMobKilled";
    	areamonster "2008rwc_08",63,63,37,46,"I am Satan Morroc",4200,5,"satanlose::OnMobKilled";
    	areamonster "2008rwc_08",39,63,63,45,"Corrom Natas",4200,1,"satanlose::OnMobKilled";
    	areamonster "2008rwc_08",63,63,37,46,"SaTaN MoRrOc",4200,1,"satanlose::OnMobKilled";
    	areamonster "2008rwc_08",39,63,63,45,"Sattan Morroc",4200,1,"satanlose::OnMobKilled";
    	areamonster "2008rwc_08",63,63,37,46,"Say Ten More Rocks",4200,10,"satanlose::OnMobKilled";
    	areamonster "2008rwc_08",39,63,63,45,"Satan of the Morroc",4200,10,"satanlose::OnMobKilled";
    	areamonster "2008rwc_08",63,63,37,46,"Morroc's Satan",4200,10,"satanlose::OnMobKilled";
    	areamonster "2008rwc_08",39,63,63,45,"S4t4n M0rr0c",4200,10,"satanlose::OnMobKilled";
    	areamonster "2008rwc_08",63,63,37,46,"Saten Morroc",4200,10,"satanlose::OnMobKilled";
    	areamonster "2008rwc_08",39,63,63,45,"Stan Morrc",4200,1,"satanlose::OnMobKilled";
    	end;
    }
    
    //========Killed the right one
    -	script	satanwin	-1,{
    
    	set .@aname$,"[Rewarder]";
    
    OnMobKilled:
    	dispbottom "Satan Morroc: ASDFGHJKL; You found me.";
    	set .@SATAN,1;
    	atcommand "@doommap";
    	killmonster "2008rwc_08","All";
    	mapannounce "2008rwc_08","" + .@aname$ + " Come to me and tell me your name.",16;
    	hideoffnpc "Rewarder";
    	end;
    }
    
    //========Killed the wrong one
    -	script	satanlose	-1,{
    
    OnMobKilled:
    	dispbottom "Satan Morroc: ASDFGHJKL; You haven't found my twin!";
    	atcommand "@go 0";
    	end;
    }
    
    // -- Mapflags (If Wanted)
    2008rwc_08	mapflag	nowarp
    2008rwc_08	mapflag	nowarpto
    2008rwc_08	mapflag	noteleport
    2008rwc_08	mapflag	nosave
    2008rwc_08	mapflag	nomemo
    2008rwc_08	mapflag	nobranch
    2008rwc_08	mapflag	noloot
    2008rwc_08	mapflag	noskill
    2008rwc_08	mapflag	nopenalty
    

    BUMP

  6. Which part i need to writedown the OnClock in this script ?

     

    //Made by Karul
    //==========Start/Announcer NPC
    izlude,142,184,3    script    Satan Catcher Event    793,{
    
    set .@name$,"^9932CC[Satan Catcher] ^000000";
    
    if(getgmlevel() < 80) {
        mes .@name$;
        mes "Sorry you are no Level 80 GM";
        close;
        } else {
        L_Main:
        mes .@name$;
        mes "What do you want to do?";
        switch(select("Item [" + getitemname($@SatanReward) + "]:Start Event")) {
                case 1: next;
                        mes .@name$;
                        mes "What item do you want as the reward?";
                        input $@SatanReward;
                        next;
                        mes .@name$;
                        mes "How many of that item(s) do you want to give?";
                        input $@SatanRewardItems;
                        next;
                        mes .@name$;
                        mes "This is your amount:";
                        mes ""+$@SatanRewardItems+"";
                        next;
                        goto L_Main;
                case 2: next;
                        mes .@name$;
                        mes "Starting Event...";
                        close2;
                        Announce "Satan Catcher Event is being held!",bc_all;
                        sleep 5000;
                        Announce "The warp portal has appeared in izlude infront of me!",bc_all;
                        enablenpc "satanevent";
                        initnpctimer;
                        end;
                        
                        OnTimer30000:
                                Announce "Thirty Seconds Have Passed By!",bc_all;
                                sleep 5000;
                                Announce "Hurry to infront of me if you want to join!",bc_all;
                                end;
                                
                        OnTimer40000:
                                Announce "Twenty seconds left!",bc_all;
                                end;
                                
                        OnTimer50000:
                                Announce "Ten seconds left!",bc_all;
                                end;
                                
                        OnTimer55000:
                                Announce "5!",bc_all;
                                sleep 1000;
                                Announce "4!",bc_all;
                                sleep 1000;
                                Announce "3!",bc_all;
                                sleep 1000;
                                Announce "2!",bc_all;
                                sleep 1000;
                                Announce "1!",bc_all;
                                sleep 1000;
                                Announce "0!",bc_all;
                                sleep 1000;
                                disablenpc "satanevent";
                                donpcevent "Rewarder::OnEnable";
                                stopnpctimer;
                                end;
            }
        }
    OnInit:
    disablenpc "satanevent";
    hideonnpc "Rewarder";
    }
    
    //=================Warp NPC
    izlude,140,182,0    warp    satanevent    1,1,2008rwc_08,50,51
    
    //=================Reward NPC
    2008rwc_08,50,51,5    script    Rewarder    793,{
    
    set .@sname$,"[Rewarder]";
    
        mes .@sname$;
        if(.@SATAN == 1) goto L_SATAN;
        mes "Please tell me your name.";
        next;
        input .@charname$;
        if(.@charname$ != strcharinfo(0)) {
            mes .@name$;
            mes "Are you sure that is your character name?";
            close;
        }
        mes .@name$;
        mes "Congratulations You Have Won!";
        Announce "Congratulations to " + .@charname$ + "! He / She has won " + $@SatanRewardItems + " " + getitemname($@SatanReward) + "(s)!",bc_all;
        getitem $@SatanReward,$@SatanRewardItems;
        atcommand "@go 0";
        hideonnpc "Rewarder";
        end;
        
    L_SATAN:
        mes .@sname$;
        mes "Please tell me your name";
        next;
        input .@charname$;
        if(.@charname$ != strcharinfo(0)) {
            mes .@name$;
            mes "Are you sure that is your character name?";
            close;
        }
        mes .@name$;
        mes "Congratulations You Have Won!";
        Announce "Congratulations to " + .@charname$ + "! He / She has won " + $@SatanRewardItems + " " + getitemname($@SatanReward) + "(s)!",bc_all;
        getitem $@SatanReward,$@SatanRewardItems;
        set SATAN,0;
        atcommand "@go 0";
        hideonnpc "Rewarder";
        end;
        
    OnEnable:
        set .@aname$,"[Rewarder]";
        
        mapannounce "2008rwc_08","" + .@aname$ + ": I will be summoning 100 different kinds of Satan Morroc.",16;
        sleep 5000;
        mapannounce "2008rwc_08","" + .@aname$ + ": Only one of these Satan Morrocs are the real one.",16;
        sleep 5000;
        mapannounce "2008rwc_08","" + .@aname$ + ": The correct one will be called 'Satan Morroc'.",16;
        sleep 5000;
        mapannounce "2008rwc_08","" + .@aname$ + ": Kill the wrong one, you're out. Kill the right one, you win.",16;
        sleep 5000;
        mapannounce "2008rwc_08","" + .@aname$ + ": Now let's play!",16;
        goto L_Start;
        end;
    
    L_Start:
        set .@aname$,"[Rewarder]";
    
        mapannounce "2008rwc_08","" + .@aname$ + ": 5!",16;
        sleep 1000;
        mapannounce "2008rwc_08","" + .@aname$ + ": 4!",16;
        sleep 1000;
        mapannounce "2008rwc_08","" + .@aname$ + ": 3!",16;
        sleep 1000;
        mapannounce "2008rwc_08","" + .@aname$ + ": 2!",16;
        sleep 1000;
        mapannounce "2008rwc_08","" + .@aname$ + ": 1!",16;
        sleep 1000;
        mapannounce "2008rwc_08","" + .@aname$ + ": GO!",16;
        sleep 1000;
        areamonster "2008rwc_08",39,63,63,45,"Satan Morroc",4200,1,"satanwin::OnMobKilled";
        areamonster "2008rwc_08",63,63,37,46,"Satanic Morroc",4200,10,"satanlose::OnMobKilled";
        areamonster "2008rwc_08",39,63,63,45,"Satan Moroc",4200,10,"satanlose::OnMobKilled";
        areamonster "2008rwc_08",63,63,37,46,"Satan Morocc",4200,10,"satanlose::OnMobKilled";
        areamonster "2008rwc_08",39,63,63,45,"Satin Mrroc",4200,10,"satanlose::OnMobKilled";
        areamonster "2008rwc_08",63,63,37,46,"I am Satan Morroc",4200,5,"satanlose::OnMobKilled";
        areamonster "2008rwc_08",39,63,63,45,"Corrom Natas",4200,1,"satanlose::OnMobKilled";
        areamonster "2008rwc_08",63,63,37,46,"SaTaN MoRrOc",4200,1,"satanlose::OnMobKilled";
        areamonster "2008rwc_08",39,63,63,45,"Sattan Morroc",4200,1,"satanlose::OnMobKilled";
        areamonster "2008rwc_08",63,63,37,46,"Say Ten More Rocks",4200,10,"satanlose::OnMobKilled";
        areamonster "2008rwc_08",39,63,63,45,"Satan of the Morroc",4200,10,"satanlose::OnMobKilled";
        areamonster "2008rwc_08",63,63,37,46,"Morroc's Satan",4200,10,"satanlose::OnMobKilled";
        areamonster "2008rwc_08",39,63,63,45,"S4t4n M0rr0c",4200,10,"satanlose::OnMobKilled";
        areamonster "2008rwc_08",63,63,37,46,"Saten Morroc",4200,10,"satanlose::OnMobKilled";
        areamonster "2008rwc_08",39,63,63,45,"Stan Morrc",4200,1,"satanlose::OnMobKilled";
        end;
    }
    
    //========Killed the right one
    -    script    satanwin    -1,{
    
        set .@aname$,"[Rewarder]";
    
    OnMobKilled:
        dispbottom "Satan Morroc: ASDFGHJKL; You found me.";
        set .@SATAN,1;
        atcommand "@doommap";
        killmonster "2008rwc_08","All";
        mapannounce "2008rwc_08","" + .@aname$ + " Come to me and tell me your name.",16;
        hideoffnpc "Rewarder";
        end;
    }
    
    //========Killed the wrong one
    -    script    satanlose    -1,{
    
    OnMobKilled:
        dispbottom "Satan Morroc: ASDFGHJKL; You haven't found my twin!";
        atcommand "@go 0";
        end;
    }
    
    // -- Mapflags (If Wanted)
    2008rwc_08    mapflag    nowarp
    2008rwc_08    mapflag    nowarpto
    2008rwc_08    mapflag    noteleport
    2008rwc_08    mapflag    nosave
    2008rwc_08    mapflag    nomemo
    2008rwc_08    mapflag    nobranch
    2008rwc_08    mapflag    noloot
    2008rwc_08    mapflag    noskill
    2008rwc_08    mapflag    nopenalty
     
  7. //Thread Merchant ------
    alberta,65,123,6 script Man#dbq 85,{
    if(DANZO_QUEST == 3 && $@beardMobD) goto L_KILLED;
    if(DANZO_QUEST > 3) goto L_DONE;
    mes "[Thread Merchant]";
    mes "ARGGG!! I can never get my stuff to Al de Baran!";
    mes "I keep getting mobbed by some bugs.";
    mes "They steal all my supplies and ^8080FFThread^000000.";
    next;
    mes "[Thread Merchant]";
    if(DANZO_QUEST != 3) mes "What am I to do?";
    if(DANZO_QUEST != 3) close;
    if($@danzomob > 0) mes "Kill! Kill them already!!!";
    if($@danzomob > 0) close;
    mes "Are you here to help me?";
    emotion 1;
    next;
    menu "Yes",-,"No",M_NO;
    mes "[Thread Merchant]";
    mes "Oh thank the Gods!";
    mes "If you can only just kill the bugs I would be able to make my delivery.";
    next;
    mes "[Thread Merchant]";
    mes "Oh NO! Here they come!!";
    emotion 19;
    donpcevent "BRDQ_MOBS::OnStart";
    close;
    L_KILLED:
    set $@danzoMobD,0;
    mes "[Thread Merchant]";
    mes "Thank you for killing the Thief Bugs.";
    mes "As a token of my gratitude here is a box full of ^8080FFThread^000000.";
    set DANZO_QUEST,4;
    close;
    L_DONE:
    mes "[Thread Merchant]";
    mes "Thank you again!";
    emotion 15;
    close;
    M_NO:
    mes "[Thread Merchant]";
    mes "What to do...";
    close;
    }
    //mobsummons -------
    alberta,1,1,1 script BRDQ_MOBS -1,{
    OnStart:
    set $@danzoMob,10;
    set $@danzoMobD,0;
    monster "alberta",65,120,"Thef Bug Male",1054,1,"BRDQ_MOBS::OnDie";
    monster "alberta",66,120,"Thef Bug Male",1054,1,"BRDQ_MOBS::OnDie";
    monster "alberta",67,120,"Thef Bug Male",1054,1,"BRDQ_MOBS::OnDie";
    monster "alberta",68,120,"Thef Bug Male",1054,1,"BRDQ_MOBS::OnDie";
    monster "alberta",66,121,"Thef Bug Male",1054,1,"BRDQ_MOBS::OnDie";
    monster "alberta",67,121,"Thef Bug Male",1054,1,"BRDQ_MOBS::OnDie";
    monster "alberta",68,121,"Thef Bug Male",1054,1,"BRDQ_MOBS::OnDie";
    monster "alberta",66,122,"Thef Bug Male",1054,1,"BRDQ_MOBS::OnDie";
    monster "alberta",67,122,"Thef Bug Male",1054,1,"BRDQ_MOBS::OnDie";
    monster "alberta",68,122,"Thef Bug Male",1054,1,"BRDQ_MOBS::OnDie";
    end;
    OnDie:
    set $@beardmob, $@beardmob - 1;
    if($@beardmob > 0) end;
    set $@beardMobD,1;
    end;
    On1201:
    On0001:
    set $@beardMob,0;
    set $@beardMobD,0;
    end;
    }
    

    have player do this quest got kill the mob,

    and got others cant,and npc say

    L_DONE:
    mes "[Thread Merchant]";
    mes "Thank you again!";
    emotion 15;
    close;
    

×
×
  • Create New...