WebSVN – vaca_plus – Diff – /vaca_plus/VSeagull.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 - SEAGULL     - Sprite #1553 
// Actor - SEAGULLSHIT - Sprite #1638
//
// --- Resources ---
//
// Sounds:
// Sea Gull Hurt Sound    - GULLHURT.WAV
// Sea Gull Roam Sound    - GULLROAM.WAV
// Sea Gull Dying Sound   - GULLDIE.WAV
// Sea Gull Shit Sound    - GULLSHIT.WAV
//
// Art:
// 3 * 1 frame(s)         - Parallaxed Sea Gull
// 1 * 1 frame(s)         - Sea Gull Shit
*/
 
action SEAGULLFLY 0 3 1 1 20
action SEAGULLSTILL 1
action SEAGULLFROZEN 1
 
move SEAGULLSHRUNKSPEED 50
move SEAGULLSPEED 100
move SEAGULLATTACK 200
move SEAGULLSTOP
 
ai     AISEAGULLFLY SEAGULLFLY SEAGULLSPEED randomangle geth getv 
ai     AISEAGULLATTACK SEAGULLFLY SEAGULLATTACK faceplayer
 
ai     AISEAGULLFROZEN SEAGULLSTILL SEAGULLSTOP
ai     AISEAGULLSHRUNK SEAGULLFLY SEAGULLSHRUNKSPEED randomangle geth getv
ai     AISEAGULLGROW SEAGULLSTILL SEAGULLSTOP faceplayerslow
 
state seagullgrowstate
  ifcount 32
  {
    guts JIBS4 24
    guts JIBS6 28
    addkills 1
    sound SQUISHED
    sound PIPEBOMB_EXPLODE
    hitradius 2048 60 70 80 90
    spawn BLOODPOOL
    spawn EXPLOSION2
    killit
  }
  else
  {
    sizeto MAXXSTRETCH MAXYSTRETCH
    sizeto MAXXSTRETCH MAXYSTRETCH
    break
  }
ends
 
state seagullshrunkstate
  ifcount SHRUNKDONECOUNT
    ai AISEAGULLATTACK
  else
    ifcount SHRUNKCOUNT
      sizeto 48 40
  else
    state genericshrunkcode
ends
 
state SEAGULLFLYSTATE
  ifrnd 4 ai AISEAGULLFLY
 
  ifp pdead break
 
  ifrnd 1 sound SEAGULLROAM
 
 // ifrnd 32 spawn SEAGULLSHIT
 
 
  ifpdistl 8000
    {
      ifrnd 2
        ifp palive
          ai AISEAGULLATTACK
    }
  else
    {
      ifrnd 4
        ifp palive
          ai AISEAGULLATTACK
    }
ends
 
state SEAGULLATTACKSTATE
  ifp pdead ai AISEAGULLFLY
 
  ifrnd 2 sound SEAGULLROAM
 
  ifrnd 1 ifrnd 196 ai AISEAGULLFLY
 
  ifpdistl 2500
    {
      spawn SEAGULLSHIT
      ai AISEAGULLFLY
    }
ends
 
