Чтение из txt файла в 68k - PullRequest
Новая
       26

Чтение из txt файла в 68k

0 голосов
/ 02 октября 2018

Я застрял в простой программе 68k.

Программа должна читать из текстового файла.В файле txt находятся числа, разделенные пробелом, и файл заканчивается точкой (.)

. Мне нужно ввести имя файла и прочитать его, подсчитать, сколько там чисел, и суммировать все соседние числа.

Пример: 222 10 300 7 450 201 9 117 38 456. Результат: Сумма соседей: 232 310 307 457 651 210 126 155 494, Количество чисел: 10.

Вот что яу меня так далекоИспользование D3 для количества чисел. 

START   ORG $1000

    MOVE #0,D3

    MOVE #14,D0
    LEA text,A1
    TRAP #15

    MOVE #2,D0
    LEA name,A1
    TRAP #15

    MOVE #51,D0
    LEA name,A1
    TRAP #15

    MOVE    #53,D0
    MOVE.L  #100,D2
    LEA cont,A1
    TRAP    #15

    MOVE #13,D0
    TRAP    #15

loop    CMP.B #$2E,(A1)
    BEQ dot
    CMP.B #$20,(A1)
    BEQ space


    ADD.L   #1,A1
    JMP loop

space ADD.L #1,D3
    RTS

dot MOVE #14,D0
    LEA sum,A1
    TRAP #15

    LEA end,A1
    TRAP #15
    MOVEA d3,a1
    TRAP    #15

    MOVE.B #9,D0
    TRAP #15

name DS.B 10
cont DS.B 100
text DC.B 'Enter file name:',0
sum DC.B 'Sum of neighbours: ',0
end DC.B 'Number of numbers: ',0

    END START

Прежде всего, как проще всего распечатать мой регистр d3 на экране?2-й: Поскольку я перемещаю только один символ за раз, как мне сделать число из этих 1-3 символов?

...