Séquenceur 144 / 432 SP2000 SP7000
pour Kenwood TS 2000.
A la foire de la Louvière je suis tombé sur les SP2000 et SP7000 et acquis.
Très bien jusque-là mais comment les commander avec 2 séquenceur de chez Wimo vu le prix cela semble un peu haut, et puis le TS 2000 donne sur une prise les tensions pour chaque bande séparément donc il restait à réfléchir et trouver une solution.
La solution simple et rapide, un transistor, un relais et c'est fini.
Deuxième option utiliser un PICAXE 20M2, l'idée semble élégante et surtout évolutive si je devais par la suite connecter un PA. Les probabilités d'y brancher un PA sont très faible car si la propagation est présente ça passe, reste le cas où la courtoisie surpuissante d'un OM vous passe dessus et là merci... j'arrête!
Alimentation
Contrôleur
Donc reste l'analyse du système à réaliser, le signal par bande du TS2000 est positif en RX et mise au 0V en TX par un transistor par bande. Donc le signal est présent sur une broche à la fois ( émission sur une seule fréquence).
Il sera équipé d'un switch ON/OFF et de son alimentation en 5 V DC pour la logique et 15 V DC pour les préamplis alimentés par une liaison DC séparée en coax et non par le câble des aériens.
Deux switch STBY pour la mise en service des pré-amplis.
Un seul pré-ampli sera actif à la fois sinon erreur, le tout visualisé par une LED ERROR.
Une led pour le + 5 V, une petite led rouge TX et deux led verte pour la commutation des préampli. La commande de linéaire/préampli est possible mais reste à développer, l'adaptation à d'autres TRX est possible également.
Le programme démarre par un test de la présence d'une émission afin de ne pas faire le test des relais et des LED's (routine test) si tel est le cas (routine init).
Pour le reste le nom des routines est suffisamment explicite.
Les outils de développement se trouve sur le site PICAXE en anglais, tout cela est offert.
**************************************************************
* Séquencer 144 432 preamplifier with TS2000. *
* SSB SP2000 7000 commande via cable. *
* ON4KGE ### VERSION 3.02 ### *
* Picaxe 20M2 08/12/2014 *
* Pin1 +5v , pin20 0v *
* Pin2 Rx ,pin19 Tx Rs232 software upgrade *
*Pin in use B 0,1,6, and C 0,1,4,5,6,7 *
*Preampli on = PTT hight RX mode ; PTT low = TX mode*
**************************************************************
#picaxe 20m2
'symbol definition
symbol LEDERR = B.1 ; rename output17 led ERROR’
symbol LEDTX = C.1 ; rename output7 led TX’
symbol PREAMPL144ON = B.0 ; rename output18 control 144’
symbol PREAMPL432ON = B.6 ; rename output12 control 432’
symbol DELAY = C.0 ; rename input10 delay (option)
'Variable definition
symbol CTRL144 = pinC.7 ; rename input3 control PTT 144’
symbol CTRL432 = pinC.6 ; rename input4 control PTT 432’
symbol PREAMPL144STBY = pinC.5 ; rename input5 standby 144’
symbol PREAMPL432STBY = pinC.4 ; rename input6 standby 432’
Init:
inputtype %1111000000000000 ' config Pin C.7 à C.4 Trigger de Schmitt mode
if CTRL144 = 0 or CTRL432 = 0 then : goto Standby : endif ' ptt is on and by pass test
Test:
pause 100
high LEDTX
pause 300
high PREAMPL144ON
pause 300
high PREAMPL432ON
pause 300
high LEDERR
pause 300
low LEDTX
pause 300
low PREAMPL144ON
pause 300
low PREAMPL432ON
pause 300
low LEDERR
pause 100
'Main
Standby:
low LEDERR
gosub Errorstby
if CTRL144 = 0 or CTRL432 = 0 then : high LEDTX : else : low LEDTX : endif
if PREAMPL144STBY = 1 then : gosub preamp144 : else : low PREAMPL144ON : endif
if PREAMPL432STBY = 1 then : gosub preamp432: else : low PREAMPL432ON : endif
goto Standby
preamp144:
if CTRL144 = 0 then : high LEDTX : endif
if CTRL144 = 1 and PREAMPL144STBY =1 then : high PREAMPL144ON : else : low PREAMPL144ON : endif
return
preamp432:
if CTRL432 = 0 then : high LEDTX : endif
if CTRL432 = 1 and PREAMPL432STBY =1 then : high PREAMPL432ON : else : low PREAMPL432ON : endif
return
preampoff:
low PREAMPL144ON
low PREAMPL432ON
'
return
Errorstby:
if PREAMPL432STBY = 1 and PREAMPL144STBY = 1 then : gosub lederror : endif
return
lederror:
high LEDERR
gosub preampoff
if PREAMPL144STBY = 1 and PREAMPL432STBY = 1 then : goto lederror : else : goto
Standby : endif
|
Dans l'éditeur vous pouvez simuler votre programme.
Il existe un forum en français et une traduction des commandes basic.
La liaison PC > PICAXE est simple soit en RS232 (3 fils) ou en USB convertit vers RS232.
Le matériel est disponible chez GOTRONIC en ligne.
Si vous avez des questions ou si vous désirez une présentation je suis à votre disposition.
Gérald Lecocq
ON4KGE
|