1 CHACHTI GOES FORTAN - AND BACK :-)
4 C *******************************
6 10 FORMAT (36HHACHTI'S "HELLO-WORLD", 28.NOV.2004 )
7 C *******************************
9 20 FORMAT (21HWIE HEISST DU? NAME: )
10 C *******************************
13 C *******************************
14 IF (NAME(1).EQ.(2H )) GO TO 1000
15 IF (NAME(1).EQ.(2HXX)) GO TO 9999
16 C *******************************
18 40 FORMAT (18HNICE TO MEET YOU, ,10A2, 1H!)
19 C *******************************
21 50 FORMAT (44HNOW I WILL LET YOU ALONE. HAVE SOME FUN :-) )
22 C *******************************
25 60 FORMAT (I3,2H: ,10A2,17HIST EIN GUTER :-))
27 C *******************************
32 70 FORMAT (24HOH! DEN NAMEN BITTE! -->)
37 80 FORMAT (8HGOODBYE.)
40 C *********** ENDE **************