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	}
25	h266	191	else
		192	{
		193	ifp pfacing
		194	ifpdistl FROZENQUICKKICKDIST
		195	pkick
		196	}
		197	ifcount THAWTIME
1	h266	198	{
25	h266	199	getlastpal
		200	ai AIBEACHBABERUNAWAY
		201	}
		202	else
		203	ifcount FROZENDRIPTIME
		204	ifactioncount 26
		205	{
		206	spawn WATERDRIP
		207	resetactioncount
		208	}
1	h266	209	}
		210
		211	ifhitweapon
		212	{
		213	sound SQUISHED
		214	ai AIBEACHBABERUNAWAY
		215	ifdead
		216	{
		217	ifwasweapon GROWSPARK
		218	{
		219	cstat 0
		220	move 0
		221	sound ACTOR_GROWING
		222	ai AIBEACHBABEGROW
		223	break
		224	}
		225	else ifwasweapon FREEZEBLAST
		226	{
		227	ai AIBEACHBABEFROZEN
		228	move 0
		229	spritepal 1
		230	strength 0
		231	sound SOMETHINGFROZE
		232	break
		233	}
		234
		235	state stopbeachbabebathersounds
		236	ifrnd 128 sound DUKE_HIT_STRIPPER1 else sound DUKE_HIT_STRIPPER2
		237
		238	respawnhitag
		239	// state standard_bjibs
		240	state standard_bjibs
		241	state random_wall_jibs
		242	spawn BLOODPOOL
		243	// spritepal 6
		244	soundonce BABESCREAM4
		245	killit
		246	}
		247	else
		248	{
		249	ifwasweapon SHRINKSPARK
		250	{
		251	sound ACTOR_SHRINKING
		252	move 0
		253	ai AIBEACHBABESHRUNK
		254	cstat 0
		255	break
		256	}
		257	else
		258	{
		259	guts JIBS6 1
		260	}
		261
		262	// else ifwasweapon GROWSPARK sound EXPANDERHIT
		263	}
		264	}
		265
		266
		267
		268	/*
		269	ifdead
		270	{
		271	state standard_bjibs
		272	sound SQUISHED
		273	killit
		274	}
		275	*/
		276
		277	ifai AIBEACHBABEROAM state BEACHBABEROAMSTATE
		278	else ifai AIBEACHBABEWANTDUKE state BEACHBABEWANTDUKESTATE
		279	else ifai AIBEACHBABERUNAWAY state BEACHBABERUNAWAYSTATE
		280	else ifai AIBEACHBABEFLEE state BEACHBABEFLEESTATE
		281	ends
		282
		283	useractor notenemy BEACHBABE1 BEACHBABESTRENGTH BEACHBABEWALK
		284	state BEACHBABESTATE
		285	enda

Subversion Repositories vaca_plus

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