Met deze code kan je 2 ledjes laten knipperen volgens het volgende patroon: 2x rechts 1x links 2x rechts 2x….
Een filmpje met de code in werking:
'**************************************************************** '* Name : knipperlicht.BAS * '* Author : [Stynus] * '* Notice : Copyright (c) 2006 [www.elektronicastynus.be] * '* : All Rights Reserved * '* Date : 08/04/2007 * '* Version : 1.0 * '* Notes : * '**************************************************************** Device 12F629 Config INTRC_OSC_NOCLKOUT, WDT_OFF, PWRTE_ON, MCLRE_ON ALL_DIGITAL TRUE Dim tijd As Byte Dim tijd2 As Byte Dim tijd3 As Word Symbol LED1 = PORTB.0 Symbol LED2 = PORTB.1 tijd = 50 tijd2 = 50 tijd3 = 1200 hier: High LED1 DelayMS tijd Low LED1 DelayMS tijd2 High LED1 DelayMS tijd Low LED1 DelayMS tijd2 High LED2 DelayMS tijd Low LED2 DelayMS tijd3 GoTo hier End
De Hex file:
:100000002728A301A200FF30A207031CA307031C9B :1000100023280000A10100300F200328A101E83EA1 :10002000A000A109FC30031C1828A00703181528FC :10003000A0070000A10F152820181E28A01C2228A8 :100040000000222808008313831203130800830191 :10005000073099003230A400A5000430A700B0306A :10006000A6008316051083120514240801208316A8 :100070000510831205102508012083160510831230 :100080000514240801208316051083120510250885 :1000900001208316851083128514240801208316FD :1000A0008510831285102708A30026080220312816 :0600B000630058285A28E5 :02400E00E43F8D :00000001FF