Jump to content

kavo

Members
  • Posts

    4
  • Joined

  • Last visited

Posts posted by kavo

  1. How do i change the delay from 1 day to 1 hour ?
    
    thanks
    
    
    //======Name========================================
    // Daily Monster Hunt
    //======Version=====================================
    // 1.2
    //======Author(s)===================================
    // Sandbox
    //======Comments====================================
    // This NPC allows your player to hunt a random amount
    // of a random monster
    // *randomception!*
    // If the player successfully hunts the monster
    // he'll receive a reward!
    //======Credits=====================================
    // KeyWorld, nanakiwurtz, NeoMind, Kido
    // Thanks for helping me out guize!
    // Modified by Luciar for Yonko
    //==================================================
     
    prontera,100,200,3	script	Hunting Challenge	78,{
     
    mes .Npc_Name$;
    	if(Hunter) {
    	mes "You have killed ^880000"+HuntCount+"^000000/^0000FF"+Amt
     
    +"^000000 "+getmonsterinfo(Hunt,0)+"s, keep it up!";
    	close;
    	}
    	if(gettimetick(2) < HuntDelay) {
    		mes "You can only do this quest once a day!";
    		close;
    	}
    
    mes "Hello, do you want to take on the Monster Hunting Challenge?","If you manage to kill them, you'll receive a reward!"; 
    if(select("Bring it on!:How about no?")==2) {
    	mes .Npc_Name$;
    	mes "Fine!";
    	close;
    }
     
    next;
    mes .Npc_Name$;
    	Hunt = .Mob_List[rand(getarraysize(.Mob_List))];
    	Amt = rand (50,100); //Amount of mob to hunt
    	Hunter++;
     
    mes "You have to hunt ^0000FF"+Amt+" "+getmonsterinfo(Hunt,0)+"^000000!";
    next;
    mes .Npc_Name$;
    mes "Go go go!";
    close2;
    HuntDelay = gettimetick(2)+86400; //Once a day only.
    end;
    
     
    //----------Config----------
     
    OnInit:
    	.Npc_Name$ = "[^0000FF NPC ^000000]";
    	setarray .Mob_List[0],1002,1007,1063; //Mobs to hunt. Default: Poring, Fabre, Lunatic
    	.Reward = 607; //Reward ID
    	.RewAmt = 10; //Reward Amount
    	end;
     
    OnNPCKillEvent:
    	if(Hunter > 0) {
    		if(killedrid == Hunt) {
    			HuntCount++;
    			dispbottom "You have killed "+HuntCount+"/"+Amt+" "+getmonsterinfo(Hunt,0)+"s, keep it up!";
    			if(HuntCount >= Amt) {
    				dispbottom strnpcinfo(1)+": Congratulations! You did it!";
    				getitem .Reward,.RewAmt;
    				Hunt = 0;
    				Hunter = 0;
    				HuntCount = 0;
    				Amt = 0;
    			}
    		}
    	}
    end;
    }
    
    
    
    
    how do i make the quest from 1 day delay change to 1 hour delay ?
    
    
    
    thanks in advance

     

×
×
  • Create New...