Java to pascal/delphi

[inherited]

LOL 'what makes this code' i think he 'makes' nothing. he is doing a lot
My Java isn't good enough to translate, but here some tips for pascal-language:
to compare to variables, you use '=', e.g.
  if s1=s2 then whatever; to assign a variable you use ':=', e.g

  s1:=s2; Furthermore there is no

Code:

  l++

in delphi/pascal, to increase the value of an integer-var by 1, use
  i:=i+1; or
  inc(i); so far
inh3r1ted