Subversion Repositories vaca_plus

Rev

Rev 1 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
1 h266 1 
/*
2 
--------------------------------------------------------------------------------
3 
Duke Caribbean: Life's A Beach
4 
By Joris Weimar
5 
© 1997 Sunstorm Interactive
6 
--------------------------------------------------------------------------------
7 
Duke Caribbean: Life's A Beach Plus
8 
By Hendricks266
9 
--------------------------------------------------------------------------------
10 
// CON Files for the 'Duke Carribean Add-on' by SunStorm Interactive
11 
//
12 
// Actor - BEACHBATHER - Sprite #1683
13 
//
14 
// --- Resources ---
15 
//
16 
// Sounds:
17 
// Beach Bather Comments   - BATHCOM1.WAV/BATHCOM2.WAV
18 
// Beach Bather Hurt Sound - BATHHURT.WAV
19 
//
20 
// Art:
21 
// 1 * 1 frame(s)          - Normal Beach Bather
22 
// 1 * 1 frame(s)          - Activated Beach Bather
23 
*/
24 
 
25 
move   BEACHBATHERSPEED
26 
 
27 
action BEACHBATHER       0
28 
action BEACHBATHERACTION 2 7 1 1 10
29 
 
30 
ai AIBEACHBATHERIDLE BEACHBATHER BEACHBATHERSPEED
31 
ai AIBEACHBATHERSHRUNK BEACHBATHER BEACHBATHERSPEED
32 
ai AIBEACHBATHERGROW BEACHBATHER BEACHBATHERSPEED
33 
ai AIBEACHBATHERFROZEN BEACHBATHER BEACHBATHERSPEED
34 
 
35 
state stopbeachbabebathersounds
36 
  stopsound BABECOMM1
37 
  stopsound BABECOMM2
38 
  stopsound BABECOMM3
39 
  stopsound BABECOMM4
40 
  stopsound BABECOMM5
41 
  stopsound BATHCOMM1
42 
  stopsound BATHCOMM2
43 
  stopsound BATHCOMM3
44 
  stopsound BATHCOMM4
45 
  stopsound BABESCREAM1
46 
  stopsound BABESCREAM2
47 
  stopsound BABESCREAM3
48 
  stopsound BABESCREAM4
49 
ends
50 
 
51 
state BEACHBATHERIDLESTATE
52 
ends
53 
 
54 
state BEACHBATHERSTATE
55 
  fall
56 
  cstator 257
57 
 
58 
 // state babechecksquished
59 
 
60 
  ifaction BEACHBATHERACTION
61 
    {
62 
     ifactioncount 14
63 
       {
64 
         ifhitspace resetactioncount
65 
         else action BEACHBATHER
66 
       }
67 
    }
68 
  else
69 
    {
70 
      ifp pfacing
71 
        ifpdistl 1400
72 
          ifhitspace
73 
            {
74 
              ifrnd 64 sound BATHCOMM1
75 
         else ifrnd 85 sound BATHCOMM2
76 
         else ifrnd 128 sound BATHCOMM3
77 
         else sound BATHCOMM4
78 
              action BEACHBATHERACTION
79 
            }
80 
    }
81 
 
82 
 
83 
  ifai 0
84 
    {
85 
      ai AIBEACHBATHERIDLE
86 
      sizeat 42 40
87 
    }
88 
 
89 
  ifai AIBEACHBATHERSHRUNK
90 
    {
91 
      ifcount SHRUNKDONECOUNT
92 
        {
93 
          ai AIBEACHBATHERIDLE
94 
          cstat 257
95 
        }
96 
      else
97 
        {
98 
          ifcount SHRUNKCOUNT
99 
          sizeto 42 40
100 
          else
101 
          state genericshrunkcode
102 
        }
103 
     }
104 
  else ifai AIBEACHBATHERGROW
105 
        {
106 
          ifcount 32
107 
            {
108 
              state stopbeachbabebathersounds
109 
              respawnhitag
110 
              guts JIBS4 20
111 
              guts JIBS6 20
112 
              spawn EXPLOSION2
113 
              sound PIPEBOMB_EXPLODE
114 
              soundonce BABESCREAM4
115 
              sound SQUISHED
116 
              killit
117 
            }
118 
          else
119 
            {
120 
               sizeto MAXXSTRETCH MAXYSTRETCH
121 
               break
122 
            }
123 
        }
124 
 
125 
 
126 
  ifai AIBEACHBATHERFROZEN
127 
    {
128 
      ifhitweapon
129 
        {
130 
          ifwasweapon FREEZEBLAST
131 
            {
132 
              strength 0
133 
              break
134 
            }
135 
          lotsofglass 30
136 
          sound GLASS_BREAKING
137 
          respawnhitag
138 
          ifrnd 84
139 
            spawn BLOODPOOL
140 
          killit
141 
        }
142 
      else
143 
        {
144 
          ifp pfacing
145 
            ifpdistl FROZENQUICKKICKDIST
25 h266 146 
              pkick
1 h266 147 
        }
148 
      ifcount THAWTIME
149 
        {
150 
          getlastpal
151 
          ai AIBEACHBATHERIDLE
152 
        }
153 
      else
154 
        {
155 
          ifcount FROZENDRIPTIME
156 
            {
157 
              ifactioncount 26
158 
                {
159 
                  spawn WATERDRIP
160 
                  resetactioncount
161 
                }
162 
            }
163 
        }
164 
    }
165 
 
166 
 
167 
  ifhitweapon
168 
    {
169 
      ai AIBEACHBATHERIDLE
170 
      ifdead
171 
        {
172 
          ifwasweapon GROWSPARK
173 
            {
174 
              cstat 0
175 
              move 0
176 
              sound ACTOR_GROWING
177 
              ai AIBEACHBATHERGROW
178 
              break
179 
           }
180 
    else ifwasweapon FREEZEBLAST
181 
            {
182 
              ai AIBEACHBATHERFROZEN
183 
              move 0
184 
              spritepal 1
185 
              strength 0
186 
              sound SOMETHINGFROZE
187 
              break
188 
            }
189 
 
190 
      state stopbeachbabebathersounds
191 
      ifrnd 128 sound DUKE_HIT_STRIPPER1 else sound DUKE_HIT_STRIPPER2
192 
 
193 
      respawnhitag
194 
      state standard_bjibs
195 
     // state standard_bjibs
196 
      state random_wall_jibs
197 
      spawn BLOODPOOL
198 
     // spritepal 6
199 
      soundonce BABESCREAM4
200 
      killit
201 
        }
202 
      else
203 
        {
204 
          ifwasweapon SHRINKSPARK
205 
            {
206 
              sound ACTOR_SHRINKING
207 
              move 0
208 
              ai AIBEACHBATHERSHRUNK
209 
              cstat 0
210 
              break
211 
            }
212 
 
213 
          sound SQUISHED
214 
          guts JIBS6 1
215 
        }
216 
    }
217 
 
218 
/*
219 
  ifdead
220 
    {
221 
      state standard_bjibs
222 
      sound SQUISHED
223 
      killit
224 
    }
225 
*/
226 
 
227 
  ifai AIBEACHBATHERIDLE state BEACHBATHERIDLESTATE
228 
ends
229 
 
230 
useractor notenemy BEACHBATHER1 BEACHBATHERSTRENGTH BEACHBATHER
231 
  state BEACHBATHERSTATE
232 
enda