Jump to content
  • 0
Bolby91

GOLD ROOM POINTS NOT WORKING 2018 CLIENT

Question

Hi my only problem in my goldroom script is i don't get points when i kill mobs. When i try to put it on my offline server 2018 client it is working how come on my online server it doesnt work i will you the script below please help me

//  _______   __      ____      ____         __    __  ____    __  __    __   __ __      __   __  ____    _      ____       
// /__  __/  / /     / __ \      / __ \    / / / / /__  \  / / /_/ __/ /_ / // /     / /__/ / /__  \  / /__  / __ \  _____
//   / /    / /_    / /_/ /     / / / /   / / / / ____/ / / / __  /_  __// // /     / _  _ / ____/ / / // / / /_/ / / __  \
//  / /    / __ \  / ____/     / / / /   / / / / / __  / / / / /   / /   \_  /     / // /// / __  / /  __/ / ____/ / /  /_/
// / /    / / / / / /__          / /_/ /_  / /_/ / / /_/ / / / / /   / /   __/ /     / // /// / /_/ / / _ \  / /__      / /
///_/    /_/ /_/  \____/      \_______/ \____/  \____/ /_/ /_/   /_/    \__/     /_//_///  \____/ /_/ \_\ \____/ /_/
//=============================================================================
//
//   Gold Room Advance Script - Mining Gold for wealth - Please Leave Credit   \\
//=============================================================================
//===== Compatible With: =================================================================
//= Any eAthena Version
//=============Gold Room Settings===================
//This should always be enable for a better Gold Room System.
//==================================================
//ordeal_1-2    mapflag    noskill
ordeal_1-2    mapflag    nomemo
ordeal_1-2    mapflag    nobranch
ordeal_1-2    mapflag    noloot 
ordeal_1-2    mapflag    noexp
ordeal_1-2    mapflag    nodrop
ordeal_1-2    mapflag    novending
ordeal_1-2    mapflag    nowarp
//ordeal_1-2    mapflag    nowarpto
ordeal_1-2    mapflag    pvp
//ordeal_1-2    mapflag    noreturn
//=================================================

ordeal_1-2,0,0,0    script    Gold Room    -1,{

OnInit:
//No. of Mine Guardian.
//For golden peko it is default to 100 and 4 seconds~2 seconds spawn rate.
    set .guardian,50;

//Type of guardian. 0 = normal 1 = extreme
    set [email protected],0;

    if([email protected] == 0){
        monster "ordeal_1-2",0,0,"Guard Pacific",1369,.guardian,"";    
    }else{
        monster "ordeal_1-2",0,0,"Guard Pacific",1369,.guardian,"";
    }
end;
OnNPCKillEvent:
//===== Configurations: ========================================================================

//Max gold can a player get after killing 1 golden peko (default 5 note:this will increase if luk bonus is enable).
    set [email protected],5;

//Apply gold penalty. 0 = no 1 = yes
    set [email protected],0;

//The Maximum no. of gold Penalty.
    set [email protected],0;

//Apply speed & HP penalty. 0 = no 1 = yes 
    set [email protected],0;

//Gold limitation penalty must be enable
    set [email protected],9999;

//The maximum no. of hp penalty by %.
    set [email protected],0;

//Enable luk bonus. 0=no 1=yes
    set [email protected],0;

//If luk Bonus is enable,luk divider default 49 w/ 99 max parameter. Note: the quotient of your max parameter and [email protected] must not grater than 5 to avoid over mining.
    set [email protected],49;

//Show Server Name. 0=no 1=yes
    set [email protected],1;

//Name of your Server
    set [email protected]$,"[The Quality Maker]";

//=========================================================================================


if (getmapxy(@mapname$,@mapx,@mapy,0) == -1) goto L_Finish;
if (@mapname$ == "ordeal_1-2"){
    set @bonus,0;
    set @deduction,0;
    set @gain,rand ([email protected]);

//Luk bonus
    if ([email protected] != 0){
        set @bonus,readparam(bLuk)/[email protected];
    }

//Gold Penalty
    if ([email protected] != 0){
        set @deduction,rand([email protected]);
        if(@deduction == 0) set @deduction,1;    
    }

    set @gain, @gain + @bonus - @deduction;
    set gold, gold + @gain ;

//Displaying Gained Gold
    if([email protected] != 0){
        if(gold%5 == 0){ //Show Server Name every 10 gold gain.
            dispbottom "===============Brought to you by===============";
            dispbottom "==============" + [email protected]$ +"==============";
        }
    }

    if(@gain){
         dispbottom "-|You got: " [email protected]+ " gold| - |Total: " +gold+ " gold|- ";

    }else{
        dispbottom "-|You got: NOTHING! |- ";
    }

    if ([email protected] != 0){
        if (gold >= [email protected]/2 && gold <[email protected]/2+20){
             sc_start    SC_DECREASEAGI,240000,10;         
        }else if(gold >[email protected]){
             percentheal ([email protected]*-1),([email protected]*-1);
             heal 0,0; //For him to die
        }
    }

    if(paid == 0){
        mapannounce "ordeal_1-2"," x( "+strcharinfo(0)+" is a cheater!",bc_map;
        dispbottom "Go out you bastard!";
        set gold,0;
        warp "prontera", 172, 152;
    }
        end;
}


OnPCDieEvent: 

if (getmapxy(@mapname$,@mapx,@mapy,0) == -1) goto L_Finish;
if (@mapname$ == "ordeal_1-2"){
        dispbottom "Holy Shit you died!";
        dispbottom "All of your gold will be gone!";
        set alive, 0;
        set paid, 0;
        end;
}

L_Finish:
end;
}

