Page 1 of 1
hope Gosub can 'disassemble' (If EndIf) etc.
Posted: Thu Apr 06, 2017 7:30 am
by gurj
Code: Select all
;hope Gosub can 'disassemble' (If EndIf) etc.
Gosub re
k=b
EndIf:EndIf
Gosub re
h=c
EndIf:EndIf
End
re: :If a=0 And b=0 And c=d
m=n:If t=y:Return
Re: hope Gosub can 'disassemble' (If EndIf) etc.
Posted: Thu Apr 06, 2017 4:27 pm
by DarkDragon
You need macros, not gosub.
Re: hope Gosub can 'disassemble' (If EndIf) etc.
Posted: Thu Apr 06, 2017 9:51 pm
by gurj
Code: Select all
Gosub re
k=b
re1:
EndIf:re2: :EndIf
End
re: :If a=0
m=n:If t=y:Return
a judgment: Gosub cann't 'disassemble' (If EndIf), because:
If t=y:Return
so,If t<>y, Not Return, this is wrong
no
If a<>0, will automatic Goto re2
If t<>y, will automatic Goto re1
other, thanks DarkDragon for your concerns