Artikel: [code] Politie Knipperlicht

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

Het schema:

De Hex file:

:100000002728A301A200FF30A207031CA307031C9B
:1000100023280000A10100300F200328A101E83EA1
:10002000A000A109FC30031C1828A00703181528FC
:10003000A0070000A10F152820181E28A01C2228A8
:100040000000222808008313831203130800830191
:10005000073099003230A400A5000430A700B0306A
:10006000A6008316051083120514240801208316A8
:100070000510831205102508012083160510831230
:100080000514240801208316051083120510250885
:1000900001208316851083128514240801208316FD
:1000A0008510831285102708A30026080220312816
:0600B000630058285A28E5
:02400E00E43F8D
:00000001FF

Een reactie achterlaten

Your email address will not be published.