REFSKRIPT

;abfragen welcher Modus:
; INIT RENDER1 RENDER2 READY
GET_PARAM_NR 1
GET_RESULT modus
IF_STR_EQUAL_GOTO modus RENDER1 prerender
IF_STR_EQUAL_GOTO modus RENDER2 afterrender
IF_STR_EQUAL_GOTO modus READY ready

;*********************************************************************
>init:
; Init-skript für anim-fx
; Aufruf:  explode.skr INIT <master_obj>  <starttime> <endtime>
DEL_GLOBAL_VAR master_obj
DEL_GLOBAL_VAR time1
DEL_GLOBAL_VAR time2
DEL_GLOBAL_VAR explode_obj
MAKE_GLOBAL_VAR master_obj
MAKE_GLOBAL_VAR time1
MAKE_GLOBAL_VAR time2
MAKE_GLOBAL_VAR explode_obj
SET_VAR explode_obj xxxxxxxxxxx
GET_PARAM_NR 2
GET_RESULT master_obj
GET_PARAM_NR 3
GET_RESULT time1
GET_PARAM_NR 4
GET_RESULT time2 
return 1


;*********************************************************************
>prerender:
; aufgerufen: explode RENDER1 <time> <wire>
GET_PARAM_NR 2
GET_RESULT time
GET_PARAM_NR 3
GET_RESULT wire

GEO_VISIBLE master_obj 1

IF_LESS_GOTO time time1 fert
IF_GREATER_GOTO time time2 fert
GEO_VISIBLE master_obj 0

FUNCTION time2-time1
GET_RESULT deltatime
FUNCTION ((time-time1)/deltatime)*12.0+1.0
GET_RESULT faktor1
FUNCTION ((time-time1)/deltatime)*20.0+1.0
GET_RESULT faktor2
FUNCTION ((time-time1)/deltatime)*700
GET_RESULT wink1
FUNCTION ((time-time1)/deltatime)*1200
GET_RESULT wink2
GEO_VISIBLE master_obj 0
PRINT explode: master_obj faktor1 faktor2  wink1 wink2
DREI_EXPLODE master_obj faktor1 faktor2 wink1 wink2

GET_RESULT explode_obj
IF_EQUAL_GOTO wire 0 fert
DREI_set_plotmode explode_obj 0
PKL_ADD explode_obj
PKL_PROJEKT_OBJ explode_obj
>fert:
return 1

;*********************************************************************
>afterrender:
; aufgerufen: explode RENDER2 

OBJ_exist explode_obj
GET_RESULT res
IF_STR_EQUAL_GOTO res NEIN x1
OBJ_DEL explode_obj
SET_VAR explode_obj xxxxxxxxx
>x1:
GEO_VISIBLE master_obj 1
RETURN 1
;*********************************************************************
>ready:
; fertig-skript für anim-fx

DEL_GLOBAL_VAR master_obj
DEL_GLOBAL_VAR time2
DEL_GLOBAL_VAR time1
RETURN 1
;*********************************************************************