UnCodeX - Source: UnrealI.SpriteExplosion

00001
00002
00003
00004
00005
00006
00007
00008
00009
00010
00011
00012
00013
00014
00015
00016
00017
00018
00019
00020
00021
00022
00023
00024
00025
00026
00027
00028
00029
00030
00031
00032
00033
00034
00035
00036
00037
00038
00039
00040
00041
00042
00043
00044
00045
00046

//=============================================================================
// SpriteExplosion.
//=============================================================================
class SpriteExplosion expands Effects;

var() Texture s_Exp[20];

#exec Texture Import File=models\exp001.pcx Name=s_Exp001 Mips=Off Mask=On Flags=2
#exec Texture Import File=models\exp002.pcx Name=s_Exp002 Mips=Off Mask=On Flags=2
#exec Texture Import File=models\exp003.pcx Name=s_Exp003 Mips=Off Mask=On Flags=2
#exec Texture Import File=models\exp004.pcx Name=s_Exp004 Mips=Off Mask=On Flags=2
#exec Texture Import File=models\exp005.pcx Name=s_Exp005 Mips=Off Mask=On Flags=2
#exec Texture Import File=models\exp006.pcx Name=s_Exp006 Mips=Off Mask=On Flags=2
#exec Texture Import File=models\exp007.pcx Name=s_Exp007 Mips=Off Mask=On Flags=2
#exec Texture Import File=models\exp008.pcx Name=s_Exp008 Mips=Off Mask=On Flags=2
#exec Texture Import File=models\exp009.pcx Name=s_Exp009 Mips=Off Mask=On Flags=2
#exec Texture Import File=models\exp010.pcx Name=s_Exp010 Mips=Off Mask=On Flags=2
#exec Texture Import File=models\exp011.pcx Name=s_Exp011 Mips=Off Mask=On Flags=2
#exec Texture Import File=models\exp012.pcx Name=s_Exp012 Mips=Off Mask=On Flags=2
#exec Texture Import File=models\exp013.pcx Name=s_Exp013 Mips=Off Mask=On Flags=2
#exec Texture Import File=models\exp014.pcx Name=s_Exp014 Mips=Off Mask=On Flags=2
#exec Texture Import File=models\exp015.pcx Name=s_Exp015 Mips=Off Mask=On Flags=2
#exec Texture Import File=models\exp016.pcx Name=s_Exp016 Mips=Off Mask=On Flags=2
#exec Texture Import File=models\exp017.pcx Name=s_Exp017 Mips=Off Mask=On Flags=2
#exec Texture Import File=models\exp018.pcx Name=s_Exp018 Mips=Off Mask=On Flags=2
#exec Texture Import File=models\exp019.pcx Name=s_Exp019 Mips=Off Mask=On Flags=2
#exec Texture Import File=models\exp020.pcx Name=s_Exp020 Mips=Off Mask=On Flags=2

var int i;

simulated function BeginPlay()
{
    Super.BeginPlay();
    i = 1;
    Texture = s_Exp[i];
    PlaySound (EffectSound1);   
    MakeNoise(1.0);     
}

simulated function Tick( float DeltaTime )
{
    i++;
    if ( Level.NetMode != NM_DedicatedServer )
        Texture = s_Exp[i];
    if (i > 18) Destroy();
}