Ok, here my script Edited:
=====================SCRIPT=======================
hint "Bomb explosion Atomic"
player = _this select 0
player = _this select 1
posx = getPos player select 0
posy = getPos player select 1
posz = getPos player select 2
player switchmove "Treated"
player say "Place"
player GroupChat "Activated Self-Destruct Device."
~2
player GroupChat "Activated micro-nuclear explosion!"
~2
player GroupChat "Initiate counting ..."
~2
player GroupChat "Timed Detonation In ..."
~1
player GroupChat "10"
~1
player GroupChat "9"
~1
player GroupChat "8"
~1
player GroupChat "7"
~1
player GroupChat "6"
~1
player GroupChat "5"
~1
player GroupChat "4"
~1
player GroupChat "3"
~1
player GroupChat "2"
~1
player GroupChat "1"
~1
titleCut ["","WHITE IN",3]
_HandGrenade = "GrenadeHand" CreateVehicle [_posx, _posy, _posz]
deletevehicle _HandGrenade
_smokeshellred = "smokeshellred" CamCreate [_posx, _posy, _posz]
~3
deletevehicle _smokeshellred
exit
===================/SCRIPT===========================
script still does not function
no smoke and no explosion .
_HandGrenade = "GrenadeHand" CreateVehicle [_posx, _posy, _posz]
deletevehicle _HandGrenade
_smokeshellred = "smokeshellred" CamCreate [_posx, _posy, _posz]
~3
deletevehicle _smokeshellred
exit
script problem ! I want an explosion with red smoke