Parcourir la source

Set missing images to 'Image_needed.png' placeholder
Tidied added comments
Updated Missing files & Scripts
Created dupe image report

Wonder Dog il y a 8 ans
Parent
commit
780d79bee4

+ 93 - 64
Get Image Paths.ahk

@@ -3,11 +3,11 @@
  *
  *		Requires images subfolder to exist in current directory
  *		
- *		OutAllFile 	- List of All unprocessed file names from glife.txt
+ *		OutAllFile 	- List of All unprocessed file names from glife.txt that are not marked missing in the code
  *		OutUsedFile - List of Found file names from glife.txt and Auto List
- *		OutMissFile	- List of Missing file names from glife.txt that do not exist
- *		OutAutoFile	- List of file paths from glife.txt that were added to Output file
- *		OutManFile	- List of file paths from glife.txt that will have to be added manualy Output file
+ *		OutMissFile	- List of Missing file names from glife.txt that are marked missing in the code.
+ *		OutAutoFile	- List of file paths from glife.txt that were added to Output file using code in this script
+ *		OutManFile	- List of file paths from glife.txt that will have to be added manualy checked either in glife code or added to OutUsedFile
  *          
  *
  *      WD: Jul 2015
@@ -31,7 +31,7 @@ OutAutoFile		= Image Paths - Auto List.txt
 OutManFile		= Image Paths - Manual List.txt
 SearchRegEx		= i)<img\s+src\s*=\s*"(.*?)"
 CommentRegEx 	= ^\s*!
-
+MarkMissRegEx	= i)!\s*WD:\s+IMAGE NEEDED\s*~\s*.*?<img\s+src\s*=\s*"(.*?)"
 
 FileEncoding, UTF-16
 
@@ -76,215 +76,233 @@ ifExist %OutManFile%				;; Backup File
 ; -- load data from file --
 FileRead, Source, %SourceFile%
 
-; Optimize by vars has plenty of space to work with.
+; -- vars need plenty of space to work with --
 VarSetCapacity(OutAll, 4194304)				;; 4mb
 VarSetCapacity(OutUsed, 4194304)			;; 4mb
 VarSetCapacity(OutMiss, 4194304)			;; 4mb
