; Fog script for level 4 - Chernobyl

; DATA VALUE DESCRIPTION  :
; PATHPOINT_GROUP is 1 for fog stuff
; FLOAT DATA : ENTRY 0 == INTENSITY (0.0 to 1.0f)
;              ENTRY 1,2 and 3 == RGB COLOR (0.0 to 255.0f)
; INT DATA   : ENTRY 0 == NUMBER OF TICKS TO FADE COLOR IN
;	       	   ENTRY 1 == FOG TYPE TO USE (not yet implemented)

;
; DEFINES FOR FOG FUNCTIONS
;

;;;;;;;;;;;;;;;;;;;;
; Starting pathpoint
;;;;;;;;;;;;;;;;;;;;
FUNCTION        CREATE_PATHPOINT
                START
                PATHPOINT_GROUP  1
                PATHPOINT_POINT  1
                PATHPOINT_FLOATS 0.0f 0.0f 0.0f 0.0f
                PATHPOINT_INTS   1
                END     ; CREATE_PATHPOINT

;;;;;;;;;;;;;;;;;;;;
; Gloop room
;;;;;;;;;;;;;;;;;;;;
FUNCTION        CREATE_PATHPOINT
                START
                PATHPOINT_GROUP  1
                PATHPOINT_POINT  600
                PATHPOINT_FLOATS 0.003f 75.0f 120.0f 75.0f
                PATHPOINT_INTS   60
                END     ; CREATE_PATHPOINT

FUNCTION        CREATE_PATHPOINT
                START
                PATHPOINT_GROUP  1
                PATHPOINT_POINT  615
                PATHPOINT_FLOATS 0.008f 75.0f 120.0f 75.0f
                PATHPOINT_INTS   60
                END     ; CREATE_PATHPOINT

;;;;;;;;;;;;;;;;;;;;;;
; Back to normal again			   
;;;;;;;;;;;;;;;;;;;;;;
FUNCTION        CREATE_PATHPOINT
                START
                PATHPOINT_GROUP  1
                PATHPOINT_POINT  640
                PATHPOINT_FLOATS 0.0f 0.0f 0.0f 0.0f
                PATHPOINT_INTS   120
                END     ; CREATE_PATHPOINT

;;;;;;;;;;;;;;;;;;;;;;;;;
; Red glow from explosion			   
;;;;;;;;;;;;;;;;;;;;;;;;;
FUNCTION        CREATE_PATHPOINT
                START
                PATHPOINT_GROUP  1
                PATHPOINT_POINT  903
                PATHPOINT_FLOATS 0.125f 100.0f 0.0f 0.0f
                PATHPOINT_INTS   160
                END     ; CREATE_PATHPOINT

;;;;;;;;;;;;;;;;;;;;;;
; Back to normal again			   
;;;;;;;;;;;;;;;;;;;;;;
FUNCTION        CREATE_PATHPOINT
                START
                PATHPOINT_GROUP  1
                PATHPOINT_POINT  925
                PATHPOINT_FLOATS 0.0f 0.0f 0.0f 0.0f
                PATHPOINT_INTS   90
                END     ; CREATE_PATHPOINT

FUNCTION        CREATE_PATHPOINT
                START
                PATHPOINT_GROUP  1
                PATHPOINT_POINT  926
                PATHPOINT_FLOATS 0.0f 0.0f 0.0f 0.0f
                PATHPOINT_INTS   80
                END     ; CREATE_PATHPOINT

FUNCTION        CREATE_PATHPOINT
                START
                PATHPOINT_GROUP  1
                PATHPOINT_POINT  927
                PATHPOINT_FLOATS 0.0f 0.0f 0.0f 0.0f
                PATHPOINT_INTS   70
                END     ; CREATE_PATHPOINT

FUNCTION        CREATE_PATHPOINT
                START
                PATHPOINT_GROUP  1
                PATHPOINT_POINT  928
                PATHPOINT_FLOATS 0.0f 0.0f 0.0f 0.0f
                PATHPOINT_INTS   60
                END     ; CREATE_PATHPOINT