state seagullcode
  cstator 257
 
  ifai 0
  {
    ai AISEAGULLFLY
    
    getactor[THISACTOR].xrepeat vaca_x
    ifvare vaca_x 1
      sizeat 40 40
  }
 
  clipdist 80
 
    ifaction SEAGULLFROZEN
  {
 
    ifcount THAWTIME
    {
      ai AISEAGULLATTACK
      getlastpal
    }
    else
      ifcount FROZENDRIPTIME
    {
      ifactioncount 26
      {
        spawn WATERDRIP
        resetactioncount
      }
    }
 
    ifhitweapon
    {
      ifwasweapon FREEZEBLAST
      {
        strength 0
        break
      }
      addkills 1
 
      ifrnd 84
        spawn BLOODPOOL
      lotsofglass 30
      sound GLASS_BREAKING
      killit
    }
    ifp pfacing
      ifpdistl FROZENQUICKKICKDIST
        pkick
 
    iffloordistl 8
    {
      getsector[THISACTOR].floorpicnum vaca_temp
      switch vaca_temp
        case WATERTILE2 case 337 case 338
        case 3630 case 3631 case 3632 case 3633 case 3634 case 3635 case 3636 case 3637 case 3638 break
  
        default
          addkills 1
          ifrnd 84
            spawn BLOODPOOL
          lotsofglass 30
          sound GLASS_BREAKING
          killit
          break
      endswitch
    }
 
    fall
 
    break
  }
 
 ifhitweapon
   {
     sound SQUISHED
     ifdead
       {
         ifwasweapon GROWSPARK
           {
             cstat 0
             sound ACTOR_GROWING
             ai AISEAGULLGROW
             break
           }
    else ifwasweapon FREEZEBLAST
           {
             sound SOMETHINGFROZE
             spritepal 1
             move 0
             action SEAGULLFROZEN
             strength 0
             break
           }
         else
           {
             guts JIBS2 1
             guts JIBS3 1
             guts JIBS4 1
             guts JIBS5 1
             guts JIBS6 1
             ifrnd 6
             {
               guts JIBS1 1
               spawn BLOODPOOL
             }         // a badly drawn spine
             state jib_sounds
             sound SEAGULLDIE
             killit
           }
       }
     else
       {
         ifwasweapon SHRINKSPARK
           {
             sound ACTOR_SHRINKING
             ai AISEAGULLSHRUNK
           }
         else ifwasweapon GROWSPARK sound EXPANDERHIT
 
         guts JIBS6 1
         soundonce SEAGULLHURT
       }
   }
 
      ifai AISEAGULLFLY state SEAGULLFLYSTATE
 else ifai AISEAGULLATTACK state SEAGULLATTACKSTATE
 else ifai AISEAGULLGROW state seagullgrowstate
 else ifai AISEAGULLSHRUNK state seagullshrunkstate
ends
 
useractor enemy SEAGULL SEAGULLSTRENGTH SEAGULLFLY state seagullcode enda
 
 
 
action ASEAGULLSHIT -1 1 1 
 
move SEAGULLSHITSPEED 50 100 
 
ai AISEAGULLSHIT ASEAGULLSHIT SEAGULLSHITSPEED geth getv 
 
useractor notenemy SEAGULLSHIT 0
 sizeat 8 8
 ifai 0
   {
     sound SEAGULLSHITSOUND
     ai AISEAGULLSHIT
     action ASEAGULLSHIT
   }
 
 fall
 
 iffloordistl 10
   {
     ifpdistl 1900
       {
         addphealth SEAGULLSHITHURT
         globalsound DUKE_GRUNT
         palfrom 16 16
         state headhitstate
       }
     spritepal 7
     debris SCRAP3 4
     spawn WATERSPLASH2
     killit
   }
enda
 

