Flow-control structures: Difference between revisions
m
→{{header|M2000 Interpreter}}
No edit summary |
|||
Line 1,327:
long x=random(1, 2)
on x goto 90, 100
gosub 500
print "ok too"
integer c
Line 1,339:
}
print "no print here"
Every 100 { // every 100 miliseconds this block executed
c++
Line 1,349:
on x gosub 400, 1234
}
if ok else print error$ // sub not found (
goto 1234 ' not exist so this is an exit from module
400 print "can print here if is "+x // if x=1
end
Print c
return
Print "exit from block using goto"
return
Line 1,363:
Inner
</syntaxhighlight>
=={{header|Mathematica}} / {{header|Wolfram Language}}==
| |||