RosettaCodeData/Task/Flow-control-structures/PureBasic/flow-control-structures-2.purebasic

9 lines
132 B
Text
Raw Permalink Normal View History

2013-04-10 22:43:41 -07:00
X=1: Y=2
Gosub Calc
;X will now equal 7
End
Calc:
X+3*Y
Return ; Returns to the point in the code where the Gosub jumped from