-VarSetCapacity(OutMiss, 1048576)			;; 1mb
-VarSetCapacity(OutMiss, 1048576)			;; 1mb
+VarSetCapacity(OutAuto, 1048576)			;; 1mb
+VarSetCapacity(OutMan, 1048576)				;; 1mb
 
 
 ; -- Parse data one line at a time --
 Loop, Parse, Source, `n, `r  			; Specifying `n prior to `r allows both Windows and Unix files to be parsed.
 {
 	
-	; -- Skip if Comment --
-	FoundCmntPos := RegExMatch(A_LoopField, CommentRegEx)				;; Ignore Line Comment
+	; -- Check is Comment line --
+	FoundCmntPos := RegExMatch(A_LoopField, CommentRegEx)
 	if (ErrorLevel)
 	{
 		MsgBox, 48, Get Image Paths, RegExMatch runtime error: %ErrorLevel%`n`nFound searching string: %A_LoopField%`n`nusing search: %CommentRegEx%
 		break
 	}
-	if (FoundCmntPos)													;; Skip if comment found
+	if (FoundCmntPos)															;; comment found
 	{
+		FoundPos := RegExMatch(A_LoopField, MarkMissRegEx, Match)				;; Check for known missing file
+		if (ErrorLevel)
+		{
+			MsgBox, 48, Get Image Paths, RegExMatch runtime error: %ErrorLevel%`n`nFound searching string: %A_LoopField%`n`nusing search: %MarkMissRegEx%
+			break
+		}	
+		if (FoundPos)															;; Found File
+		{	
+			Match1 := StrReplace(Match1, "/", "\")								;; Use correct Win path seperator	
+			IfExist %Match1%
+			{
+				OutMiss	.= Spacer(Match1) . "- Missing file exists`n"			;; Missing File found
+			}
+			else
+			{
+				OutMiss	.= Match1 . "`n"										;; Missing file Not found
+			}		
+		}
 		Continue
 	}
 
 	
 	; -- Find Image File Path --
-	FoundPos := RegExMatch(A_LoopField, SearchRegEx, Match)					;; Search for image path
+	FoundPos := RegExMatch(A_LoopField, SearchRegEx, Match)						;; Search for image path
 	if (ErrorLevel)
 	{
 		MsgBox, 48, Get Image Paths, RegExMatch runtime error: %ErrorLevel%`n`nFound searching string: %A_LoopField%`n`nusing search: %SearchRegEx%
 		break
 	}
 	
-	if (FoundPos)															;; Found File
+	if (FoundPos)																;; Found File
 	{	
-		Match1 := StrReplace(Match1, "/", "\")								;; Use correct Win path seperator
+		Match1 := StrReplace(Match1, "/", "\")									;; Use correct Win path seperator
 		OutAll .= Match1 . "`n"
 		; -- Image Path Contains Code --
-		if inStr(Match1, "<<")												;; Manual file paths to be checked
+		if inStr(Match1, "<<")													;; String contains expression
 		{
 			
-			if inStr(Match1, "FUNC('$face_image'")							;; Hairstyle images
+			if inStr(Match1, "FUNC('$face_image'")								;; Hairstyle images Function
 			{
 				if GetImageFiles("images\body\hairstyles", "hcol*.jpg", OutUsed)
 				{
-					OutAuto	.= Match1 . "`t`t`t- Found 'images\body\hairstyles\*\hcol*.jpg'`n"
+					OutAuto	.= Spacer(Match1) . "- Found 'images\body\hairstyles\*\hcol*.jpg'`n"
 				}
 				else
 				{
-					OutMan	.= Match1 . "`t`t`t- no files found in 'images\body\hairstyles\*\hcol*.jpg'`n"
+					OutMan	.= Spacer(Match1) . "- no files found in 'images\body\hairstyles\*\hcol*.jpg'`n"
 				}
 				
 			}
-			else if inStr(Match1, "FUNC('$clothing_image'")					;; Clothing images
+			else if inStr(Match1, "FUNC('$clothing_image'")						;; Clothing images Function
 			{
 				if GetImageFiles("images\clothes", "vatnik.jpg", OutUsed)
 				{
-					OutAuto	.= Match1 . "`t`t`t- Found 'images\clothes\vatnik.jpg'`n"
+					OutAuto	.= Spacer(Match1) . "- Found 'images\clothes\vatnik.jpg'`n"
 				}
 				else
 				{
-					OutMan	.= Match1 . "`t`t`t- no files found in 'images\clothes\vatnik.jpg'`n"
+					OutMan	.= Spacer(Match1) . "- no files found in 'images\clothes\vatnik.jpg'`n"
 				}
 				; GetImageFiles("images\clothes\newclo", "131.jpg", OutUsed)	;; Dupe See below	
 				
 				if GetImageFiles("images\clothes", "jeans*.jpg", OutUsed)
 				{
-					OutAuto	.= Match1 . "`t`t`t- Found 'images\clothes\jeans*.jpg'`n"
+					OutAuto	.= Spacer(Match1) . "- Found 'images\clothes\jeans*.jpg'`n"
 				}
 				else
 				{
-					OutMan	.= Match1 . "`t`t`t- no files found in 'images\clothes\jeans*.jpg'`n"
+					OutMan	.= Spacer(Match1) . "- no files found in 'images\clothes\jeans*.jpg'`n"
 				}
 
 				if GetImageFiles("images\clothes", "yoga*.jpg", OutUsed)
 				{
-					OutAuto	.= Match1 . "`t`t`t- Found 'images\clothes\yoga*.jpg'`n"
+					OutAuto	.= Spacer(Match1) . "- Found 'images\clothes\yoga*.jpg'`n"
 				}
 				else
 				{
-					OutMan	.= Match1 . "`t`t`t- no files found in 'images\clothes\yoga*.jpg'`n"
+					OutMan	.= Spacer(Match1) . "- no files found in 'images\clothes\yoga*.jpg'`n"
 				}
 
 				if GetImageFiles("images\clothes", "sarafan*.jpg", OutUsed)
 				{
-					OutAuto	.= Match1 . "`t`t`t- Found 'images\clothes\sarafan*.jpg'`n"
+					OutAuto	.= Spacer(Match1) . "- Found 'images\clothes\sarafan*.jpg'`n"
 				}
 				else
 				{
-					OutMan	.= Match1 . "`t`t`t- no files found in 'images\clothes\sarafan*.jpg'`n"
+					OutMan	.= Spacer(Match1) . "- no files found in 'images\clothes\sarafan*.jpg'`n"
 				}
 
 
 				if GetImageFiles("images\clothes", "short*.jpg", OutUsed)
 				{
-					OutAuto	.= Match1 . "`t`t`t- Found 'images\clothes\short*.jpg'`n"
+					OutAuto	.= Spacer(Match1) . "- Found 'images\clothes\short*.jpg'`n"
 				}
 				else
 				{
-					OutMan	.= Match1 . "`t`t`t- no files found in 'images\clothes\short*.jpg'`n"
+					OutMan	.= Spacer(Match1) . "- no files found in 'images\clothes\short*.jpg'`n"
 				}
 
 				if GetImageFiles("images\clothes", "skirt*.jpg", OutUsed)
 				{
-					OutAuto	.= Match1 . "`t`t`t- Found 'images\clothes\skirt*.jpg'`n"
+					OutAuto	.= Spacer(Match1) . "- Found 'images\clothes\skirt*.jpg'`n"
 				}
 				else
 				{
-					OutMan	.= Match1 . "`t`t`t- no files found in 'images\clothes\skirt*.jpg'`n"
+					OutMan	.= Spacer(Match1) . "- no files found in 'images\clothes\skirt*.jpg'`n"
 				}
 
 				if GetImageFiles("images\clothes", "dress*.jpg", OutUsed)
 				{
-					OutAuto	.= Match1 . "`t`t`t- Found 'images\clothes\dress*.jpg'`n"
+					OutAuto	.= Spacer(Match1) . "- Found 'images\clothes\dress*.jpg'`n"
 				}
 				else
 				{
-					OutMan	.= Match1 . "`t`t`t- no files found in 'images\clothes\dress*.jpg'`n"
+					OutMan	.= Spacer(Match1) . "- no files found in 'images\clothes\dress*.jpg'`n"
 				}
 
 				if GetImageFiles("images\clothes", "profi*.jpg", OutUsed)
 				{
-					OutAuto	.= Match1 . "`t`t`t- Found 'images\clothes\profi*.jpg'`n"
+					OutAuto	.= Spacer(Match1) . "- Found 'images\clothes\profi*.jpg'`n"
 				}
 				else
 				{
-					OutMan	.= Match1 . "`t`t`t- no files found in 'images\clothes\profi*.jpg'`n"
+					OutMan	.= Spacer(Match1) . "- no files found in 'images\clothes\profi*.jpg'`n"
 				}
 
 				if GetImageFiles("images\clothes", "pants*.jpg", OutUsed)
 				{
-					OutAuto	.= Match1 . "`t`t`t- Found 'images\clothes\pants*.jpg'`n"
+					OutAuto	.= Spacer(Match1) . "- Found 'images\clothes\pants*.jpg'`n"
 				}
 				else
 				{
-					OutMan	.= Match1 . "`t`t`t- no files found in 'images\clothes\pants*.jpg'`n"
+					OutMan	.= Spacer(Match1) . "- no files found in 'images\clothes\pants*.jpg'`n"
 				}
 
 				if GetImageFiles("images\clothes", "latex*.jpg", OutUsed)
 				{
-					OutAuto	.= Match1 . "`t`t`t- Found 'images\clothes\latex*.jpg'`n"
+					OutAuto	.= Spacer(Match1) . "- Found 'images\clothes\latex*.jpg'`n"
 				}
 				else
 				{
-					OutMan	.= Match1 . "`t`t`t- no files found in 'images\clothes\latex*.jpg'`n"
+					OutMan	.= Spacer(Match1) . "- no files found in 'images\clothes\latex*.jpg'`n"
 				}
 
 				if GetImageFiles("images\clothes", "hooker*.jpg", OutUsed)
 				{
-					OutAuto	.= Match1 . "`t`t`t- Found 'images\clothes\hooker*.jpg'`n"
+					OutAuto	.= Spacer(Match1) . "- Found 'images\clothes\hooker*.jpg'`n"
 				}
 				else
 				{
-					OutMan	.= Match1 . "`t`t`t- no files found in 'images\clothes\hooker*.jpg'`n"
+					OutMan	.= Spacer(Match1) . "- no files found in 'images\clothes\hooker*.jpg'`n"
 				}
 
 				if GetImageFiles("images\clothes", "k*.jpg", OutUsed)
 				{
-					OutAuto	.= Match1 . "`t`t`t- Found 'images\clothes\k*.jpg'`n"
+					OutAuto	.= Spacer(Match1) . "- Found 'images\clothes\k*.jpg'`n"
 				}
 				else
 				{
-					OutMan	.= Match1 . "`t`t`t- no files found in 'images\clothes\k*.jpg'`n"
+					OutMan	.= Spacer(Match1) . "- no files found in 'images\clothes\k*.jpg'`n"
 				}
 
 				if GetImageFiles("images\clothes\newclo", "*.jpg", OutUsed)
 				{
-					OutAuto	.= Match1 . "`t`t`t- Found 'images\clothes\newclo\*.jpg'`n"
+					OutAuto	.= Spacer(Match1) . "- Found 'images\clothes\newclo\*.jpg'`n"
 				}
 				else
 				{
-					OutMan	.= Match1 . "`t`t`t- no files found in 'images\clothes\newclo\*.jpg'`n"
+					OutMan	.= Spacer(Match1) . "- no files found in 'images\clothes\newclo\*.jpg'`n"
 				}
 
 				if GetImageFiles("images\img\dress", "ero*.jpg", OutUsed)
 				{
-					OutAuto	.= Match1 . "`t`t`t- Found 'images\img\dress\ero*.jpg'`n"
+					OutAuto	.= Spacer(Match1) . "- Found 'images\img\dress\ero*.jpg'`n"
 				}
 				else
 				{
-					OutMan	.= Match1 . "`t`t`t- no files found in 'images\img\dress\ero*.jpg'`n"
+					OutMan	.= Spacer(Match1) . "- no files found in 'images\img\dress\ero*.jpg'`n"
 				}
 			}
-			
-			else if inStr(Match1, "FUNC")										;; Unknown Function - Manual
-			{
-				OutMan	.= Match1 . "`n"
-			}
-			
-			else if inStr(Match1, "<<$loc>>")									;; Use Location String - Manual
-			{
-				OutMan	.= Match1 . "`n"
-			}
-			
+
 			else if inStr(Match1, "images\qwest\card")								;; Playingcard Images
 			{
 				if GetImageFiles("images\qwest\card", "*.jpg", Output)
 				{
-					OutAuto	.= Match1 . "`t`t`t- Found 'images\qwest\card\*\*.jpg'`n"
+					OutAuto	.= Spacer(Match1) . "- Found 'images\qwest\card\*\*.jpg'`n"
 				}
 				else
 				{
-					OutMan	.= Match1 . "`t`t`t- no files found in 'images\qwest\card\*\*.jpg'`n"
+					OutMan	.= Spacer(Match1) . "- No files found in 'images\qwest\card\*\*.jpg'`n"
 				}				
 			}
 			
-			else if not GetImagefromPath(Match1, OutUsed)						;; Try to find images
+			else if inStr(Match1, "FUNC")											;; Unknown Function - Manual
+			{
+				OutMan	.= Spacer(Match1) . "- Unknown Function`n"
+			}
+			
+			else if inStr(Match1, "$")												;; Uses String variable - Manual
+			{
+				OutMan	.= Spacer(Match1) . "- Unknown Function`n"
+			}
+			
+			else if not GetImagefromPath(Match1, OutUsed)							;; Try to find images
 			{
-				OutMan	.= Match1 . "`n"
+				OutMan	.= Spacer(Match1) . "- Files not found`n"
 			}
 		}
 		
@@ -293,11 +311,11 @@ Loop, Parse, Source, `n, `r  			; Specifying `n prior to `r allows both Windows
 		{
 			IfExist %Match1%
 			{
-				OutUsed	.= Match1 . "`n"										;; Normal file found
+				OutUsed	.= Match1 . "`n"											;; Normal file found
 			}
 			else
 			{
-				OutMiss	.= Match1 . "`n"										;; Normal file Not found
+				OutMan	.= Spacer(Match1) . "- File not found`n"					;; Normal file Not found
 			}
 		}
 	}	
@@ -330,6 +348,17 @@ FileAppend, %OutMan%, %OutManFile%
 Exit
 
 ; ########## Functions ##########
+Spacer(TxtStr = "")
+{
+	Static SpaceFill := "                                                  "
+	
+	;~ ps := strlen(TxtStr) + 1												;; allow empty string = 1 
+	;~ ss := TxtStr . SubStr(SpaceFill, ps) . "`t"
+	
+	return TxtStr . SubStr(SpaceFill, strlen(TxtStr)+1) . "`t"
+	
+}
+
 GetImageFiles(FilePath, FileName, ByRef Output)
 {	;; Get image paths in filepath using filepattern FileName
 	

BIN
Image List - Missing.txt


BIN
Image List - Used.txt


+ 133 - 0
Images List - Dupes.txt

@@ -0,0 +1,133 @@
+DupeMerge 1.070
+                       
+'images\qwest\alter\artom\2.jpg' 67444
+'images\qwest\alter\npc2.jpg' 67444
+'images\qwest\alter\npc\2.jpg' 67444
+
+'images\etogame\frotsp.jpg' 13775
+'images\pic\frotsp.jpg' 13775
+
+'images\etogame\facesp.jpg' 15258
+'images\pic\facesp.jpg' 15258
+
+'images\klof\klof 11.jpg' 15612
+'images\klof\klof 7.jpg' 15612
+
+'images\etogame\park1.jpg' 22796
+'images\pic\park1.jpg' 22796
+
+'images\etogame\analplug.jpg' 23298
+'images\pic\analplug.jpg' 23298
+
+'images\klof\klof 10.jpg' 23755
+'images\klof\klof31.jpg' 23755
+
+'images\qwest\alter\npc11.jpg' 23757
+'images\qwest\alter\npc\11.jpg' 23757
+
+'images\qwest\alter\npc9.jpg' 27696
+'images\qwest\alter\npc\9.jpg' 27696
+
+'images\qwest\alter\npc5.jpg' 27878
+'images\qwest\alter\npc\5.jpg' 27878
+
+'images\pics\vagcow.jpg' 28104
+'images\pics\vagcow1.jpg' 28104
+
+'images\etogame\parkbeg.jpg' 28184
+'images\pic\parkbeg.jpg' 28184
+
+'images\picBJ\parkBJ.jpg' 30233
+'images\pics2\ara.jpg' 30233
+
+'images\pics\vagdog.jpg' 30540
+'images\pics\vagdog1.jpg' 30540
+
+'images\picKav\cum9.jpg' 33896
+'images\qwest\alter\Ev\kotovBJcum5.jpg' 33896
+
+'images\etogame\dance.jpg' 34659
+'images\qwest\sosed\dance.jpg' 34659
+
+'images\qwest\alter\Ev\kotovHJ2.jpg' 36729
+'images\qwest\sosed\bossBJcum.jpg' 36729
+
+'images\etogame\dvor.jpg' 36971
+'images\etogame\street.jpg' 36971
+
+'images\qwest\alter\progulka.jpg' 37000
+'images\qwest\alter\sister\progulka.jpg' 37000
+
+'images\etogame\dur.jpg' 39891
+'images\pic\dur.jpg' 39891
+
+'images\picBJ\fa6.jpg' 41165
+'images\qwest\alexey\bjcum6.jpg' 41165
+
+'images\qwest\alter\npc7.jpg' 42016
+'images\qwest\alter\npc\7.jpg' 42016
+
+'images\etogame\electri.jpg' 47455
+'images\pic\electri.jpg' 47455
+
+'images\qwest\alter\npc10.jpg' 48051
+'images\qwest\alter\npc\10.jpg' 48051
+
+'images\img\sexdvanadva\anal12.jpg' 49301
+'images\img\sexdvanadva\uanal12.jpg' 49301
+
+'images\etogame\stir.jpg' 49623
+'images\pic\stir.jpg' 49623
+
+'images\pics\vagmis.jpg' 53136
+'images\pics\vagmis1.jpg' 53136
+
+'images\img\sexdvanadva\uvag12.jpg' 56393
+'images\img\sexdvanadva\vag12.jpg' 56393
+
+'images\qwest\alter\placer\miss.jpg' 58863
+'images\qwest\gadukino\mitka.jpg' 58863
+
+'images\qwest\alter\npc1.jpg' 59883
+'images\qwest\alter\npc\1.jpg' 59883
+
+'images\qwest\alter\npc25.jpg' 61073
+'images\qwest\alter\npc\25.jpg' 61073
+
+'images\etogame\PublicToilet.jpg' 63023
+'images\pic\PublicToilet.jpg' 63023
+
+'images\etogame\stripdance.jpg' 63669
+'images\pic\stripdance.jpg' 63669
+
+'images\etogame\kassa.jpg' 64494
+'images\pic\kassa.jpg' 64494
+
+'images\qwest\alter\npc4.jpg' 65999
+'images\qwest\alter\npc\4.jpg' 65999
+
+'images\etogame\mop.jpg' 10321
+'images\pic\mop.jpg' 10321
+
+'images\img\masha\r62.jpg' 72485
+'images\img\masha\r63.jpg' 72485
+
+'images\qwest\alter\artur\facefuck0.jpg' 72629
+'images\qwest\alter\evdima\deep.jpg' 72629
+
+'images\etogame\bukli_stol.jpg' 73807
+'images\etogame\ptu_stolovaya.jpg' 73807
+
+'images\qwest\alter\sister.jpg' 75962
+'images\qwest\alter\sister\sister.jpg' 75962
+
+'images\qwest\alter\npc8.jpg' 78212
+'images\qwest\alter\npc\8.jpg' 78212
+
+'images\qwest\alter\npc6.jpg' 149677
+'images\qwest\alter\npc\6.jpg' 149677
+
+'images\qwest\alter\npc3.jpg' 190860
+'images\qwest\alter\npc\3.jpg' 190860
+
+

+ 25 - 4
Move Image Files.ahk

@@ -52,8 +52,12 @@ Images := StrReplace(Images, "/", "\")								;; Use correct Win path seperator
 ; -- Parse data one line at a time --
 Loop, Parse, Images, `n, `r  			; Specifying `n prior to `r allows both Windows and Unix files to be parsed.
 {
+	if trim(A_LoopField) = ""										;; Skip blank line
+		continue
+	
 	IfExist, %A_LoopField%
 	{
+		; -- Create Dir if id dosn't exist --
 		SplitPath, A_LoopField, FileName, FileDir
 		IfNotExist  %UsedImageFolder%\%FileDir%
 		{
@@ -64,24 +68,41 @@ Loop, Parse, Images, `n, `r  			; Specifying `n prior to `r allows both Windows
 			}
 		}
 		
-		
+		; -- move file --
 		FileMove, %A_LoopField%, %UsedImageFolder%\%FileDir%
 		if (ErrorLevel)
 		{
 			MsgBox, 48, Move Image File, FileMove Error:`n`nFailed to move '%A_LoopField%' to '%UsedImageFolder%\%FileDir%'`n`nErrorLevel: '%ErrorLevel%'`nLastError: '%A_LastError%'	
 		}
 	}
-	else
+	else	; -- File dosn't exist --
 	{
 		MsgBox, 64, Move Image Files, Unable to locate file : '%A_LoopField%', 5
 	}
 }
 
+; -- Rename Images folder to unused Images folder --
 IfExist %SourceFolder%
 {
 	FileMoveDir, %SourceFolder%, %UnUsedImageFolder%\%SourceFolder%
+	if (ErrorLevel)
+	{
+		MsgBox, 48, Move Image File, FileMoveDir Error:`n`nFailed to move '%SourceFolder%' to '%UnUsedImageFolder%\%SourceFolder%'`n`nErrorLevel: '%ErrorLevel%'`nLastError: '%A_LastError%'	
+	}
+	
+	; -- Rename Used Images folder to Images folder --
+	else IfNotExist %SourceFolder%
+	{
+		FileMoveDir, %UsedImageFolder%\%SourceFolder%, %SourceFolder%
 		if (ErrorLevel)
 		{
-			MsgBox, 48, Move Image File, FileMoveDir Error:`n`nFailed to move '%SourceFolder%' to '%UnUsedImageFolder%\%SourceFolder%'`n`nErrorLevel: '%ErrorLevel%'`nLastError: '%A_LastError%'	
+			MsgBox, 48, Move Image File, FileMoveDir Error:`n`nFailed to move '%UsedImageFolder%\%SourceFolder%' to '%SourceFolder%'`n`nErrorLevel: '%ErrorLevel%'`nLastError: '%A_LastError%'	
+		}
+		else
+		{
+			FileRemoveDir, %UsedImageFolder%, 0					;; Delete Empty Folder
 		}
-}
+	}
+}
+
+

BIN
QSP_Analyser.exe


BIN
glife.txt


+ 2 - 2
locations/Alphabet

@@ -4,8 +4,8 @@ act 'Go to the corridor':gt 'floor'
 clr
 gs 'stat'
 '<center><b>Dorm room</b></center>'
-! Fix missing Image ".../etogame/obskom.jpg" use place holder
-'<center><img src="images/etogame/dorm.jpg"></center>'
+$ImageNeededPlacholder
+! WD: IMAGE NEEDED ~ '<center><img src="images/etogame/obskom.jpg"></center>'
 'Narrow room with a single window, wooden floor, three <a href="exec:gt ''Beds'', ''choice''">beds</a>, a small <a href="exec:gt ''table''">table</a> and a few chairs. At the entrance stands an old <a href="exec:gt ''cupboard''">wardrobe</a> attached to which is an old <a href="exec:gt ''zerkaloO''">mirror</a>.'
 
 

+ 1 - 1
locations/BDSM

@@ -114,7 +114,7 @@ act 'Begin participating in the shooting':
 									money = money + vnesh * 500
 									actr = 0
 									gs 'stat'
-									! Fix missing Image ".../studia/dvd-disс.jpg" Cyrillic?
+
 									'<center><img src="images/studia/dvd-disс.jpg"></center>'
 									'You spent 9 hours on filming'
 									'and received <<vnesh * 500>> rubles in cash'

+ 0 - 1
locations/Goteladmin

@@ -4,7 +4,6 @@ $loc = $CURLOC
 clr
 gs 'stat'
 '<center><h4>Receptionist</h4></center>'
-! Fix missing Image "...pic/Goteladmin.jpg"
 '<center><img src="images/pic/Goteladmin.jpg"></center>'
 'At the table sat a man of thirty with a small, in an expensive suit and tie.'
 

+ 1 - 1
locations/KatjaHomeTalk

@@ -27,7 +27,7 @@ if sweat > 0:
 				if frost > 0:frost = 0
 
 				gs 'stat'
-				! Fix missing Image ".../dush.jpg"
+				! WD: Correct Image path ~ "images/dush.jpg"
 				'<center><img src="images/pics/dush.jpg"></center>'
 				'You kicked out of the shower and Katja closed the door. You got into the shower and began to lather your body washcloth. After washed off the soap and washed her hair with shampoo. Rinse off the shampoo you become completely clean.'
 

+ 1 - 1
locations/Mall

@@ -4,7 +4,7 @@ horny += 1
 clr
 gs 'stat'
 '<center><b>Market</b></center>'
-! Fix missing Image ".../etogame/rinok2.jpg"
+! WD: Correct Image path ~ "images/etogame/rinok2.jpg"
 '<center><img src="images/etogame/rinok.jpg"></center>'
 'Bustling market, you can buy in the market place to buy clothes or for 30,000 rubles and receive income from the outlet, but for the purchase and delivery of course need to have a car. You can trade yourself or hire a saleswoman.'
 

+ 1 - 1
locations/Prostitute

@@ -371,7 +371,7 @@ if $ARGS[0] = 'work2':
 							'You obediently lay naked in the back seat until your dick hole logged.'
 							gs 'orgazm', 'start'
 						else
-							! Fix missing Image ".../img/img/prost/sexcar2.jpg"
+							! WD: Correct Image path ~ "images/img/img/prost/sexcar2.jpg"
 							'<center><img src="images/img/prost/sexcar2.jpg"></center>'
 							'Standing on all fours, you felt like you were planting confident movement on the penis.'
 							gs 'orgazm', 'start'

+ 4 - 4
locations/RimmaSexQW

@@ -40,8 +40,8 @@ $rimmasexdi = {
 			cls
 			minut += 30
 			gs 'stat'
-			! Fix missing Image ".../zoo/rimma23.jpg" use place holder
-			'<center><img src="images/zoo/rimma.jpg"></center>'
+			$ImageNeededPlacholder
+			! WD: IMAGE NEEDED ~ '<center><img src="images/zoo/rimma23.jpg"></center>'
 			''
 
 			act 'Hold it':gt 'korr'
@@ -57,8 +57,8 @@ $rimmasexdi = {
 			cls
 			minut += 30
 			gs 'stat'
-			! Fix missing Image ".../zoo/rimma22.jpg" use place holder
-			'<center><img src="images/zoo/rimma.jpg"></center>'
+			$ImageNeededPlacholder
+			! WD: IMAGE NEEDED ~ '<center><img src="images/zoo/rimma22.jpg"></center>'
 			''
 
 			act 'Hold it':gt 'korr'

+ 1 - 1
locations/WorkHosp

@@ -47,7 +47,7 @@ if $ARGS[0] = 'start':
 				horny = 0
 				orgasm += 1
 				picrand = 11
-				! Fix Missing Image ".../img/mastr/mastr<<picrand>>.jpg"
+				! WD: Correct Image path ~ "images/img/mastr/mastr<<picrand>>.jpg"
 				'<center><img src="images/inBed/mastr11.jpg"></center>'
 				'You masturbated.'
 				'Gradually a pleasant warmth and pulsation increases in the lower abdomen, then descend to the feeling you and your entire body covered hot waves of orgasm'

+ 2 - 2
locations/albinaEv

@@ -6,8 +6,8 @@ $din_albina_get_over_car = {
 		cls
 		albinaCar = 1
 		gs 'stat'
-		! Fix missing Image ".../qwest/alter/grab.jpg" use place holder
-		'<center><img src="images/qwest/alter/Ev/grab.jpg"></center>'
+		$ImageNeededPlacholder
+		! WD: IMAGE NEEDED ~ '<center><img src="images/qwest/alter/grab.jpg"></center>'
 	end
 }
 

+ 1 - 1
locations/artemEv

@@ -15,7 +15,7 @@ $din_artem_bj = {
 		dick = 16
 		artempower -= 1
 		gs 'stat'
-		! Fix Missing image artemBJ.jpg
+		! WD: Correct Image path ~ "images/qwest/alter/Ev/artemBJ.jpg"
 		'<center><img src="images/qwest/alter/Ev/artomBJ.jpg"></center>'
 		dynamic $dinrandbj
 		dynamic $dinrandswallow

+ 2 - 1
locations/artgar

@@ -12,7 +12,8 @@ elseif apmeet >= 2:
 	apmeet = 3
 	bj += 1
 	throat += 1
-	'<center><img src="images/qwest/alter/artom/apmeet3.jpg"></center>'
+	$ImageNeededPlacholder
+	! WD: IMAGE NEEDED ~ '<center><img src="images/qwest/alter/artom/apmeet3.jpg"></center>'
 	'Artem took you by the hand and led her into the garage, where you have been waiting for Petka Kluev drinking beer. presenting, that you will be up, Do_You, nonetheless, dutifully undressed in front of the guys before the goal and took a pose on her knees before 10 liter bucket. You blindfolded. Your body was covered with goose bumps, You start to shiver in anticipation of the upcoming action. here Peter , astraddle, stood over a bucket in front of your face . While he was pulling on the penis condom and watered it with vegetable oil from a bottle, Artem has got you behind your head with your hands. You were ordered to open his mouth wide, started... It was not the blow. Peter just fucked you deep throat. You poked away tongue and holding her mouth wide open, choked by walking on the throat of the male member in a condom. oiled, sexual organ is easy to slide on taut throat . Eggs Petka relish spanked on your chin, When his cock was buried in the throat. Peter gripped by the ears and rhythmically deeply skewer your mouth on his penis. The most terrible thing in this was, what do you, being completely sober, well aware , that you guys get up to your class, but did not know how to stop this mockery of a humiliating and treacherous starts to flow from it all. all, What could I do - so it, give their classmates plenty to enjoy your body, while meeting their absolutely wild ideas...'
 end
 '!

+ 1 - 1
locations/bedrPar

@@ -10,7 +10,7 @@ fcolor = rgb(0, 0, 0)
 bcolor = rgb(255, 255, 255)
 lcolor = rgb(106, 90, 205)
 '<center><b><font color="maroon">Your bedroom</font></b></center>'
-! Fix Missing Image ".../qwest/alter/<<$loc>>.jpg"
+! WD: Correct Image path ~ "images/qwest/alter/<<$loc>>.jpg"
 '<center><img src="images/qwest/alter/bedrPar.jpg"></center>'
 'Small room in which hardly squeezed <a href="exec:gt ''clothing'', ''view_clothing_list'', ''wardrobe''">cabinet</a>, your <a href="exec:gt ''bedPar''">bed</a>, <a href="exec:gt ''stolPar''">desk</a> bed and sisters.'
 gs 'family'

+ 1 - 1
locations/bedrPar2

@@ -12,7 +12,7 @@ fcolor = rgb(0, 0, 0)
 bcolor = rgb(255, 255, 255)
 lcolor = rgb(106, 90, 205)
 '<center><b><font color="maroon">Master bedroom</font></b></center>'
-! Fix Missing Image ".../qwest/alter/<<$loc>>.jpg"
+! WD: Correct Image path ~ "images/qwest/alter/<<$loc>>.jpg"
 '<center><img src="images/qwest/alter/bedrPar2.jpg"></center>'
 'The room in which the parents live. In the center stands a double bed and a large clowall.'
 gs 'family'

+ 4 - 1
locations/dina

@@ -297,7 +297,10 @@ $kiosksig = {
 						end
 					else
 						!!Przemar:IMAGE NEEDED
-						'<center><img src="images/community/Image_needed.png"></center>'
+						$ImageNeededPlacholder
+						! WD: IMAGE NEEDED ~ 
+						!! '<center><img src="images/community/Image_needed.png"></center>'
+						
 						'Man punched you and say <font color="#0D42C0"> " Go away bitch, your mouth is full of sperm "</font> - in this case you are needed to wait 4 hours and pays 200 rubles.'
 						minut += 240
 						siga += 20

+ 1 - 1
locations/kafe

@@ -754,7 +754,7 @@ if $ARGS[0] = 'workPred':
 					cls
 					pirsA = 1
 					pirsday = day
-					! Fix missing Image ".../body/pirs.jpg"
+					! WD: Correct Image path ~ "images/body/pirs.jpg"
 					'<center><img src="images/body/pirsA.jpg"></center>'
 					'Beckons you to one of the clients, you come to the table and notice that in front of you are the real criminals.'
 					'When you come to the table, the leader called you closer to him, and when you come, it is very hard and painful grabbed you by the neck.'

+ 1 - 1
locations/katspalnya

@@ -7,7 +7,7 @@ if $ARGS[0] = 'start':
 	cls
 	gs 'stat'
 	'<center><b><font color="maroon">Guest Katie</font></b></center>'
-	! Fix missing Image ".../img/SleepingQuarter/Kathouse/bedroom.jpg"
+	! WD: Correct Image path ~ "images/img/SleepingQuarter/Kathouse/bedroom.jpg"
 	'<center><img src="images/img/Kathouse/bedroom.jpg"></center>'
 
 	if hour >= 18 and hour < 23:'Sitting on the couch <a href="exec:gt ''katspalnya'', ''kat''">Kate</a> and watching television'

+ 1 - 1
locations/klofdomhouse

@@ -467,7 +467,7 @@ end
 if $ARGS[0] = 'ev26':
 	cla
 	*clr
-	! Fix Missing Image ".../klof/klof 26</center>.jpg"
+	! WD: Correct Image path ~ "images/klof/klof 26</center>.jpg"
 	'<center><img src="images/klof/klof 26.jpg"></center>'
 	'You showed your ass boss'
 	'Let''s pull off her dress! - He said'

+ 2 - 2
locations/klofdomhouse1

@@ -449,7 +449,7 @@ end
 if $ARGS[0] = 'ev26':
 	cla
 	*clr
-	! Fix Missing Image ".../klof/klof 26</center>.jpg"
+	! WD: Correct Image path ~ "images/klof/klof 26</center>.jpg"
 	'<center><img src="images/klof/klof 26.jpg"></center>'
 	'You pokazli his ass'
 
@@ -477,7 +477,7 @@ end
 if $ARGS[0] = 'ev28':
 	cla
 	*clr
-	! Fix Missing Image ".../klof/1284364hjl.jpg)"
+	! WD: Correct Image path ~ "images/klof/1284364hjl.jpg)"
 	'<center><img src="images/klof/1284364hjl.jpg"></center>'
 	'You turned on its side and the boss showed their charms'
 

+ 1 - 1
locations/kuhrPar

@@ -12,7 +12,7 @@ fcolor = rgb(0, 0, 0)
 bcolor = rgb(255, 255, 255)
 lcolor = rgb(106, 90, 205)
 '<center><b><font color="maroon">Kitchen</font></b></center>'
-! Fix Missing Image ".../qwest/alter/<<$loc>>.jpg"
+! WD: Correct Image path ~ "images/qwest/alter/<<$loc>>.jpg"
 '<center><img src="images/qwest/alter/korrPar.jpg"></center>'
 'The kitchen is next to the stove sink. Large refrigerator in the corner and kitchen table with chairs is against the wall.'
 gs 'family'

+ 5 - 0
locations/loadg

@@ -1,3 +1,8 @@
 # loadg
 
+! WD: IMAGE NEEDED PLACEHOLDER
+if $ImageNeededPlacholder = ''
+	set $ImageNeededPlacholder = '<center><img src="images/community/Image_needed.png"></center>'
+end
+
 --- loadg ---------------------------------

+ 6 - 6
locations/mqroom

@@ -30,7 +30,7 @@ act 'Put a roll on the floor and stamp his foot.':
 			volume = 100
 			$music_theme = 'orochimaru'
 			gs 'init_music'
-			! Fix missing Image ".../casino/oro.jpg"
+			! WD: Correct Image path ~ "images/casino/oro.jpg"
 			'<center><img src= "images/picbat/orotimaru.jpg"></center>'
 			'Mother of God. Just thought you looked into her eyes. Deathly pale skin, cold and cruel snake eyes. Creature grinned.'
 			'(Creature) - "So you see my true face. Wonderful." Hissed the snake creature voice.'
@@ -41,7 +41,7 @@ act 'Put a roll on the floor and stamp his foot.':
 			act 'Look at the stranger.':
 				cla
 				*clr
-				! Fix missing Image ".../casino/tobi.jpg"
+				! WD: Correct Image path ~ "images/casino/tobi.jpg"
 				'<center><img src="images/picbat/tobi.jpg"></center>'
 				'In the doorway stood a man in a black robe, on which were painted red clouds. His face covered with a mask slit for the eyes. You feel a huge force pervading space literally coming out of that eye. The masked man said dully, "Here we saw each other and Orochimaru. Again will flee?"'
 				'Zmeeglazoe creature with a female body and snake hissed angrily eyes:"What else can I do Toby? Tsukuyomi While you run, I can only escape. But believe me, I change everything very quickly. You hunter of becoming a victim."'
@@ -53,7 +53,7 @@ act 'Put a roll on the floor and stamp his foot.':
 				act 'Scream in panic.':
 					cla
 					*clr
-					! Fix missing Image ".../casino/oro.jpg"
+					! WD: Correct Image path ~ "images/casino/oro.jpg"
 					'<center><img src= "images/picbat/orotimaru.jpg"></center>'
 					'Seeing the approaching ground, you panicked with the thought that now you die. But zmeeglazy hold you in my arms, landed on his feet, after breaking leg kick asphalt. You are seeing this strange creature in the face, it was cold and focused. Suddenly something crackled and looked down, you saw the legs zmeeglazogo turn into a snake''s tail.'
 					'Sitting in steel hands Orochimaru, you literally flew through the streets, winding alleys and flying fences. You flew over the ground with terrific speed, without having to even understand where you are. Very quickly, the city remained behind and swept Orochimaru using his snake tail has the fields and forests. You feel physically as reality collapses behind you. Your pursuer Toby did not let it, tearing reality teleported trying to overtake you.'
@@ -62,7 +62,7 @@ act 'Put a roll on the floor and stamp his foot.':
 					act 'Raise your head.':
 						cla
 						*clr
-						! Fix missing Image ".../casino/pain.jpg"
+						! WD: Correct Image path ~ "images/casino/pain.jpg"
 						'<center><img src= "images/picbat/pain.jpg"></center>'
 						'Near you stood a tall, thin man with bright red hair, covered with piercings. Even the figure could be seen that it is not one-eyed Toby. Although hoodie was exactly the same, black with red clouds drawings.'
 						'Orochimaru raised his head and hissed, "Payne!" Skinny guy walked slowly towards Orochimaru:"No one can just walk away from Dawn. Now I''m done with your immortal life."'
@@ -73,7 +73,7 @@ act 'Put a roll on the floor and stamp his foot.':
 						act 'Look at Orochimaru.':
 							cla
 							*clr
-							! Fix missing Image ".../casino/oro.jpg"
+							! WD: Correct Image path ~ "images/casino/oro.jpg"
 							'<center><img src= "images/picbat/orotimaru.jpg"></center>'
 							'Orochimaru, holding your hands, grinning. But you feel his fear. You quickly flew into a black hole, located high in the sky and realized that once there, you with zmeeglazym perish.'
 							'Orochimaru hissed:"There is one last hope. I open my mouth, and you stick your hand in there, I have a scroll inside, you open it up and put her hand. Obey or we both die."'
@@ -85,7 +85,7 @@ act 'Put a roll on the floor and stamp his foot.':
 								*clr
 								cursed = 1
 								music_on = 0
-								! Fix missing Image ".../casino/oro.jpg"
+								! WD: Correct Image path ~ "images/casino/oro.jpg"
 								'<center><img src= "images/picbat/orotimaru.jpg"></center>'
 								'You put a hand to scroll and scroll lightning burned. You embraced the same strange feeling that when approaching Toby. There was a feeling that reality has broken, but this time the center of this hole were you. The sensation you tore the fact that Orochimaru his teeth to you in the neck. You pierced stunning pain. Suddenly zmeeglazy let you go, and with all his strength hurled towards the ground away from the black hole. You understand that it is all spent force trying to save you from a devastating spell Payne.'
 								'You flew down against the force of the black hole, while watching the black hole reached Orochimaru and his body began to break apart. But Orochimaru smiled despite his terrible, deadly pain and agony of his dying body. Finally there was only from zmeeglazogo bloody mess that swallowed the hole. Momentum imparted to you last effort Orochimaru ended and you began again to draw a black hole. You flew to her side feeling as you gradually get out of reality, a little bit more and you will be far from this place.'

+ 5 - 5
locations/party

@@ -196,7 +196,7 @@ if $ARGS[0] = 'result8':
 
 		if vikasex = 0:vikasex = 1 & sexf += 1
 
-		! Fix missing Image ".../picvag/tri.jpg"
+		! WD: Correct Image path ~ "images/picvag/tri.jpg"
 		'<center><img src="images/picVA/tri.jpg"></center>'
 		'You kiss and fondle breasts Vicki, she is very excited and you have decided to give her to lick your pussy.'
 
@@ -208,7 +208,7 @@ if $ARGS[0] = 'result8':
 		act 'Watch':
 			cla
 			*clr
-			! Fix missing Image ".../picvag/tri4.jpg"
+			! WD: Correct Image path ~ "images/picvag/tri4.jpg"
 			'<center><img src="images/picVA/tri4.jpg"></center>'
 			'Vick guy cums in her mouth. Vicki peremazanny lips in semen and it stretches to you that would have kissed her.'
 
@@ -216,7 +216,7 @@ if $ARGS[0] = 'result8':
 				cla
 				*clr
 				cumlip += 1
-				! Fix missing Image ".../picvag/tri3.jpg"
+				! WD: Correct Image path ~ "images/picvag/tri3.jpg"
 				'<center><img src="images/picVA/tri3.jpg"></center>'
 				'You''re kissing licking each other''s cum.'
 
@@ -230,7 +230,7 @@ if $ARGS[0] = 'result8':
 			sexm += 1
 			oral += 1
 			cumface += 1
-			! Fix missing Image ".../picvag/tri2.jpg"
+			! WD: Correct Image path ~ "images/picvag/tri2.jpg"
 			'<center><img src="images/picVA/tri2.jpg"></center>'
 			'You fucked by dick together with Vika finally ends Perrin you on the face.'
 
@@ -238,7 +238,7 @@ if $ARGS[0] = 'result8':
 				cla
 				*clr
 				cumlip += 1
-				! Fix missing Image ".../picvag/tri3.jpg"
+				! WD: Correct Image path ~ "images/picvag/tri3.jpg"
 				'<center><img src="images/picVA/tri3.jpg"></center>'
 				'You''re kissing licking each other''s cum.'
 

+ 7 - 7
locations/poli

@@ -232,7 +232,7 @@ if $ARGS[0] = 'start':
 				if abortrand >= 5:preg = 2
 			end
 
-			! Fix missing Image ".../etogame/abort.jpg"
+			! WD: Correct Image path ~ "images/etogame/abort.jpg"
 			'<center><img src="images/add-on/abort.jpg"></center>'
 			'You spread out on a gynecological chair, the doctor entered your vagina tool and parts ripped out of you fruit.'
 
@@ -256,9 +256,8 @@ if $ARGS[0] = 'start':
 			haprikid[numkid] = rand(0, 3)
 			glacol[numkid] = rand(0, 3)
 
-
-			! Fix missing Image ".../etogame/abort.jpg"
-			!!'<center><img src="images/add-on/abort.jpg"></center>'
+			$ImageNeededPlacholder
+			! WD: IMAGE NEEDED ~ '<center><img src="images/etogame/abort.jpg"></center>'
 			'You put on the bed and lit up. Began a terrible pain in the abdomen, you yelled with all the dope and finally gave birth.'
 			polkid[numkid] = rand(0, 1)
 
@@ -437,8 +436,9 @@ if $ARGS[0] = 'drPP':
 	act 'Login to Account':
 		cla
 		*clr
-		! Fix missing Image ".../add-on/drPP.jpg" use place holder
-		'<center><img src="images/etogame/poli.jpg"></center>'
+		
+		$ImageNeededPlacholder
+		! WD: IMAGE NEEDED ~ '<center><img src="images/add-on/drPP.jpg"></center>'
 
 		if drPP = 0:'At the table sits an elderly bald man felicitous appearance. "Hello, sick. My name is Peter, I am your local therapist - he says, looking at you through his glasses."'
 		if drPP = 1:'Sit at the table Peter. He smiles at you and says, "Hello, sick."'
@@ -459,7 +459,7 @@ if $ARGS[0] = 'drPP':
 			act 'Follow the instructions of the doctor':
 				cla
 				minut += 20
-				! Fix Missing Image ".../images/inBed/ninel03"
+				! WD: Correct Image path ~ "images/images/inBed/ninel03"
 				'<center><img src="images/inBed/ninel03.jpg"></center>'
 				'The doctor listened attentively your lungs, looked into his throat, gave a thermometer - to measure the temperature and finally concluded:'
 				'(Doctor) - Do not worry - common cold - SARS. Buy in a drugstore here these drugs, lie in bed a couple of days and everything will be alright. The main thing - do not supercool.'

+ 2 - 2
locations/pornstudio

@@ -6,7 +6,7 @@ if $ARGS[0] = 'start':
 	*clr
 	minut += 5
 	gs 'stat'
-	! Fix missing Image ".../studia/studiа_0.jpg" Cyrillic characters
+	! WD: Correct Image path ~ "images/studia/studiа_0.jpg" Cyrillic characters
 	'<center><img src="images/studia/studia_0.jpg"></center>'
 
 	act 'Leave':gt 'down'
@@ -178,7 +178,7 @@ if $ARGS[0] = 'manager':
 	*clr
 	minut += 5
 	gs 'stat'
-	! Fix missing Image ".../studia/studiа_0.jpg" Cyrillic characters
+	! WD: Correct Image path ~ "images/studia/studiа_0.jpg" Cyrillic characters
 	'<center><img src="images/studia/studia_0.jpg"></center>'
 	'Boss porn studio met you welcome and gestured you sit on the couch.'
 

+ 16 - 19
locations/seeporn

@@ -50,8 +50,8 @@ act 'watch':
 					cls
 					dom += 1
 					gs 'stat'
-					! Missing Image
-					!!'<center><img src="images/qwest/alter/ev2/seepornHand.jpg"></center>'
+					$ImageNeededPlacholder
+					! WD: IMAGE NEEDED ~ '<center><img src="images/qwest/alter/ev2/seepornHand.jpg"></center>'
 					'You indignantly rejected the proposal boys.'
 
 					act 'Leave':gt 'gorodok'
@@ -77,8 +77,7 @@ act 'watch':
 				!!brotherrand = rand(3, 10)
 
 				if boyseeporn < 2:
-					! Use Gif
-					! '<center><img src="images/qwest/alter/ev2/seepornHJ.jpg"></center>'
+					! WD: Use better Image ~ '<center><img src="images/qwest/alter/ev2/seepornHJ.jpg"></center>'
 					'<center><img src="images/qwest/alter/ev2/seeporn.hand1,<<rand(0,2)>>.gif"></center>'
 					'You glide skin on both members of their handles, Zhendos rapidly groaned and of its members flew jet of sperm on your foot, immediately joined by Mishan and also finished on your foot.'
 
@@ -94,8 +93,7 @@ act 'watch':
 				elseif boyseeporn >= 2:
 					bj += 1
 					evgenQW = 4
-					! Use Gif
-					! '<center><img src="images/qwest/alter/ev2/seepornfirst.jpg"></center>'
+					! WD: Use better Image ~ '<center><img src="images/qwest/alter/ev2/seepornfirst.jpg"></center>'
 					'<center><img src="images/qwest/alter/ev2/seepornbro0,<<rand(0,2)>>.gif"></center>'
 					'You glide skin on both members of their handles, your brother Kolka broke down and with a strangled groan. You have eyes widened by this turn of events. Zhendos rapidly groaned and of its members flew jet of sperm on your foot, immediately joined by Mishan and also finished on your foot.'
 
@@ -120,8 +118,8 @@ act 'watch':
 						cls
 						dom += 1
 						gs 'stat'
-						! Missing Image
-						!!'<center><img src="images/qwest/alter/ev2/seepornHand.jpg"></center>'
+						$ImageNeededPlacholder
+						! WD: IMAGE NEEDED ~ '<center><img src="images/qwest/alter/ev2/seepornHand.jpg"></center>'
 						'You angrily removes his hands and yelling angrily at the boys.'
 
 						act 'Leave':gt 'gorodok'
@@ -151,8 +149,7 @@ act 'watch':
 
 						evgenQW = 3
 						gs 'stat'
-						! Use Gif
-						! '<center><img src="images/qwest/alter/ev2/seepornHJ.jpg"></center>'
+						! WD: Use better Image ~ '<center><img src="images/qwest/alter/ev2/seepornHJ.jpg"></center>'
 						'<center><img src="images/qwest/alter/ev2/seeporn.hand1,<<rand(0,2)>>.gif"></center>'
 						'You glide skin on both members of their handles, Zhendos rapidly groaned and of its members flew jet of sperm on your foot, immediately joined by Mishan and also finished on your foot.'
 
@@ -171,8 +168,8 @@ act 'watch':
 						cls
 						dom += 1
 						gs 'stat'
-						! Missing Image
-						!!'<center><img src="images/qwest/alter/ev2/seepornHand.jpg"></center>'
+						$ImageNeededPlacholder
+						! WD: IMAGE NEEDED ~ '<center><img src="images/qwest/alter/ev2/seepornHand.jpg"></center>'
 						'You angrily removes his hands and yelling angrily at the boys.'
 
 						act 'Leave':gt 'gorodok'
@@ -192,8 +189,8 @@ act 'watch':
 					cls
 					dom += 1
 					gs 'stat'
-					! Missing Image
-					!!'<center><img src="images/qwest/alter/ev2/seepornHand.jpg"></center>'
+					$ImageNeededPlacholder
+					! WD: IMAGE NEEDED ~ '<center><img src="images/qwest/alter/ev2/seepornHand.jpg"></center>'
 					'You angrily removes his hands from his priests Zhendosa.'
 
 					act 'Leave':gt 'gorodok'
@@ -204,7 +201,7 @@ act 'watch':
 					sub += 1
 					evgenqw = 2
 					gs 'stat'
-					! Fix Missing Image ".../qwest/alter/ev2/seepornHand.jpg" 
+					! WD: Correct Image path ~ "images/qwest/alter/ev2/seepornHand.jpg" 
 					'<center><img src="images/qwest/alter/ev2/seeporn.jpg"></center>'
 					'You sit on the couch red as a lobster enjoying a nice touch to his priest.'
 
@@ -223,8 +220,8 @@ act 'watch':
 					cls
 					dom += 1
 					gs 'stat'
-					! Missing Image
-					!!'<center><img src="images/qwest/alter/ev2/seepornHand.jpg"></center>'
+					$ImageNeededPlacholder
+					! WD: IMAGE NEEDED ~ '<center><img src="images/qwest/alter/ev2/seepornHand.jpg"></center>'
 					'You sent Zhendosa on dick with such conversations.'
 
 					act 'Leave':gt 'gorodok'
@@ -235,8 +232,8 @@ act 'watch':
 					sub += 1
 					evgenQW = 1
 					gs 'stat'
-					! Missing Image
-					!!'<center><img src="images/qwest/alter/ev2/seepornHand.jpg"></center>'
+					$ImageNeededPlacholder 
+					! WD: IMAGE NEEDED ~ '<center><img src="images/qwest/alter/ev2/seepornHand.jpg"></center>'
 					'You swallowed and said nothing eyeing porn. Mishan chuckled "And she asks how flushed. It turns out the girls also like porn."'
 
 					act 'Leave':gt 'gorodok'

+ 0 - 1
locations/sexshop

@@ -106,7 +106,6 @@ if $ARGS[0] = 'start':
 								act '......':
 									cla
 									*clr
-									! Fix missing Image ".../studia/dvd-disс.jpg" Cyrillic?
 									'<center><img src="images/studia/dvd-disс.jpg"></center>'
 									'Then on what I make money.'
 

+ 10 - 5
locations/sitr

@@ -514,7 +514,8 @@ if $ARGS [0] ='guest':
 	cla
 	*clr
 	minut += 30
-	'<center><img src="images/img/house/g0.jpg"></center>'
+	$ImageNeededPlacholder
+	! WD: IMAGE NEEDED ~ '<center><img src="images/img/house/g0.jpg"></center>'
 
 	'My husband came home and covenant you, you go out to him and see him with another man, he presents it as its Colleges. You pass in the hall and sit down on the couch, they both have fun on the husband went to the store to buy something to drink and leave you alone. You are chatting for a while, but quickly running threads, then the man says he tried to persuade your husband to go to the club, but he agreed, and then I want to dance. You do not think of anything better, it offers dance here and he readily agrees.'
 
@@ -523,11 +524,13 @@ if $ARGS [0] ='guest':
 		*clr
 		if vnesh < 15:
 			husbandrink = 10
-			'<center><img src="images/img/house/g1.jpg"></center>'
+			$ImageNeededPlacholder
+			! WD: IMAGE NEEDED ~ '<center><img src="images/img/house/g1.jpg"></center>'
 			'You turn on the music and start dancing, man gets up and joins you. You dance until the neighbors start banging on the wall, you turn off the music, laughing and sit on the couch, it takes about an hour and still no husband, then the guest will say that it will look at the leaves'
 			act 'Up':gt 'sitr'
 		else
-			'<center><img src="images/img/house/g2.jpg"></center>'
+			$ImageNeededPlacholder
+			! WD: IMAGE NEEDED ~ '<center><img src="images/img/house/g2.jpg"></center>'
 			'You turn on the music and start dancing, man gets up and joins you. You dance with him and with each movement he becomes closer to you, in the end it starts to hurt you at first as if by accident, and then more openly, in the end, he pushes you to himself and his hands begin to wander through your body, you frankly lapaya .'
 			if horny < 80:
 				act 'Step back':
@@ -541,12 +544,14 @@ if $ARGS [0] ='guest':
 				cla
 				*clr
 				horny += 20
-				'<center><img src="images/img/house/g3.jpg"></center>'
+				$ImageNeededPlacholder
+				! WD: IMAGE NEEDED ~ '<center><img src="images/img/house/g3.jpg"></center>'
 				'You do not resist, and he continues to grope you, you will soon have a third on while he caresses your bare breasts, you will no longer restrain himself vsilu and turned to him, running his hand into his pants and pulled out a member. He sticks out his tongue and lips around his you start to suck at the same time masturbate him.'
 				act 'Take by mouth':
 					cla
 					*clr
-					'<center><img src="images/img/house/g4.jpg"></center>'
+					$ImageNeededPlacholder
+					! WD: IMAGE NEEDED ~ '<center><img src="images/img/house/g4.jpg"></center>'
 '!
 
 --- sitr ---------------------------------

+ 1 - 1
locations/sitrPar

@@ -12,7 +12,7 @@ fcolor = rgb(0, 0, 0)
 bcolor = rgb(255, 255, 255)
 lcolor = rgb(106, 90, 205)
 '<center><b><font color="maroon">Hall</font></b></center>'
-! Fix Missing Image ".../qwest/alter/<<$loc>>.jpg"
+! WD: Correct Image path ~ "images/qwest/alter/<<$loc>>.jpg"
 '<center><img src="images/qwest/alter/sitrPar.jpg"></center>'
 'In the window is a <a href="exec:gt ''tvPar''">TV</a>. Front of the TV is a sofa on which sleeps at night your brother. The wall is a wall with utensils and books.'
 gs 'family'

+ 1 - 1
locations/sny

@@ -416,7 +416,7 @@ elseif snyqw = 7:
 
 				act 'Leave':gt 'gorodok'
 			elseif NosovRevenge = 1:
-			! Fix missing Image Move "tatvag6.jpg" from "images\picBody" to "images\Body"
+			! WD: Move missing Image ~ "tatvag6.jpg" from "images\picBody" to "images\Body"
 				'<center><img src="images/body/tatvag6.jpg"></center>'
 				'You woke up lying on the couch which is awkward. With difficulty raising his head you understand, it is a place you are not familiar, listening to the feelings you understand , that you have a very sore and burns pubic, looking between her legs you saw, that you wear panties, lowered their ofigeli you just by what he saw. Pubic tattoo emblazoned svezhevybitaya.'
 

+ 2 - 0
locations/start

@@ -141,4 +141,6 @@ if music_on = 0:
 	gs 'init_music'
 end
 
+! WD: IMAGE NEEDED PLACEHOLDER
+set $ImageNeededPlacholder = '<center><img src="images/community/Image_needed.png"></center>'
 --- start ---------------------------------

+ 1 - 1
locations/stat

@@ -1317,7 +1317,7 @@ if cumass > 0 and swallow >= 10:pl '<a href="exec:view''images/body/cumass.jpg''
 if cumlip > 0:pl '<b><font color="red">Your mouth smells like sperm.</font></b>'
 if cumface > 0 and swallow < 10:pl '<b><font color="red">Your <a href="exec:view''images/body/cumface.jpg''">face</a> and hair are smeared with sperm.</font></b>'
 if cumface > 0 and swallow >= 10:pl '<a href="exec:view''images/body/cumface.jpg''"><b><font color="red">Your face</font></b></a> <a href="exec:dynamic $cumeater4"><b><font color="red">and hair are smeared with sperm.</font></b></a>'
-! Fix missing Image Move "cumfrot.jpg" from "images\picb" to "images\Body"
+! WD: Move missing Image ~ "cumfrot.jpg" from "images\picb" to "images\Body"
 if cumfrot > 0 and swallow < 10:pl '<b><font color="red">You have semen stains on your <a href="exec:view''images/body/cumfrot.jpg''">clothes</a>.</font></b>'
 if cumfrot > 0 and swallow >= 10:pl '<a href="exec:view''images/body/cumfrot.jpg''"><b><font color="red">You have <a href="exec:dynamic $cumeater5"><b><font color="red">semen stains</font></b></a> on your clothes</font></b></a>.'
 if cumanus > 0 and swallow < 10:pl '<b><font color="red">Sperm slowly flows from your <a href="exec:view''images/body/cumanal.jpg''">ass</a>.</font></b>'

+ 4 - 4
locations/svidboy

@@ -275,8 +275,8 @@ if $ARGS[0] = 'billsvid':
 		act 'Not here':
 			cla
 			*clr
-			! Fix Missing Image ".../img/boysvid/bil0<<picrand>>.jpg" use place holder
-			'<center><img src="images/img/boysvid/bil<<picrand>>.jpg"></center>'
+			$ImageNeededPlacholder
+			! WD: IMAGE NEEDED ~ '<center><img src="images/img/boysvid/bil0<<picrand>>.jpg"></center>'
 			'You removed his hand with the words "Well, not here."'
 			'When your time is up <<$boyA>> said that he has to run and left.'
 
@@ -299,8 +299,8 @@ if $ARGS[0] = 'billsvid':
 			act 'Stop, stop':
 				cla
 				*clr
-				! Fix Missing Image ".../img/boysvid/bil0<<picrand>>.jpg" use place holder
-				'<center><img src="images/img/boysvid/bil<<picrand>>.jpg"></center>'
+				$ImageNeededPlacholder
+				! WD: IMAGE NEEDED ~ '<center><img src="images/img/boysvid/bil0<<picrand>>.jpg"></center>'
 				'You removed his hand with the words "Well, not here"'
 				'When your time is up <<$boyA>> said that he has to run and left.'
 

+ 66 - 33
locations/toilet

@@ -10,7 +10,8 @@ if $ARGS[0] = 'start':
 	fcolor = rgb(0, 0, 0)
 	bcolor = rgb(255, 255, 255)
 	lcolor = rgb(106, 90, 205)
-	'<center><img src="images/toilet/cabin.jpg"></center>'
+	$ImageNeededPlacholder
+	! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/cabin.jpg"></center>'
 	'Do you hear any noises at some of the booths ...'
 
 	act 'Come up with a toilet':
@@ -24,7 +25,8 @@ if $ARGS[0] = 'start':
 		clr
 		*clr
 		gs 'stat'
-		'<center><img src="images/toilet/pry_1.jpg"></center>'
+		$ImageNeededPlacholder
+		! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/pry_1.jpg"></center>'
 		'You looked into the booth and all ....'
 		toisexrand = rand(0, 100)
 
@@ -35,7 +37,8 @@ if $ARGS[0] = 'start':
 				clr
 				*clr
 				gs 'stat'
-				'<center><img src="images/toilet/cabin_0.jpg"></center>'
+				$ImageNeededPlacholder
+				! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/cabin_0.jpg"></center>'
 				'And all the booths were empty'
 
 				act 'Come up with a toilet':gt 'sexshop', 'podval'
@@ -50,7 +53,8 @@ if $ARGS[0] = 'start':
 					clr
 					*clr
 					gs 'stat'
-					'<center><img src="images/toilet/toisex_1_1.jpg"></center>'
+					$ImageNeededPlacholder
+					! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/toisex_1_1.jpg"></center>'
 					'You know her, this girl watched porn in the next stall ....'
 					'You have enabled cell phone and started filming herself as she caresses ...'
 
@@ -62,7 +66,8 @@ if $ARGS[0] = 'start':
 					clr
 					*clr
 					gs 'stat'
-					'<center><img src="images/toilet/toisex_2_1.jpg"></center>'
+					$ImageNeededPlacholder
+					! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/toisex_2_1.jpg"></center>'
 					'You know her - this girl watched porn in the next stall ....'
 					'You have enabled cell phone and started filming herself as she caresses ...'
 
@@ -86,7 +91,8 @@ if $ARGS[0] = '0':
 	fcolor = rgb(0, 0, 0)
 	bcolor = rgb(255, 255, 255)
 	lcolor = rgb(106, 90, 205)
-	'<center><img src="images/toilet/pornjrolik.jpg"></center>'
+	$ImageNeededPlacholder
+	! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/pornjrolik.jpg"></center>'
 	'Finding and viewing movies on your phone you are very excited ...'
 
 	act 'Delete movie and walk out basement ...':gt 'sexshop', 'start'
@@ -95,7 +101,8 @@ if $ARGS[0] = '0':
 		cla
 		*clr
 		bankfond = bankfond + 1000
-		'<center><img src="images/toilet/pornjrolik.jpg"></center>'
+		$ImageNeededPlacholder
+		! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/pornjrolik.jpg"></center>'
 		'Uploading videos on the Internet, you sold it to porn site for 1000 rubles!'
 		'You transferred the money to the account ...'
 
@@ -111,7 +118,8 @@ if $ARGS[0] = '1':
 	clr
 	gs 'stat'
 	gs 'time'
-	'<center><img src="images/toilet/toisex_1_2.jpg"></center>'
+	$ImageNeededPlacholder
+	! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/toisex_1_2.jpg"></center>'
 	'You knocked on the stall and she opened the door a little delay'
 	'She had to get dressed, but her cheeks were glowing eyes and ran - she realized that he slept ...'
 	'You:- Well, what a good rest? I wrote down all your pranks on mobile ...'
@@ -122,7 +130,8 @@ if $ARGS[0] = '1':
 	act 'She agreed and took off her bra ...':
 		cla
 		*clr
-		'<center><img src="images/toilet/toisex_1_3.jpg"></center>'
+		$ImageNeededPlacholder
+		! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/toisex_1_3.jpg"></center>'
 		'Nipples on her small breasts excitedly sticking ...'
 		'Looking at her you excited and your cock swollen ...'
 		'She looked at you and waiting for further orders ....'
@@ -131,28 +140,32 @@ if $ARGS[0] = '1':
 		act '...':
 			cla
 			*clr
-			'<center><img src="images/toilet/toisex_1_4.jpg"></center>'
+			$ImageNeededPlacholder
+			! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/toisex_1_4.jpg"></center>'
 			'Removing panties she got down on her knees and kiss your cock ...'
 			'Kissing is certainly nice, but I want a good suction ...'
 
 			act 'Let ka kiddie more active ....':
 				cla
 				*clr
-				'<center><img src="images/toilet/toisex_1_5.jpg"></center>'
+				$ImageNeededPlacholder
+				! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/toisex_1_5.jpg"></center>'
 				'She began actively otsayvat you ...'
 				'You are excited and want to shove her cock in my mouth a little deeper ....'
 
 				act 'Put in your mouth most tomatoes ...':
 					cla
 					*clr
-					'<center><img src="images/toilet/toisex_1_6.jpg"></center>'
+					$ImageNeededPlacholder
+					! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/toisex_1_6.jpg"></center>'
 					'You are rude and started to fuck her deep in her mouth ...'
 					'Probably need to try it with coarser ...'
 
 					act 'Swat hair and bend to the toilet ...':
 						cla
 						*clr
-						'<center><img src="images/toilet/toisex_1_7.jpg"></center>'
+						$ImageNeededPlacholder
+						! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/toisex_1_7.jpg"></center>'
 						'Bent his head to the toilet you started to insult her ...'
 						'You called her a dirty whore and her slave ...'
 						'Bitch was excited and kept saying:- Yes, my lord!'
@@ -160,14 +173,16 @@ if $ARGS[0] = '1':
 						act 'Dunk your head in the toilet and wash ...':
 							cla
 							*clr
-							'<center><img src="images/toilet/toisex_1_8.jpg"></center>'
+							$ImageNeededPlacholder
+							! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/toisex_1_8.jpg"></center>'
 							'You okunli her head in the ass ...'
 							'She was trembling with excitement and asked her to cum in her mouth ...'
 
 							act 'Give her suck ...':
 								cla
 								*clr
-								'<center><img src="images/toilet/toisex_1_9.jpg"></center>'
+								$ImageNeededPlacholder
+								! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/toisex_1_9.jpg"></center>'
 								'She began to masturbate you substituting your sexy mouth ...'
 								'Reaching the peak of excitement you removed it aside ...'
 								'You:- Get on your knees bitch! Open your mouth and wait!'
@@ -175,7 +190,8 @@ if $ARGS[0] = '1':
 								act '...':
 									cla
 									*clr
-									'<center><img src="images/toilet/toisex_1_10.jpg"></center>'
+									$ImageNeededPlacholder
+									! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/toisex_1_10.jpg"></center>'
 									'He dutifully stood up and looking into your eyes waited for the apogee ...'
 									'You discharge of semen in her mouth, and a few drops fell on the rim of the toilet ...'
 									'Continuing to play the role of the Master, you said ...'
@@ -190,7 +206,8 @@ if $ARGS[0] = '1':
 										*clr
 										clr
 										gs 'stat'
-										'<center><img src="images/toilet/toisex_1_11.jpg"></center>'
+										$ImageNeededPlacholder
+										! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/toisex_1_11.jpg"></center>'
 										'Resignedly she began to lick clean the toilet ...'
 										'And you thought:"Do not offer if she participated in the filming of" ...'
 										'Judging by her inclination to obey - it could play in the genre BDSM'
@@ -203,7 +220,8 @@ if $ARGS[0] = '1':
 													cla
 													*clr
 													BDSMactress = BDSMactress + 1
-													'<center><img src="images/toilet/toisex_1_1.jpg"></center>'
+													$ImageNeededPlacholder
+													! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/toisex_1_1.jpg"></center>'
 													'It:- This is an interesting aredlozhenie. Where and when?'
 													'You:- Come to the casting on Saturday! Shooting on Sundays!'
 													'She:- I agree!'
@@ -215,7 +233,8 @@ if $ARGS[0] = '1':
 												if BDSMactressrand = 2:
 												cla
 												*clr
-												'<center><img src="images/toilet/oblom_1.jpg"></center>'
+												$ImageNeededPlacholder
+												! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/oblom_1.jpg"></center>'
 												'She:- Fuck you for dick! Goat!'
 												'You:Honey, what are you so? I thought you like domination!'
 												'She:- Yes, I fear with almost peed - thought you were some kind of maniac!'
@@ -225,7 +244,8 @@ if $ARGS[0] = '1':
 													cla
 													*clr
 													bankfond = bankfond + 1000
-													'<center><img src="images/toilet/pornjrolik.jpg"></center>'
+													$ImageNeededPlacholder
+													! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/pornjrolik.jpg"></center>'
 													'- That''s because of a bitch! - You might think ....'
 													'You I still become a star! Though on the Internet!'
 													'And finding a movie on your phone, sold it to one of the porn sites for 1000 rubles!'
@@ -254,7 +274,8 @@ if $ARGS[0] = '2':
 	clr
 	gs 'stat'
 	gs 'time'
-	'<center><img src="images/toilet/toisex_2_2.jpg"></center>'
+	$ImageNeededPlacholder
+	! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/toisex_2_2.jpg"></center>'
 	'You knocked on the stall and she opened the door a little delay'
 	'She had to get dressed, but her cheeks were glowing eyes and ran - she realized that he slept ...'
 	'You:- Well, what a good rest? I wrote down all your pranks on mobile ...'
@@ -265,7 +286,8 @@ if $ARGS[0] = '2':
 	act 'She agreed and took off her blouse ...':
 		cla
 		*clr
-		'<center><img src="images/toilet/toisex_2_3.jpg"></center>'
+		$ImageNeededPlacholder
+		! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/toisex_2_3.jpg"></center>'
 		'Nipples on her small breasts excitedly sticking ...'
 		'Looking at her you excited and your cock swollen ...'
 		'She looked at you and waiting for further orders ....'
@@ -274,28 +296,32 @@ if $ARGS[0] = '2':
 		act '...':
 			cla
 			*clr
-			'<center><img src="images/toilet/toisex_2_4.jpg"></center>'
+			$ImageNeededPlacholder
+			! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/toisex_2_4.jpg"></center>'
 			'Removing panties she knelt down and began to suck you dick ...'
 			'It''s certainly nice, but I want a good suction ...'
 
 			act 'Let ka kiddie more active ....':
 				cla
 				*clr
-				'<center><img src="images/toilet/toisex_2_5.jpg"></center>'
+				$ImageNeededPlacholder
+				! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/toisex_2_5.jpg"></center>'
 				'She began actively otsayvat you ...'
 				'You are excited and want to shove her cock in my mouth a little deeper ....'
 
 				act 'Put in your mouth most tomatoes ...':
 					cla
 					*clr
-					'<center><img src="images/toilet/toisex_2_6.jpg"></center>'
+					$ImageNeededPlacholder
+					! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/toisex_2_6.jpg"></center>'
 					'You are rude and started to fuck her deep in her mouth ...'
 					'Probably need to try it with coarser ...'
 
 					act 'Swat hair and bend to the toilet ...':
 						cla
 						*clr
-						'<center><img src="images/toilet/toisex_2_7.jpg"></center>'
+						$ImageNeededPlacholder
+						! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/toisex_2_7.jpg"></center>'
 						'Bent his head to the toilet you started to insult her ...'
 						'You called her a dirty whore and her slave ...'
 						'You:- Female lick the toilet!'
@@ -304,14 +330,16 @@ if $ARGS[0] = '2':
 						act 'Dunk your head in the toilet and wash ...':
 							cla
 							*clr
-							'<center><img src="images/toilet/toisex_2_8.jpg"></center>'
+							$ImageNeededPlacholder
+							! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/toisex_2_8.jpg"></center>'
 							'You okunli her head in the ass ...'
 							'She was trembling with excitement and asked her to cum in her mouth ...'
 
 							act 'Give it a lick dick ...':
 								cla
 								*clr
-								'<center><img src="images/toilet/toisex_2_9.jpg"></center>'
+								$ImageNeededPlacholder
+								! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/toisex_2_9.jpg"></center>'
 								'She began to lick your dick their sexual tongue ...'
 								'Reaching the peak of excitement you finished in her mouth ...'
 								'You:- swallow cum bitch! Open your mouth and show me how you did it!'
@@ -319,7 +347,8 @@ if $ARGS[0] = '2':
 								act '...':
 									cla
 									*clr
-									'<center><img src="images/toilet/toisex_2_10.jpg"></center>'
+									$ImageNeededPlacholder
+									! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/toisex_2_10.jpg"></center>'
 									'He dutifully swallowed and opened her mouth ...'
 									'Have you checked - she really swallowed every drop posleedney ...'
 									'You:- Well, ka bitch conducted on hand between your legs and show me ...'
@@ -334,7 +363,8 @@ if $ARGS[0] = '2':
 										sexm = sexm + 1
 										manna = manna + 25
 										gs 'stat'
-										'<center><img src="images/toilet/toisex_2_11.jpg"></center>'
+										$ImageNeededPlacholder
+										! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/toisex_2_11.jpg"></center>'
 										'Groaning she held her fingers on her pussy ...'
 										'Sheath of her was full of grease - you can see that she was excited ...'
 										'And you thought:"Do not offer if she participated in the filming of" ...'
@@ -349,7 +379,8 @@ if $ARGS[0] = '2':
 												cla
 												*clr
 												BDSMactress = BDSMactress + 1
-												'<center><img src="images/toilet/toisex_2_3.jpg"></center>'
+												$ImageNeededPlacholder
+												! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/toisex_2_3.jpg"></center>'
 												'It:- This is an interesting aredlozhenie. Where and when?'
 												'You:- Come to the casting on Saturday! Shooting on Sundays!'
 												'She:- I agree!'
@@ -359,7 +390,8 @@ if $ARGS[0] = '2':
 											elseif BDSMactressrand = 2:
 												cla
 												*clr
-												'<center><img src="images/toilet/oblom_1.jpg"></center>'
+												$ImageNeededPlacholder
+												! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/oblom_1.jpg"></center>'
 												'She:- Fuck you for dick! Goat!'
 												'You:Honey, what are you so? I thought you like domination!'
 												'She:- Yes, I fear with almost peed - thought you were some kind of maniac!'
@@ -369,7 +401,8 @@ if $ARGS[0] = '2':
 													cla
 													*clr
 													bankfond = bankfond + 1000
-													'<center><img src="images/toilet/pornjrolik.jpg"></center>'
+													$ImageNeededPlacholder
+													! WD: IMAGE NEEDED ~ '<center><img src="images/toilet/pornjrolik.jpg"></center>'
 													'- That''s because of a bitch! - You might think ....'
 													'You I still become a star! Though on the Internet!'
 													'And finding a movie on your phone, sold it to one of the porn sites for 1000 rubles!'

+ 1 - 1
locations/vanrPar

@@ -12,7 +12,7 @@ fcolor = rgb(0, 0, 0)
 bcolor = rgb(255, 255, 255)
 lcolor = rgb(106, 90, 205)
 '<center><b><font color="maroon">Bath</font></b></center>'
-! Fix Missing Image ".../qwest/alter/<<$loc>>.jpg"
+! WD: Correct Image path ~ "images/qwest/alter/<<$loc>>.jpg"
 '<center><img src="images/qwest/alter/vanrPar.jpg"></center>'
 'Bathroom cramped and very unpretentious.'