Rev 19	Rev 73
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 - SEAGULL - Sprite #1553	12	// Actor - SEAGULL - Sprite #1553
13	// Actor - SEAGULLSHIT - Sprite #1638	13	// Actor - SEAGULLSHIT - Sprite #1638
14	//	14	//
15	// --- Resources ---	15	// --- Resources ---
16	//	16	//
17	// Sounds:	17	// Sounds:
18	// Sea Gull Hurt Sound - GULLHURT.WAV	18	// Sea Gull Hurt Sound - GULLHURT.WAV
19	// Sea Gull Roam Sound - GULLROAM.WAV	19	// Sea Gull Roam Sound - GULLROAM.WAV
20	// Sea Gull Dying Sound - GULLDIE.WAV	20	// Sea Gull Dying Sound - GULLDIE.WAV
21	// Sea Gull Shit Sound - GULLSHIT.WAV	21	// Sea Gull Shit Sound - GULLSHIT.WAV
22	//	22	//
23	// Art:	23	// Art:
24	// 3 * 1 frame(s) - Parallaxed Sea Gull	24	// 3 * 1 frame(s) - Parallaxed Sea Gull
25	// 1 * 1 frame(s) - Sea Gull Shit	25	// 1 * 1 frame(s) - Sea Gull Shit
26	*/	26	*/
27		27
28	action SEAGULLFLY 0 3 1 1 20	28	action SEAGULLFLY 0 3 1 1 20
29	action SEAGULLSTILL 1	29	action SEAGULLSTILL 1
30	action SEAGULLFROZEN 1	30	action SEAGULLFROZEN 1
31		31
32	move SEAGULLSHRUNKSPEED 50	32	move SEAGULLSHRUNKSPEED 50
33	move SEAGULLSPEED 100	33	move SEAGULLSPEED 100
34	move SEAGULLATTACK 200	34	move SEAGULLATTACK 200
35	move SEAGULLSTOP	35	move SEAGULLSTOP
36		36
37	ai AISEAGULLFLY SEAGULLFLY SEAGULLSPEED randomangle geth getv	37	ai AISEAGULLFLY SEAGULLFLY SEAGULLSPEED randomangle geth getv
38	ai AISEAGULLATTACK SEAGULLFLY SEAGULLATTACK faceplayer	38	ai AISEAGULLATTACK SEAGULLFLY SEAGULLATTACK faceplayer
39		39
40	ai AISEAGULLFROZEN SEAGULLSTILL SEAGULLSTOP	40	ai AISEAGULLFROZEN SEAGULLSTILL SEAGULLSTOP
41	ai AISEAGULLSHRUNK SEAGULLFLY SEAGULLSHRUNKSPEED randomangle geth getv	41	ai AISEAGULLSHRUNK SEAGULLFLY SEAGULLSHRUNKSPEED randomangle geth getv
42	ai AISEAGULLGROW SEAGULLSTILL SEAGULLSTOP faceplayerslow	42	ai AISEAGULLGROW SEAGULLSTILL SEAGULLSTOP faceplayerslow
43		43
44	state seagullgrowstate	44	state seagullgrowstate
45	ifcount 32	45	ifcount 32
46	{	46	{
47	guts JIBS4 24	47	guts JIBS4 24
48	guts JIBS6 28	48	guts JIBS6 28
49	addkills 1	49	addkills 1
50	sound SQUISHED	50	sound SQUISHED
51	sound PIPEBOMB_EXPLODE	51	sound PIPEBOMB_EXPLODE
52	hitradius 2048 60 70 80 90	52	hitradius 2048 60 70 80 90
53	spawn BLOODPOOL	53	spawn BLOODPOOL
54	spawn EXPLOSION2	54	spawn EXPLOSION2
55	killit	55	killit
56	}	56	}
57	else	57	else
58	{	58	{
59	sizeto MAXXSTRETCH MAXYSTRETCH	59	sizeto MAXXSTRETCH MAXYSTRETCH
60	sizeto MAXXSTRETCH MAXYSTRETCH	60	sizeto MAXXSTRETCH MAXYSTRETCH
61	break	61	break
62	}	62	}
63	ends	63	ends
64		64
65	state seagullshrunkstate	65	state seagullshrunkstate
66	ifcount SHRUNKDONECOUNT	66	ifcount SHRUNKDONECOUNT
67	ai AISEAGULLATTACK	67	ai AISEAGULLATTACK
68	else	68	else
69	ifcount SHRUNKCOUNT	69	ifcount SHRUNKCOUNT
70	sizeto 48 40	70	sizeto 48 40
71	else	71	else
72	state genericshrunkcode	72	state genericshrunkcode
73	ends	73	ends
74		74
75	state SEAGULLFLYSTATE	75	state SEAGULLFLYSTATE
76	ifrnd 4 ai AISEAGULLFLY	76	ifrnd 4 ai AISEAGULLFLY
77		77
78	ifp pdead break	78	ifp pdead break
79		79
80	ifrnd 1 sound SEAGULLROAM	80	ifrnd 1 sound SEAGULLROAM
81		81
82	// ifrnd 32 spawn SEAGULLSHIT	82	// ifrnd 32 spawn SEAGULLSHIT
83		83
84		84
85	ifpdistl 8000	85	ifpdistl 8000
86	{	86	{
87	ifrnd 2	87	ifrnd 2
88	ifp palive	88	ifp palive
89	ai AISEAGULLATTACK	89	ai AISEAGULLATTACK
90	}	90	}
91	else	91	else
92	{	92	{
93	ifrnd 4	93	ifrnd 4
94	ifp palive	94	ifp palive
95	ai AISEAGULLATTACK	95	ai AISEAGULLATTACK
96	}	96	}
97	ends	97	ends
98		98
99	state SEAGULLATTACKSTATE	99	state SEAGULLATTACKSTATE
100	ifp pdead ai AISEAGULLFLY	100	ifp pdead ai AISEAGULLFLY
101		101
102	ifrnd 2 sound SEAGULLROAM	102	ifrnd 2 sound SEAGULLROAM
103		103
104	ifrnd 1 ifrnd 196 ai AISEAGULLFLY	104	ifrnd 1 ifrnd 196 ai AISEAGULLFLY
105		105
106	ifpdistl 2500	106	ifpdistl 2500
107	{	107	{
108	spawn SEAGULLSHIT	108	spawn SEAGULLSHIT
109	ai AISEAGULLFLY	109	ai AISEAGULLFLY
110	}	110	}
111	ends	111	ends
112		112
113	state seagullcode	113	state seagullcode
114	cstator 257	114	cstator 257
115		115
116	ifai 0	116	ifai 0
117	{	117	{
118	ai AISEAGULLFLY	118	ai AISEAGULLFLY
119		119
120	getactor[THISACTOR].xrepeat x	120	getactor[THISACTOR].xrepeat vaca_x
121	ifvare x 1	121	ifvare vaca_x 1
122	sizeat 40 40	122	sizeat 40 40
123	}	123	}
124		124
125	clipdist 80	125	clipdist 80
126		126
127	ifaction SEAGULLFROZEN	127	ifaction SEAGULLFROZEN
128	{	128	{
129		129
130	ifcount THAWTIME	130	ifcount THAWTIME
131	{	131	{
132	ai AISEAGULLATTACK	132	ai AISEAGULLATTACK
133	getlastpal	133	getlastpal
134	}	134	}
135	else	135	else
136	ifcount FROZENDRIPTIME	136	ifcount FROZENDRIPTIME
137	{	137	{
138	ifactioncount 26	138	ifactioncount 26
139	{	139	{
140	spawn WATERDRIP	140	spawn WATERDRIP
141	resetactioncount	141	resetactioncount
142	}	142	}
143	}	143	}
144		144
145	ifhitweapon	145	ifhitweapon
146	{	146	{
147	ifwasweapon FREEZEBLAST	147	ifwasweapon FREEZEBLAST
148	{	148	{
149	strength 0	149	strength 0
150	break	150	break
151	}	151	}
152	addkills 1	152	addkills 1
153		153
154	ifrnd 84	154	ifrnd 84
155	spawn BLOODPOOL	155	spawn BLOODPOOL
156	lotsofglass 30	156	lotsofglass 30
157	sound GLASS_BREAKING	157	sound GLASS_BREAKING
158	killit	158	killit
159	}	159	}
160	ifp pfacing	160	ifp pfacing
161	ifpdistl FROZENQUICKKICKDIST	161	ifpdistl FROZENQUICKKICKDIST
162	pkick	162	pkick
163		163
164	iffloordistl 8	164	iffloordistl 8
165	{	165	{
166	getsector[THISACTOR].floorpicnum temp	166	getsector[THISACTOR].floorpicnum vaca_temp
167	switch temp	167	switch vaca_temp
168	case WATERTILE2 case 337 case 338	168	case WATERTILE2 case 337 case 338
169	case 3630 case 3631 case 3632 case 3633 case 3634 case 3635 case 3636 case 3637 case 3638 break	169	case 3630 case 3631 case 3632 case 3633 case 3634 case 3635 case 3636 case 3637 case 3638 break
170		170
171	default	171	default
172	addkills 1	172	addkills 1
173	ifrnd 84	173	ifrnd 84
174	spawn BLOODPOOL	174	spawn BLOODPOOL
175	lotsofglass 30	175	lotsofglass 30
176	sound GLASS_BREAKING	176	sound GLASS_BREAKING
177	killit	177	killit
178	break	178	break
179	endswitch	179	endswitch
180	}	180	}
181		181
182	fall	182	fall
183		183
184	break	184	break
185	}	185	}
186		186
187	ifhitweapon	187	ifhitweapon
188	{	188	{
189	sound SQUISHED	189	sound SQUISHED
190	ifdead	190	ifdead
191	{	191	{
192	ifwasweapon GROWSPARK	192	ifwasweapon GROWSPARK
193	{	193	{
194	cstat 0	194	cstat 0
195	sound ACTOR_GROWING	195	sound ACTOR_GROWING
196	ai AISEAGULLGROW	196	ai AISEAGULLGROW
197	break	197	break
198	}	198	}
199	else ifwasweapon FREEZEBLAST	199	else ifwasweapon FREEZEBLAST
200	{	200	{
201	sound SOMETHINGFROZE	201	sound SOMETHINGFROZE
202	spritepal 1	202	spritepal 1
203	move 0	203	move 0
204	action SEAGULLFROZEN	204	action SEAGULLFROZEN
205	strength 0	205	strength 0
206	break	206	break
207	}	207	}
208	else	208	else
209	{	209	{
210	guts JIBS2 1	210	guts JIBS2 1
211	guts JIBS3 1	211	guts JIBS3 1
212	guts JIBS4 1	212	guts JIBS4 1
213	guts JIBS5 1	213	guts JIBS5 1
214	guts JIBS6 1	214	guts JIBS6 1
215	ifrnd 6	215	ifrnd 6
216	{	216	{
217	guts JIBS1 1	217	guts JIBS1 1
218	spawn BLOODPOOL	218	spawn BLOODPOOL
219	} // a badly drawn spine	219	} // a badly drawn spine
220	state jib_sounds	220	state jib_sounds
221	sound SEAGULLDIE	221	sound SEAGULLDIE
222	killit	222	killit
223	}	223	}
224	}	224	}
225	else	225	else
226	{	226	{
227	ifwasweapon SHRINKSPARK	227	ifwasweapon SHRINKSPARK
228	{	228	{
229	sound ACTOR_SHRINKING	229	sound ACTOR_SHRINKING
230	ai AISEAGULLSHRUNK	230	ai AISEAGULLSHRUNK
231	}	231	}
232	else ifwasweapon GROWSPARK sound EXPANDERHIT	232	else ifwasweapon GROWSPARK sound EXPANDERHIT
233		233
234	guts JIBS6 1	234	guts JIBS6 1
235	soundonce SEAGULLHURT	235	soundonce SEAGULLHURT
236	}	236	}
237	}	237	}
238		238
239	ifai AISEAGULLFLY state SEAGULLFLYSTATE	239	ifai AISEAGULLFLY state SEAGULLFLYSTATE
240	else ifai AISEAGULLATTACK state SEAGULLATTACKSTATE	240	else ifai AISEAGULLATTACK state SEAGULLATTACKSTATE
241	else ifai AISEAGULLGROW state seagullgrowstate	241	else ifai AISEAGULLGROW state seagullgrowstate
242	else ifai AISEAGULLSHRUNK state seagullshrunkstate	242	else ifai AISEAGULLSHRUNK state seagullshrunkstate
243	ends	243	ends
244		244
245	useractor enemy SEAGULL SEAGULLSTRENGTH SEAGULLFLY state seagullcode enda	245	useractor enemy SEAGULL SEAGULLSTRENGTH SEAGULLFLY state seagullcode enda
246		246
247		247
248		248
249	action ASEAGULLSHIT -1 1 1	249	action ASEAGULLSHIT -1 1 1
250		250
251	move SEAGULLSHITSPEED 50 100	251	move SEAGULLSHITSPEED 50 100
252		252
253	ai AISEAGULLSHIT ASEAGULLSHIT SEAGULLSHITSPEED geth getv	253	ai AISEAGULLSHIT ASEAGULLSHIT SEAGULLSHITSPEED geth getv
254		254
255	useractor notenemy SEAGULLSHIT 0	255	useractor notenemy SEAGULLSHIT 0
256	sizeat 8 8	256	sizeat 8 8
257	ifai 0	257	ifai 0
258	{	258	{
259	sound SEAGULLSHITSOUND	259	sound SEAGULLSHITSOUND
260	ai AISEAGULLSHIT	260	ai AISEAGULLSHIT
261	action ASEAGULLSHIT	261	action ASEAGULLSHIT
262	}	262	}
263		263
264	fall	264	fall
265		265
266	iffloordistl 10	266	iffloordistl 10
267	{	267	{
268	ifpdistl 1900	268	ifpdistl 1900
269	{	269	{
270	addphealth SEAGULLSHITHURT	270	addphealth SEAGULLSHITHURT
271	globalsound DUKE_GRUNT	271	globalsound DUKE_GRUNT
272	palfrom 16 16	272	palfrom 16 16
273	state headhitstate	273	state headhitstate
274	}	274	}
275	spritepal 7	275	spritepal 7
276	debris SCRAP3 4	276	debris SCRAP3 4
277	spawn WATERSPLASH2	277	spawn WATERSPLASH2
278	killit	278	killit
279	}	279	}
280	enda	280	enda
281		281

Subversion Repositories vaca_plus

(root)/vaca_plus/VSeagull.con – Rev 19 → 73