MUMPS

	ähnliche Sprachen:	Caché ObjectScript

	Beschreibung:	MUMPS (auch bekannt als M) steht für "Massachusetts general hospital Utility MultiPurpose System". Intersystems Caché ist MUMPS kompatibel!

Hello World (1)

Connel MacKenzie

HELLO   W "Hello World",!
        Q

Gibt "Hello World" auf dem Bildschirm aus.

Hello World (2)

Connel MacKenzie

HELLO   ; C. MacKenzie ; 3/30/2001 ; "Hello World" routine
        WRITE "Hello World",!
        QUIT

Gibt "Hello World" auf dem Bildschirm aus.

Hello World (Interpretierter Modus)

Connel MacKenzie

>W "Hello World",!

Gibt "Hello World" auf dem Bildschirm aus.

Sortieren

Connel MacKenzie

SORT    ; C. MacKenzie ; 3/30/2001 ; print out array X sorted
        ZWRITE X
        QUIT


; Aufrufen vom interpretierten Modus aus:
>KILL  SET X("Hello")=" World?",X("WORLD")="Hi there." DO ^SORT
; result:
;   X("Hello")=" World?"
;   X("WORLD")="Hi there."

; Anderes Beispiel:
>S X("Hello","World")="" ZW X
; result:
;   X("Hello","World")=""

Gibt ein Array sortiert aus.

Squares (1)

Connel MacKenzie

SQUARES F I=1:1:10 W I*I," "
        W !
        Q

Gibt die Quadrate von 1 bis 10 aus.

Squares (2)

Connel MacKenzie

SQUARES ; C. MacKenzie ; 3/30/2001 ; output squares from 1 to 10
        FOR I=1:1:10 WRITE I*I," "
        WRITE !
        QUIT

Gibt die Quadrate von 1 bis 10 aus.

Squares (Interpretierter Modus)

Connel MacKenzie

>F I=1:1:10 W I*I," "

Gibt die Quadrate von 1 bis 10 aus.