na im prinzip geht das so

Code:
if pind.1 =1 then
  print  "Eingeschaltet"
elseif pind.1=0 then
         print "Ausgeschaltet"
end if
Schaue doch einfach auch mal die Bascom Samples durch.

http://www.mcselec.com/download_avr.htm
Hier gibt es auch noch Extrasamples für AVR.

Gruß Andreas