Jump to content

rappar

Members
  • Posts

    11
  • Joined

  • Last visited

Posts posted by rappar

  1. How can I make this a 1 time only and account based?

    everytime i login it always at 100,000.

    	-	script	Sample	-1,{
    	
    OnPCLoginEvent:
    dispbottom "You gained 100,000 cashpoint!!! Enjoy!";
    set #CASHPOINTS,CASHPOINTS+100000;
    end;
    }

    thanks

  2.  

    //============================================================
    //= Healer & Buffs NPC
    //===== By: ==================================================
    //= Nasagnilac
    //===== Current Version: =====================================
    //= 1
    //===== Compatible With: =====================================
    //= rAthena/hercules Project
    //===== Description: =========================================
    //= A npc where you can take a free buffs and heal depends on
    //= the level required added in the settings. You can also add
    //= delay time to avoid spamming the npc. Buffs is optional and
    //= can be on and off in the settings.
    
    //===== Contact: =============================================
    //= If there is a problem or request for the script you can
    //= contact me on the following:
    //= Skype: nasagnilac.lerion
    //= Facebook: nl073092
    
    -	script	Healer	-1,{
    
    OnTouch:
    	set .@price, (.Price * BaseLevel);
    	if(BaseLevel <= LevelPay){
    		.@price = 0;
    	}
    	if (#BuffCooldown > gettimetick(2)){
    		set .@k,#BuffCooldown - gettimetick(2);
    			set .@m,.@k % 3600 / 60;
    			set .@s,.@k % 60;
    		set .@m$, .@m+" minute"+((.@m <= 1)?"":"s");
    		set .@s$, .@s+" second"+((.@s <= 1)?"":"s");
    		set .@time$,""+((.@m >= 1 )?""+.@m$+" ":"")+""+((.@s >=1 )?""+.@s$+"":"")+"";
    		npctalk strnpcinfo(1)+ ": Please wait "+.@time$+" before you can heal again!",strnpcinfo(0),bc_self;
    		end;
    	}
    
    	if (.@price && !vip_status(1)) {
    		if (Zeny < .@price){
    			message strcharinfo(0), "You will need " + callfunc("F_InsertComma",.@price) + " Zeny for Heal and Buffs.";
    			end;
    		}
    		Zeny -= .@price;
    	}
    
    	specialeffect2 EF_HEAL2;
    	percentheal 100,100;
    
    	if (.Buffs) {
    		specialeffect2 EF_INCAGILITY;
    		sc_start SC_INCREASEAGI,600000,10;
    		specialeffect2 EF_BLESSING;
    		sc_start SC_BLESSING,600000,10;
    	}
    
    	if (.Delay){
    		#BuffCooldown = gettimetick(2) + .Delay;
    	}
    
    end;
    
    OnInit:
    	set .LevelPay, 60; 	// Maximum level for free access or else you will pay zeny based on your level.
    	set .Price, 50;		// Zeny required for heal but premium user will not require it.
    	set .Buffs, 1;		// Also buff players? (1: yes / 0: no)
    	set .Delay, 10;		// Heal delay, in seconds
    end;
    
    }
    
    prontera,124,75,3	duplicate(Healer)	Stefanie#prt	4_F_SON

     

    Can you teach me how to edit this VIP healer npc

     

    if non vip and only novice and 1st job will get bless,agi and heal for free

    if non vip and 2nd job will pay zeny

    if vip will get all buffs,repair,indetify or any status that i can add for free.

    vip = will get daily exp and daily supplies

    thanks

     

    thanks to the owner of the script.

  3. thank you for all  your help..... i will try this

    Quote

    i tried both scripts you gave me but nothing works.

    1st script

    
    -    script    Sample    -1,{
        OnNPCKillEvent:
            if (getequipid(EQI_ACC_R) == 1) {
                setiteminfo 2642,3,80000; //1 = 0.01% , etc..
                }
                
            if (rand(10000) < 80) getitem 969,1;
    }

    2nd script

    
    -    script    Sample    -1,{
        OnPCKillEvent:
            // if equipped specific item id
            if (isequipped(2642)) {
                .@rate = rand(100);
                if (.@rate < 15) {
                    getitem 969, 1;
                } 
                else if (.@rate < 18) {
                    getitem 6238, 1;
                    getitem 6239, 1;    
                }
                else if (.@rate < 21) {
                    getitem 6228, 1;
                    getitem 6232, 1;
                }
                else if (.@rate < 24) {
                    getitem 6229, 1;
                    getitem 6233, 1;
                }
                else if (.@rate < 27) {
                    getitem 6230, 1;
                    getitem 6234, 1;
                }
                
                else (.@rate < 30) {
                    getitem 6231, 1;
                    getitem 6235, 1;
                }
            }
            

    and btw here's my item script ( Accessory )

    Serin's Ring 2642

    
    bonus2 bAddMonsterDropItem,6238,50;
    bonus2 bAddMonsterDropItem,6228,150;
    bonus2 bAddMonsterDropItem,6229,210;
    bonus2 bAddMonsterDropItem,6230,280;
    bonus2 bAddMonsterDropItem,6231,320;
    bonus2 bAddMonsterDropItem,6239,50;
    bonus2 bAddMonsterDropItem,6232,150;
    bonus2 bAddMonsterDropItem,6233,210;
    bonus2 bAddMonsterDropItem,6234,280;
    bonus2 bAddMonsterDropItem,6235,320;

    if item 2642 is equipped it will drop the items and go straight in my inventory

    it shows no error when i load both of the scripts. the problem is it wont drop the items

     

    thanks i hope i get it after your reply. appreciate the time you've given to this thread.  

     

    ignore my last message.....

    made it work. here's my script

    -	script	Poring_Coin	-1,{
    	OnNPCKillEvent:
    		.@rate = rand(100);
    	if (getequipid(EQI_ACC_R) == 2642 || getequipid(EQI_ACC_L) == 2642) {
    		if (.@rate < 15) {
    				getitem 969, 1;
    			} 
    			else if (.@rate < 18) {
    				getitem 6238, 1;
    				getitem 6239, 1;	
    			}
    			else if (.@rate < 21) {
    				getitem 6228, 1;
    				getitem 6232, 1;
    			}
    			else if (.@rate < 24) {
    				getitem 6229, 1;
    				getitem 6233, 1;
    			}
    			else if (.@rate < 27) {
    				getitem 6230, 1;
    				getitem 6234, 1;
    			}
    			
    			else (.@rate < 30) {
    				getitem 6231, 1;
    				getitem 6235, 1;
    			}
    	}
    }

    my problem now is.. it only gives the items 969,6238,6239.

    items 6228,6232 wont drops. 

    could this work?

    -	script	Poring_Coin	-1,{
    	OnNPCKillEvent:
    		.@rate = rand(100);
    	if (getequipid(EQI_ACC_R) == 2642 || getequipid(EQI_ACC_L) == 2642) {
    		if(.@rate< 10 ) {
    			getitem 969,1 (.@rate< 10);
    			getitem 2,1 (.@rate< 20);
                getitem 3,1 (.@rate< 30);
    	}
    }

     

    here's my working script

    -	script	Poring_Coin	-1,{
    	OnNPCKillEvent:
    		.@rate = rand(1000);
    	if (getequipid(EQI_ACC_R) == 2642 || getequipid(EQI_ACC_L) == 2642) {
    		if(.@rate< 100 ) 
    			getitem 969,1; // Gold
    		else if(.@rate< 50 )
    			getitem 6238,1; // +11 W
    		else if(.@rate< 50 )
    			getitem 6239,1; // +11 A
    		else if(.@rate< 100 )
    			getitem 6228,1; // +9 W
    		else if(.@rate< 101 )
    			getitem 6232,1; // +9 A
    		else if(.@rate< 200 )
    			getitem 6229,1; // +8 W
    		else if(.@rate< 201 )
    			getitem 6233,1; // +8 A
    		else if(.@rate< 250 )
    			getitem 6230,1; // +7 W
    		else if(.@rate< 251 )
    			getitem 6234,1; // +7 A
    		else if(.@rate< 300 )
    			getitem 6231,1; // +6 W
    		else if(.@rate< 301 )
    			getitem 6235,1; // +6 A
    		else	
    end;
    	}
    }

    it works for me. thank you for all your time. Happy Ragnarok to all

     

    i hope there is an easy code like this hehe thanks

  4. sir thank you for your reply. my item script is okay it already drops my desired items. i want to know if its possible that item will go straightly in my invertory (like @alootid +gold)

     

    can you teach me how i can put other items with different drops%.

    is it possible to have an option if weapon/armor is equiped it will drop *the items* with *50,60,70%* chance

    OnNPCKillEvent:
    
    if( rand( 100 ) < 30 ) {
    .@item_id = F_Rand( 969 );
    getitem .@item_id,1;

     

    like this

    OnNPCKillEvent:

    gold = 50%

    apple = 30%

    jellopy = 20%

    accessory = isequiped

     

    thank you

×
×
  • Create New...