FUNCTION        CREATE_PATHPOINT
                START
                PATHPOINT_GROUP  1
                PATHPOINT_POINT  929
                PATHPOINT_FLOATS 0.0f 0.0f 0.0f 0.0f
                PATHPOINT_INTS   50
                END     ; CREATE_PATHPOINT

FUNCTION        CREATE_PATHPOINT
                START
                PATHPOINT_GROUP  1
                PATHPOINT_POINT  930
                PATHPOINT_FLOATS 0.0f 0.0f 0.0f 0.0f
                PATHPOINT_INTS   40
                END     ; CREATE_PATHPOINT

;;EOF

; Script for Cherynobil level - helecopters fly overhead

;;LOAD lvl4\4cop1.mif

;;;;;;;;;;;;;;
; Helecopter 1
;;;;;;;;;;;;;;
FUNCTION       CREATE_OBJECT
               START
                GEOMETRY    		copter
				ID					copter01
                LOCATORS    		locpth01
		        CLASS       		A
				CALLBACK_MESSAGE	LVL4_COPTER1_CB
                LIGHT_VERTEX     	TRUE
				REACTION_SET
				REACTION_RADIUS		250.0f
	           	PATH_MAIN    		ptha01
	           	PATH_UP	    		ptha02
          		PATH_LOOP    		true
				PATH_ALIGN			true
          		PATH_ABS  	 		true
          		PATH_SPEED   		1
				PATH_SMOOTH			10
				PATH_RESET	 		true
               END     

;;;;;;;;;;;;;;;
; Copter blades
;;;;;;;;;;;;;;;
FUNCTION CREATE_OBJECT
		  START
		   GEOMETRY		bladtp01
		   TYPE			NORMAL_OBJECT
		   CLASS		A
		   LOCATORS		loctp01
		   PARENT_ID	copter01
		   PARENT_LINK	ABSOLUTE
		   DROTATION	0.0f 25.0f 0.0f
		  END

FUNCTION CREATE_OBJECT
		  START
		   GEOMETRY		bladrr01
		   TYPE			NORMAL_OBJECT
		   CLASS		A
		   LOCATORS		locrr01
		   PARENT_ID	copter01
		   PARENT_LINK	ABSOLUTE
		   DROTATION	25.0f 0.0f 0.0f
		  END

;;;;;;;;;;;;;;
; Helecopter 2
;;;;;;;;;;;;;;
FUNCTION       CREATE_OBJECT
               START
                GEOMETRY    		copter
				ID					copter02
                LOCATORS    		locpth02
		        CLASS       		A
				CALLBACK_MESSAGE	LVL4_COPTER1_CB
                LIGHT_VERTEX     	TRUE
				REACTION_SET
				REACTION_RADIUS		250.0f
	           	PATH_MAIN    		pthb01
	           	PATH_UP	    		pthb02
          		PATH_LOOP    		true
				PATH_ALIGN			true
          		PATH_ABS  	 		true
          		PATH_SPEED   		2
				PATH_SMOOTH			10
				PATH_RESET	 		true
               END     

;;;;;;;;;;;;;;;
; Copter blades
;;;;;;;;;;;;;;;
FUNCTION CREATE_OBJECT
		  START
		   GEOMETRY		bladtp01
		   TYPE			NORMAL_OBJECT
		   CLASS		A
		   LOCATORS		loctp01
		   PARENT_ID	copter02
		   PARENT_LINK	ABSOLUTE
		   DROTATION	0.0f 25.0f 0.0f
		  END

FUNCTION CREATE_OBJECT
		  START
		   GEOMETRY		bladrr01
		   TYPE			NORMAL_OBJECT
		   CLASS		A
		   LOCATORS		locrr01
		   PARENT_ID	copter02
		   PARENT_LINK	ABSOLUTE
		   DROTATION	25.0f 0.0f 0.0f
		  END

