' Flash LED on NanoCore12 pin PT0 ' 2/20/2009 by Carl Barnes ' To compile this file, you need to invoke the following commands: ' sbasic simple2.bas /c4000 /v3800 /s3f80 /m6812 > simple2.asm ' as12 simple2.asm include "reg9s12c.lib" ' PORT definitions and constants for 9S12C family of MCUs declare n Main: pokeb ddrt,%00000001 'designate PT0 pin as output do pokeb ptt,%00000001 'turn on LED for n=1 to* 65000 'waste time next pokeb ptt,0 'turn off LED for n=1 to* 65000 'waste time next loop end