//===============================================
//warper
//===============================================
ordeal_1-2,154,156,5    script    Gold Miner    813,{
    mes "[Gold Miner]";
    if(gold >=50){
        goto wa;
    }
    mes "Want to go now?";
    mes "Your gold is just "+gold+" you can still get more.";
    end;
wa:
    mes "Want to go now?";
     if(select("Yes", "No") == 1) {
        set alive,1;
                warp "prontera", 156, 188;
        }
    end;
}

prontera,158,180,4    script    Gold Room#pront    813,{
    set @name$,"prontera";
    callfunc "goldmain";
}

aldebaran,133,116,6    script    Gold Room Warperer#alde    813,{
    set @name$,"aldebaran";
    callfunc "goldmain";
    end;
}

alberta,32,242,4    script    Gold Room Warperer#alb    813,{
    set @name$,"alberta";
    callfunc "goldmain";
    end;
}
payon,184,106,4    script    Gold Room Warperer#pay    813,{
    set @name$,"payon";
    callfunc "goldmain";
    end;
}

geffen,117,108,6    script    Gold Room Warperer#gef    813,{
    set @name$,"geffen";
    callfunc "goldmain";
    end;
}

function    script    goldmain    {
    if (getgmlevel() >= 90){
        mes "[Gold Room Warperer]";
    if(sex != 0){
        mes "Hello Sir what can I do for you?";
    }else{
        mes "Hello Maam what can I do for you?";
    }

    next;
    menu "Enter Mining Site",start,"Please end the mine Site. Now!",-,"Please Open the mine Site. Now!",G_open,"Nothing",C_s;
    next;
    mes "[Gold Room Warperer]";
    mapannounce "ordeal_1-2","Excuse me Miners.",bc_map;
    mes "Ok.";
    next;
    mapannounce "ordeal_1-2",strcharinfo(0) +" wants to end the Gold Room for a while",bc_map;
    mes "Just a second I will just ask them to";
    mes "go out in the mining site";
    next;
    mapannounce "ordeal_1-2","Please settle your things and move quitely",bc_map;
    mes "[Gold Room Warperer]";
    mes ".............";
    mes "........";
    next;
    mes "[Gold Room Warperer]";
    mes "Ok your done";
    set .opengoldroom,1;
    areawarp "ordeal_1-2",21,286,286,22,"prontera", 156, 105;
OnInit:
    waitingroom "Hunting Gold Room",0;
    end;
    }

    if(.opengoldroom == 0){
        goto start;
    }else{
        mes "[Gold Room Warperer]";
        mes "Sorry!";
        mes "The Mining Site is endd.";
        end;
    }
G_open:
    mes "[Gold Room Warperer]";
    mes "Ok.";
    mes "Mining Site is Already Available.";
    announce " Gold Room is open for public!",bc_map;
    set .opengoldroom,0;
end;

start:
    if ( alive == 0){
        set gold,0;
    }
    mes "[Gold Room Warperer]";
    mes "What do you want?";
    next;
    menu "To the Gold Room",-,"Exchange Gold",exchange,"Nothing",C_s;
    mes "[Gold Room Warperer]";
    mes "Hmm..";
    mes "It cost 100,000z";
        mes "Would you like to go now to the gold room?";
        if(select("Yes", "No") == 1) {
        if(@name$ == "prontera") savepoint "prontera", 172, 152;
        if(@name$ == "aldebaran") savepoint "aldebaran",154, 120;
        if(@name$ == "alberta") savepoint "alberta",32, 234;
        if(@name$ == "payon") savepoint "payon",184, 98;
        if(@name$ == "geffen") savepoint "geffen",124, 85;
        if (Zeny < 100000) goto nomoney;
        set Zeny, Zeny - 100000;
        set alive, 1;
        set paid, 1;
                warp "ordeal_1-2", 156, 155;
        
        }
        end;
nomoney:
    mes "[Gold Room Warperer]";
    mes "Sorry insufficient balance";
    end;
exchange:

    setarray [email protected][0],969;
for( set [email protected],0; [email protected] < getarraysize( [email protected] ); set [email protected],[email protected] + 1 )
    set [email protected]$,[email protected]$ + getitemname( [email protected][[email protected]] )+":";
if( gold < 1 ){
    mes "bobo wala kana";
}else{
    mes "How many do you want ma nigga?";
    mes "Amount: "+( gold / 1 );
    set [email protected],( select( [email protected]$ ) - 1 );
    input [email protected],0,( gold / 1 );
    if( [email protected] ){
        getitem [email protected][[email protected]],[email protected];
        set gold,gold - ( [email protected] * 1 );
        mes "Done";
    }
}
    end;
L_OverWeight:
    mes "[Gold Room Warperer]";
    mes "Sorry your overweight";
    end;
nogold:
    end;
C_s:
    end;
}


