Browse Source

[fixed] preparation to enable custom pregnancy images

anjuna krokus 3 weeks ago
parent
commit
e695fac6a0
1 changed files with 27 additions and 27 deletions
  1. 27 27
      locations/cheatmenu_bisets.qsrc

+ 27 - 27
locations/cheatmenu_bisets.qsrc

@@ -288,12 +288,12 @@ if $ARGS[0] = 'cs_export':
 
 
 		!! Advanced sets
-		if cheatVars['fix_biset_<<cmbs_exp_set>>_imgnums_000'] > 0:
+		if cheatVars['fix_biset_<<cmbs_exp_set>>_imgnums_0000'] > 0:
 			cmd_exp_bmi = 0
 			:cs_export_adv_bmi_loop
 				cmd_exp_stren = 0
 				:cs_export_adv_str_loop
-					$cmd_class_str = $mid(1000 + cmd_exp_bmi * 100 + cmd_exp_stren, 2)
+					$cmd_class_str = $mid(10000 + cmd_exp_bmi * 100 + cmd_exp_stren, 2)
 
 					if $cheatVars['fix_biset_<<cmbs_exp_set>>_desc_<<$cmd_class_str>>'] ! '':
 						$temp_export_text += "$fix_bod_set['desc_<<$cmd_class_str>>'] = '<<$cheatVars['fix_biset_<<cmbs_exp_set>>_desc_<<$cmd_class_str>>']>>'
@@ -491,7 +491,7 @@ if $ARGS[0] = 'cs_main_advanced':
 		cmd_adv_bmi_i = 0
 		:cs_main_adv_bmi_loop
 			cmbs_class = cmd_adv_bmi_i * 100 + cmd_adv_str_i
-			$temp_table +=	'<td><a href="exec: gs ''cheatmenu_bisets'', ''cs_main_advanced2'', <<cmbs_set>>, <<cmbs_class>>"><<$mid(1000+cmbs_class, 2)>></a></td>'
+			$temp_table +=	'<td><a href="exec: gs ''cheatmenu_bisets'', ''cs_main_advanced2'', <<cmbs_set>>, <<cmbs_class>>"><<$mid(1000 + cmbs_class, 2)>></a></td>'
 			cmd_adv_bmi_i += 1
 		if cmd_adv_bmi_i < 9: jump 'cs_main_adv_bmi_loop'
 
@@ -514,11 +514,11 @@ if $ARGS[0] = 'cs_main_advanced2':
 	*clr & cla
 	cmbs_set = ARGS[1]
 	cmbs_class = ARGS[2]
-	$cmdbs_class_str = $mid(1000 + ARGS[2], 2)
+	$cmdbs_class_str = $mid(10000 + ARGS[2], 2)
 
 	'<center><h1>Cheat menu</h1></center>'
 	*nl
-	'<center><b>Body Image Set Display - class=<<$cmdbs_class_str>></b></center>'
+	'<center><b>Body Image Set Display - class=<<$mid(1000 + ARGS[2], 2)>></b></center>'
 
 	$cheatmenu['table_start']
 		dynamic "
@@ -600,7 +600,7 @@ if $ARGS[0] = 'get_custom_bodyimg_desc_link_advanced':
 	temp_set = ARGS[1]
 	temp_class = ARGS[2]
 	temp_img_num = ARGS[3]
-	$temp_bs_class_str = $mid(1000 + ARGS[2], 2)
+	$temp_bs_class_str = $mid(10000 + ARGS[2], 2)
 	$temp_cmd_img_name = $cheatVars['fix_biset_<<temp_set>>_img_<<$temp_bs_class_str>>_<<temp_img_num>>']
 	$temp_cmd_desc = $cheatVars['fix_biset_<<temp_set>>_desc_<<$temp_bs_class_str>>']
 
@@ -715,7 +715,7 @@ if $ARGS[0] = 'cs_copy_class_menu':
 		cmd_adv_bmi_i = 0
 		:cs_copy_class_bmi_loop
 			cmbs_class = cmd_adv_bmi_i * 100 + cmd_adv_str_i
