' {$STAMP BS2}
' {$PBASIC 2.5}
'
' Z-Comm PSN0930A PLL Frequency Synthesizer Loader Code
' GBPPR Non-Linear Junction Detector / BASIC Stamp 2
'
' !!!!! EXAMPLE CODE ONLY !!!!
'
' Z-Comm PSN0930A Pin      BASIC Stamp Pin
' ----------------------------------------
' DATA (5)                 P1
' CLK  (4)                 P0
' LE   (6)                 P2
'
' 10 MHz reference frequency / 100 kHz step size
' 902 MHz TX frequency
'

IVAL1   VAR     Word
IVAL2   VAR     Byte

FVAL1   VAR     Word
FVAL2   VAR     Byte

RVAL1   VAR     Word
RVAL2   VAR     Byte

NVAL1   VAR     Word
NVAL2   VAR     Byte

' Settings
IVAL1 = $0004
IVAL2 = $13

FVAL1 = $0004
FVAL2 = $12

RVAL1 = $000C      ' R = 100
RVAL2 = $10

NVAL1 = $8467      ' N = 9020 / B = 281 A = 28
NVAL2 = $11

LOW 0
LOW 1
LOW 2

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

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


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

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

END