I've used this one and it doesn't look half bad... but you'll have to check the class names etc. as it's coming from memory. You will also need to tweak the offset below ground and the pauses for the same reason. I think smokeshells burn for about 60s. Try something like:
_flarepos = posarray/GetMarkerPos/GetPos/whatever
_flarepos Set [2,-0.5]
_smk = "SmokeShellRed" CamCreate _flarepos
_flm = "fire" CamCreate _flarepos
~3
_flm Inflame true
~50
DeleteVehicle _flm
The theory is a 'buried' smokeshell starts to smoke, then a buried fire is ignited to give a glow, then the fire is deleted as the smokeshell burns out. Of course, a real smoke flare would glow before smoking, so you could set the fire off first depending on the effect you want - I got away with it (in the intro to 'A Touch of Frost' in the Missions depot) as the 'flare' was viewed from a distance, it might look rubbish close up, though.
With a white smokeshell it makes a very reasonable tripflare effect for night missions.