MCP42XXX über SPI an Atmega644 mit Bascom

Hallo, Im Rahmen eines Projektes wollte mit einem Atmega644 einen 
digitalen Potentiometer (MCP42010) über SPI ansteuern.
Den µC Programmiere ich über Bascom.
Nun habe ich ein kleines Programm geschrieben um nur den Poti testweise 
anzusteuern.
'______________
CLK an SCK
SDI an MOSI
CS an SS
SDO an MISO
Reset an Reset
SHDN an 5v
'______________

' SPI Test
'______________________________________________---
$regfile = "m644def.dat"                                    'Atmega 644
$crystal = 16000000                                         '16 MHz
$hwstack = 32
$swstack = 10
$framesize = 40

Dim Potico As Byte
Dim Pot As Byte
Potico = &B00010011 'Commandbytes
Pot = &B11111111    'Potiwert

Config Portb = Output

Cs Alias Portb.4

Config Spi = Hard , Data Order = Msb , Master = Yes , Polarity = High , 
Phase = 0 , Clockrate = 4 , Noss = 0

Spiinit


Do
Cs = 0
Spiout Potico , 1
Spiout Pot , 1
Cs = 1
Wait 2
Loop

End

nun habe ich das Problem das iwie der Poti nichts macht, der Schleifer 
bleibt immer in Mittelposition.