home *** CD-ROM | disk | FTP | other *** search
/ PC Play 129 / pc play 129.iso / Demo / man2 / man2.exe / data / scripts / environment_effects_scripts / environment_explosion_light4.lua < prev    next >
Encoding:
Text File  |  2006-02-27  |  1.5 KB  |  51 lines
  1. desc = getEffectDescriptionP(ENET_EFFECT_EXPLOSION_LIGHT4)
  2. desc.ClassID = ENCLASS_LIGHTSOURCE
  3. desc.EffectClassType = ENECT_LIGHTSOURCE
  4.  
  5. desc.ScriptSet = ENSCRIPTSET_UNKNOWN
  6. desc.RelativePosition = ENLOCALPOS_NOTSPECIFIED
  7. local vzbzd1 = D3DXVECTOR3:new(0,0,0)
  8. desc.LocalPosition = vzbzd1
  9. vzbzd1:delete()
  10. desc.ActivityType = ENACT_ACTIVE
  11.  
  12. -- add interpolators
  13. desc:clearInterpolators()
  14.  
  15. local interpolator = createInterpolator()
  16. interpolator:addKey(0.0,80.0)
  17. interpolator:addKey(1.0,220.0)
  18. interpolator:addKey(15.0,80.0)
  19. interpolator:finalize(false)
  20. -- add interpolator on light range
  21. desc:addInterpolator(interpolator,getFieldOffset(EN_FIELD_LIGHT_RANGE))
  22.  
  23. local interpolator = createInterpolator()
  24. interpolator:addKey(0.0,0.0)
  25. interpolator:addKey(0.5,0.6)
  26. interpolator:addKey(6.5,0.6)
  27. interpolator:addKey(15.0,0.0)
  28. interpolator:finalize(false)
  29. -- add interpolator on R B colors
  30. desc:addInterpolator(interpolator,getFieldOffset(EN_FIELD_DIFFUSE_R))
  31.  
  32. local interpolator = createInterpolator()
  33. interpolator:addKey(0.0,0.0)
  34. interpolator:addKey(0.5,0.3)
  35. interpolator:addKey(6.5,0.3)
  36. interpolator:addKey(15.0,0.0)
  37. interpolator:finalize(false)
  38. -- add interpolator on R B colors
  39. desc:addInterpolator(interpolator,getFieldOffset(EN_FIELD_DIFFUSE_G))
  40.  
  41. local interpolator = createInterpolator()
  42. interpolator:addKey(0.0,0.0)
  43. interpolator:addKey(0.5,0.1)
  44. interpolator:addKey(6.5,0.1)
  45. interpolator:addKey(15.0,0.0)
  46. interpolator:finalize(false)
  47. -- add interpolator on R B colors
  48. desc:addInterpolator(interpolator,getFieldOffset(EN_FIELD_DIFFUSE_B))
  49.  
  50.  
  51.