Jump to content
  • 0

Someone can help me with my script


mR L

Question


  • Group:  Members
  • Topic Count:  10
  • Topics Per Day:  0.00
  • Content Count:  177
  • Reputation:   25
  • Joined:  12/24/14
  • Last Seen:  

Hello everyone, can you help me with my script minning system ?

 

*Function

function    script    Minner    {
if(getarg(0)==2){
    undisguise;
    if(strcharinfo(3)=="cave"){warp "SavePoint",0,0;}
    end;
}

if(getarg(0)==1&&strcharinfo(3)=="cave"){
    if(getequipid(4)!=6010||getequipid(1)!=5031){end;}
    specialeffect2 154;
    set .@r,rand(1,900);
    if(.@r<=200){
    set .@im1,
    callfunc("F_RandMes", 7,
        969, 1002, 757, 756);    // Gold, ore, rough elu, rough ori
        getitem .@im,1;
    }
    if(.@r>200&&.@r<=300) {
        getitem 673,1;    // Bronze Coin
    }
    if(.@r>300&&.@r<=400) {
        getitem 7539,1;    // Poring Coin
    }
    if(.@r>400&&.@r<=500) {
        getitem 673,1;    // Bronze Coin
    }
    if(.@r>500&&.@r<=600) {
        getitem 969,1;    // Gold
    }
    if(.@r>600&&.@r<=800) {
    set .@im2,
    callfunc("F_RandMes", 7,
        969, 1002, 757, 756);    // Gold, ore, rough elu, rough ori
        getitem .@im,1;
    }
    if(.@r>800){
        getitem 7539,1;    // Poring Coin
    }
    end;
}

bonus bAspd,-80;
bonus bAtkRate,-100;
    if(getequipid(1)==5031)
    disguise 1838;
    else    {
    undisguise;
}
return;
}

-    script    Minnerx    -1,{
OnDo:
    callfunc "Minner",1;
    end;

OnLill:
    set .@t,1;

OnInit:
    if(!.@t)set .@t,10;
    monster     "cave",0,0,"--ja--",1907,.@t,"Minnerx::OnLill";
    monster     "cave",0,0,"--ja--",1908,.@t,"Minnerx::OnLill";
    end;
}

// ================== Map Flags ==================

cave    mapflag    nowarp
cave    mapflag    nowarpto
cave    mapflag    noteleport
cave    mapflag    nosave
cave    mapflag    nomemo
cave    mapflag    nobranch
cave    mapflag    noicewall
cave    mapflag    noskill

// =========== Weapon =============
// 6010,Pickaxe,Pickaxe,4,10,,10,10,,1,0,0xFFFFFFFF,7,0,34,0,0,0,0,{ callfunc "Minner",0; set @i$,"Minnerx::OnDo"; autobonus "{ doevent @i$; }",10000,1,BF_WEAPON; },{},{callfunc "Minner",2;}

// =========== Stone ============
//1907,S_EMPEL_1,Guardian Stone,Guardian Stone,90,2000000,0,0,0,0,1,1,40,50,1,1,1,1,1,1,0,0,0,0,20,0x120,300,1288,288,384,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0

 

Someone when I attack the Guardian Stone I can't get item

New Bitmap Image.bmp

Edited by Skorm
PLEASE USE CODEBOX next time ty
Link to comment
Share on other sites

2 answers to this question

Recommended Posts

  • 0

  • Group:  Forum Moderator
  • Topic Count:  33
  • Topics Per Day:  0.01
  • Content Count:  1268
  • Reputation:   381
  • Joined:  02/03/12
  • Last Seen:  

change 

callfunc("F_RandMes", 7, 969, 1002, 757, 756); 

to

callfunc("F_RandMes", 4, 969, 1002, 757, 756);

 

For other people reading this post F_RandMes was changed to F_Rand sometime in 2014 the new format is like...

callfunc("F_Rand",1129,1222,1163,1357,1360,1522,1811,1410);

 

  • Upvote 1
Link to comment
Share on other sites

  • 0

  • Group:  Members
  • Topic Count:  10
  • Topics Per Day:  0.00
  • Content Count:  177
  • Reputation:   25
  • Joined:  12/24/14
  • Last Seen:  

Thank you very much @Skorm

Love you ??  ? 

  • Upvote 1
Link to comment
Share on other sites

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...