' {$STAMP BS2}
' {$PBASIC 2.5}
'
' Mini-Circuits DSN-2300A-1119 PLL Frequency Synthesizer Loader Code
' GBPPR Non-Linear Junction Detector / BASIC Stamp 2
'
' !!!!! EXAMPLE CODE ONLY !!!!
'
' DSN-2300A-1119 Pin      BASIC Stamp Pin
' ----------------------------------------
' DATA (9)                 P0
' CLK  (11)                P1
' LE   (12)                P2
'
' 10 MHz reference frequency / 250 kHz step size
' 2240 MHz LO frequency
'
' {$STAMP BS2}
' {$PBASIC 2.5}

IVAL1 VAR Word
IVAL2 VAR Byte

FVAL1 VAR Word
FVAL2 VAR Byte

RVAL1 VAR Word
RVAL2 VAR Byte

NVAL1 VAR Word
NVAL2 VAR Byte

IVAL1 = $9F80
IVAL2 = $13

FVAL1 = $9F80	' Prescaler = /32
FVAL2 = $12

RVAL1 = $1000	' R = 40
RVAL2 = $A0

NVAL1 = $2118	' N = 8906 / B = 280 A = 0
NVAL2 =	$01

LOW 0
LOW 1
LOW 2

' Load Initial
SHIFTOUT 0,1,1,[IVAL1\16]
SHIFTOUT 0,1,1,[IVAL2]
PULSOUT 2, 1            ' Bring LE high, then low
PAUSE 5

' Load Function
SHIFTOUT 0,1,1,[FVAL1\16]
SHIFTOUT 0,1,1,[FVAL2]
PULSOUT 2, 1           ' Bring LE high, then low
PAUSE 5



' Load /R
SHIFTOUT 0,1,1,[RVAL1\16]
SHIFTOUT 0,1,1,[RVAL2]
PULSOUT 2, 1          ' Bring LE high, then low
PAUSE 5

' Load /N
SHIFTOUT 0,1,1,[NVAL1\16]
SHIFTOUT 0,1,1,[NVAL2]
PULSOUT 2, 1          ' Bring LE high, then low

END