Estudio de Soluciones
VAR
long swStack[120]
8) Ejemplo:
VAR
byte swCog[3]
9) Ejemplo:
swCog[0] := cognew(SquareWave(5, clkfreq/20, clkfreq/10), @swStack)
swCog[1] := cognew(SquareWave(6, clkfreq/100, clkfreq/5), @swStack[40])
swCog[2] := cognew(SquareWave(9, clkfreq/2000, clkfreq/500), @swStack[80])
Soluciones a los Proyectos de la Practica Métodos y Cogs
1) Ejemplo de Método:
PUB SquareWave(pin, tHigh, tCycle) : success | tH, tC
outa[pin]~
dira[pin]~~
tC := cnt
repeat
outa[pin]~~
tH := tC + tHigh
tC += tCycle
waitcnt(tH)
outa[pin]~
waitcnt(tC)
2) Ejemplo de Solución:
''File: TestSquareWaveMethod.spin
CON
_xinfreq = 5_000_000
_clkmode = xtal1 + pll16x
VAR
long swStack[120]
byte swCog[3]
PUB TestSquareWave
swCog[0] := cognew(SquareWave(5, clkfreq/20, clkfreq/10), @swStack)
swCog[1] := cognew(SquareWave(6, clkfreq/100, clkfreq/5), @swStack[40])
swCog[2] := cognew(SquareWave(9, clkfreq/2000, clkfreq/500), @swStack[80])
3) No se da solución, diviértase experimentando!
Pagina 206 · Kit Educativo de Prácticas Propeller: Fundamentos