-			$cmbs_class_str = $mid(1000+cmbs_class, 2)
+			$cmbs_class_str = $mid(10000 + cmbs_class, 2)
 			if cmd_copy_class['base'] = cmbs_class:
 				$temp_table +=	'<td><<$cmbs_class_str>></td>'
 			elseif cmd_copy_class[$cmbs_class_str] = 1:
@@ -765,7 +765,7 @@ if $ARGS[0] = 'cs_copy_class_bmi':
 	temp_copyclass['stren'] = 0
 	:cs_copy_class_stren_loop2
 		temp_copyclass['class'] = temp_copyclass['bmi'] * 100 + temp_copyclass['stren']
-		$temp_copyclass['class_str'] = $mid(1000 + temp_copyclass['class'], 2)
+		$temp_copyclass['class_str'] = $mid(10000 + temp_copyclass['class'], 2)
 		if cmd_copy_class[$temp_copyclass['class_str']] = 1 or cmd_copy_class['base'] = temp_copyclass['class']:
 			temp_copyclass['counter'] += 1
 		end
@@ -781,7 +781,7 @@ if $ARGS[0] = 'cs_copy_class_bmi':
 	temp_copyclass['stren'] = 0
 	:cs_copy_class_stren_loop3
 		temp_copyclass['class'] = temp_copyclass['bmi'] * 100 + temp_copyclass['stren']
-		$temp_copyclass['class_str'] = $mid(1000 + temp_copyclass['class'], 2)
+		$temp_copyclass['class_str'] = $mid(10000 + temp_copyclass['class'], 2)
 		if cmd_copy_class['base'] ! temp_copyclass['class']:
 			cmd_copy_class[$temp_copyclass['class_str']] = temp_copyclass['result']
 		end
@@ -800,7 +800,7 @@ if $ARGS[0] = 'cs_copy_class_stren':
 	temp_copyclass['bmi'] = 0
 	:cs_copy_class_bmi_loop2
 		temp_copyclass['class'] = temp_copyclass['bmi'] * 100 + temp_copyclass['stren']
-		$temp_copyclass['class_str'] = $mid(1000 + temp_copyclass['class'], 2)
+		$temp_copyclass['class_str'] = $mid(10000 + temp_copyclass['class'], 2)
 		if cmd_copy_class[$temp_copyclass['class_str']] = 1 or cmd_copy_class['base'] = temp_copyclass['class']:
 			temp_copyclass['counter'] += 1
 		end
@@ -816,7 +816,7 @@ if $ARGS[0] = 'cs_copy_class_stren':
 	temp_copyclass['bmi'] = 0
 	:cs_copy_class_bmi_loop3
 		temp_copyclass['class'] = temp_copyclass['bmi'] * 100 + temp_copyclass['stren']
-		$temp_copyclass['class_str'] = $mid(1000 + temp_copyclass['class'], 2)
+		$temp_copyclass['class_str'] = $mid(10000 + temp_copyclass['class'], 2)
 		if cmd_copy_class['base'] ! temp_copyclass['class']:
 			cmd_copy_class[$temp_copyclass['class_str']] = temp_copyclass['result']
 		end
@@ -829,7 +829,7 @@ if $ARGS[0] = 'cs_copy_class_stren':
 end
 
 if $ARGS[0] = 'cs_overwrite_classes_base':
-	$cmd_copy_class['base_str'] = $mid(1000+cmd_copy_class['base'], 2)
+	$cmd_copy_class['base_str'] = $mid(10000 + cmd_copy_class['base'], 2)
 	$cmd_copy_class['string'] = 'fix_biset_<<cmd_copy_class[''set'']>>_'
 	$cmd_copy_class['path'] = $cheatVars[$cmd_copy_class['string'] + 'path_<<$cmd_copy_class[''base_str'']>>']
 	$cmd_copy_class['desc'] = $cheatVars[$cmd_copy_class['string'] + 'desc_<<$cmd_copy_class[''base_str'']>>']
