View Single Post
  #3  
Old 06-08-2004, 04:47 AM
Dave987
Discordant
 
Join Date: Jun 2003
Location: England
Posts: 267
Default Re: Help with a few development things

Quote:
Originally Posted by Pyrix
Quest:

I wanna do sum quests , but i never programmed in perl.

1. if PC gives item to NPC && level =< 5 teleport PC to Zoneblablbla

2.If PC give startingitem to NPC , NPC say text && give 1 Platin to PC

PYrix
Check the tutorial in the Quest howto , but it would basically look like this:

1 :
Code:
if(($itemcount{1001}==1) && ulevel  <= 5){ quest::movepc(blahblah,x,y,z);
}
2 :
Code:
if ($itemcount{1001}==1){
quest::say("Thank you $name, please take this as a reward.");
quest::givecash(0,0,0,1);
}

Good luck!
__________________
;o)
Reply With Quote