Thank you
My personal preference is mixed case, like this:
Function CollectBonus( BonusType )
Play Sound sBoomBonus
Msg( BonusType ).Exist = cYES
Scale Object Msg( BonusType ).obj, 100, 100, 100
Set Alpha mapping on Msg( BonusType ).obj, 100
Exclude Object Off Msg( BonusType ).obj
Select BonusType
Case cIMMUNE
Set Object Emissive oPlayer, RGB( 255, 255, 050 )
Set Object Diffuse oPlayer, RGB( 255, 255, 050 )
Set Object Emissive oSpecular, RGB( 255, 255, 128 )
Set Object Diffuse oSpecular, RGB( 255, 255, 128 )
Bonus( cIMMUNE ).Active = cYES
Bonus( cIMMUNE ).Time = Timer() + 10000
Bonus( cIMMUNE ).Exist = cNO
setupExplosion( Bonus( cIMMUNE ).obj, 4 )
Exclude Object On Bonus( cIMMUNE ).obj
Exclude Object On Bonus( cIMMUNE ).Shadow
endCase
Although the option for upper, lower or mixed case would probably please a larger number of people.
Thanks for listening