WebSVN – vaca_plus – Diff – /vaca_plus/VBeachBabe.con


/*
--------------------------------------------------------------------------------
Duke Caribbean: Life's A Beach
By Joris Weimar
© 1997 Sunstorm Interactive
--------------------------------------------------------------------------------
Duke Caribbean: Life's A Beach Plus
By Hendricks266
--------------------------------------------------------------------------------
// CON Files for the 'Duke Carribean Add-on' by SunStorm Interactive
// 
// Actor - BEACHBABE - Sprite #1683/#2003
// 
// --- Resources ---
// 
// Sounds:
// Beach Babe Comments    - BABECOM1.WAV/BABECOM2.WAV
// Beach Babe Hurt        - BABEHURT.WAV
// 
// Art:
// 3 * 5 frame(s)         - Beach Babe Walking Frames
*/
 
move BEACHBABEWALKSPEED 70
move BEACHBABERUNSPEED  140
move BEACHBABESHRUNKSPEED  40
move BEACHBABESTOP
 
action BEACHBABEWALK   0 3 5 1 20
action BEACHBABERUN    0 3 5 1 13
action BEACHBABEFROZE  0 1 5
 
ai AIBEACHBABEROAM BEACHBABEWALK BEACHBABEWALKSPEED randomangle geth getv
ai AIBEACHBABEWANTDUKE BEACHBABEWALK BEACHBABEWALKSPEED faceplayerslow geth getv
ai AIBEACHBABERUNAWAY BEACHBABERUN BEACHBABERUNSPEED randomangle geth getv
ai AIBEACHBABESHRUNK BEACHBABEWALK BEACHBABESHRUNKSPEED randomangle geth getv
ai AIBEACHBABEGROW BEACHBABEWALK BEACHBABESTOP faceplayerslow
ai AIBEACHBABEFROZEN BEACHBABEFROZE BEACHBABESTOP
ai AIBEACHBABEPOSE BEACHBABEFROZE BEACHBABESTOP
 
ai AIBEACHBABEFLEE BEACHBABEWALK BEACHBABEWALKSPEED fleeenemy geth getv
 
state BABEREMARK
   ifactioncount 1
     {
       ifrnd 254 nullop else
     {
       resetactioncount
       ifrnd 1 sound BABECOMM1
  else ifrnd 1 sound BABECOMM2
  else ifrnd 1 sound BABECOMM3
  else ifrnd 1 sound BABECOMM4
  else ifrnd 1 sound BABECOMM5
     }
     }
 
ends
 
state BABEHURTREMARK
ends
 
state BEACHBABEFLEESTATE
   state BABEREMARK
 
   ifcount 5
     {
       ifpdistl 2000
         {
           ai AIBEACHBABEFLEE
           resetcount
           break
         }
       ai AIBEACHBABEWANTDUKE
     }
ends
 
state BEACHBABEROAMSTATE
   ifrnd 16 ai AIBEACHBABEROAM
 
   ifcansee
     ifpdistl 10000
       ifrnd 32
         ai AIBEACHBABEWANTDUKE
ends
 
state BEACHBABEWANTDUKESTATE
ifpdistl 2000 ai AIBEACHBABEFLEE
 
ifpdistg 10000
  ifrnd 32
    {
      ai AIBEACHBABEROAM
      break
    }
 
state BABEREMARK
ends
 
 
state BEACHBABERUNAWAYSTATE
   ifactioncount 1
     {
       resetactioncount
 
       ifrnd 2 sound BABESCREAM1
  else ifrnd 2 sound BABESCREAM2
  else ifrnd 2 sound BABESCREAM3
  else ifrnd 2 sound BABESCREAM4
     }
 
   ifrnd 16 ai AIBEACHBABERUNAWAY
ends
 
