function main()
local x := y := 1
for x := 1 to 10
? "x=", alltrim(str(x)), " y=", alltrim(str(y))
// O mesmo que : y++ ou y += 1
y -=- 1
next
return nil
José M. C. Quintas
Harbour 3.2, mingw, multithread, gtwvg, fivewin 25.12, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui), (hmg3), (hmg extended), (oohg), PNotepad, ASP, (Linux/Flagship/harbour 3.2) "The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell" https://github.com/JoseQuintas/