JUF2    START
        LD    GR0,DAT    ; 学籍番号のロード
                         ; <GR0>−50 → <GR0>
        
                         ; <GR0>−50 → <GR0>
                         ;  minus の反対は，
        JZE   STR        ;  plus または zero
UDR50   ADDL  GR0,CMP1   ; <GR0>＋50 → <GR0>
STR     ST    GR0,RSLT   ; <GR0> → <RSLT>
        RET
DAT     DC    999        ; 自分の学籍番号を10進数で入力
CMP1    DC    50
RSLT    DS    1
        END