i writed for c:\rev.wav to load, but ineed perfect revlimiter sound 
RPM Limiter with custom sound
***updated***
I made with radekteam basecode (only udp packet capture) and my code
set outgauge port to 11111
unrar start and enjoy :
cfg.txt:
updated link : http://data.hu/get/658442/limiter.rar.html
try it
its only active for rpm limiter light!
Source code:
I made with radekteam basecode (only udp packet capture) and my code
set outgauge port to 11111
unrar start and enjoy :
cfg.txt:
OutGauge Mode 2
OutGauge Delay 5
OutGauge IP 127.0.0.1
OutGauge Port 11111
OutGauge ID 2updated link : http://data.hu/get/658442/limiter.rar.html
try it
its only active for rpm limiter light!
Source code:
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, IdBaseComponent, IdComponent, IdUDPBase, IdUDPServer,IdSocketHandle, StdCtrls,
ComCtrls, ExtCtrls, Gauges, MMsystem;
type
TPacket = record
Time: longint; // time in milliseconds (to check order)
Car: array[0..3] of char; // Car name
Flags: word; // OG_FLAGS
Gear: byte; // Reverse:0, Neutral:1, First:2...
SpareB: byte;
Speed: single; // M/S
RPM: single; // RPM
Turbo: single; // BAR
EngTemp: single; // C
Fuel: single; // 0 to 1
OilPress: single; // BAR
Spare1: single;
Spare2: single;
Spare3: single;
Throttle: single; // 0 to 1
Brake: single; // 0 to 1
Clutch: single; // 0 to 1
Display1: array[0..15] of char; // Usually Fuel
Display2: array[0..15] of char; // Usually Settings
// ID: integer; // optional - only if GameID is specified
end;
TForm1 = class(TForm)
IdUDPServer1: TIdUDPServer;
Label16: TLabel;
Label17: TLabel;
GroupBox1: TGroupBox;
CheckBox1: TCheckBox;
Timer1: TTimer;
Label1: TLabel;
Label2: TLabel;
procedure IdUDPServer1UDPRead(Sender: TObject; AData: TStream;
ABinding: TIdSocketHandle);
procedure Button1Click(Sender: TObject);
procedure FormClose(Sender: TObject; var Action: TCloseAction);
procedure FormCreate(Sender: TObject);
procedure Timer1Timer(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
paczka: Tpacket;
gear_tmp:string;
s: array[0..79] of char;
implementation
{$R *.dfm}
procedure TForm1.IdUDPServer1UDPRead(Sender: TObject; AData: TStream;
ABinding: TIdSocketHandle);
begin
Adata.Read(paczka, sizeof(paczka));
//////OG Flags//////
if (paczka.Flags AND 1) <> 0 then
CheckBox1.Checked:= True
else
CheckBox1.Checked:= False;
if (paczka.Flags AND 1) <> 0 then
CheckBox1.Checked:= True
else
CheckBox1.Checked:= False;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
IdUDPServer1.DefaultPort := 11111;
IdUDPServer1.Active := true;
end;
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
IdUDPServer1.Active:=False;
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
IdUDPServer1.DefaultPort := 11111;
IdUDPServer1.Active := true;
end;
procedure TForm1.Timer1Timer(Sender: TObject);
begin
if checkbox1.Checked = true then
begin
StrCopy(s, 'rev.wav');
sndPlaySound(s, 1);
checkbox1.Checked:=false;
end;
end;
end.
Last edited by Bob Smith, .
Reason : changed quote tags to code tags
i now buy(nono) delphi7 coz not work with indy10 in delphi codegear 2007
its works with delphi 7 personal
its works with delphi 7 personal
Last edited by Gegry1992, .
its now work with lfs z?
i saw work but i always get memory adress error if complie and inject(startlfslbabla and need to work) in CodeGear™ Delphi® :S
i saw work but i always get memory adress error if complie and inject(startlfslbabla and need to work) in CodeGear™ Delphi® :S
Last edited by Gegry1992, .
2in1 Steering wheels
Hi!
I have my question....
I have 2. steering wheel
1. Wheel: have gearbox and handbrake but wheel is horrible
2. Wheel: (momo) have greate wheel but no handbreak and gearbox , and i need to use 1. wheel pedals to clutch, how can i make 2 wheel to 1 wheel, without hammer and another stuffs , only with software?
I have my question....
I have 2. steering wheel
1. Wheel: have gearbox and handbrake but wheel is horrible
2. Wheel: (momo) have greate wheel but no handbreak and gearbox , and i need to use 1. wheel pedals to clutch, how can i make 2 wheel to 1 wheel, without hammer and another stuffs , only with software?
dll and exe in one directorie
rigs unrar anywhere, and when do you started discolitez do you can press options / open rigs, and you open rigs
rigs unrar anywhere, and when do you started discolitez do you can press options / open rigs, and you open rigs
released its here
and in programmes forum
and in programmes forum
Sound reactive indicators :P (released)
http://www.lfsforum.net/showthread.php?t=47555
Hai!
I made this for first to gmod. (see on my profile DeviMauz)
Woo, i made it for LFS.... hahaha
i dont know why, it is funny?!
see the video:
http://uk.youtube.com/watch?v=zUWHcKtEQno
V2: http://www.youtube.com/watch?v=xc-gx8jefWQ
use high quality
RELEASED
do you need first winamp... now winamp is gone bad and need oldesd winamp for plugin work
like winamp 5.24
download discolitez DiscoLitez Standard v2.1
and my rigs... download here
and my software download here
how to work?
HOME = ACTIVE | END = DEACTIVE
first is a program pressing 8 9 0 buttons!!!
if this on you CANT write in chat or you write 8 9 0
start winamp
control + k --> start discolitez
option open rig , open rig style 1 , or style2
i made 2...
okey start my program
and start one song go to lfs and press home
and to stop press home button
i made it in delphi , if you need it tell me in pm!
questions?
Hai!
I made this for first to gmod. (see on my profile DeviMauz)
Woo, i made it for LFS.... hahaha
i dont know why, it is funny?!
see the video:
http://uk.youtube.com/watch?v=zUWHcKtEQno
V2: http://www.youtube.com/watch?v=xc-gx8jefWQ
use high quality
RELEASED
do you need first winamp... now winamp is gone bad and need oldesd winamp for plugin work
like winamp 5.24
download discolitez DiscoLitez Standard v2.1
and my rigs... download here
and my software download here
how to work?
HOME = ACTIVE | END = DEACTIVE
first is a program pressing 8 9 0 buttons!!!
if this on you CANT write in chat or you write 8 9 0
start winamp
control + k --> start discolitez
option open rig , open rig style 1 , or style2
i made 2...
okey start my program
and start one song go to lfs and press home
and to stop press home button
i made it in delphi , if you need it tell me in pm!
questions?
**delete please -.-'
i ate 2 mins of your life
Last edited by Gegry1992, .
my original picture?
here: http://img182.imageshack.us/my.php?image=lfs00000006tf9.png
here: http://img182.imageshack.us/my.php?image=lfs00000006tf9.png
Last edited by Gegry1992, .
Final Entry
secound image
small: http://img123.imageshack.us/my.php?image=minizh7.jpg
big: http://img381.imageshack.us/my.php?image=lfsbignz0.jpg
yess i'm demo racer haha and? :P
my first live for speed photo
http://img127.imageshack.us/im ... lfs00000005copyvi5.th.jpg
http://img127.imageshack.us/im ... 53/lfs00000005copyvi5.jpg
my first live for speed photo
http://img127.imageshack.us/im ... lfs00000005copyvi5.th.jpg
http://img127.imageshack.us/im ... 53/lfs00000005copyvi5.jpg
az enyemet magyarul ha kerhetnem
update or reinstall OPEN GL Driver/software
FGED GREDG RDFGDR GSFDG