@@ -846,7 +846,7 @@ if $ARGS[0] = 'cs_overwrite_classes_base':
 		cmd_copy_class['bmi_i'] = 0
 		:cs_overwrite_bmi_loop
 			cmbs_class = cmd_copy_class['bmi_i'] * 100 + cmd_copy_class['str_i']
-			$cmbs_class_str = $mid(1000+cmbs_class, 2)
+			$cmbs_class_str = $mid(10000 + cmbs_class, 2)
 			if cmd_copy_class['base'] ! cmbs_class and cmd_copy_class[$cmbs_class_str] = 1:
 				gs 'cheatmenu_bisets', 'cs_overwrite_class', $cmbs_class_str
 			end
@@ -1050,12 +1050,12 @@ if $ARGS[0] = 'import_custom_set':
 	if cmd_imp_i < 9: jump 'cs_import_simple_loop'
 
 	!! Advanced sets
-	if fix_bod_set['imgnums_000'] > 0:
+	if fix_bod_set['imgnums_0000'] > 0:
 		cmd_exp_bmi = 0
 		:cs_import_adv_bmi_loop
 			cmd_exp_stren = 0
 			:cs_import_adv_str_loop
-				$cmd_class_str = $mid(1000 + cmd_exp_bmi * 100 + cmd_exp_stren, 2)
+				$cmd_class_str = $mid(10000 + cmd_exp_bmi * 100 + cmd_exp_stren, 2)
 
 				cheatVars[$temp_start_str + 'desc_<<$cmd_class_str>>'] = fix_bod_set['desc_<<$cmd_class_str>>']
 				$cheatVars[$temp_start_str + 'path_<<$cmd_class_str>>'] = $fix_bod_set['path_<<$cmd_class_str>>']
@@ -1085,7 +1085,7 @@ if $ARGS[0] = 'cs_set_simple':
 end
 
 if $ARGS[0] = 'cs_set_advanced':
-	if cheatVars['fix_biset_<<ARGS[1]>>_imgnums_000'] = 0:
+	if cheatVars['fix_biset_<<ARGS[1]>>_imgnums_0000'] = 0:
 		gs 'cheatmenu_bisets', 'cs_init_advanced', ARGS[1]
 	end
 
@@ -1100,7 +1100,7 @@ if $ARGS[0] = 'cs_init_advanced':
 		cmd_adv_str_i = 0
 		:adv_init_str_loop
 			cmd_bs_class = cmd_adv_bmi_i  * 100 + cmd_adv_str_i
-			$cmd_bs_class_str = $mid(1000 + cmd_bs_class, 2)
+			$cmd_bs_class_str = $mid(10000 + cmd_bs_class, 2)
 			cheatVars['fix_biset_<<ARGS[1]>>_imgnums_<<$cmd_bs_class_str>>'] = 1
 			cmd_adv_str_i += 1
 		if cmd_adv_str_i < 18: jump 'adv_init_str_loop'
@@ -1169,7 +1169,7 @@ end
 if $ARGS[0] = 'cs_change_desc_adv':
 	temp_set = ARGS[1]
 	temp_class = ARGS[2]
-	$temp_class_str = $mid(1000 + ARGS[2], 2)
+	$temp_class_str = $mid(10000 + ARGS[2], 2)
 
 	$cmd_temp_input = input("Enter a new descriptor")
 	if $cmd_temp_input ! '':
@@ -1187,7 +1187,7 @@ end
 if $ARGS[0] = 'cs_change_subpath':
 	temp_set = ARGS[1]
 	temp_class = ARGS[2]
-	$temp_class_str = $mid(1000 + ARGS[2], 2)
+	$temp_class_str = $mid(10000 + ARGS[2], 2)
 
 	$cmd_temp_input = input('Input subpath (i.e. 0_starving)')
 	if $cmd_temp_input ! '':
@@ -1224,7 +1224,7 @@ if $ARGS[0] = 'cs_change_img_adv':
 	temp_set = ARGS[1]
 	temp_class = ARGS[2]
 	temp_img_num = ARGS[3]
