% unterprogramm_go.mms
        LOC  Data_Segment
        GREG @  % wird für LDA benötigt
String  BYTE "Willkommen im Unterprogramm :)",0        
        
        LOC #100
        GREG @  % wird für GO benötigt
        
% Unterprogramm anlegen        
ausgabe LDA  $255,String        % Adresse von String ins globale Register laden
        TRAP 0,Fputs,StdOut     % Srting ausgeben
        GO   $0,$0,0            % Rücksprung zum Hauptprogramm
                                % in $0 steht die Rücksprungadresse

% Hauptprogramm        
Main    GO   $0,ausgabe         % Rücksprungadresse in $0 speichern und nach ausgabe springen
        TRAP 0,Halt,0