/*
 * Send Email Procedure
 */

/* Get line #; used in all functions as first arg */
ARG Line

/* Set your email message area # */

Email_area = 2

AdeptCls(Line)		
AdeptMessage(Line, 3, Email_Area, '')
AdeptWrite(Line, 1, 2, '')
AdeptMessage(Line, 3, 1, '')