state BEACHBABESTATE
   fall
   cstator 257
 
   state babechecksquished
 
   ifai 0
     {
       ifrnd 64 sound BABECOMM1
  else ifrnd 85 sound BABECOMM2
  else ifrnd 128 sound BABECOMM3
  else sound BABECOMM4
 
       ai AIBEACHBABEROAM
     }
 
  ifvare pose 1
    {
      ai AIBEACHBABEPOSE
      break
    }
 
  ifai AIBEACHBABEPOSE ai AIBEACHBABEROAM
 
   ifai AIBEACHBABESHRUNK
     {
       ifcount SHRUNKDONECOUNT
         {
           ai AIBEACHBABERUNAWAY
           cstat 257
         }
       else
         {
           ifcount SHRUNKCOUNT sizeto 40 40
           else state genericshrunkcode
         }
     }
  else ifai AIBEACHBABEGROW
        {
          ifcount 32
            {
              state stopbeachbabebathersounds
              respawnhitag
              guts JIBS4 20
              guts JIBS6 20
             // guts JIBS4 20
             // guts JIBS6 20
              spawn EXPLOSION2
              sound PIPEBOMB_EXPLODE
             // spritepal 6
              soundonce BABESCREAM4
             // debris SCRAP3 4
              sound SQUISHED
              killit
            } 
          else
            {
               sizeto MAXXSTRETCH MAXYSTRETCH
               break 
            }
        }
 
  ifai AIBEACHBABEFROZEN
    {
      ifhitweapon
        {
          ifwasweapon FREEZEBLAST
            {
              strength 0
              break
            }
          lotsofglass 30
          sound GLASS_BREAKING
          respawnhitag
          ifrnd 84 spawn BLOODPOOL
          killit
        }
 
 
      else
        { 
          ifp pfacing
            ifpdistl FROZENQUICKKICKDIST
 
 
              pkick
        }
 
 
      ifcount THAWTIME
        {
          getlastpal
          ai AIBEACHBABERUNAWAY
        }
      else
          ifcount FROZENDRIPTIME
 
              ifactioncount 26
               {
                 spawn WATERDRIP
                 resetactioncount
               }
    }
 
  ifhitweapon
    {
      sound SQUISHED
      ai AIBEACHBABERUNAWAY 
      ifdead
        {
          ifwasweapon GROWSPARK
            {
              cstat 0
              move 0
              sound ACTOR_GROWING
              ai AIBEACHBABEGROW
              break
           }
    else ifwasweapon FREEZEBLAST
           {
 	     ai AIBEACHBABEFROZEN
             move 0
             spritepal 1
             strength 0
             sound SOMETHINGFROZE
             break
           }
 
          state stopbeachbabebathersounds
          ifrnd 128 sound DUKE_HIT_STRIPPER1 else sound DUKE_HIT_STRIPPER2
 
          respawnhitag
         // state standard_bjibs
          state standard_bjibs
          state random_wall_jibs
          spawn BLOODPOOL
         // spritepal 6
          soundonce BABESCREAM4
          killit
        }
      else
        {
          ifwasweapon SHRINKSPARK
            {
              sound ACTOR_SHRINKING
              move 0
              ai AIBEACHBABESHRUNK
              cstat 0
              break
            }
         else
           {
             guts JIBS6 1
           }
 
    // else ifwasweapon GROWSPARK sound EXPANDERHIT
        }
    }
 
 
 
/*
   ifdead
     {
       state standard_bjibs
       sound SQUISHED
       killit
     }
*/
 
      ifai AIBEACHBABEROAM state BEACHBABEROAMSTATE
 else ifai AIBEACHBABEWANTDUKE state BEACHBABEWANTDUKESTATE 
 else ifai AIBEACHBABERUNAWAY state BEACHBABERUNAWAYSTATE
 else ifai AIBEACHBABEFLEE state BEACHBABEFLEESTATE
ends
 
useractor notenemy BEACHBABE1 BEACHBABESTRENGTH BEACHBABEWALK
  state BEACHBABESTATE
enda
 

