Programmierung

Eingabe mit EASy68K

Dieses kleine Programm liest eine Zahl ein:

;-----------------------------------------------------------
; Title      :
; Written by :
; Date       :
; Description:
;-----------------------------------------------------------
CR  EQU     $0D
LF  EQU     $0A
 
    ORG    $1000
START:                  ; first instruction of program
 
; Put program code here
    ; Ausgeben einer Message
    LEA         MESSAGE,A1
    MOVE.B      #14,D0
    TRAP        #15
 
    ; Warten auf Eingabe
    MOVE.B      #4,D0
    TRAP        #15         ; Liest eine zahl von der Tastatur
                            ; und lädt den Wert in D1.L
 
    ; Simulation Stoppen
    MOVE.B      #9,D0
    TRAP        #15
 
; Put variables and constants here
MESSAGE     DC.B    'Gib eine Zahl ein: ',0
 
    END    START        ; last line of source

Ein Gedanke zu „Eingabe mit EASy68K

Schreibe einen Kommentar

Deine E-Mail-Adresse wird nicht veröffentlicht. Erforderliche Felder sind mit * markiert.