MOUSE

Computer Programming Language

 
Home
Mouse-79
Mouse-83
Mouse-2002
Contact Me

David Simpson
   

MOUSE-83 EXPRESSIONS

 Expression  Mouse code  Notes 
 Convert X to Boolean 0, 1  X. 0>  (x > 0) 
 X AND Y  X. Y. *  (if X and Y are 0 or 1) 
 X. 0> Y. 0> *  (for any X, Y) 
 X OR Y  X. Y. +  (if X and Y are 0 or 1; gives 2 if X and Y are both 1) 
 X. Y. + 0>  (if X and Y are 0 or 1) 
 X. 0> Y. 0> + 0>  (for any X, Y) 
 NOT(X)  X. 0=  (if X is 0 or 1) 
 X. 0> 0=  (for any X) 
 if (X == 0) then S  X. 0 = [S]  (x = 0) 
 if (X != 0) then S  X. 0 = 0= [S]  (NOT(x = 0)) 
 if (X > 0) then S  X. 0 > [S]  (x > 0) 
 X. [S]   
 if (X >= 0) then S  X. 0 1- > [S]  (x > -1) 
 X. 1_ > [S]  (x > -1) 
 X. 1+ 0> [S]  (x+1 > 0) 
 X. 1+ [S]  (x+1 > 0) 
 X. 0 < 0= [S]  (NOT(x < 0)) (BEST) 
 X. 0 > X. 0 = + [S]  (x>0 OR x=0) 
 if (X < 0) then S  X. 0 < [S]    
 if (X <= 0) then S  X. 1 < [S]  (x < 1) 
 X. 1- 0 < [S]  (x-1 < 0) 
 X. 0 > 0= [S]  (NOT(x > 0)) (BEST) 
 X. 0 < X. 0 = + [S]  (x<0 OR x=0) 
 if (X == A) then S  X. A. = [S]  (x = a) 
 if (X != A) then S  X. A. = 0= [S]  (NOT(x = a)) 
 if (X > A) then S  X. A. > [S]  (x > a) 
 if (X >= A) then S  X. A. 1- > [S]  (x > a-1) 
 X. 1+ A. > [S]  (x+1 > a) 
 X. A. < 0= [S]  (NOT(x < a)) (BEST) 
 X. A. > X. A. = + [S]  (x>a OR x=a) 
 if (X < A) then S  X. A. < [S]  (x < a) 
 if (X <= A) then S  X. A. 1+ < [S]  (x < a+1) 
 X. 1- A. < [S]  (x-1 < a) 
 X. A. > 0= [S]  (NOT(x > a)) (BEST) 
 X. A. < X. A. = + [S]  (x<a OR x=a) 
 while (B) S  ( B ^ S )   
 do S while B  ( S B ^ )   
 for I=1 to 10
   S
 
 1 I:
 ( I. 11 < ^
   S
   I. 1+ I:
 )
 
  
 for I=10 to 1 step -1
   S
 
 10 I:
 ( I. 0 > ^
   S
   I. 1- I:
 )
 
  
 loop forever
   S
 
 ( S )   
 break (out of loop)  0 ^   
 if (x == y) break;  X. Y. = [ 0 ^ ]   
 Print a ! character  33 !'   


Contact Information

I may be contacted at:
 

Copyright © 2006 David G. Simpson

http://Mouse.DavidGSimpson.com

Webmaster: David G. Simpson
Page last updated: February 9, 2007.