VARKON Version 1.15 1997-10-16
MBS is based on a general purpose programming language with syntax reminding of PASCAL. An executing unit is called a MODULE in MBS. This is conceptually the same as a program, subroutine or procedure in other languages. MBS is a general purpose programming language but at the same time also a generic (parametric) language for Design and Product Modeling. To give you a first idea of what MBS looks like here's a simple example....
MACRO MODULE count_lines(STRING filename*80 >"Enter name of file !");
STRING line*132;
FILE f;
INT count;
BEGINMODULE
!*
!***Open the file for read access.
!*
open(f,"R",filename);
!*
!***Loop and read lines until end of file.
!*
count:=0;
loop:
line:=inlin(f);
!*
!***If a line was read increase counter and loop again.
!*
IF iostat(f) = 0 THEN
count:=count + 1;
GOTO loop;
!*
!***If no line was read there are no more lines to read. Close the file and
!***display the result in a VARKON listwindow.
!*
ELSE
close(f);
lst_ini("Result of linecount for file ="+filename);
lst_lin("Count="+str(count));
lst_exi();
ENDIF;
ENDMODULE
| VARKON Homepage | Index |