Sefel

I did this

Graphics 1024,768 

Repeat 

		Cls
		Print"Hi! what is your name?" 
		name$=Input() 
	Print"" 
	Print"Hi " +name$+ ", my name is blie." 
	Print"" 
		Print"How old are you?" 
		Age$=Input() 
	Print"" 
	Print"So you're " +Age+ " years old, right " +name+ "?" 
	Print"" 
		Delay 1500 
	Print"I am 45894869848708580009098787877565645454546756565757 but give or take " +Age+ " years" 
	Print"" 
		Print"Do you like me?" 
		Like$=Input() 
		Print"" 

If Lower$(Like)="yes" 
		Print"I like you too, " +name$+ "." 
Else 
		If Lower$(Like)="maybe" 
				Print"You're ok." 
				Print"" 
		Else 
				Print"Why don't you like me?" 
				Why$=Input() 
				Print"So you don't like me " +Why$+ "." 
		EndIf 
EndIf  


Print"Are you a Male or Female?" 
Sex$=Input() 
;Male 
	If Lower$(Sex)="male" 
			Print"Are you married?" 
			MMarried$=Input() 
			If Lower$(MMarried)="yes" 
					Print"What is your wife's name?" 
					Wname$=Input() 
					Print"Say hi to your wife " +Wname$+ "." 
		
			ElseIf 	Lower$(MMarried)="no" And age$=>"18" Then
					Print"There are plenty of fish in the sea." 
	
	
			Else Print"Well you're still a bit young"
			
			
	
	EndIf
	 
Else 
;Female 
		Print"Are you married?" 
		FMarried$=Input() 
		If Lower$(FMarried)="yes" 
				Print"What is your husband's name?" 
				Hname$=Input() 
				Print"Say hi to your husband " +Hname$+ "." 
		
		ElseIf  Lower$(FMaried)="no" And age$=>"18" Then	
				Print"I hope you find someone." 
		
				Else Print"You're still a bit young"
		
		Print"" 
	
	
	EndIf 

EndIf 

Cls

	Print"Play again"
		again$=Input("Yes or No: ") 
If Lower$(again$)="no" Then End

Forever 

but now it clears it and mives it down the screnn i want it to apear at the top any way to do this as it takes sometime to reset.
PLease help