[h316.git] / programs / first-steps / src / muz.f

C        PHILIPP'S MUNZ-PROGRAMM, KEIN WEITERER ZWECK. EINE VERSION VOM 6.2.2005
C
C
CCCCCC DA SAG ICH NUR: LASS KRACHEN!
 33    WRITE(1,10)
       WRITE(2,20)
       WRITE(4,30)
   10  FORMAT(3HASR)
   20  FORMAT(3HPTP)
   30  FORMAT(3HLPR)
       PAUSE
       GOTO 33
$0
Commit	Line	Data
c08e22bb	1	C PHILIPP'S MUNZ-PROGRAMM, KEIN WEITERER ZWECK. EINE VERSION VOM 6.2.2005
	2	C
	3	C
	4	CCCCCC DA SAG ICH NUR: LASS KRACHEN!
	5	33 WRITE(1,10)
	6	WRITE(2,20)
	7	WRITE(4,30)
34bd95b6	8	10 FORMAT(3HASR)
	9	20 FORMAT(3HPTP)
	10	30 FORMAT(3HLPR)
c08e22bb	11	PAUSE
	12	GOTO 33
	13	$0
	14