浏览代码

Update Menu.Call

KevinSmarts 9 年之前
父节点
当前提交
99b16a1ea2
共有 1 个文件被更改,包括 21 次插入38 次删除
  1. 21 38
      locations/Menu.Call

+ 21 - 38
locations/Menu.Call

@@ -1,74 +1,57 @@
 # Menu.Call
-if $ARGS[0] = '':EXIT
-!!----------
+if $ARGS[0] = '': exit
+!----------
 ARGS[10] = arrsize('otg_Menyu_<<$ARGS[0]>>')
-if ARGS[10] = 0:EXIT
-!!----------
+if ARGS[10] = 0: exit
+!----------
 $otg_Menu_Current = 'otg_Menyu_<<$ARGS[0]>>'
-
 killvar 'otg_Menyu_Vyzyvaemoe'
 killvar 'otg_Menu_Compliance'
-!!----------
-
+!----------
 ARGS[11] = 0
-
 :otg_menyu_metka_2
 if ARGS[11] < ARGS[10]:
 	dynamic "
-
-		$ARGS[0] = $<<$otg_Menu_Current>>_parameters['<<ARGS[11]+1>>y']
+		$ARGS[0] = $<<$otg_Menu_Current>>_Parameters['<<ARGS[11]+1>>_In']
 		if $ARGS[0] = '':
 			$otg_Menyu_Vyzyvaemoe[] = $<<$otg_Menu_Current>>[<<ARGS[11]>>]
-
 			otg_Menu_Compliance[] = <<ARGS[11]+1>>
 		else
-			if dyneval($ARGS[0]) <> 0:
-
+			if dyneval($ARGS[0])<>0:
 				$otg_Menyu_Vyzyvaemoe[] = $<<$otg_Menu_Current>>[<<ARGS[11]>>]
-
 				otg_Menu_Compliance[] = <<ARGS[11]+1>>
 			end
 		end
 	"
-
 	ARGS[11] += 1
-
-	!!----------
+	!----------
 	jump 'otg_menyu_metka_2'
 end
-!!----------
-
+!----------
 otg_Menu_Time = 0
 dynamic "
-	<<$otg_Menu_Current>>_selected = 0
+	<<$otg_Menu_Current>>_Selected = 0
 	<<$otg_Menu_Current>>_VybrannyyPunkt = 0
-	<<$otg_Menu_Current>>_time = MSECSCOUNT
-
+	<<$otg_Menu_Current>>_Time = MSECSCOUNT
 "
-!!----------
+!----------
 menu 'otg_Menyu_Vyzyvaemoe'
-!!----------
+!----------
 dynamic "
-
-	if <<$otg_Menu_Current>>_selected = 0:
-		<<$otg_Menu_Current>>_time = MSECSCOUNT-<<$otg_Menu_Current>>_time
+	if <<$otg_Menu_Current>>_Selected = 0:
+		<<$otg_Menu_Current>>_Time = MSECSCOUNT-<<$otg_Menu_Current>>_Time
 		$ARGS[0] = $<<$otg_Menu_Current>>_ModuliSobyty['failure of the choice']
-
-		if $ARGS[0]<>'':dynamic $ARGS[0]
+		if $ARGS[0]<>'': dynamic $ARGS[0]
 	else
-
-		$ARGS[0] = $<<$otg_Menu_Current>>_ModuliSobyty['selecting processing after']
-		if $ARGS[0]<>'':dynamic $ARGS[0], $<<$otg_Menu_Current>>_parameters[str(<<$otg_Menu_Current>>_ВыбранныйПункт)+'_Z']"+dyneval("$Result = $<<$otg_Menu_Current>>_parameters[str(<<$otg_Menu_Current>>_ВыбранныйПункт)+'_P']")+"
-
+		$ARGS[0] = $<<$otg_Menu_Current>>_ModuliSobyty['after selection processing']
+		if $ARGS[0]<>'': dynamic $ARGS[0],$<<$otg_Menu_Current>>_Parameters[str(<<$otg_Menu_Current>>_VybrannyyPunkt)+'_W']"+dyneval("$Result = $<<$otg_Menu_Current>>_Parameters[str(<<$otg_Menu_Current>>_VybrannyyPunkt)+'_P']")+"
 	end
 "
-!!----------
+!----------
 killvar 'otg_Menyu_Tekuschee'
 killvar 'otg_Menyu_Vyzyvaemoe'
 killvar 'otg_Menu_Compliance'
-!!----------
-
-Result = dyneval("Result = otg_Menyu_<<$ARGS[0]>>_selected")
-
+!----------
+Result = dyneval("Result = otg_Menyu_<<$ARGS[0]>>_Selected")
 --- Menu.Call ---------------------------------