15 lines
471 B
Text
15 lines
471 B
Text
IGNORELINE Note: This example does not use the math module.
|
|
:a
|
|
editvar /newvar /value=a /title=Enter first integer:
|
|
editvar /newvar /value=b /title=Enter second integer:
|
|
editvar /newvar /value=-a-+-b-=-c-
|
|
printline -c-
|
|
editvar /newvar /value=a*b=c
|
|
printline -c-
|
|
editvar /newvar /value=a/b=c
|
|
printline -c-
|
|
editvar /newvar /value=a %% b=c
|
|
printline -c-
|
|
editvar /newvar /value=d /title=Do you want to calculate more numbers?
|
|
if -d- /hasvalue yes goto :a else goto :end
|
|
:end
|