aboutsummaryrefslogtreecommitdiffstats
path: root/Game/Code/Classes/UGraphicClasses.pas
diff options
context:
space:
mode:
authormogguh <mogguh@b956fd51-792f-4845-bead-9b4dfca2ff2c>2007-03-23 13:54:37 +0000
committermogguh <mogguh@b956fd51-792f-4845-bead-9b4dfca2ff2c>2007-03-23 13:54:37 +0000
commit47c091672034720666ca036e181dcff494ba04ee (patch)
treeab35de849bbe7f8912742e3727e3d49546798824 /Game/Code/Classes/UGraphicClasses.pas
parent2732871a342cfdf766ccd9c9bd9644939ec58695 (diff)
downloadusdx-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/Code/Classes/UGraphicClasses.pas')
-rw-r--r--Game/Code/Classes/UGraphicClasses.pas20
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;