Fox encoder build in a TS 711E

16F628 based audiogenerator put on the motherboard-connector of the Kenwood TS 71E 1750Hz tone unit.

The RF power amplifier was bypassed and the the driver output
attenuated by 20 dB.

foxencoderpb1nl-j03oct02-01s

Schematic

schema-foxencoder16f628-oct02

Sourcecode

 

Written in JAL by Wouter van Ooijen.

www.voti.nl

-- by Bart 30 sep 02
-- geluid uit een 628
include f628_20
include jlib
include delay_1uS_20Mc

pin_a1_direction = output

procedure di is -- punt
for 300 loop
for 3 loop
pin_a1 = high
delay_1uS ( 2000 )
end loop
for 3 loop
pin_a1 = low
delay_1uS ( 2000 )
end loop
end loop
delay_1ms ( 75 )
end procedure -- einde punt

procedure da is -- streep
for 900 loop for 3 loop
pin_a1 = high
delay_1uS ( 2000 )
end loop
for 3 loop
pin_a1 = low
delay_1uS ( 2000 )
end loop
end loop
delay_1ms ( 75 )
end procedure -- einde streep

procedure pauze is -- pauze tussen de tekens
delay_1ms ( 450 )
end procedure

procedure wiebeltoon ( byte in seconden ) is
for ( seconden ) loop
for 500 loop
for 3 loop
pin_a1 = high
delay_1uS ( 2000 )
end loop
for 3 loop
pin_a1 = low
delay_1uS ( 2000 )
end loop
end loop
for 500 loop
pin_a1 = high
delay_1uS ( 2000 )
pin_a1 = low
delay_1uS ( 2000 )
end loop
end loop
end procedure

forever loop -- MAIN loop
wiebeltoon ( 60 )
delay_1S ( 3 )
di da da di
pauze
di da
pauze
da da di di di
pauze
di di da di
pauze
di da di di
pauze
da di di da di
pauze
di da da da
delay_1S ( 3 )
end loop

Please read the full story on a bigger screen.