50 lines
1.1 KiB
Plaintext
50 lines
1.1 KiB
Plaintext
|
||
; ----------------------------------------------------------
|
||
|
||
PUBLIC $M_CLS_1
|
||
IF1
|
||
%out ... Including message Class 3
|
||
ENDIF
|
||
|
||
; ----------------------------------------------------------
|
||
|
||
$M_CLASS_3_STRUC LABEL BYTE
|
||
$M_CLASS_ID <0FFH,EXPECTED_VERSION,Class_3_MessageCount>
|
||
|
||
; ----------------------------------------------------------
|
||
|
||
|
||
$M_3_0FFFFH_STRUC LABEL BYTE
|
||
$M_ID <0FFFFH,$M_3_0FFFFH_MSG-$M_3_0FFFFH_STRUC>
|
||
|
||
; ----------------------------------------------------------
|
||
|
||
|
||
$M_3_0FFFFH_MSG LABEL BYTE
|
||
DB $M_3_0FFFFH_END-$M_3_0FFFFH_MSG-1
|
||
DB "Extended Error %1",CR,LF
|
||
$M_3_0FFFFH_END LABEL BYTE
|
||
|
||
; ----------------------------------------------------------
|
||
|
||
Class_3_MessageCount EQU 1
|
||
|
||
; ----------------------------------------------------------
|
||
|
||
IF FARmsg
|
||
$M_CLS_1 PROC FAR
|
||
ELSE
|
||
$M_CLS_1 PROC NEAR
|
||
ENDIF
|
||
|
||
PUSH CS
|
||
POP ES
|
||
LEA DI,$M_CLASS_3_STRUC
|
||
ADD CX,$-$M_CLASS_3_STRUC
|
||
RET
|
||
|
||
$M_CLS_1 ENDP
|
||
|
||
; ----------------------------------------------------------
|
||
|
||
|