blob: 320025f615194ad6475168c4a6b5ec9211b849f4 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
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;
}
|
