; ---------------------------------------------------------- PUBLIC $M_CLS_2 IF1 %out ... Including message Class 4 ENDIF ; ---------------------------------------------------------- $M_CLASS_4_STRUC LABEL BYTE $M_CLASS_ID <0FFH,EXPECTED_VERSION,Class_4_MessageCount> ; ---------------------------------------------------------- $M_4_0FFFFH_STRUC LABEL BYTE $M_ID <0FFFFH,$M_4_0FFFFH_MSG-$M_4_0FFFFH_STRUC> ; ---------------------------------------------------------- $M_4_0FFFFH_MSG LABEL BYTE DB $M_4_0FFFFH_END-$M_4_0FFFFH_MSG-1 DB "Parse Error %1",CR,LF $M_4_0FFFFH_END LABEL BYTE ; ---------------------------------------------------------- Class_4_MessageCount EQU 1 ; ---------------------------------------------------------- IF FARmsg $M_CLS_2 PROC FAR ELSE $M_CLS_2 PROC NEAR ENDIF PUSH CS POP ES LEA DI,$M_CLASS_4_STRUC ADD CX,$-$M_CLASS_4_STRUC RET $M_CLS_2 ENDP ; ----------------------------------------------------------