
https://harbour.fourtech.es/modharbour_ ... andbox.prg
Esto es un sueño hecho realidad

Observa lo rápido que funciona !!!
Code: Select all
function Main()
Local nSum, i
? "Hello world, this is a test"
nSum := 0
For i := 1 to 10
nSum += i
Next
? "El resultado es: "+AllTrim(Str(nSum))
return nil