'----------------------------------------------------------------------------------------
'    Name:  L10_L11.TIG
'    Type:  TIGER-BASIC(tm) Source Code
' Purpose:  Reads from Port 10 & Port 11
'           
'
'
'  (C) - Copyright Wilke Technology, P.O.Box 1727, D-52018 Aachen, Germany
'----------------------------------------------------------------------------------------
'
' Thank you for using BASIC Tigers in your products. If you have questions, ideas
' or special needs, please contact your next distributor or the Tiger support team
' and visit our web site:
'
'	Wilke Technology GmbH
'	The Tiger Support Team
'	P.O.Box 1727,       D-52018 Aachen, Germany
'	Krefelder Str. 147, D-52070 Aachen, Germany
'
'	email: support@wilke-technology.com  (english)
'	email: support@wilke.de              (german)
'	Phone: +49 (241) 918 900    Mo to Fr, 7:00 to 16:00 (GMT)
'	Fax:   +49 (241) 918 9068
'
' New information, new drivers and free downloads see:
'
'	www.wilke-technology.com	     (english)
'	www.wilke.de                         (german)
'
' Sincerely,
'
'	Your Tiger Support Team
'
'----------------------------------------------------------------------------------------
'
' required Hardware: Tiger 2
'
'
' Port 10 and 11 are   I N P U T S   O N L Y  ! ! !
' They are the Analog Inputs of Tiger 2.
'
'----------------------------------------------------------------------------------------
#include define_a.inc

user_var_strict

task main
  install_device #LCD, "LCD1.td2"	'
  byte P10, P11				'
  while 1=1				'
    LL_iport_in 10,P10			' read Port 10
    LL_iport_in 11,P11			' read Port 11
    PRINT #LCD, "<1>";                  ' delete LCD
    PRINT #LCD, "P10: "; P10		' Print to LCD
    PRINT #LCD, "P11: "; P11		' Print to LCD
    wait_duration 200			' wait 200ms
  endwhile				'
end