//============================================================

//===========================================================
//========================================
//warps you may edit this one for your convenience
//========================================
ordeal_1-2,73,265,0    warp    ord500    1,1,prontera,156,188
ordeal_1-2,129,194,0    warp    ord501    1,1,prontera,156,188
ordeal_1-2,130,194,0    warp    ord502    1,1,prontera,156,188
ordeal_1-2,178,193,0    warp    ord503    1,1,prontera,156,188
ordeal_1-2,290,130,0    warp    ord504    1,1,prontera,156,188
ordeal_1-2,241,281,0    warp    ord505    1,1,prontera,156,188
ordeal_1-2,66,25,0     warp    ord506    1,1,prontera,156,188
ordeal_1-2,202,129,0    warp    ord509    1,1,prontera,156,188
ordeal_1-2,105,154,0    warp    ord510    1,1,prontera,156,188

//============Spawns=================

ordeal_1-2,0,0,0,0    monster    Golden Pecopeco    1369,1000,0,0,0
ordeal_1-2,0,0,0,0    monster    Golden Pecopeco    1369,1000,0,0,0
ordeal_1-2,0,0,0,0    monster    Golden Pecopeco    1369,1000,0,0,0
ordeal_1-2,0,0,0,0    monster    Golden Pecopeco    1369,1000,0,0,0
//ordeal_1-2,0,0,0,0    monster    Golden Pecopeco    1369,300,40000,20000,0
//ordeal_1-2,0,0,0,0    monster    Golden Pecopeco    1369,300,40000,20000,0
//ordeal_1-2,0,0,0,0    monster    Golden Pecopeco    1369,50,40000,20000,0
//ordeal_1-2,0,0,0,0    monster    Golden Pecopeco    1369,30,40000,20000,0
//ordeal_1-2,0,0,0,0    monster    Golden Pecopeco    1369,30,40000,20000,0
//ordeal_1-2,0,0,0,0    monster    Golden Pecopeco    1369,30,40000,20000,0
//ordeal_1-2,0,0,0,0    monster    Golden Pecopeco    1369,20,40000,20000,0

 

Edited by Emistry
codebox
Link to comment
Share on other sites

3 answers to this question

Recommended Posts

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Answer this question...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.



×
×
  • Create New...

Important Information

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