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

Subversion Repositories vaca_plus

(root)/vaca_plus/VBeachBabe.con @ 73 – Rev 1