une autre idée facile, pouvoir récupérer les douilles (besoin de FOSE):
[script]
scn SCRIPTzzDOUILLES
short varGEN
short varNB
short varattack
short vardiff
Begin gamemode
if player.GetWeaponAmmoUse == ammo10mm
set varGEN to 10
elseif player.GetWeaponAmmoUse == ammo556mm
set varGEN to 556
elseif player.GetWeaponAmmoUse == ammo308
set varGEN to 308
else
set varGEN to 0
endif
IF VARGEN == 10
If player.GetAnimAction != 2 && varattack == 0
set varNB to Getitemcount ammo10mm
endif
if player.GetAnimAction == 2
set varattak to 1
endif
If player.GetAnimAction != 2 && varattack == 1
set varattack to 0
set vardiff to (Getitemcount ammo10mm - varNB)
if vardiff >= 4 set vardiff to (vardiff /4)
set REFdouille10mm0 to player.placeatme douille10mm, vardiff, 1, 0
set REFdouille10mm1 to player.placeatme douille10mm, vardiff, 1, 1
set REFdouille10mm2 to player.placeatme douille10mm, vardiff, 1, 2
set REFdouille10mm3 to player.placeatme douille10mm, vardiff, 1, 3
else
set REFdouille10mm to player.placeatme douille10mm, vardiff
endif
endif
if player.GetInSameCell REFdouille10mm != 1
REFdouille10mm.disable
REFdouille10mm.markfordelete
endif
if player.GetInSameCell REFdouille10mm0 != 1
REFdouille10mm0.disable
REFdouille10mm0.markfordelete
endif
if player.GetInSameCell REFdouille10mm1 != 1
REFdouille10mm1.disable
REFdouille10mm1.markfordelete
endif
if player.GetInSameCell REFdouille10mm2 != 1
REFdouille10mm2.disable
REFdouille10mm2.markfordelete
endif
if player.GetInSameCell REFdouille10mm3 != 1
REFdouille10mm3.disable
REFdouille10mm3.markfordelete
endif
ELSEIF VARGEN == 556
If player.GetAnimAction != 2 && varattack == 0
set varNB to Getitemcount ammo556mm
endif
if player.GetAnimAction == 2
set varattak to 1
endif
If player.GetAnimAction != 2 && varattack == 1
set varattack to 0
set vardiff to (Getitemcount ammo556mm - varNB)
if vardiff >= 4 set vardiff to (vardiff /4)
set REFdouille556mm0 to player.placeatme douille556mm, vardiff, 1, 0
set REFdouille556mm1 to player.placeatme douille556mm, vardiff, 1, 1
set REFdouille556mm2 to player.placeatme douille556mm, vardiff, 1, 2
set REFdouille556mm3 to player.placeatme douille556mm, vardiff, 1, 3
else
set REFdouille556mm to player.placeatme douille556mm, vardiff
endif
endif
if player.GetInSameCell REFdouille556mm != 1
REFdouille556mm.disable
REFdouille556mm.markfordelete
endif
if player.GetInSameCell REFdouille556mm0 != 1
REFdouille556mm0.disable
REFdouille556mm0.markfordelete
endif
if player.GetInSameCell REFdouille556mm1 != 1
REFdouille556mm1.disable
REFdouille556mm1.markfordelete
endif
if player.GetInSameCell REFdouille556mm2 != 1
REFdouille556mm2.disable
REFdouille556mm2.markfordelete
endif
if player.GetInSameCell REFdouille556mm3 != 1
REFdouille556mm3.disable
REFdouille556mm3.markfordelete
endif
ELSEIF VARGEN == 308
If player.GetAnimAction != 2 && varattack == 0
set varNB to Getitemcount ammo308
endif
if player.GetAnimAction == 2
set varattak to 1
endif
If player.GetAnimAction != 2 && varattack == 1
set varattack to 0
set vardiff to (Getitemcount ammo308 - varNB)
if vardiff >= 4 set vardiff to (vardiff /4)
set REFdouille3080 to player.placeatme douille308, vardiff, 1, 0
set REFdouille3081 to player.placeatme douille308, vardiff, 1, 1
set REFdouille3082 to player.placeatme douille308, vardiff, 1, 2
set REFdouille3083 to player.placeatme douille308, vardiff, 1, 3
else
set REFdouille308 to player.placeatme douille308, vardiff
endif
endif
if player.GetInSameCell REFdouille308 != 1
REFdouille308.disable
REFdouille308.markfordelete
endif
if player.GetInSameCell REFdouille3080 != 1
REFdouille3080.disable
REFdouille3080.markfordelete
endif
if player.GetInSameCell REFdouille3081 != 1
REFdouille3081.disable
REFdouille3081.markfordelete
endif
if player.GetInSameCell REFdouille3082 != 1
REFdouille3082.disable
REFdouille3082.markfordelete
endif
if player.GetInSameCell REFdouille3083 != 1
REFdouille3083.disable
REFdouille3083.markfordelete
endif
ENDIF
END
[/script]
En tout cas je vois peu de volontaires pour modder dis donc