Rev 1	Rev 25
1	/*	1	/*
2	--------------------------------------------------------------------------------	2	--------------------------------------------------------------------------------
3	Duke Caribbean: Life's A Beach	3	Duke Caribbean: Life's A Beach
4	By Joris Weimar	4	By Joris Weimar
5	© 1997 Sunstorm Interactive	5	© 1997 Sunstorm Interactive
6	--------------------------------------------------------------------------------	6	--------------------------------------------------------------------------------
7	Duke Caribbean: Life's A Beach Plus	7	Duke Caribbean: Life's A Beach Plus
8	By Hendricks266	8	By Hendricks266
9	--------------------------------------------------------------------------------	9	--------------------------------------------------------------------------------
10	// CON Files for the 'Duke Carribean Add-on' by SunStorm Interactive	10	// CON Files for the 'Duke Carribean Add-on' by SunStorm Interactive
11	//	11	//
12	// Actor - BEACHBABE - Sprite #1683/#2003	12	// Actor - BEACHBABE - Sprite #1683/#2003
13	//	13	//
14	// --- Resources ---	14	// --- Resources ---
15	//	15	//
16	// Sounds:	16	// Sounds:
17	// Beach Babe Comments - BABECOM1.WAV/BABECOM2.WAV	17	// Beach Babe Comments - BABECOM1.WAV/BABECOM2.WAV
18	// Beach Babe Hurt - BABEHURT.WAV	18	// Beach Babe Hurt - BABEHURT.WAV
19	//	19	//
20	// Art:	20	// Art:
21	// 3 * 5 frame(s) - Beach Babe Walking Frames	21	// 3 * 5 frame(s) - Beach Babe Walking Frames
22	*/	22	*/
23		23
24	move BEACHBABEWALKSPEED 70	24	move BEACHBABEWALKSPEED 70
25	move BEACHBABERUNSPEED 140	25	move BEACHBABERUNSPEED 140
26	move BEACHBABESHRUNKSPEED 40	26	move BEACHBABESHRUNKSPEED 40
27	move BEACHBABESTOP	27	move BEACHBABESTOP
28		28
29	action BEACHBABEWALK 0 3 5 1 20	29	action BEACHBABEWALK 0 3 5 1 20
30	action BEACHBABERUN 0 3 5 1 13	30	action BEACHBABERUN 0 3 5 1 13
31	action BEACHBABEFROZE 0 1 5	31	action BEACHBABEFROZE 0 1 5
32		32
33	ai AIBEACHBABEROAM BEACHBABEWALK BEACHBABEWALKSPEED randomangle geth getv	33	ai AIBEACHBABEROAM BEACHBABEWALK BEACHBABEWALKSPEED randomangle geth getv
34	ai AIBEACHBABEWANTDUKE BEACHBABEWALK BEACHBABEWALKSPEED faceplayerslow geth getv	34	ai AIBEACHBABEWANTDUKE BEACHBABEWALK BEACHBABEWALKSPEED faceplayerslow geth getv
35	ai AIBEACHBABERUNAWAY BEACHBABERUN BEACHBABERUNSPEED randomangle geth getv	35	ai AIBEACHBABERUNAWAY BEACHBABERUN BEACHBABERUNSPEED randomangle geth getv
36	ai AIBEACHBABESHRUNK BEACHBABEWALK BEACHBABESHRUNKSPEED randomangle geth getv	36	ai AIBEACHBABESHRUNK BEACHBABEWALK BEACHBABESHRUNKSPEED randomangle geth getv
37	ai AIBEACHBABEGROW BEACHBABEWALK BEACHBABESTOP faceplayerslow	37	ai AIBEACHBABEGROW BEACHBABEWALK BEACHBABESTOP faceplayerslow
38	ai AIBEACHBABEFROZEN BEACHBABEFROZE BEACHBABESTOP	38	ai AIBEACHBABEFROZEN BEACHBABEFROZE BEACHBABESTOP
39	ai AIBEACHBABEPOSE BEACHBABEFROZE BEACHBABESTOP	39	ai AIBEACHBABEPOSE BEACHBABEFROZE BEACHBABESTOP
40		40
41	ai AIBEACHBABEFLEE BEACHBABEWALK BEACHBABEWALKSPEED fleeenemy geth getv	41	ai AIBEACHBABEFLEE BEACHBABEWALK BEACHBABEWALKSPEED fleeenemy geth getv
42		42
43	state BABEREMARK	43	state BABEREMARK
44	ifactioncount 1	44	ifactioncount 1
45	{	45	{
46	ifrnd 254 nullop else	46	ifrnd 254 nullop else
47	{	47	{
48	resetactioncount	48	resetactioncount
49	ifrnd 1 sound BABECOMM1	49	ifrnd 1 sound BABECOMM1
50	else ifrnd 1 sound BABECOMM2	50	else ifrnd 1 sound BABECOMM2
51	else ifrnd 1 sound BABECOMM3	51	else ifrnd 1 sound BABECOMM3
52	else ifrnd 1 sound BABECOMM4	52	else ifrnd 1 sound BABECOMM4
53	else ifrnd 1 sound BABECOMM5	53	else ifrnd 1 sound BABECOMM5
54	}	54	}
55	}	55	}
56		56
57	ends	57	ends
58		58
59	state BABEHURTREMARK	59	state BABEHURTREMARK
60	ends	60	ends
61		61
62	state BEACHBABEFLEESTATE	62	state BEACHBABEFLEESTATE
63	state BABEREMARK	63	state BABEREMARK
64		64
65	ifcount 5	65	ifcount 5
66	{	66	{
67	ifpdistl 2000	67	ifpdistl 2000
68	{	68	{
69	ai AIBEACHBABEFLEE	69	ai AIBEACHBABEFLEE
70	resetcount	70	resetcount
71	break	71	break
72	}	72	}
73	ai AIBEACHBABEWANTDUKE	73	ai AIBEACHBABEWANTDUKE
74	}	74	}
75	ends	75	ends
76		76
77	state BEACHBABEROAMSTATE	77	state BEACHBABEROAMSTATE
78	ifrnd 16 ai AIBEACHBABEROAM	78	ifrnd 16 ai AIBEACHBABEROAM
79		79
80	ifcansee	80	ifcansee
81	ifpdistl 10000	81	ifpdistl 10000
82	ifrnd 32	82	ifrnd 32
83	ai AIBEACHBABEWANTDUKE	83	ai AIBEACHBABEWANTDUKE
84	ends	84	ends
85		85
86	state BEACHBABEWANTDUKESTATE	86	state BEACHBABEWANTDUKESTATE
87	ifpdistl 2000 ai AIBEACHBABEFLEE	87	ifpdistl 2000 ai AIBEACHBABEFLEE
88		88
89	ifpdistg 10000	89	ifpdistg 10000
90	ifrnd 32	90	ifrnd 32
91	{	91	{
92	ai AIBEACHBABEROAM	92	ai AIBEACHBABEROAM
93	break	93	break
94	}	94	}
95		95
96	state BABEREMARK	96	state BABEREMARK
97	ends	97	ends
98		98
99		99
100	state BEACHBABERUNAWAYSTATE	100	state BEACHBABERUNAWAYSTATE
101	ifactioncount 1	101	ifactioncount 1
102	{	102	{
103	resetactioncount	103	resetactioncount
104		104
105	ifrnd 2 sound BABESCREAM1	105	ifrnd 2 sound BABESCREAM1
106	else ifrnd 2 sound BABESCREAM2	106	else ifrnd 2 sound BABESCREAM2
107	else ifrnd 2 sound BABESCREAM3	107	else ifrnd 2 sound BABESCREAM3
108	else ifrnd 2 sound BABESCREAM4	108	else ifrnd 2 sound BABESCREAM4
109	}	109	}
110		110
111	ifrnd 16 ai AIBEACHBABERUNAWAY	111	ifrnd 16 ai AIBEACHBABERUNAWAY
112	ends	112	ends
113		113
114	state BEACHBABESTATE	114	state BEACHBABESTATE
115	fall	115	fall
116	cstator 257	116	cstator 257
117		117
118	state babechecksquished	118	state babechecksquished
119		119
120	ifai 0	120	ifai 0
121	{	121	{
122	ifrnd 64 sound BABECOMM1	122	ifrnd 64 sound BABECOMM1
123	else ifrnd 85 sound BABECOMM2	123	else ifrnd 85 sound BABECOMM2
124	else ifrnd 128 sound BABECOMM3	124	else ifrnd 128 sound BABECOMM3
125	else sound BABECOMM4	125	else sound BABECOMM4
126		126
127	ai AIBEACHBABEROAM	127	ai AIBEACHBABEROAM
128	}	128	}
129		129
130	ifvare pose 1	130	ifvare pose 1
131	{	131	{
132	ai AIBEACHBABEPOSE	132	ai AIBEACHBABEPOSE
133	break	133	break
134	}	134	}
135		135
136	ifai AIBEACHBABEPOSE ai AIBEACHBABEROAM	136	ifai AIBEACHBABEPOSE ai AIBEACHBABEROAM
137		137
138	ifai AIBEACHBABESHRUNK	138	ifai AIBEACHBABESHRUNK
139	{	139	{
140	ifcount SHRUNKDONECOUNT	140	ifcount SHRUNKDONECOUNT
141	{	141	{
142	ai AIBEACHBABERUNAWAY	142	ai AIBEACHBABERUNAWAY
143	cstat 257	143	cstat 257
144	}	144	}
145	else	145	else
146	{	146	{
147	ifcount SHRUNKCOUNT sizeto 40 40	147	ifcount SHRUNKCOUNT sizeto 40 40
148	else state genericshrunkcode	148	else state genericshrunkcode
149	}	149	}
150	}	150	}
151	else ifai AIBEACHBABEGROW	151	else ifai AIBEACHBABEGROW
152	{	152	{
153	ifcount 32	153	ifcount 32
154	{	154	{
155	state stopbeachbabebathersounds	155	state stopbeachbabebathersounds
156	respawnhitag	156	respawnhitag
157	guts JIBS4 20	157	guts JIBS4 20
158	guts JIBS6 20	158	guts JIBS6 20
159	// guts JIBS4 20	159	// guts JIBS4 20
160	// guts JIBS6 20	160	// guts JIBS6 20
161	spawn EXPLOSION2	161	spawn EXPLOSION2
162	sound PIPEBOMB_EXPLODE	162	sound PIPEBOMB_EXPLODE
163	// spritepal 6	163	// spritepal 6
164	soundonce BABESCREAM4	164	soundonce BABESCREAM4
165	// debris SCRAP3 4	165	// debris SCRAP3 4
166	sound SQUISHED	166	sound SQUISHED
167	killit	167	killit
168	}	168	}
169	else	169	else
170	{	170	{
171	sizeto MAXXSTRETCH MAXYSTRETCH	171	sizeto MAXXSTRETCH MAXYSTRETCH
172	break	172	break
173	}	173	}
174	}	174	}
175		175
176	ifai AIBEACHBABEFROZEN	176	ifai AIBEACHBABEFROZEN
177	{	177	{
178	ifhitweapon	178	ifhitweapon
179	{	179	{
180	ifwasweapon FREEZEBLAST	180	ifwasweapon FREEZEBLAST
181	{	181	{
182	strength 0	182	strength 0
183	break	183	break
184	}	184	}
185	lotsofglass 30	185	lotsofglass 30
186	sound GLASS_BREAKING	186	sound GLASS_BREAKING
187	respawnhitag	187	respawnhitag
188	ifrnd 84 spawn BLOODPOOL	188	ifrnd 84 spawn BLOODPOOL
189	killit	189	killit
190	}	190	}
191	}	-
192	/*	-
193	else	191	else
194	{	192	{
195	ifp pfacing	193	ifp pfacing
196	ifpdistl FROZENQUICKKICKDIST	194	ifpdistl FROZENQUICKKICKDIST
197	{	-
198	pkick // Why the hell would you want to kick the babe???	-
199	break	195	pkick
200	}	196	}
201	}	-
202	*/	-
203	ifcount THAWTIME	197	ifcount THAWTIME
204	{	198	{
205	getlastpal	199	getlastpal
206	ai AIBEACHBABERUNAWAY	200	ai AIBEACHBABERUNAWAY
207	}	201	}
208	else	202	else
209	ifcount FROZENDRIPTIME	203	ifcount FROZENDRIPTIME
210	{	-
211	ifactioncount 26	204	ifactioncount 26
212	{	205	{
213	spawn WATERDRIP	206	spawn WATERDRIP
214	resetactioncount	207	resetactioncount
215	}	208	}
216	}	209	}
217		210
218	ifhitweapon	211	ifhitweapon
219	{	212	{
220	sound SQUISHED	213	sound SQUISHED
221	ai AIBEACHBABERUNAWAY	214	ai AIBEACHBABERUNAWAY
222	ifdead	215	ifdead
223	{	216	{
224	ifwasweapon GROWSPARK	217	ifwasweapon GROWSPARK
225	{	218	{
226	cstat 0	219	cstat 0
227	move 0	220	move 0
228	sound ACTOR_GROWING	221	sound ACTOR_GROWING
229	ai AIBEACHBABEGROW	222	ai AIBEACHBABEGROW
230	break	223	break
231	}	224	}
232	else ifwasweapon FREEZEBLAST	225	else ifwasweapon FREEZEBLAST
233	{	226	{
234	ai AIBEACHBABEFROZEN	227	ai AIBEACHBABEFROZEN
235	move 0	228	move 0
236	spritepal 1	229	spritepal 1
237	strength 0	230	strength 0
238	sound SOMETHINGFROZE	231	sound SOMETHINGFROZE
239	break	232	break
240	}	233	}
241		234
242	state stopbeachbabebathersounds	235	state stopbeachbabebathersounds
243	ifrnd 128 sound DUKE_HIT_STRIPPER1 else sound DUKE_HIT_STRIPPER2	236	ifrnd 128 sound DUKE_HIT_STRIPPER1 else sound DUKE_HIT_STRIPPER2
244		237
245	respawnhitag	238	respawnhitag
246	// state standard_bjibs	239	// state standard_bjibs
247	state standard_bjibs	240	state standard_bjibs
248	state random_wall_jibs	241	state random_wall_jibs
249	spawn BLOODPOOL	242	spawn BLOODPOOL
250	// spritepal 6	243	// spritepal 6
251	soundonce BABESCREAM4	244	soundonce BABESCREAM4
252	killit	245	killit
253	}	246	}
254	else	247	else
255	{	248	{
256	ifwasweapon SHRINKSPARK	249	ifwasweapon SHRINKSPARK
257	{	250	{
258	sound ACTOR_SHRINKING	251	sound ACTOR_SHRINKING
259	move 0	252	move 0
260	ai AIBEACHBABESHRUNK	253	ai AIBEACHBABESHRUNK
261	cstat 0	254	cstat 0
262	break	255	break
263	}	256	}
264	else	257	else
265	{	258	{
266	guts JIBS6 1	259	guts JIBS6 1
267	}	260	}
268		261
269	// else ifwasweapon GROWSPARK sound EXPANDERHIT	262	// else ifwasweapon GROWSPARK sound EXPANDERHIT
270	}	263	}
271	}	264	}
272		265
273		266
274		267
275	/*	268	/*
276	ifdead	269	ifdead
277	{	270	{
278	state standard_bjibs	271	state standard_bjibs
279	sound SQUISHED	272	sound SQUISHED
280	killit	273	killit
281	}	274	}
282	*/	275	*/
283		276
284	ifai AIBEACHBABEROAM state BEACHBABEROAMSTATE	277	ifai AIBEACHBABEROAM state BEACHBABEROAMSTATE
285	else ifai AIBEACHBABEWANTDUKE state BEACHBABEWANTDUKESTATE	278	else ifai AIBEACHBABEWANTDUKE state BEACHBABEWANTDUKESTATE
286	else ifai AIBEACHBABERUNAWAY state BEACHBABERUNAWAYSTATE	279	else ifai AIBEACHBABERUNAWAY state BEACHBABERUNAWAYSTATE
287	else ifai AIBEACHBABEFLEE state BEACHBABEFLEESTATE	280	else ifai AIBEACHBABEFLEE state BEACHBABEFLEESTATE
288	ends	281	ends
289		282
290	useractor notenemy BEACHBABE1 BEACHBABESTRENGTH BEACHBABEWALK	283	useractor notenemy BEACHBABE1 BEACHBABESTRENGTH BEACHBABEWALK
291	state BEACHBABESTATE	284	state BEACHBABESTATE
292	enda	285	enda
293		286

Subversion Repositories vaca_plus

(root)/vaca_plus/VBeachBabe.con – Rev 1 → 25