ICOM 201 User Manual
ICOM-manual
'--------------------------------------------------------------------
'----- ICOM200_OPTOIN.TIG
'--------------------------------------------------------------------
#include define_a.inc
user_var_strict
TASK Main
'----- ICOM200_OPTOIN.TIG
'--------------------------------------------------------------------
#include define_a.inc
user_var_strict
TASK Main
2
BYTE wert
USER_EPORT lastladr,10h
USER_EPORT physoffs, 0f0h
DIR_PORT 8,0
DIR_PORT 7,0
INSTALL_DEVICE #lcd,"LCD2.TDD",0,0,0EEH,1,150,11H' LCD-1=128x64,150
KB/s
OUT 8,11111111b,11011111b
USER_EPORT lastladr,10h
USER_EPORT physoffs, 0f0h
DIR_PORT 8,0
DIR_PORT 7,0
INSTALL_DEVICE #lcd,"LCD2.TDD",0,0,0EEH,1,150,11H' LCD-1=128x64,150
KB/s
OUT 8,11111111b,11011111b
' set CTRL-Pins of T6963C
OUT 8,10000000b,255
' Buzzer "off"
'--------------------------------------------------------------------
'-------- Optokoppler
Inputs
-----------------------------
'--------------------------------------------------------------------
OP:
IN 11h,wert
OP:
IN 11h,wert
' Optokoppler Inputs einlesen
PRINT #lcd, "wert=";wert
' Wert auf LCD ausgeben
GOTO op
' Sprung nach "OP"
END
2-12
Wilke Technology GmbH • 0241 / 918 900 • http://www.wilke.de/ • support@wilke.de