;;;;;;;;;;;;;;
; Helecopter 3
;;;;;;;;;;;;;;
FUNCTION       CREATE_OBJECT
               START
                GEOMETRY    		copter
				ID					copter03
                LOCATORS    		locpth03
		        CLASS       		A
				CALLBACK_MESSAGE	LVL4_COPTER1_CB
				REACTION_SET
                LIGHT_VERTEX     	TRUE
				REACTION_RADIUS		250.0f
	           	PATH_MAIN    		pthc01
	           	PATH_UP	    		pthc02
          		PATH_LOOP    		true
				PATH_ALIGN			true
          		PATH_ABS  	 		true
          		PATH_SPEED   		1
				PATH_SMOOTH			10
               END     

;;;;;;;;;;;;;;;
; Copter blades
;;;;;;;;;;;;;;;
FUNCTION CREATE_OBJECT
		  START
		   GEOMETRY		bladtp01
		   TYPE			NORMAL_OBJECT
		   CLASS		A
		   LOCATORS		loctp01
		   PARENT_ID	copter03
		   PARENT_LINK	ABSOLUTE
		   DROTATION	0.0f 25.0f 0.0f
		  END

FUNCTION CREATE_OBJECT
		  START
		   GEOMETRY		bladrr01
		   TYPE			NORMAL_OBJECT
		   CLASS		A
		   LOCATORS		locrr01
		   PARENT_ID	copter03
		   PARENT_LINK	ABSOLUTE
		   DROTATION	25.0f 0.0f 0.0f
		  END

;;;;;;;;;;;;;;;
; Helecopter 3b
;;;;;;;;;;;;;;;
FUNCTION       CREATE_OBJECT
               START
                GEOMETRY    		copter
				ID					copter03b
                LOCATORS    		locpth03
		        CLASS       		A
				CALLBACK_MESSAGE	LVL4_COPTER1_CB
                LIGHT_VERTEX     	TRUE
				REACTION_SET
				REACTION_RADIUS		250.0f
				DELAY_MOTION		90
				ALPHA_SEQUENCE		0.0f 0.0f 1.0f
	           	PATH_MAIN    		pthc01
	           	PATH_UP	    		pthc02
          		PATH_LOOP    		true
				PATH_ALIGN			true
          		PATH_ABS  	 		true
          		PATH_SPEED   		1
				PATH_SMOOTH			10
               END     

;;;;;;;;;;;;;;;
; Copter blades
;;;;;;;;;;;;;;;
FUNCTION CREATE_OBJECT
		  START
		   GEOMETRY		bladtp01
		   TYPE			NORMAL_OBJECT
		   CLASS		A
		   LOCATORS		loctp01
		   PARENT_ID	copter03b
		   PARENT_LINK	ABSOLUTE
		   DROTATION	0.0f 25.0f 0.0f
		  END

FUNCTION CREATE_OBJECT
		  START
		   GEOMETRY		bladrr01
		   TYPE			NORMAL_OBJECT
		   CLASS		A
		   LOCATORS		locrr01
		   PARENT_ID	copter03b
		   PARENT_LINK	ABSOLUTE
		   DROTATION	25.0f 0.0f 0.0f
		  END

;;EOF
; Script for Cherynobil level - submarine comes out of ice

;;LOAD lvl4\4sub.mif

; Sub itself
FUNCTION        CREATE_OBJECT
                START
                GEOMETRY    		sub
                LOCATORS    		loc_sub
		        CLASS       		A
				CALLBACK_MESSAGE	LVL4_SUB_CB

	            REACTION_SET
          		REACTION_RADIUS		850.0f

		        FLIPBOOK_SPEED  	1
		   	    FLIPBOOK_SEQUENCE  	0 
          	    FLIPBOOK_LOOP      	no
	           	PATH_MAIN    		path_sub
          		PATH_LOOP    		false
          		PATH_ABS  	 		true
          		PATH_SPEED   		40
				PATH_RESET	 		true

                END     

