aboutsummaryrefslogtreecommitdiffstats
path: root/Game/Code/Classes
diff options
context:
space:
mode:
authorwhiteshark0 <whiteshark0@b956fd51-792f-4845-bead-9b4dfca2ff2c>2007-03-21 19:34:36 +0000
committerwhiteshark0 <whiteshark0@b956fd51-792f-4845-bead-9b4dfca2ff2c>2007-03-21 19:34:36 +0000
commit947647a5b38bf5b389e1f8b1f06308f564748fb8 (patch)
treefcc24bc6f547b1dc76b3d8714f3d28fe92d18480 /Game/Code/Classes
parent1bc44c27d036ff57c6d01e3a813fce519c34d27f (diff)
downloadusdx-947647a5b38bf5b389e1f8b1f06308f564748fb8.tar.gz
usdx-947647a5b38bf5b389e1f8b1f06308f564748fb8.tar.xz
usdx-947647a5b38bf5b389e1f8b1f06308f564748fb8.zip
Datei / Ordner gelöscht
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@4 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to '')
-rw-r--r--Game/Code/Classes/TextGL.dcubin8556 -> 0 bytes
-rw-r--r--Game/Code/Classes/UCatCovers.dcubin4945 -> 0 bytes
-rw-r--r--Game/Code/Classes/UCovers.dcubin6055 -> 0 bytes
-rw-r--r--Game/Code/Classes/UDLLManager.dcubin6021 -> 0 bytes
-rw-r--r--Game/Code/Classes/UDraw.dcubin41304 -> 0 bytes
-rw-r--r--Game/Code/Classes/UFiles.dcubin4673 -> 0 bytes
-rw-r--r--Game/Code/Classes/UGraphic.dcubin18647 -> 0 bytes
-rw-r--r--Game/Code/Classes/UGraphicClasses.dcubin341 -> 0 bytes
-rw-r--r--Game/Code/Classes/UIni.dcubin22355 -> 0 bytes
-rw-r--r--Game/Code/Classes/UJoystick.dcubin2268 -> 0 bytes
-rw-r--r--Game/Code/Classes/ULCD.dcubin5497 -> 0 bytes
-rw-r--r--Game/Code/Classes/ULCD.~pas287
-rw-r--r--Game/Code/Classes/ULanguage.dcubin6519 -> 0 bytes
-rw-r--r--Game/Code/Classes/ULight.dcubin2389 -> 0 bytes
-rw-r--r--Game/Code/Classes/ULog.dcubin6217 -> 0 bytes
-rw-r--r--Game/Code/Classes/ULyrics.dcubin9029 -> 0 bytes
-rw-r--r--Game/Code/Classes/UMain.dcubin11501 -> 0 bytes
-rw-r--r--Game/Code/Classes/UMusic.dcubin15179 -> 0 bytes
-rw-r--r--Game/Code/Classes/UParty.dcubin4129 -> 0 bytes
-rw-r--r--Game/Code/Classes/UPliki.dcubin19679 -> 0 bytes
-rw-r--r--Game/Code/Classes/URecord.dcubin6913 -> 0 bytes
-rw-r--r--Game/Code/Classes/UScores.dcubin4811 -> 0 bytes
-rw-r--r--Game/Code/Classes/USkins.dcubin5747 -> 0 bytes
-rw-r--r--Game/Code/Classes/USongs.dcubin13980 -> 0 bytes
-rw-r--r--Game/Code/Classes/UTexture.dcubin19192 -> 0 bytes
-rw-r--r--Game/Code/Classes/UThemes.dcubin59165 -> 0 bytes
-rw-r--r--Game/Code/Classes/UTime.dcubin2083 -> 0 bytes
27 files changed, 0 insertions, 287 deletions
diff --git a/Game/Code/Classes/TextGL.dcu b/Game/Code/Classes/TextGL.dcu
deleted file mode 100644
index 772d09c1..00000000
--- a/Game/Code/Classes/TextGL.dcu
+++ /dev/null
Binary files differ
diff --git a/Game/Code/Classes/UCatCovers.dcu b/Game/Code/Classes/UCatCovers.dcu
deleted file mode 100644
index 2ff7a7d9..00000000
--- a/Game/Code/Classes/UCatCovers.dcu
+++ /dev/null
Binary files differ
diff --git a/Game/Code/Classes/UCovers.dcu b/Game/Code/Classes/UCovers.dcu
deleted file mode 100644
index ca99fc7c..00000000
--- a/Game/Code/Classes/UCovers.dcu
+++ /dev/null
Binary files differ
diff --git a/Game/Code/Classes/UDLLManager.dcu b/Game/Code/Classes/UDLLManager.dcu
deleted file mode 100644
index 3ba97949..00000000
--- a/Game/Code/Classes/UDLLManager.dcu
+++ /dev/null
Binary files differ
diff --git a/Game/Code/Classes/UDraw.dcu b/Game/Code/Classes/UDraw.dcu
deleted file mode 100644
index a3fcecc9..00000000
--- a/Game/Code/Classes/UDraw.dcu
+++ /dev/null
Binary files differ
diff --git a/Game/Code/Classes/UFiles.dcu b/Game/Code/Classes/UFiles.dcu
deleted file mode 100644
index 9ed45d8f..00000000
--- a/Game/Code/Classes/UFiles.dcu
+++ /dev/null
Binary files differ
diff --git a/Game/Code/Classes/UGraphic.dcu b/Game/Code/Classes/UGraphic.dcu
deleted file mode 100644
index c264b16b..00000000
--- a/Game/Code/Classes/UGraphic.dcu
+++ /dev/null
Binary files differ
diff --git a/Game/Code/Classes/UGraphicClasses.dcu b/Game/Code/Classes/UGraphicClasses.dcu
deleted file mode 100644
index 58d003b0..00000000
--- a/Game/Code/Classes/UGraphicClasses.dcu
+++ /dev/null
Binary files differ
diff --git a/Game/Code/Classes/UIni.dcu b/Game/Code/Classes/UIni.dcu
deleted file mode 100644
index e891d36c..00000000
--- a/Game/Code/Classes/UIni.dcu
+++ /dev/null
Binary files differ
diff --git a/Game/Code/Classes/UJoystick.dcu b/Game/Code/Classes/UJoystick.dcu
deleted file mode 100644
index 62cde484..00000000
--- a/Game/Code/Classes/UJoystick.dcu
+++ /dev/null
Binary files differ
diff --git a/Game/Code/Classes/ULCD.dcu b/Game/Code/Classes/ULCD.dcu
deleted file mode 100644
index 8098a187..00000000
--- a/Game/Code/Classes/ULCD.dcu
+++ /dev/null
Binary files differ
diff --git a/Game/Code/Classes/ULCD.~pas b/Game/Code/Classes/ULCD.~pas
deleted file mode 100644
index a127c689..00000000
--- a/Game/Code/Classes/ULCD.~pas
+++ /dev/null
@@ -1,287 +0,0 @@
-unit ULCD;
-
-interface
-
-type
- TLCD = class
- private
- Enabled: boolean;
- Text: array[1..6] of string;
- StartPos: integer;
- LineBR: integer;
- Position: integer;
- procedure WriteCommand(B: byte);
- procedure WriteData(B: byte);
- procedure WriteString(S: string);
- public
- HalfInterface: boolean;
- constructor Create;
- procedure Enable;
- procedure Clear;
- procedure WriteText(Line: integer; S: string);
- procedure MoveCursor(Line, Pos: integer);
- procedure ShowCursor;
- procedure HideCursor;
-
- // for 2x16
- procedure AddTextBR(S: string);
- procedure MoveCursorBR(Pos: integer);
- procedure ScrollUpBR;
- procedure AddTextArray(Line:integer; S: string);
- end;
-
-var
- LCD: TLCD;
-
-const
- Data = $378; // domyœlny adres portu
- Status = Data + 1;
- Control = Data + 2;
-
-implementation
-
-uses
- SysUtils, zlportio, UTime;
-
-procedure TLCD.WriteCommand(B: Byte);
-// Wysylanie komend sterujacych
-begin
- if not HalfInterface then begin
- zlioportwrite(Control, 0, $02);
- zlioportwrite(Data, 0, B);
- zlioportwrite(Control, 0, $03);
- end else begin
- zlioportwrite(Control, 0, $02);
- zlioportwrite(Data, 0, B and $F0);
- zlioportwrite(Control, 0, $03);
-
- TimeSleep(0.1);
-
- zlioportwrite(Control, 0, $02);
- zlioportwrite(Data, 0, (B * 16) and $F0);
- zlioportwrite(Control, 0, $03);
- end;
-
- if (B=1) or (B=2) then
- Sleep(2)
- else
- TimeSleep(0.1);
-end;
-
-procedure TLCD.WriteData(B: Byte);
-// Wysylanie danych
-begin
- if not HalfInterface then begin
- zlioportwrite(Control, 0, $06);
- zlioportwrite(Data, 0, B);
- zlioportwrite(Control, 0, $07);
- end else begin
- zlioportwrite(Control, 0, $06);
- zlioportwrite(Data, 0, B and $F0);
- zlioportwrite(Control, 0, $07);
-
- TimeSleep(0.1);
-
- zlioportwrite(Control, 0, $06);
- zlioportwrite(Data, 0, (B * 16) and $F0);
- zlioportwrite(Control, 0, $07);
- end;
-
- TimeSleep(0.1);
- Inc(Position);
-end;
-
-procedure TLCD.WriteString(S: string);
-// Wysylanie slow
-var
- I: integer;
-begin
- for I := 1 to Length(S) do
- WriteData(Ord(S[I]));
-end;
-
-constructor TLCD.Create;
-begin
-//
-end;
-
-procedure TLCD.Enable;
-var
- A: byte;
- B: byte;
-begin
- Enabled := true;
- if not HalfInterface then
- WriteCommand($38)
- else begin
- WriteCommand($33);
- WriteCommand($32);
- WriteCommand($28);
- end;
-
-// WriteCommand($06);
-// WriteCommand($0C);
-// sleep(10);
-end;
-
-procedure TLCD.Clear;
-begin
- if Enabled then begin
- WriteCommand(1);
- WriteCommand(2);
- Text[1] := '';
- Text[2] := '';
- Text[3] := '';
- Text[4] := '';
- Text[5] := '';
- Text[6] := '';
- StartPos := 1;
- LineBR := 1;
- end;
-end;
-
-procedure TLCD.WriteText(Line: integer; S: string);
-begin
- if Enabled then begin
- if Line <= 2 then begin
- MoveCursor(Line, 1);
- WriteString(S);
- end;
-
- Text[Line] := '';
- AddTextArray(Line, S);
- end;
-end;
-
-procedure TLCD.MoveCursor(Line, Pos: integer);
-var
- I: integer;
-begin
- if Enabled then begin
- Pos := Pos + (Line-1) * 40;
-
- if Position > Pos then begin
- WriteCommand(2);
- for I := 1 to Pos-1 do
- WriteCommand(20);
- end;
-
- if Position < Pos then
- for I := 1 to Pos - Position do
- WriteCommand(20);
-
- Position := Pos;
- end;
-end;
-
-procedure TLCD.ShowCursor;
-begin
- if Enabled then begin
- WriteCommand(14);
- end;
-end;
-
-procedure TLCD.HideCursor;
-begin
- if Enabled then begin
- WriteCommand(12);
- end;
-end;
-
-procedure TLCD.AddTextBR(S: string);
-var
- Word: string;
- W: integer;
- P: integer;
- L: integer;
-begin
- if Enabled then begin
- if LineBR <= 6 then begin
- L := LineBR;
- P := Pos(' ', S);
-
- if L <= 2 then
- MoveCursor(L, 1);
-
- while (L <= 6) and (P > 0) do begin
- Word := Copy(S, 1, P);
- if (Length(Text[L]) + Length(Word)-1) > 16 then begin
- L := L + 1;
- if L <= 2 then
- MoveCursor(L, 1);
- end;
-
- if L <= 6 then begin
- if L <= 2 then
- WriteString(Word);
- AddTextArray(L, Word);
- end;
-
- Delete(S, 1, P);
- P := Pos(' ', S)
- end;
-
- LineBR := L + 1;
- end;
- end;
-end;
-
-procedure TLCD.MoveCursorBR(Pos: integer);
-var
- I: integer;
- L: integer;
-begin
- if Enabled then begin
- Pos := Pos - (StartPos-1);
- if Pos <= Length(Text[1]) then
- MoveCursor(1, Pos);
-
- if Pos > Length(Text[1]) then begin
- // bez zawijania
-// Pos := Pos - Length(Text[1]);
-// MoveCursor(2, Pos);
-
- // z zawijaniem
- Pos := Pos - Length(Text[1]);
- ScrollUpBR;
- MoveCursor(1, Pos);
- end;
- end;
-end;
-
-procedure TLCD.ScrollUpBR;
-var
- T: array[1..5] of string;
- SP: integer;
- LBR: integer;
-begin
- if Enabled then begin
- T[1] := Text[2];
- T[2] := Text[3];
- T[3] := Text[4];
- T[4] := Text[5];
- T[5] := Text[6];
- SP := StartPos + Length(Text[1]);
- LBR := LineBR;
-
- Clear;
-
- StartPos := SP;
- WriteText(1, T[1]);
- WriteText(2, T[2]);
- WriteText(3, T[3]);
- WriteText(4, T[4]);
- WriteText(5, T[5]);
- LineBR := LBR-1;
- end;
-end;
-
-procedure TLCD.AddTextArray(Line: integer; S: string);
-begin
- if Enabled then begin
- Text[Line] := Text[Line] + S;
- end;
-end;
-
-end.
-
diff --git a/Game/Code/Classes/ULanguage.dcu b/Game/Code/Classes/ULanguage.dcu
deleted file mode 100644
index 2d5c3596..00000000
--- a/Game/Code/Classes/ULanguage.dcu
+++ /dev/null
Binary files differ
diff --git a/Game/Code/Classes/ULight.dcu b/Game/Code/Classes/ULight.dcu
deleted file mode 100644
index 10ba61bc..00000000
--- a/Game/Code/Classes/ULight.dcu
+++ /dev/null
Binary files differ
diff --git a/Game/Code/Classes/ULog.dcu b/Game/Code/Classes/ULog.dcu
deleted file mode 100644
index 1794325d..00000000
--- a/Game/Code/Classes/ULog.dcu
+++ /dev/null
Binary files differ
diff --git a/Game/Code/Classes/ULyrics.dcu b/Game/Code/Classes/ULyrics.dcu
deleted file mode 100644
index 3867c263..00000000
--- a/Game/Code/Classes/ULyrics.dcu
+++ /dev/null
Binary files differ
diff --git a/Game/Code/Classes/UMain.dcu b/Game/Code/Classes/UMain.dcu
deleted file mode 100644
index 3a2edf09..00000000
--- a/Game/Code/Classes/UMain.dcu
+++ /dev/null
Binary files differ
diff --git a/Game/Code/Classes/UMusic.dcu b/Game/Code/Classes/UMusic.dcu
deleted file mode 100644
index f3116f8b..00000000
--- a/Game/Code/Classes/UMusic.dcu
+++ /dev/null
Binary files differ
diff --git a/Game/Code/Classes/UParty.dcu b/Game/Code/Classes/UParty.dcu
deleted file mode 100644
index e3e1a901..00000000
--- a/Game/Code/Classes/UParty.dcu
+++ /dev/null
Binary files differ
diff --git a/Game/Code/Classes/UPliki.dcu b/Game/Code/Classes/UPliki.dcu
deleted file mode 100644
index 1798b6f8..00000000
--- a/Game/Code/Classes/UPliki.dcu
+++ /dev/null
Binary files differ
diff --git a/Game/Code/Classes/URecord.dcu b/Game/Code/Classes/URecord.dcu
deleted file mode 100644
index d28aa4b1..00000000
--- a/Game/Code/Classes/URecord.dcu
+++ /dev/null
Binary files differ
diff --git a/Game/Code/Classes/UScores.dcu b/Game/Code/Classes/UScores.dcu
deleted file mode 100644
index 16454265..00000000
--- a/Game/Code/Classes/UScores.dcu
+++ /dev/null
Binary files differ
diff --git a/Game/Code/Classes/USkins.dcu b/Game/Code/Classes/USkins.dcu
deleted file mode 100644
index 89ea67c0..00000000
--- a/Game/Code/Classes/USkins.dcu
+++ /dev/null
Binary files differ
diff --git a/Game/Code/Classes/USongs.dcu b/Game/Code/Classes/USongs.dcu
deleted file mode 100644
index e58c47d8..00000000
--- a/Game/Code/Classes/USongs.dcu
+++ /dev/null
Binary files differ
diff --git a/Game/Code/Classes/UTexture.dcu b/Game/Code/Classes/UTexture.dcu
deleted file mode 100644
index ec06b7e4..00000000
--- a/Game/Code/Classes/UTexture.dcu
+++ /dev/null
Binary files differ
diff --git a/Game/Code/Classes/UThemes.dcu b/Game/Code/Classes/UThemes.dcu
deleted file mode 100644
index eb5ec8d4..00000000
--- a/Game/Code/Classes/UThemes.dcu
+++ /dev/null
Binary files differ
diff --git a/Game/Code/Classes/UTime.dcu b/Game/Code/Classes/UTime.dcu
deleted file mode 100644
index f69b60f7..00000000
--- a/Game/Code/Classes/UTime.dcu
+++ /dev/null
Binary files differ