clean the code

locations/booty_call.qsrc

@@ -1,17 +1,5 @@
 # booty_call
 
-if $ARGS[0] = 'draw':
-	! this routine should invoke a the booty call sms from random friend in $lover list
-	! but I cannnot randomize the time because the probability is 100 % now
-	! I suppose that the routine will be modified later to take in account the lovers preferences
-	if booty_call['A0'] ! daystart :
-		$lover_drawn = $fuckbuddy[rand(0,arrsize('$fuckbuddy')-1)]
-		gs 'booty_call_sms', 'start',$lover_drawn
-		gs 'booty_call_sms', 'Add SMS', $lover_drawn
-		booty_call['A0'] = daystart
-	end
-end
-
 if $ARGS[0] = 'text':
 	!! boy code?
 	!! IMAGE HERE

locations/stat.qsrc

@@ -1264,7 +1264,6 @@ end
 
 !!--------------------------Booty Call SMSs--------------------------------
 
-!! if (week=5 or week=6) and (hour >= 15 and hour < 19) and arrsize('$fuckbuddy') > 0 : gs 'booty_call','draw'
 if (hour >= 15 and hour <= 19) and arrsize('$fuckbuddy') > 0 : gs 'booty_call_start','draw'
 
 --- stat ---------------------------------