; Ice chunks
FUNCTION		CREATE_OBJECT
				START
				 GEOMETRY			ice
				 ID					ice_id1
		   		 TYPE	   	 		NORMAL_OBJECT
				 CLASS				A
				 LOCATORS			loc_ice
				 ALPHA_INIT			0.0f
                 LIGHT_VERTEX       TRUE
				 
		         REACTION_SET		
        		 REACTION_RADIUS 	850.0f

		         FLIPBOOK_SPEED  	2
        		 FLIPBOOK_LOOP      no
           	     FLIPBOOK_REVERSE   no
                 FLIPBOOK_B_AND_F   FALSE
				 ALPHA_SEQUENCE		1.0f 
				 ALPHA_LOOP			FALSE

				END		; CREATE_OBJECT

;;EOF
;;LOAD     lvl4\glob4.mif

; waterfalls
FUNCTION        CREATE_OBJECT
                START
                GEOMETRY     wtrfal1
                ID           water_id1
                TYPE         NORMAL_OBJECT
                LOCATORS     wtrloc1
                LIGHT_VERTEX     TRUE
END	

FUNCTION        CREATE_OBJECT
                START
                GEOMETRY     wtrfal2
                ID           water_id1
                TYPE         NORMAL_OBJECT
                LOCATORS     wtrloc2
                LIGHT_VERTEX     TRUE
END	

; Goop A
FUNCTION        CREATE_OBJECT
                START
                ID               blb0
                TYPE             DUMMY_OBJECT
                LOCATORS         gloploc1
                ROTATION         USE_LOCATORS
                CALLBACK_MESSAGE LVL4_BLOB0_CB
;;				BLOB_WIDTH		12	
;;				BLOB_LENGTH		16
				;float 0; 		// Base Height of goop
				;float 1;		// Lower range of goop
				;float 2;		// Upper range of goop
				;float 3;		// unused
				;float 4; 		// unused
				;float 5;		// unused
				;float 6;		// unused
				;float 7;		// unused	
				;float 8; 	    // unused
				;float 9; 	    // unused
				;float 10;		// unused
				;float 11;		// unused
				;int 0			// texture used (gloop value = 1)
				;int 1			// red value of blob (0-255)
				;int 2			// green value of blob (0-255)
				;int 3			// blue value of blob (0-255)	
			

;;				MISC_FLOATS		2.0 3.0 4.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 
;;				MISC_INTS		4 0 170 0
				;int 0			// texture used (water value = 4)
				;int 1			// red value of blob (0-255)
				;int 2			// green value of blob (0-255)
				;int 3			// blue value of blob (0-255)

                REACTION_SET
                REACTION_RADIUS  1000.0F

END ; CREATE_OBJECT

; Goop A light
FUNCTION        CREATE_LIGHT
                START
                ID                      light_goop0
                LOCATORS                gloploc1
                COLOR                   30.0f 180.0f 30.0f
                STRENGTH                0.0f
                LIGHT_INNER_RADIUS      30.0f
                LIGHT_OUTER_RADIUS      50.0f   
                LIGHT_STRENGTH_SPEED    10
                LIGHT_STRENGTH_LOOP     TRUE
                LIGHT_STRENGTH_SEQUENCE 0.5f 0.0f 0.5f 1.0f 0.7f 0.2f 1.0f 0.6f 0.0f 0.1f 0.3f 1.0f
                LIGHT_STRENGTH_SMOOTH   TRUE
END


FUNCTION        CREATE_OBJECT
               START
                ID               blb1
                TYPE             DUMMY_OBJECT
                LOCATORS         gloploc2
                ROTATION         USE_LOCATORS
                CALLBACK_MESSAGE LVL4_BLOB1_CB
;;				BLOB_WIDTH		12	
;;				BLOB_LENGTH		16
				;float 0; 		// Base Height of goop
				;float 1;		// Lower range of goop
				;float 2;		// Upper range of goop
				;float 3;		// unused
				;float 4; 		// unused
				;float 5;		// unused
				;float 6;		// unused
				;float 7;		// unused	
				;float 8; 	    // unused
				;float 9; 	    // unused
				;float 10;		// unused
				;float 11;		// unused
				;int 0			// texture used
				;int 1			// red value of blob (0-255)
				;int 2			// green value of blob (0-255)
				;int 3			// blue value of blob (0-255)	
			

