'14WIPER.BAS Picaxe 14M demo LED 'wiper' April 2007 'Ensure latest editor used & 14M option selected 'Uses 6 LEDs at output pins 0-5 for accelerating L-R-L wiper action 'b0=delay b1=LED number wiper: for b0=250 to 0 step -5 'decreasing chase delays(msecs) for b1=0 to 5 'loop for outward LED chase high b1:pause b0:low b1:pause b0:next b1 'briefly flash LED for b1=4 to 1 step -1 'loop for return LED chase high b1:pause b0:low b1:pause b0:next b1 'briefly flash return LED next b0 'decrease delay between flashes wait 1 '1 second rest goto wiper 'repeat entire effect