Anyone Recognise This Language?

[PeterJames]

As the topic title says

 

var
PicEvents: TPicEvents;
PicUID: Int64;
PicName: string;
InputsCount,
OutputsCount: integer;
Inputs: array[0..15] of TPicPin;
Outputs: array[0..15] of TPicPin;

// system thread
procedure OnPinMessage(Sender: TObject; const User: string; const PinUID: Int64; State: boolean; const DataType: TRCadDataType; const Data: string);
var
idx: integer;
begin
  try
   // translate inputs to outputs
   idx:=(PinUID and $1F)-1;
   if (idx>=0) and (idx<InputsCount) and
      (PinUID=Inputs[idx].UID) then
    begin
     Inputs[idx].State:=State;
     Inputs[idx].DataType:=DataType;
     Inputs[idx].Data:=Data;

[Cubit]

Yes.

 

Geek

[sixwheeledbeast]

Looks like C, what files does it come from?

[PeterJames]

Looks like C, what files does it come from?

Its not C Ive copied the below from the help file, I can program some of it but I am struggling to get my head round it. If I type // infront of a line the line is ignored

 

  A format specifier begins with a % character. After the % come the

  following, in this order:

  -  an optional argument index specifier, [index ":"]

  -  an optional left-justification indicator, ["-"]

  -  an optional width specifier, [width]

  -  an optional precision specifier, ["." prec]

  -  the conversion type character, type

  The following conversion characters are supported:

  d  Decimal. The argument must be an integer value. The value is converted

     to a string of decimal digits. If the format string contains a precision

     specifier, it indicates that the resulting string must contain at least

     the specified number of digits; if the value has less digits, the

     resulting string is left-padded with zeros.

  u  Unsigned decimal.  Similar to 'd' but no sign is output.

  e  Scientific. The argument must be a floating-point value. The value is

     converted to a string of the form "-d.ddd...E+ddd". The resulting

     string starts with a minus sign if the number is negative, and one digit

     always precedes the decimal point. The total number of digits in the

     resulting string (including the one before the decimal point) is given

     by the precision specifer in the format string--a default precision of

     15 is assumed if no precision specifer is present. The "E" exponent

     character in the resulting string is always followed by a plus or minus

     sign and at least three digits.

[Rulland]

Wouldn't have anything to do with the mobile site 'last poster' by any chance?.

[sixwheeledbeast]

It's some C derivative. Hence the comments on //

That help file is in Textpipe.

[PeterJames]

Hmm it is very similar I did a bit of C when I was at college but it wasnt the same as this, but it may be why I can understand some but not all. I will research C a bit more thanks

 

Is the any C experts out there?

[GalaxyGuy]

Delphi ?

[RichL]

is this off an apple machine?

[sixwheeledbeast]

Hmm it is very similar I did a bit of C when I was at college but it wasnt the same as this, but it may be why I can understand some but not all. I will research C a bit more thanks

 

Is the any C experts out there?

 

I definitely no expert but slowly learning C++ at the moment in my spare time.

 

From the information you have posted and a bit of research this should be useful.

 

It's not Python, Perl or Ruby to write off some languages.