;;				MISC_FLOATS		2.0 3.0 4.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 
;;				MISC_INTS		1 0 170 00

                REACTION_SET
                REACTION_RADIUS  1000.0F

                END     ; CREATE_OBJECT


; Goop B light
FUNCTION        CREATE_LIGHT
                START
                ID                      light_goop1
                LOCATORS                gloploc2
                COLOR                   30.0f 180.0f 30.0f
                STRENGTH                0.0f
                LIGHT_INNER_RADIUS      30.0f
                LIGHT_OUTER_RADIUS      50.0f
                LIGHT_STRENGTH_SPEED    20
                LIGHT_STRENGTH_LOOP     TRUE
                LIGHT_STRENGTH_SEQUENCE 0.5f 0.0f 0.5f 1.0f 0.7f 0.2f 0.5f 0.9f 0.7f 0.9f 0.4f 0.2f 0.5f
                LIGHT_STRENGTH_SMOOTH   TRUE
	END

;;EOF
; Script for Cherynobil level - main reactor

;;LOAD lvl4\4react.mif
;;LOAD lvl4\lv4smk.mif

; Inner core
FUNCTION        CREATE_OBJECT
                START
                GEOMETRY         reactor_inner
                LOCATORS         loc_reactor_inner
				DRAW_BRIGHT		 TRUE
				DROTATION		 0.0f -59.0f 0.0f
				COLOR			 255.0f 255.0f 255.0f	
				DRAW_ORDER		 1100
				ALPHA_INIT		 0.1f
				ALPHA_LOOP		 TRUE
				ALPHA_SPEED		 20
               	ALPHA_SEQUENCE	 0.1f 0.2f 0.5f 0.7f 0.8f 0.9f 0.95f 1.0f 0.95f 0.9f 0.8f 0.7f 0.2f 0.1f
                END     

; Outer core
FUNCTION        CREATE_OBJECT
                START
                GEOMETRY         reactor_outer
                LOCATORS         loc_reactor_outer
				COLOR			 64.0f 255.0f 64.0f	
				DRAW_ORDER		 1200
				DRAW_BRIGHT		 TRUE
				ALPHA_INIT		 1.0f
				DROTATION		 0.0f 1.0f 0.0f
                END     

; Sparks
FUNCTION		CREATE_OBJECT
				START
				ID				 reactor_sparks
				TYPE			 DUMMY_OBJECT
				CLASS			 A
				CALLBACK_MESSAGE LVL4_SPARKS_CB
				LOCATORS		 reakt_spkloc01
				ROTATION		 USE_LOCATORS

				END


; Fog control
FUNCTION		CREATE_OBJECT
				START
				ID				 fog_plasma
				TYPE			 DUMMY_OBJECT
				CLASS			 A
				CALLBACK_MESSAGE LVL4_REACTOR_FOG_CB
				LOCATORS		 loc_reactor_inner
				REACTION_SET
				REACTION_RADIUS	 1000.0f
				END

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; My first variable callback
; Smoke and steam
; FLOAT INPUT	: DIR0, DIR1, DIR2, VEL_MIN, VEL_MAX, Y_VEL_MIN, Y_VEL_MAX, SCALE, DSCALE, ALPHA, DALPHA, JITTER, ROTATION
; INT INPUT		: TEXTURE NUMBER, LIFE, RAND_SPAN, RAND_CLUSTER
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

FUNCTION		CREATE_OBJECT
				START
				ID				 	steam_smoke
				TYPE			 	DUMMY_OBJECT
				CLASS			 	A
				CALLBACK_MESSAGE 	LVL4_SMOKE_CB
				CALLBACK_DATA_FLOAT 0.0f 1.0f 0.0f 0.02f 0.05f 0.02f 0.05f 2.5f 1.05f 1.0f 0.75f 0.1f 10.0f
				CALLBACK_DATA_INT	44 10 1 2
				LOCATORS		 	smk_steam
				ROTATION		 	USE_LOCATORS
				END

