Melanie,

UserPos should be $c8, not $cb


Code:
If UserField=2 then 
		UserMin=1:UserPos=$CB '<--------------------- 
		Read DOW(1)+20,UserMax
		If UserMax=28 then
			CounterA=DOW(0)//4
			If CounterA=0 then UserMax=29
			endif
		endif
regards

Yup - you're right - Melanie