155664 012700 006406                        mov     #6406, R0
155670 004767 001002                        call    156676
155674 001402                               beq     loc_155702
155676 004767 176406                        call    154310
155702
155702                      loc_155702:
155702 004767 176506                        call    154414
155706 122702 000131                        cmpb    #131, R2 ; 'Y'
155712 001103                               bne     loc_156122
155714 010146                               mov     R1, -(SP)
155716 011003                               mov     @R0, R3
155720 004767 176034                        call    153760
155724 004767 001500                        call    157430
155730 005767 031570                        tst     7524
155734 001401                               beq     loc_155740
155736 104561                               trap    161
155740
155740                      loc_155740: 
155740 005004                               clr     R4
155742 005067 031552                        clr     7520
155746 005067 031550                        clr     7522
155752
155752                      loc_155752: 
155752 012701 000001                        mov     #1, R1
155756 012700 007522                        mov     #7522, R0
155762 012702 002700                        mov     #2700, R2
155766 112712 000377                        movb    #377, @R2
155772 004767 175624                        call    153622
155776 126727 024676 000377                 cmpb    2700, #377
156004 001413                               beq     loc_156034
156006 126727 024666 000040                 cmpb    2700, #40 ; ' '
156014 001005                               bne     loc_156030
156016 005204                               inc     R4
156020 004567 177050                        jsr     R5, 155074
156024 004000                               jsr     R0, R0
156026 000751                               br      loc_155752

156030                      loc_156030:   
156030 104557                               trap    157
156032
156032                      loc_156032:
156032 104567                               trap    167
156034
156034                      loc_156034:
156034 006304                               asl     R4
156036 006304                               asl     R4
156040 166704 030100                        sub     6144, R4
156044 003772                               ble     loc_156032
156046 010467 030104                        mov     R4, 6156
156052 005067 031412                        clr     7470
156056 012704 157200                        mov     #157200, R4
156062 012746 000004                        mov     #4, -(SP)
156066
156066                      loc_156066:
156066 012400                               mov     (R4)+, R0
156070 000300                               swab    R0
156072 010067 031424                        mov     R0, 7522
156076 012402                               mov     (R4)+, R2
156100 012401                               mov     (R4)+, R1
156102 010446                               mov     R4, -(SP)
156104 004767 175540                        call    153650		; Write Postincrement
156110 012604                               mov     (SP)+, R4
156112 005316                               dec     @SP
156114 001364                               bne     loc_156066
156116 005726                               tst     (SP)+
156120 012601                               mov     (SP)+, R1
156122
156122                      loc_156122:
156122 000167 125204                        jmp     103332