Wilke ICOM200 Benutzerhandbuch Seite 22

ICOM-Benutzerhandbuch
'--------------------------------------------------------------------
'----- ICOM200_OUTPUTS.TIG
'--------------------------------------------------------------------
#include define_a.inc
user_var_strict
TASK Main
WORD i
2
USER_EPORT lastladr,10h
USER_EPORT physoffs, 0f0h
DIR_PORT 8,0
INSTALL_DEVICE #lcd,"LCD2.TDD",0,0,0EEH,1,150,11H' LCD-1=128x64, 150
KB/s
OUT 8,11111111b,11011111b
OUT 8,10000000b,255
'------------------------------------------------------------------------
--
'--------- OpenCollector Outputs
--
'------------------------------------------------------------------------
--
FOR i = 0 to 7
OUT 10h,mask (i),255
WAIT_DURATION 1000
OUT 10h,mask (i),0
WAIT_DURATION 1000
NEXT
END
2-14 Wilke Technology GmbH • 02405 / 408 550 • http://www.wilke.de/ • support@wilke.de
' set CTRL-Pins of T6963C
' Buzzer aus !
---------------------------------
' 8 Pins
' Pin auf "1" setzen
' 1 sec warten
' Pin auf "0" setzen
' 1 sec warten