TAL Hello World Example

TAL stands for Transaction Application Language. This programming language is 
used on Tandem computers under Guardian OS. If you use an ATM, you transaction  
will probably be processed by a TAL interface program or something else. Any 
way, I copied this examples exactly from the
TAL Programmers's Guide: (I really dont like it very much....)

?NOLIST,SOURCE $SYSTEM.SYSTEM.EXTDECS (CLOSE, INITIALIZER
  OPEN,WRITE,MYTERM)
?LIST

PROC myproc MAIN;
 BEGIN
 INT termname[0:11];
 INT filename;
 STRING buffer [0:79]; 
 
 CALL INITIALIZER;
 CALL MYTERM (termname);
 CALL OPEN (termname,filenum); 
 CALL WRITE(filenum,"Hello World",12);
 CALL CLOSE(out_file_number); 
END;