diff options
author | mogguh <mogguh@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2007-03-23 13:54:37 +0000 |
---|---|---|
committer | mogguh <mogguh@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2007-03-23 13:54:37 +0000 |
commit | 47c091672034720666ca036e181dcff494ba04ee (patch) | |
tree | ab35de849bbe7f8912742e3727e3d49546798824 /Game | |
parent | 2732871a342cfdf766ccd9c9bd9644939ec58695 (diff) | |
download | usdx-47c091672034720666ca036e181dcff494ba04ee.tar.gz usdx-47c091672034720666ca036e181dcff494ba04ee.tar.xz usdx-47c091672034720666ca036e181dcff494ba04ee.zip |
Some tidying in UGraphicClasses.pas (actually deleting an unused procedure)
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@19 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to 'Game')
-rw-r--r-- | Game/Code/Classes/UGraphicClasses.pas | 20 |
1 files changed, 0 insertions, 20 deletions
diff --git a/Game/Code/Classes/UGraphicClasses.pas b/Game/Code/Classes/UGraphicClasses.pas index 6c131b50..d5eb44ab 100644 --- a/Game/Code/Classes/UGraphicClasses.pas +++ b/Game/Code/Classes/UGraphicClasses.pas @@ -38,7 +38,6 @@ type procedure Kill(index: Cardinal);
procedure KillAll();
procedure SaveGoldenStarsRec(Xtop, Ytop, Xbottom, Ybottom: Real);
- procedure SpawnNotePerfect(xPos,yPos : real);
procedure SavePerfectNotePos(Xtop, Ytop: Real);
end;
@@ -183,25 +182,6 @@ for P:= 0 to high(RecArray) do end;
-procedure TEffectManager.SpawnNotePerfect(xPos,yPos : real);
-Var
- Xkatze, Ykatze : Real;
- RandomFrame : Integer;
- P : Integer; // P as seen on TV as Positionman
-begin
-//Spawn a random amount of stars within the given coordinates
-//RandomRange(0,14) <- this one starts at a random frame, 16 is our last frame - would be senseless to start a particle with 16, cause it would be dead at the next frame
-for P:= 0 to 2 do
- begin
- Xkatze := RandomRange(ceil(xPos) - 5 , ceil(xPos) + 10);
- Ykatze := RandomRange(ceil(yPos) - 5 , ceil(yPos) + 10);
- RandomFrame := RandomRange(0,14);
- Spawn(Xkatze, Ykatze, Tex_Note_Star.TexNum, 16 - RandomFrame, RandomFrame, -1, 2);
- end;
- draw;
-end;
-
-
procedure TEffectManager.Kill(Index: Cardinal);
var
LastParticleIndex : Cardinal;
|