Mouse (programming language)


The Mouse programming language is a small computer programming language developed by Dr. Peter Grogono in the late 1970s and early 1980s. It was developed as an extension of an earlier language called MUSYS, which was used to control digital and analog devices in an electronic music studio.
Mouse was originally intended as a small, efficient language for microcomputers with limited memory. It is an interpreted, stack-based language and uses Reverse Polish notation. To make an interpreter as easy as possible to implement, Mouse is designed so that a program is processed as a stream of characters, interpreted one character at a time.
The elements of the Mouse language consist of a set of one-character symbols, each of which performs a specific function. Since variable names are limited to one character, there are only 26 possible variables in Mouse. Integers and characters are the only available data types.
Despite these limits, Mouse includes a number of relatively advanced features, including:
The design of the Mouse language makes it ideal for teaching the design of a simple interpreter. Much of the book describing Mouse is devoted to describing the implementation of two interpreters, one in Z80 assembly language, the other in Pascal.

Details

The language described here is the later version of Mouse, as described in the Mouse book. This version is an extension of the language described in the original magazine article.

Symbols

The following table describes each of the symbols used by Mouse. Here X refers to the number on the top of the stack, and Y is the next number on the stack.
SymbolAction
No action
$End of program
Push onto stack
+Add
-Subtract
*Multiply
/Integer divide
\Remainder
?Input integer
?'Input character
!Print integer
!'Print character
'Push character onto stack
"Print string
Get variable address
:Store variable
.Recall variable
<Return 1 if Y < X; else return 0
=Return 1 if Y = X; else return 0
>Return 1 if Y > X; else return 0
End of conditional statement
End of loop
^Exit loop
#Macro call
@Exit from macro
%Macro parameter
,End of actual macro parameter
;End of list of macro parameters
End trace
~Comment

Expressions

Common idioms

These expressions appear frequently in Mouse programs.

X: ~ store into variable X
X. ~ recall variable X
X. Y: ~ copy X into Y
N. 1 + N: ~ increment N by 1
P. Q. P: Q: ~ swap values of P and Q
? A: ~ input a number and store in A
P. ! ~ print variable P

Input

Mouse may input integers or characters. When a character is input, it is automatically converted to its ASCII code.

? X: ~ input a number and store into X
?' X: ~ input a character and store its ASCII code into X

Output

Mouse may print integers, characters, or string constants, as shown in these examples. If an exclamation point appears in a string constant, a new line is printed.

X. ! ~ recall number X and print it
X. !' ~ recall ASCII code X and print character
"Hello" ~ print string "Hello"
"Line 1!Line 2" ~ print strings "Line 1" and "Line 2" on two lines

Conditionals

A conditional statement has the general form:

B ~ equivalent to: if B then S

Here B is an expression that evaluates to 1 or 0, and S is a sequence of statements.

Loops

Loops may have one of several forms. Most common are the forms:

 ~ equivalent to: while B do S
 ~ equivalent to: repeat S until

Here again B is a boolean value, and S is a sequence of statements.

Macro calls

The format of a macro call may be illustrated by the following example. Macro A in this example adds the two parameters passed to it from the main program, and returns the sum on the top of the stack.

  1. A,p1,p2; ~ call in main program to macro A
...
$A 1% 2% + @ ~ macro A

Here p1 and p2 are parameters passed to the macro.

Example programs

This short program prints 'Hello world.'

"Hello world."
$

This program displays the squares of the integers from 1 to 10.

1 N: ~ initialize N to 1
 $ ~ increment N and repeat loop