makobasic/EasyLisp
An attempt to create a Lisp that runs on the ANSII Common Lisp application on Terminal, that will help beginners get into Lisp.
Discovered public repositories for makobasic in the GitHub catalog.
An attempt to create a Lisp that runs on the ANSII Common Lisp application on Terminal, that will help beginners get into Lisp.
Sorry but my last post didn't work. The code is: Dim number1 as integer number1=Val(TextField1.Text) Dim operation as String operation=TextField2.Text Dim number2 as integer number2=Val(TextField3.Text) IF operation ="+" THEN Dim sum as integer sum=(number1+number2) MsgBox "The answer is "+Str(sum) END IF operation ="-" THEN Dim sum as integer sum=(number1-number2) MsgBox "The answer is "+Str(sum) END IF operation ="x" THEN Dim sum as integer sum=(number1*number2) MsgBox "The answer is "+Str(sum) END IF operation ="/" THEN Dim sum as double sum=(number1/number2) MsgBox "The answer is "+Str(sum) END IF operation ="exponent" THEN Dim sum as integer sum=(number1^number2) MsgBox "The answer is "+Str(sum) END
Basic calculator program. I know it looks weird but it was created in REALbasic. That's where al the TextField stuff came from.This is the code for the button that calculates the operation