diff options
Diffstat (limited to 'npc/015-3/barrier.txt')
| -rwxr-xr-x | npc/015-3/barrier.txt | 38 |
1 files changed, 38 insertions, 0 deletions
diff --git a/npc/015-3/barrier.txt b/npc/015-3/barrier.txt new file mode 100755 index 00000000..320025f6 --- /dev/null +++ b/npc/015-3/barrier.txt @@ -0,0 +1,38 @@ + +015-3,31,42,0 script #CatCaveBarrier NPC45,1,1,{ + @Hiss = ((Katze & NIBBLE_1_MASK) >> NIBBLE_1_SHIFT); + if (getequipid(equip_head) != 1217 + && (getequipid(equip_head) > 0 + || getequipid(equip_shield) > 0 + || getequipid(equip_hand1) > 0 + || getequipid(equip_hand2) > 0 + || getequipid(equip_gloves) > 0 + || getequipid(equip_shoes) > 0 + || getequipid(equip_misc1) > 0 + || getequipid(equip_misc2) > 0 + || getequipid(equip_torso) > 0 + || getequipid(equip_legs) > 0)) + goto L_Not_Naked; + + if (@Hiss != 2) + mes "\"Hissss...\""; + @Hiss = 2; + callsub S_Update_Hiss; + goto L_close; + +L_Not_Naked: + warp "015-1", 60, 32; + @Hiss = 1; + callsub S_Update_Hiss; + mes "\"GRAAUWL! Hissss...\""; + mes "Scared of what you hear, you flee back outside."; + goto L_close; + +L_close: + @Hiss = 0; + close; + +S_Update_Hiss: + Katze = (Katze & ~(NIBBLE_1_MASK)) | (@Hiss << NIBBLE_1_SHIFT); + return; +} |