FUNCTION		CREATE_OBJECT
				START
				ID				 	stack_smoke
				TYPE			 	DUMMY_OBJECT
				CLASS			 	A
				CALLBACK_MESSAGE 	LVL4_SMOKE_CB
				CALLBACK_DATA_FLOAT 0.5f 1.0f 0.0f 0.1f 0.3f 0.01f 0.05f 2.0f 1.04f 1.0f 0.95f 0.2f 5.0f
				CALLBACK_DATA_INT	5 45 1 2
				LOCATORS		 	smk_stacks
				ROTATION		 	USE_LOCATORS
				END

; Electricity

;;EOF
; Script for Cherynobil level - core meltdown sequence

;;LOAD            lvl4\4melt.mif
;;LOAD            lvl4\4debris.mif

;tweak locations for CORE REACTION and Debris

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; CORE REACTION: Light flys down the hall; plays a sound
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
FUNCTION		CREATE_OBJECT
				START
				 GEOMETRY			bwall
				 ID					melt_id1
		   		 TYPE	   	 		NORMAL_OBJECT
				 CLASS				A
				 CALLBACK_MESSAGE   LVL4_MELTMAIN_CB
				 LOCATORS			loc_melt
				 ALPHA_INIT			0.0f
				 DRAW_BRIGHT 		true

		         REACTION_SET		
        		 REACTION_RADIUS 	30.0f

				 DELAY_MOTION		80

		         FLIPBOOK_SPEED  		2
		   		 FLIPBOOK_SEQUENCE  	0 2 5 6 3 2 1 0 7 5 2 5 1 9 7 6 2 1 5
           		 FLIPBOOK_LOOP      	yes
           		 FLIPBOOK_REVERSE   	no
           		 FLIPBOOK_B_AND_F   	FALSE

				 PATH_MAIN			path_melt
				 PATH_LOOP			true
				 PATH_LOOP			false
				 PATH_ABS			true
				 PATH_SPEED			16
				 ALPHA_SEQUENCE		0.0f 0.0f 0.0f 1.0f 1.0f 1.0f 1.0f 1.0f 1.0f 1.0f 1.0f 0.9f 0.7f 0.5f 0.3f 0.1f 0.0f
				 ALPHA_LOOP			FALSE
				 ALPHA_SPEED		10

				END		; CREATE_OBJECT

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; MELTDOWN SPARKS: let off sparks when excited 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
FUNCTION		CREATE_OBJECT
				START
				 ID					meltsparks_id1
		   		 TYPE	   	 		DUMMY_OBJECT
				 LOCATORS			loc_sparksmelt
				 PARENT_ID			melt_id1
				 PARENT_LINK		ABSOLUTE
				 CALLBACK_MESSAGE	LVL4_MELTMAIN_SPARKS_CB

				END		; CREATE_OBJECT


;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; Debris flying down the hallway with trippy shit 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; actual beginning piece
FUNCTION		CREATE_OBJECT
				START
				 GEOMETRY			debris
				 ID					meltdebris_id1
		   		 TYPE	   	 		NORMAL_OBJECT
				 CLASS				A
				 LOCATORS			loc_debris
				 DRAW_BRIGHT		TRUE
				 ALPHA_INIT			0.0f

		         REACTION_SET		
        		 REACTION_RADIUS 	210.0f

		         FLIPBOOK_SPEED  	1
        		 FLIPBOOK_LOOP      no
           	     FLIPBOOK_REVERSE   no
                 FLIPBOOK_B_AND_F   FALSE

				 ALPHA_SEQUENCE		0.0f 1.0f 1.0f 1.0f 1.0f 1.0f 1.0f 1.0f 1.0f 1.0f 1.0f 0.0f
				 ALPHA_LOOP			FALSE
				 ALPHA_SPEED		10

				END		; CREATE_OBJECT

