(...)F1 on a Soldat-Function opens a browser to enesce.com/help/*functionname*(...)Ah make an own help section. I want to use this when there's no internet connection.
function inttostr(i: Int64): string;
function inttostr(i: Integer): string;
function strtoint(s: string): Longint;
function strtointdef(s: string; def: Longint): Longint;
function copy(s: string; ifrom, icount: Longint): string
function pos(substr, s: string): Longint;
procedure delete(var s: string; ifrom, icount: Longint);
procedure insert(s: string; var s2: string; ipos: Longint);
function getarraylength: integer;
Function StrGet(var S : String; I : Integer) : Char;
procedure StrSet(c : Char; I : Integer; var s : String);
Function WStrGet(var S : WideString; I : Integer) : WideChar;
procedure WStrSet(c : WideChar; I : Integer; var s : WideString);
Function StrGet2(S : String; I : Integer) : Char;
Function AnsiUppercase(s : string) : string;
Function AnsiLowercase(s : string) : string;
Function Uppercase(s : string) : string;
Function Lowercase(s : string) : string;
Function Trim(s : string) : string;
function Length(s : string) : Integer;
procedure SetLength;
function Low: Int64;
function High: Int64;
procedure Dec;
procedure Inc;
Function Sin(e : Extended) : Extended;
Function Cos(e : Extended) : Extended;
Function Sqrt(e : Extended) : Extended;
Function Round(e : Extended) : Longint;
Function Trunc(e : Extended) : Longint;
Function Int(e : Extended) : Extended;
Function Pi : Extended;
Function Abs(e : Extended) : Extended;
function StrToFloat(s: string): Extended;
Function FloatToStr(e : Extended) : String;
Function Padl(s : string;I : longInt) : string;
Function Padr(s : string;I : longInt) : string;
Function Padz(s : string;I : longInt) : string;
Function Replicate(c : char;I : longInt) : string;
Function StringOfChar(c : char;I : longInt) : string;
function Unassigned: Variant;
function VarIsEmpty(const V: Variant): Boolean;
function Null: Variant;
function VarIsNull(const V: Variant): Boolean;
function VarType(const V: Variant): TVarType;
procedure RaiseLastException;
procedure RaiseException(Ex: TIFException; Param: string);
function ExceptionType: TIFException;
function ExceptionParam: string;
function ExceptionProc: Cardinal;
function ExceptionPos: Cardinal;
function ExceptionToString(er: TIFException; Param: string): string;
function StrToInt64(s: string): int64;
function Int64ToStr(i: Int64): string;
function SizeOf: Longint;
function IDispatchInvoke(Self: IDispatch; PropertySet: Boolean; const Name: String; Par: array of variant): variant;
type
IDispatch
IUnknown
function GetTickCount(): cardinal;
function CheckWeaponAllowed(WeaponNum: byte): boolean;
function Chr(Character: byte): char;
function LogN(base, value:Extended):Extended;
function ForwardClient(PlayerIP: string; PlayerPort: integer; ServerIP: string; ServerPort: integer; Message: string
List of functions not mentioned, may find tihs useful. There are probably more.
Could anyone explain a bit what, ''.IDE. is? I guess: http://en.wikipedia.org/wiki/Integrated_development_environmentIt's a text editor on steroids, built for programming and commonly has syntax highlighting, access to a compiler, and gives information about the functions and classes in your program. Popular ones are Microsoft's Visual C++, Code::Blocks, and others. Personally, I use Geany (http://www.geany.org/) for pretty much everything.
If you did not noticed, then I'll tell you now: Its not ready yet. :'(Aaaa! I must kill you for these words!!!
ok, no problem! join my server and expect me in there.If you did not noticed, then I'll tell you now: Its not ready yet. :'(Aaaa! I must kill you for these words!!!
I didn´t get what this would do ... please explain it to me I am dumb.It just basically makes scripting easier for those who create scripts.
"CrossFunc" - I don't know how it works. Maybe someone would PM me an example?I'll just say here because I'm lazy.
function CrossFunc(Params: array of variant; Func: string): variant;
Whereas Func is in the format <scriptname>.<funcname>.function Foo(Bar: string): integer;
begin
WriteLn('"' + Bar + '"');
Result := StrtoInt(Bar);
end;
function Foo(Bar: string): integer; // not necessary to put in a separate function
begin
Result := CrossFunc([Bar], 'HappyFeat.Foo');
end;
function OnCommand(Id: byte; Text: string): boolean;
begin
if (LowerCase(GetPiece(Text, ' ', 0)) = '/test') then
Result := Foo(GetPiece(Text, ' ', 1)) = 1;
end;
Sorry guys, that I did not reply faster. I am going to release an early beta-Version the next days. So - please be patient. I will fix all those known bugs before I'll add some new features.next months already passed :o
Read ya!
Good things need time, get the time and you will see much better results :PSorry guys, that I did not reply faster. I am going to release an early beta-Version the next days. So - please be patient. I will fix all those known bugs before I'll add some new features.next months already passed :o
Read ya!
Good things need time, get the time and you will see much better results :PSorry guys, that I did not reply faster. I am going to release an early beta-Version the next days. So - please be patient. I will fix all those known bugs before I'll add some new features.next months already passed :o
Read ya!
If he visits the forum to look into this thread
April 21, 2010, 10:48:53 am