Function aLightningCreate

scripts/DallasFuncs.cpp:1499–1535

$$ACTION Weather Create lighting between [o:Object1] and [o:Object2]; with [f:Lifetime=1.0], [f:Thickness=1.0], [i:NumTiles=1], [u:Texture], [f:SlideTime=0], [i:TimesDrawn=1], and color=[i:Red=255],[i:Green=255],[i:Blue=255], AutoTile=[b:AutoTile=false] aLightningCreate Create lighting between two objects Creates a lighting effect between two specified obejcts Parameters: Object1, Object2: Whe

$$END
*/
void aLightningCreate(int objhandle1, int objhandle2, float lifetime, float thickness, int numtiles, int texture_id,
                      float slidetime, int timesdrawn, int red, int green, int blue, bool autotile) {
  msafe_struct mstruct;
  int type;

  Obj_Value(objhandle1, VF_GET, OBJV_I_TYPE, &type);
  if (type == OBJ_NONE)
    return;

  Obj_Value(objhandle2, VF_GET, OBJV_I_TYPE, &type);
  if (type == OBJ_NONE)
    return;

  Obj_Value(objhandle1, VF_GET, OBJV_I_ROOMNUM, &mstruct.roomnum);
  Obj_Value(objhandle1, VF_GET, OBJV_V_POS, &mstruct.pos);
  Obj_Value(objhandle2, VF_GET, OBJV_V_POS, &mstruct.pos2);

  mstruct.objhandle = objhandle1;
  mstruct.ithandle = objhandle2;
  mstruct.lifetime = lifetime;
  mstruct.size = thickness;

  mstruct.interval = slidetime;
  mstruct.count = timesdrawn;
  mstruct.index = numtiles;
  mstruct.texnum = texture_id;
  mstruct.color = ((red >> 3) << 10) | ((green >> 3) << 5) | (blue >> 3);

  if (autotile)
    mstruct.state = 1;
  else
    mstruct.state = 0;

  mstruct.flags = 0;

  MSafe_CallFunction(MSAFE_WEATHER_LIGHTNING_BOLT, &mstruct);
}

/*
$$ACTION