[fixed] removed pcs_willpwr decrease in stat

locations/stat.qsrc

@@ -522,8 +522,11 @@ if minut >= 60:
 	
 	if narkoman = 1 and narkday ! daystart:
 		pcs_health -= 5
-		pcs_willpwr -= 5
-		pcs_mood -= 10
+		if pcs_mood > 40: 
+			pcs_mood -= 40
+		else
+			pcs_mood = 5
+		end
 	end
 
 	if $pantyworntype = 'none' and PCloPants > 0 and PCloPanties = 0 and $clothingworntype ! 'nude':mosol += 1