-	$temp_class_str = $mid(1000 + ARGS[2], 2)
+	$temp_class_str = $mid(10000 + ARGS[2], 2)
 
 	$cmd_temp_input = input("Enter a new image name (Leave empty to not change the image. Example: 1). Exclude the '.jpg'")
 	if $cmd_temp_input ! '':
@@ -1246,7 +1246,7 @@ end
 if $ARGS[0] = 'cs_add_img':
 	temp_set = ARGS[1]
 	temp_class = ARGS[2]
-	$temp_class_str = $mid(1000 + ARGS[2], 2)
+	$temp_class_str = $mid(10000 + ARGS[2], 2)
 
 	$cmd_temp_input = input("Enter a new image name (Leave empty to use default image. Example: 1). Exclude the '.jpg'")
 	if $mid($cmd_temp_input, len($cmd_temp_input)-3) = '.jpg':
@@ -1269,7 +1269,7 @@ if $ARGS[0] = 'cs_remove_img':
 	temp_set = ARGS[1]
 	temp_class = ARGS[2]
 	temp_img_num = ARGS[3]
-	$temp_class_str = $mid(1000 + ARGS[2], 2)
+	$temp_class_str = $mid(10000 + ARGS[2], 2)
 
 	if temp_img_num < cheatVars['fix_biset_<<temp_set>>_imgnums_<<$temp_class_str>>'] and cheatVars['fix_biset_<<temp_set>>_imgnums_<<$temp_class_str>>'] > 1:
 		cmd_new_index = temp_img_num
@@ -1294,22 +1294,22 @@ end
 
 
 if $ARGS[0] = 'cs_set_default_img':
-	$cheatVars['fix_biset_<<ARGS[1]>>_img_<<$mid(1000+ARGS[2], 2)>>'] = ''
+	$cheatVars['fix_biset_<<ARGS[1]>>_img_<<$mid(10000 + ARGS[2], 2)>>'] = ''
 	gs 'cheatmenu_bisets', 'cs_main', ARGS[1]
 end
 
 if $ARGS[0] = 'cs_set_default_img_adv':
-	$cheatVars['fix_biset_<<ARGS[1]>>_img_<<$mid(1000+ARGS[2], 2)>>_<<ARGS[3]>>'] = ''
+	$cheatVars['fix_biset_<<ARGS[1]>>_img_<<$mid(10000 + ARGS[2], 2)>>_<<ARGS[3]>>'] = ''
 	gs 'cheatmenu_bisets', 'cs_main_advanced2', ARGS[1], ARGS[2]
 end
 
 if $ARGS[0] = 'cs_set_default_desc':
-	$cheatVars['fix_biset_<<ARGS[1]>>_desc_<<$mid(1000+ARGS[2], 2)>>'] = ''
+	$cheatVars['fix_biset_<<ARGS[1]>>_desc_<<$mid(10000 + ARGS[2], 2)>>'] = ''
 	gs 'cheatmenu_bisets', 'cs_main', ARGS[1]
 end
 
 if $ARGS[0] = 'cs_set_default_desc_adv':
-	$cheatVars['fix_biset_<<ARGS[1]>>_desc_<<$mid(1000+ARGS[2], 2)>>'] = ''
+	$cheatVars['fix_biset_<<ARGS[1]>>_desc_<<$mid(10000 + ARGS[2], 2)>>'] = ''
 	gs 'cheatmenu_bisets', 'cs_main_advanced2', ARGS[1], ARGS[2]
 end
 
@@ -1349,7 +1349,7 @@ if $ARGS[0] = 'cs_delete_set2':
 	:del_bodimgset_bmi_loop
 		cmbs_stren = 0
 		:del_bodimgset_stren_loop
-			$cmbs_class_str = $mid(1000 + cmbs_bmi * 100 + cmbs_stren, 2)
+			$cmbs_class_str = $mid(10000 + cmbs_bmi * 100 + cmbs_stren, 2)
 			gs 'shortgs', 'remove_array_element', 'cheatVars', $cmbs_text + 'desc_<<$cmbs_class_str>>'
 			gs 'shortgs', 'remove_array_element', 'cheatVars', $cmbs_text + 'path_<<$cmbs_class_str>>'