Subversion Repositories vaca_plus

Rev

Go to most recent revision | Details | 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
146
              {
147
                pkick
148
                break
149
              }  
150
        }
151
      ifcount THAWTIME
152
        {
153
          getlastpal
154
          ai AIBEACHBATHERIDLE
155
        }
156
      else
157
        {
158
          ifcount FROZENDRIPTIME
159
            {
160
              ifactioncount 26
161
                {
162
                  spawn WATERDRIP
163
                  resetactioncount
164
                }
165
            }
166
        }
167
    }
168
 
169
 
170
  ifhitweapon
171
    {
172
      ai AIBEACHBATHERIDLE
173
      ifdead
174
        {
175
          ifwasweapon GROWSPARK
176
            {
177
              cstat 0
178
              move 0
179
              sound ACTOR_GROWING
180
              ai AIBEACHBATHERGROW
181
              break
182
           }
183
    else ifwasweapon FREEZEBLAST
184
            {
185
              ai AIBEACHBATHERFROZEN
186
              move 0
187
              spritepal 1
188
              strength 0
189
              sound SOMETHINGFROZE
190
              break
191
            }
192
 
193
      state stopbeachbabebathersounds
194
      ifrnd 128 sound DUKE_HIT_STRIPPER1 else sound DUKE_HIT_STRIPPER2
195
 
196
      respawnhitag
197
      state standard_bjibs
198
     // state standard_bjibs
199
      state random_wall_jibs
200
      spawn BLOODPOOL
201
     // spritepal 6
202
      soundonce BABESCREAM4
203
      killit
204
        }
205
      else
206
        {
207
          ifwasweapon SHRINKSPARK
208
            {
209
              sound ACTOR_SHRINKING
210
              move 0
211
              ai AIBEACHBATHERSHRUNK
212
              cstat 0
213
              break
214
            }
215
 
216
          sound SQUISHED
217
          guts JIBS6 1
218
        }
219
    }
220
 
221
/*
222
  ifdead
223
    {
224
      state standard_bjibs
225
      sound SQUISHED
226
      killit
227
    }
228
*/
229
 
230
  ifai AIBEACHBATHERIDLE state BEACHBATHERIDLESTATE
231
ends
232
 
233
useractor notenemy BEACHBATHER1 BEACHBATHERSTRENGTH BEACHBATHER
234
  state BEACHBATHERSTATE
235
enda