; trail 1
FUNCTION		CREATE_OBJECT
				START
				 GEOMETRY			debris
				 ID					meltdebris_id1
		   		 TYPE	   	 		NORMAL_OBJECT
				 CLASS				A
				 LOCATORS			loc_debris
				 ALPHA_INIT			0.0f
				 DRAW_BRIGHT		TRUE
				 COLOR				128.0f 128.0f 128.0f

		         REACTION_SET		
        		 REACTION_RADIUS 	200.0f

			     DELAY_MOTION	    2
		         FLIPBOOK_SPEED  	1
        		 FLIPBOOK_LOOP      no
          	     FLIPBOOK_REVERSE   no
                 FLIPBOOK_B_AND_F   FALSE

				 ALPHA_SEQUENCE		0.0f 1.0f 1.0f 1.0f 1.0f 1.0f 1.0f 1.0f 1.0f 1.0f 1.0f 0.0f
				 ALPHA_LOOP			FALSE
				 ALPHA_SPEED		10

				END		; CREATE_OBJECT

; trail 2
FUNCTION		CREATE_OBJECT
				START
				 GEOMETRY			debris
				 ID					meltdebris_id1
		   		 TYPE	   	 		NORMAL_OBJECT
				 CLASS				A
				 LOCATORS			loc_debris
				 ALPHA_INIT			0.0f
				 DRAW_BRIGHT		TRUE
				 COLOR				64.0f 64.0f 64.0f

		         REACTION_SET		
	      		 REACTION_RADIUS 	200.0f

			     DELAY_MOTION	    4
		         FLIPBOOK_SPEED  	1
    	  		 FLIPBOOK_LOOP      no
        	     FLIPBOOK_REVERSE   no
        	     FLIPBOOK_B_AND_F   FALSE

				 ALPHA_SEQUENCE		0.0f 1.0f 1.0f 1.0f 1.0f 1.0f 1.0f 1.0f 1.0f 1.0f 1.0f 0.0f
				 ALPHA_LOOP			FALSE
				 ALPHA_SPEED		10

				END		; CREATE_OBJECT

; trail 3
FUNCTION		CREATE_OBJECT
				START
				 GEOMETRY			debris
				 ID					meltdebris_id1
		   		 TYPE	   	 		NORMAL_OBJECT
				 CLASS				A
				 LOCATORS			loc_debris
				 ALPHA_INIT			0.0f
				 DRAW_BRIGHT		TRUE
				 COLOR				32.0f 32.0f 32.0f

		         REACTION_SET		
        		 REACTION_RADIUS 	200.0f

			     DELAY_MOTION	    6
		         FLIPBOOK_SPEED  	1
        		 FLIPBOOK_LOOP      no
          	     FLIPBOOK_REVERSE   no
                 FLIPBOOK_B_AND_F   FALSE

				 ALPHA_SEQUENCE		0.0f 1.0f 1.0f 1.0f 1.0f 1.0f 1.0f 1.0f 1.0f 1.0f 1.0f 0.0f
				 ALPHA_LOOP			FALSE
				 ALPHA_SPEED		10

				END		; CREATE_OBJECT

; trail 4
FUNCTION		CREATE_OBJECT
				START
				 GEOMETRY			debris
				 ID					meltdebris_id1
		   		 TYPE	   	 		NORMAL_OBJECT
				 CLASS				A
				 LOCATORS			loc_debris
				 ALPHA_INIT			0.0f
				 DRAW_BRIGHT		TRUE
				 COLOR				16.0f 16.0f 16.0f

		         REACTION_SET		
        		 REACTION_RADIUS 	200.0f

			     DELAY_MOTION	    8
		         FLIPBOOK_SPEED  	1
        		 FLIPBOOK_LOOP      no
          	     FLIPBOOK_REVERSE   no
                 FLIPBOOK_B_AND_F   FALSE

				 ALPHA_SEQUENCE		0.0f 1.0f 1.0f 1.0f 1.0f 1.0f 1.0f 1.0f 1.0f 1.0f 1.0f 0.0f
				 ALPHA_LOOP			FALSE
				 ALPHA_SPEED		10

				END		; CREATE_OBJECT

;;EOF
; Script for Cherynobil level 
; All the break-away pieces go here

;;LOAD lvl4\4win1.mif
;;LOAD lvl4\4break1.mif


