10 lines
145 B
Text
10 lines
145 B
Text
procedure Hello()
|
|
?"Hello"
|
|
end procedure
|
|
|
|
string erm = "Hemmm"
|
|
for i=3 to 5 do
|
|
erm[i]+=-1+(i=5)*3
|
|
end for
|
|
|
|
call_proc(routine_id(erm),{})
|