GOTO

1710 FREOS=$TRS(HLDFREQ)

1720 FREQS=RlGHTS{FREQS.LEN{FREOS) IJ+'.'-MODES 1730 FR EQS=L E FTS^ F R EOS r3 -J+P'GHTS{FR EOS. LEN( FREOS 1740 GOSUfi 40000: IF STAT^O THEN 310 1750 GOSUB 42000; GOTO 460 40000 'Convert frequency lo programming word. 40010' Entry; FREOS (1-™)

f u froouency {146 43 or 146 235) en = mode (+ for +600n - for -600. S (default} for simple*} examples; p146.43,S" "142.24,+" "146,76,-' 14&23SL+*

40020' 40030+ 40040 40060J 400551 400601 40070 ' 400601 40090 * 40100' 40110+ 40120' 40130' 40140* 40150' 40160' 40170 4 40180' 40190' 40200 * 40210" 40220'

Exi1:WORDS (2 bytes) - corresponds to latch inputs byio l contains programming lor ihe following:

0 0

Post a comment