;
; BREAK-AWAY ARM 
;
FUNCTION        CREATE_OBJECT
                START
                GEOMETRY       		aar
                ID            	 	ar_id1
				TYPE	   			NORMAL_OBJECT
				LIGHT_VERTEX		TRUE
                CLASS               D
                LOCATORS        	locar01
				CALLBACK_MESSAGE	LVL4_FENCE_CB
				REACTION_SET
				REACTION_LIFE		1
                REACTION_RADIUS     5.0f
				END	

;
; SWINGING FENCE
;
FUNCTION        CREATE_OBJECT
                START
                GEOMETRY       		gate
                ID            	 	gate_id1
				TYPE	   			NORMAL_OBJECT
                CLASS               D
				LIGHT_VERTEX		TRUE
                LOCATORS        	locgt01
				FLIPBOOK_SEQUENCE 	0  
				REACTION_SET
				REACTION_RADIUS		10.0f
				DELAY_MOTION		6
				FLIPBOOK_SPEED		1
				FLIPBOOK_SEQUENCE 	1 1 1 2 2 3 4 5 6 7 8 9 10 11 12 12 12 11 10 
                FLIPBOOK_LOOP     	no
				END	

;
; WINDOWS at the end of reactor tunnel
;
FUNCTION        CREATE_OBJECT
                START
                GEOMETRY       		winleft
                ID            	 	winleft_id1
				TYPE	   			NORMAL_OBJECT
                CLASS               C
                LOCATORS        	4win_loc_left
				CALLBACK_MESSAGE	LVL4_WINLEFT_CB
				REACTION_SET
				REACTION_RADIUS		3.5f
				FLIPBOOK_SEQUENCE 	1  
                FLIPBOOK_LOOP     	yes
				END	

FUNCTION        CREATE_OBJECT
                START
                GEOMETRY       		winright
                ID            	 	winright_id1
				TYPE	   			NORMAL_OBJECT
                CLASS               C
                LOCATORS        	4win_loc_right
				CALLBACK_MESSAGE	LVL4_WINRIGHT_CB
				REACTION_SET
				REACTION_RADIUS		3.5f
				FLIPBOOK_SEQUENCE 	1  
                FLIPBOOK_LOOP     	yes
				END	

;;EOF
; 4chkpnt.txt
; Checkpoint script for level 4

; DATA VALUE DESCRIPTION :
; PATHPOINT_GROUP is 2 for checkpoints
; INT DATA   : ENTRY 0 == NUMBER OF SECONDS TO ADD TO TIMER

FUNCTION        CREATE_PATHPOINT
                START
                PATHPOINT_GROUP  2
                PATHPOINT_POINT  130
                PATHPOINT_INTS   30
                END     ; CREATE_PATHPOINT

FUNCTION        CREATE_PATHPOINT
                START
                PATHPOINT_GROUP  2
                PATHPOINT_POINT  527
                PATHPOINT_INTS   25
                END     ; CREATE_PATHPOINT

FUNCTION        CREATE_PATHPOINT
                START
                PATHPOINT_GROUP  2
                PATHPOINT_POINT  696
                PATHPOINT_INTS   25
                END     ; CREATE_PATHPOINT
;;EOF

; Script for new checkpoint ads

;;LOAD lvl4\4ads.mif

;
; checkpoint_ads
;

FUNCTION	CREATE_OBJECT
				START
				GEOMETRY		ads01
				ID			ads_01
				TYPE			NORMAL_OBJECT
				LOCATORS		locads01
	            		INIT_DROTATION	90.0f 180.0f 0.0f
				ROTATION		USE_LOCATORS
				LIGHT_VERTEX     	FALSE
				END


FUNCTION	CREATE_OBJECT
				START
				GEOMETRY		ads02
				ID			ads_02
				TYPE			NORMAL_OBJECT
				LOCATORS		locads02
	            		INIT_DROTATION	90.0f 180.0f 0.0f
				ROTATION		USE_LOCATORS
				LIGHT_VERTEX     	FALSE
				END


;;EOF
EOF