initrfm:  'für die RFM12B
            spiword = $80d7                     'EL, EF,  12pF
            GOSUB rfcmd
            spiword = $8208                    'Modul in Bereitschaft
            GOSUB rfcmd
            spiword = $a640                     '433MHz
            GOSUB rfcmd
            spiword = $c647                     '4K8 Kbps
            GOSUB rfcmd
            spiword = $94a0                     '134KHz, 0dBM,
            GOSUB rfcmd
            spiword = $c2ac                     'Data Filter
            GOSUB rfcmd
            spiword = $ca81                     'Fifo, Sync
            GOSUB rfcmd 
            spiword = $ced4                     '134KHz, 0dBM,
            GOSUB rfcmd
            spiword = $c4e7                     'PWR  e7
            GOSUB rfcmd                        
            spiword = $9850                     '30KHz, max out
            GOSUB rfcmd
            spiword = $cc17                    'PLL Command    für RFM12B
            GOSUB rfcmd  
            spiword = $e000                     'not use
            GOSUB rfcmd
            spiword = $c800                     'not use
            GOSUB rfcmd
            spiword = $c060                     'kein WDT, k. Batterieüberw.
            GOSUB rfcmd
           
            RETURN