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 x
    ifvare 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 temp
      switch 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 1	Rev 19
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
-		117	{
116	ifai 0 ai AISEAGULLFLY	118	ai AISEAGULLFLY
117		119
-		120	getactor[THISACTOR].xrepeat x
-		121	ifvare x 1
-		122	sizeat 40 40
-		123	}
118		124
-		125	clipdist 80
119		126
120	ifaction SEAGULLFROZEN	127	ifaction SEAGULLFROZEN
121	{	128	{
122		129
123	ifcount THAWTIME	130	ifcount THAWTIME
124	{	131	{
125	ai AISEAGULLATTACK	132	ai AISEAGULLATTACK
126	getlastpal	133	getlastpal
127	}	134	}
128	else	135	else
129	ifcount FROZENDRIPTIME	136	ifcount FROZENDRIPTIME
130	{	137	{
131	ifactioncount 26	138	ifactioncount 26
132	{	139	{
133	spawn WATERDRIP	140	spawn WATERDRIP
134	resetactioncount	141	resetactioncount
135	}	142	}
136	}	143	}
137		144
138	ifhitweapon	145	ifhitweapon
139	{	146	{
140	ifwasweapon FREEZEBLAST	147	ifwasweapon FREEZEBLAST
141	{	148	{
142	strength 0	149	strength 0
143	break	150	break
144	}	151	}
145	addkills 1	152	addkills 1
146		153
147	ifrnd 84	154	ifrnd 84
148	spawn BLOODPOOL	155	spawn BLOODPOOL
149	lotsofglass 30	156	lotsofglass 30
150	sound GLASS_BREAKING	157	sound GLASS_BREAKING
151	killit	158	killit
152	}	159	}
153	ifp pfacing	160	ifp pfacing
154	ifpdistl FROZENQUICKKICKDIST	161	ifpdistl FROZENQUICKKICKDIST
155	pkick	162	pkick
156		163
157	iffloordistl 8	164	iffloordistl 8
158	{	165	{
159	getsector[THISACTOR].floorpicnum temp	166	getsector[THISACTOR].floorpicnum temp
160	switch temp	167	switch temp
-		168	case WATERTILE2 case 337 case 338
161	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	169	case 3630 case 3631 case 3632 case 3633 case 3634 case 3635 case 3636 case 3637 case 3638 break
162		170
163	default	171	default
164	addkills 1	172	addkills 1
165	ifrnd 84	173	ifrnd 84
166	spawn BLOODPOOL	174	spawn BLOODPOOL
167	lotsofglass 30	175	lotsofglass 30
168	sound GLASS_BREAKING	176	sound GLASS_BREAKING
169	killit	177	killit
170	break	178	break
171	endswitch	179	endswitch
172	}	180	}
-		181
173	else fall	182	fall
174		183
175	break	184	break
176	}	185	}
177		186
178	ifhitweapon	187	ifhitweapon
179	{	188	{
180	sound SQUISHED	189	sound SQUISHED
181	ifdead	190	ifdead
182	{	191	{
183	ifwasweapon GROWSPARK	192	ifwasweapon GROWSPARK
184	{	193	{
185	cstat 0	194	cstat 0
186	sound ACTOR_GROWING	195	sound ACTOR_GROWING
187	ai AISEAGULLGROW	196	ai AISEAGULLGROW
188	break	197	break
189	}	198	}
190	else ifwasweapon FREEZEBLAST	199	else ifwasweapon FREEZEBLAST
191	{	200	{
192	sound SOMETHINGFROZE	201	sound SOMETHINGFROZE
193	spritepal 1	202	spritepal 1
194	move 0	203	move 0
195	action SEAGULLFROZEN	204	action SEAGULLFROZEN
196	strength 0	205	strength 0
197	break	206	break
198	}	207	}
199	else	208	else
200	{	209	{
201	guts JIBS2 1	210	guts JIBS2 1
202	guts JIBS3 1	211	guts JIBS3 1
203	guts JIBS4 1	212	guts JIBS4 1
204	guts JIBS5 1	213	guts JIBS5 1
205	guts JIBS6 1	214	guts JIBS6 1
206	ifrnd 6	215	ifrnd 6
207	{	216	{
208	guts JIBS1 1	217	guts JIBS1 1
209	spawn BLOODPOOL	218	spawn BLOODPOOL
210	} // a badly drawn spine	219	} // a badly drawn spine
211	state jib_sounds	220	state jib_sounds
212	sound SEAGULLDIE	221	sound SEAGULLDIE
213	killit	222	killit
214	}	223	}
215	}	224	}
216	else	225	else
217	{	226	{
218	ifwasweapon SHRINKSPARK	227	ifwasweapon SHRINKSPARK
219	{	228	{
220	sound ACTOR_SHRINKING	229	sound ACTOR_SHRINKING
221	ai AISEAGULLSHRUNK	230	ai AISEAGULLSHRUNK
222	}	231	}
223	else ifwasweapon GROWSPARK sound EXPANDERHIT	232	else ifwasweapon GROWSPARK sound EXPANDERHIT
224		233
225	guts JIBS6 1	234	guts JIBS6 1
226	soundonce SEAGULLHURT	235	soundonce SEAGULLHURT
227	}	236	}
228	}	237	}
229		238
230	ifai AISEAGULLFLY state SEAGULLFLYSTATE	239	ifai AISEAGULLFLY state SEAGULLFLYSTATE
231	else ifai AISEAGULLATTACK state SEAGULLATTACKSTATE	240	else ifai AISEAGULLATTACK state SEAGULLATTACKSTATE
232	else ifai AISEAGULLGROW state seagullgrowstate	241	else ifai AISEAGULLGROW state seagullgrowstate
233	else ifai AISEAGULLSHRUNK state seagullshrunkstate	242	else ifai AISEAGULLSHRUNK state seagullshrunkstate
234	ends	243	ends
235		244
236	useractor enemy SEAGULL SEAGULLSTRENGTH SEAGULLFLY state seagullcode enda	245	useractor enemy SEAGULL SEAGULLSTRENGTH SEAGULLFLY state seagullcode enda
237		246
238		247
239		248
240	action ASEAGULLSHIT -1 1 1	249	action ASEAGULLSHIT -1 1 1
241		250
242	move SEAGULLSHITSPEED 50 100	251	move SEAGULLSHITSPEED 50 100
243		252
244	ai AISEAGULLSHIT ASEAGULLSHIT SEAGULLSHITSPEED geth getv	253	ai AISEAGULLSHIT ASEAGULLSHIT SEAGULLSHITSPEED geth getv
245		254
246	useractor notenemy SEAGULLSHIT 0	255	useractor notenemy SEAGULLSHIT 0
247	sizeat 8 8	256	sizeat 8 8
248	ifai 0	257	ifai 0
249	{	258	{
250	sound SEAGULLSHITSOUND	259	sound SEAGULLSHITSOUND
251	ai AISEAGULLSHIT	260	ai AISEAGULLSHIT
252	action ASEAGULLSHIT	261	action ASEAGULLSHIT
253	}	262	}
254		263
255	fall	264	fall
256		265
257	iffloordistl 10	266	iffloordistl 10
258	{	267	{
259	ifpdistl 1900	268	ifpdistl 1900
260	{	269	{
261	addphealth SEAGULLSHITHURT	270	addphealth SEAGULLSHITHURT
262	globalsound DUKE_GRUNT	271	globalsound DUKE_GRUNT
263	palfrom 16 16	272	palfrom 16 16
264	wackplayer	273	state headhitstate
265	}	274	}
266	spritepal 7	275	spritepal 7
267	debris SCRAP3 4	276	debris SCRAP3 4
268	spawn WATERSPLASH2	277	spawn WATERSPLASH2
269	killit	278	killit
270	}	279	}
271	enda	280	enda
272		281

Subversion Repositories vaca_plus

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