REM     File: PORT3.BAS        Date: 01/24/92
REM
REM  /* (c) Copyright BLUE EARTH RESEARCH, MANKATO, MN 1992. */
REM  /*                All rights reserved.                  */
REM
REM  The following is part of the BASIC program used to test the
REM  Application Modules after they are assembled.  It demonstrates
REM  how BASIC can be used to output values on PORT3 to switch devices
REM  using the MOSFETs.


1       REM APPLICATIONS MODULE MOSFET TEST PROGRAM

REM
REM BOTH MOSFETS WILL BE TURNED ON AT POWER-UP
REM  (PORT3=0FFH OR 255 DECIMAL)
REM

REM TURN BOTH MOSFETS OFF - PORT3=207 DECIMAL
530     PORT3=0CFH
535     A=GET :  IF A<>20H THEN 535

REM TURN P3.4 ON AND LEAVE P3.5 OFF - PORT3=223 DECIMAL
540     PORT3=0DFH
545     A=GET :  IF A<>20H THEN 545

REM TURN P3.4 OFF AND TURN P3.5 ON - PORT3=239 DECIMAL
550     PORT3=0EFH
555     A=GET :  IF A<>20H THEN 555

REM RETURN PORT3 TO ITS ORIGINAL STATE - PORT3=255 DECIMAL
REM   BOTH MOSFETS WILL NOW BE TURNED ON
570   PORT3=0FFH