[FUNCTION earth_animate] IF (==t_arock) IF ( & 010) SRC.SYSMESSAGE That is locked down and cannot be animated. ELSE SRC.NEWNPC c_elem_earth SRC.ACT.P= SRC.ACT.UPDATEX SRC.ACT.FLAGS=|statf_conjured SRC.ACT.EVENTS=+e_dispelpoof SRC.ACT.SUMMONEDPET SRC.ACT.BARK 3 SRC.ACT.ANIM 3 1 REMOVE ENDIF ELSE SRC.SYSMESSAGE This is not a rock. ENDIF [FUNCTION water_animate] IF ((==t_drink)||(==t_water)) IF ( & 010) SRC.SYSMESSAGE That is locked down and cannot be animated. ELSE SRC.NEWNPC c_elem_water SRC.ACT.P= SRC.ACT.UPDATEX SRC.ACT.FLAGS=|statf_conjured SRC.ACT.EVENTS=+e_dispelpoof SRC.ACT.SUMMONEDPET SRC.ACT.BARK 3 SRC.ACT.ANIM 3 1 IF ( > 0) SRC.NEWITEM SRC.ACT.BOUNCE ENDIF REMOVE ENDIF ELSE SRC.SYSMESSAGE This is not a fluid. ENDIF [FUNCTION air_animate] IF ((==t_gem)||(==t_scroll)) IF ( & 010) SRC.SYSMESSAGE That is locked down and cannot be animated. ELSE SRC.NEWNPC c_elem_air SRC.ACT.P= SRC.ACT.UPDATEX SRC.ACT.FLAGS=|statf_conjured SRC.ACT.EVENTS=+e_dispelpoof SRC.ACT.SUMMONEDPET SRC.ACT.BARK 3 SRC.ACT.ANIM 3 1 IF ( > 1) AMOUNT=+(-1)> ELSE REMOVE ENDIF ENDIF ELSE SRC.SYSMESSAGE This is not a gem or scroll. ENDIF [FUNCTION fire_animate] IF (==t_campfire) ID=0dea //Burnt wood. UPDATE ELSEIF (==t_light_lit) ID= UPDATE ELSE SRC.SYSMESSAGE This is not a light source or campfire. RETURN 0 ENDIF SRC.NEWNPC c_elem_fire SRC.ACT.P= SRC.ACT.UPDATEX SRC.ACT.FLAGS=|statf_conjured SRC.ACT.EVENTS=+e_dispelpoof SRC.ACT.SUMMONEDPET SRC.ACT.BARK 3 SRC.ACT.ANIM 3 1 [ITEMDEF i_stone_castambre] ID=0136b //TYPE=t_wand TYPE=t_normal NAME=Stone of Castambre VALUE=15000 ON=@Create MOREX=s_summon_elem_earth MOREY=100.0 MORE2=10 //ATTR=attr_magic COLOR=01bb ON=@DClick IF !(==) SRC.SYSMESSAGE This must be in your pack to use. RETURN 1 ENDIF TARGET Target a rock to animate it. RETURN 1 ON=@Targon_Item SRC.TARG.earth_animate RETURN 1 [ITEMDEF i_vase_undine] ID=0b46 TYPE=t_normal NAME=Vase of Undine VALUE=15000 ON=@Create MOREX=s_summon_elem_water MOREY=100.0 MORE2=10 //ATTR=attr_magic COLOR=0c0 ON=@DClick IF !(==) SRC.SYSMESSAGE This must be in your pack to use. RETURN 1 ENDIF TARGET Target a fluid to animate it. RETURN 1 ON=@Targon_Item SRC.TARG.water_animate RETURN 1 [ITEMDEF i_crystal_zephyr] ID=01f1c TYPE=t_normal NAME=Crystal of Zephyr VALUE=15000 ON=@Create MOREX=s_summon_elem_air MOREY=100.0 MORE2=10 //ATTR=attr_magic COLOR=03e9 ON=@DClick IF !(==) SRC.SYSMESSAGE This must be in your pack to use. RETURN 1 ENDIF TARGET Target a gem or scroll to animate it. RETURN 1 ON=@Targon_Item SRC.TARG.air_animate RETURN 1 [ITEMDEF i_brazier_keefe] ID=019bb TYPE=t_normal NAME=Brazier of Keefe VALUE=15000 ON=@Create MOREX=s_summon_elem_fire MOREY=100.0 MORE2=10 //ATTR=attr_magic COLOR=0668 ON=@DClick IF !(==) SRC.SYSMESSAGE This must be in your pack to use. RETURN 1 ENDIF TARGET Target a campfire or light source to animate the flame. RETURN 1 ON=@Targon_Item SRC.TARG.fire_animate RETURN 1 [ITEMDEF i_book_elements] ID=i_spellbook TYPE=t_normal NAME=Book of Elemental Summoning RESOURCES=1 i_stone_castambre, 1 i_vase_undine, 1 i_crystal_zephyr, 1 i_brazier_keefe ON=@Create ATTR=attr_newbie COLOR=0495 ON=@DClick TARGET Choose the elemental item to animate. RETURN 1 ON=@Targon_Item SRC.TARG.earth_animate SRC.TARG.water_animate SRC.TARG.air_animate SRC.TARG.fire_animate RETURN 1 [SPEECH jobRockSeller] ON=Hi* ON=Greet* ON=Hello* ON=Hail* IF ( >= 0 ) SAY=Ah! Hello, ! Would you like to buy some rocks? ELIF ( >= -1000 ) SAY=Good day fellow! Would you like some rocks? ELSE SAY=Ah, I will sell rocks even to shady types such as yourself. ENDIF ON=*job* ON=*work* ON=*what*do*do* ON=*profession* ON=*occupation* ON=*rock* DORAND 4 SAY I sell rocks of only the highest quality! SAY I collect and sell premium rocks for all uses. SAY I, , am a rock seller, of course. SAY You'll not find better rocks anywhere! ENDDO ON=*Why* SAY Well, why not? Surely there are some in the realm requiring rocks. ON=*What* SAY Rocks have a variety of daily uses! ON=*Avatar* SAY Yes, the Isle of the Avatar... pristine rock collection grounds. ON=*Castambre* DORAND 5 SAY Ah, now THAT is a rock I wish I could get my hands on. SAY The rock of all rocks! SAY You can animate rocks with that. It also confers protection against earthquakes. SAY If that rock came into my possession, I'd never sell it. SAY Whoever has that is bound to become my most frequent customer. ENDDO ON=*Astellron* SAY Ah, Astellron... a good friend of mine who was consumed by powers he was unable to handle. ON=*stone* SAY They are not STONES... they are ROCKS! ON=*ogre* ON=*cyclops* ON=*titans* SAY Four of five ogres prefer my rocks to the competition! ON=*buy* ON=*wares* DORAND 5 SAY Your local rock seller... conveniently located in the middle of nowhere! SAY A wise choice... you buy rocks only from the best! SAY Remember, go to for premium rocky goodness! SAY You will surely love the quality of my wares. SAY You know, you can sit on some of the larger rocks. ENDDO RETURN 0 [CHARDEF c_h_rockseller] ID=c_man NAME=#NAMES_HUMANMALE the Rock Seller AVERSIONS=t_TRAP,t_lavabomb,i_fx_field_fire,i_fx_field_fire_ns,i_fx_poison_field,i_fx_field_paralyze,t_eerie_stuff DESIRES=i_gold,e_notoriety TSPEECH=spk_human_prime TSPEECH=jobRockSeller TSPEECH=spk_shopkeep TSPEECH=spk_needs TSPEECH=spk_human_default TEVENTS=e_Human_HearUnk TEVENTS=e_Human_ConvInit TEVENTS=e_Human_Needs TEVENTS=e_Human_Greet TEVENTS=e_Human_Space TEVENTS=e_Human_Refuse TEVENTS=e_Human_Environ ON=@Create COLOR=colors_skin STR={121 135} DEX={26 40} INT={26 40} MUSICIANSHIP={50.0 70.0} PEACEMAKING={50.0 70.0} SWORDSMANSHIP={15.0 38.0} TACTICS={15.0 38.0} NPC=BRAIN_VENDOR NEED=i_gold ITEMNEWBIE=random_male_hair COLOR=colors_hair ITEMNEWBIE=random_facial_hair COLOR=match_hair ON=@NPCRestock ITEM=RANDOM_LIGHT ITEM=i_shirt_fancy COLOR=colors_all ITEM=random_pants COLOR=colors_all ITEM=random_shoes COLOR=colors_neutral ITEM=random_coin_purse SELL=VENDOR_S_ROCKS BUY=VENDOR_B_ROCKS ON=@EnvironChange EMOTE prances around SAY Rocks, rocks, beautiful rocks! [TEMPLATE VENDOR_S_ROCKS] DEFNAME=VENDOR_S_ROCKS CATEGORY=Vendor Templates SUBSECTION=Sell Templates DESCRIPTION=Rock Seller SELL=i_rock_2,{25 40} SELL=i_rock_3,{25 40} SELL=01771,{15 20} SELL=01775,{15 20} SELL=01779,{15 20} SELL=03421,{10 20} SELL=0342c,{10 20} SELL=03486,{10 20} SELL=034ac,{10 20} SELL=i_ore_iron,{40 70} [TEMPLATE VENDOR_B_ROCKS] DEFNAME=VENDOR_B_ROCKS CATEGORY=Vendor Templates SUBSECTION=Buy Templates DESCRIPTION=Rock Seller BUY=i_rock_2,{25 40} BUY=i_rock_3,{25 40} BUY=01771,{15 20} BUY=01775,{15 20} BUY=01779,{15 20} BUY=03421,{10 20} BUY=0342c,{10 20} BUY=03486,{10 20} BUY=034ac,{10 20} BUY=t_ore,{40 70} BUY=i_stone_castambre