procedure div64(VAR dividend:clunk_type; VAR divisor:clunk_type; VAR remainder:clunk_type; VAR quotient:clunk_type; VAR ids:integer); NONPASCAL; { LAST EDIT: 29-OCT-1987 21:15:15 This is the external declaration for the Pascal callable routine to return the result of the division of two clunk values. This external declaration expects that the file 'CLUNK.TYP' has been included at some point before this. Note that a clunk value is represented from [LSW..MSW]. How it works: You need supply two clunk values and it will divide the dividend by the divisor and return the quotient and remainder. The values stored in dividend and divisor are preserved. Two valid "ids" statuses are possible: 1 = success -3 = overflow ( divide by zero ) }