11 lines
145 B
Text
11 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),{})
|