WebSVN – vaca_plus – Blame – /vaca_plus/VBeachBather.con

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

Subversion Repositories vaca_plus

(root)/vaca_plus/VBeachBather.con – Rev 1