Corrupte image

I hope you will find what you need. As the sound of it you have did update DirectX also on the wrong way. anyway hier is the code.

Function Sinewaveon()
	If Steps#<3
		;If InitOn = False
			Cls
			; Setup screen
			DrawImage Title,0,0
			; Grab the line of the image
			For x = 0 To 479 Step 2
				Wave_Screen(x)=CreateImage(640,2)
				GrabImage Wave_Screen(x),2,x-1
			Next	
			;SetBuffer BackBuffer()
			InitOn=True
		;EndIf
		Steps# = 8.0
		Set_Point#=0
		Step_Count=6
		Off_Time#=25
		Timing=MilliSecs()
	EndIf
	Cls
	;Draw in sinus mode draw even lines odd lines is desktop image
	For x = 0 To 479 Step 2
		DrawImage Wave_Screen(x),Sin(Set_Point#+x*Steps#)*Off_time,x-1
	Next
	Set_Point#=Set_Point#+Step_Count
	;Calculate new sinus wave
	If MilliSecs()=>Timing+25
		Steps# = Steps# -0.05
		Off_Time=Off_time-0.25
		Timing=MilliSecs()
	EndIf
	If Steps#<3
		Case_Active=2;Bring the sparks on line
	EndIf
	If GetKey()<>0 Or GetJoy()<>0
		Case_Active =3
	EndIf
End Function

you can update your DirectX again if you like. After installing this your problems will be solved.

directx_dec2005_redist.exe