View difference between Paste ID: rtJi5cD9 and FLgDQxxB

 ffmpegSource2("C:\Users\Seedmanc\Desktop\guiminer\avisynth\imas_question_pause.mkv")
 global samples = ImageReader("C:\Users\Seedmanc\Desktop\guiminer\avisynth\subhelp\names.png", end=framecount-1, fps=framerate, pixel_type="y8").converttoyv12.mt_edge
 #^ Path to the pic with names http://puu.sh/4bqOU.png
 
 #Settings:
 global workdir		="C:\Users\Seedmanc\Desktop\guiminer\avisynth\"
 # ^ Folder where frames will be written to
-global debug		= true	# Controls visual indication and writebuffer flushing. Without them script runs at ~600 fps.
+
 global stringtemplate	= "Dialogue: 0,0:00:00.00,0:00:01.00,Style,Actor,0000,0000,0000,,"
 global shift		= 0	# Shift of subtitle line placement in milliseconds, relative to time of detection. Both starting and ending times are affected
 global mult		= 1.0	# Multiplier of subtitle line duration relative to detected on-screen duration. You'll likely want to increase it.
 global debug		= true	# Controls visual indication and writebuffer flushing. Without them script runs at ~450 fps.
 global overwrite	= false	# Overwrites output file instead of appending to it. Useful while testing.
 global TBlowthr		= 185	# Detection lower threshold, separates textbox from darker background.
 # Raising will delay detection until textbox fully appears, but might fail to catch textboxes with lots of text.
 # Lower values might result in false positives on brighter backgrounds
 global TBhighthr	= 225	# Detection higher threshold, separates textbox from brighter flash-screens
 # Lower values ensure no false positives, but might delay detecting past the appearance of first few words on brighter backgrounds
 global QBthr		= 150	# Detection threshold for questionboxes, lower values - sooner happening and longer lasting detection at the cost of higher false positive chance (it's pretty low though).
 # Depends on the background, so having an idol in blue clothes on the left and another one in red on the right => more error chances.
 global minlength	= 1000	# Minimum duration of legit detection in milliseconds, used to filter out accidental false positives.
 #/Settings.
 
 function analyze(int cur_frame)
     {
         mode	= "add"
-	\		c.overlay(c.blankclip(width=tbw, height=tbh, color=$00FF00), x=tbx, y=tby, opacity=0.25, mode=mode)
+        method = "xor"
         namebox = "
-	\   "
+	\      global n =  (n>=nmax)?0:n+1
 	\      sample = samples.crop(0, n*nh, 0, nh)
 	\      dif =  rt_averageluma(mt_logic(narea, sample, method ).mt_deflate,n=cur_frame)
-        \    value = qarea.rt_averageluma(n=cur_frame)
+	\      global nfound = (dif<10)
-        \    global analyzed = (value>qbthr)
+	\	"
-        \    global yellow = (analyzed)?
+
-        \        (yarea.RT_AverageLuma(n=cur_frame)>qbthr)
+
-        \       :(yellow)
+
-        \    mark = c.blankclip(width=qw, height=qh, color=$00FF00)
+	\ 	(analyzed && !nfound)?
-        \    (analyzed && debug)?
+	\ 		eval(namebox)
-        \        c.overlay(mark, x=qxb, y=qyb, opacity=0.33, mode=mode).
+	\		:(nop)
-        \        overlay(mark, x=qxr, y=qyr, opacity=0.33, mode=mode).
+
-        \        overlay((yellow)?mark:c.crop(qxy, qyy, 4, 2), x=qxy, y=qyy, opacity=(yellow)?0.33:0, mode=mode)
+	\		c.overlay(c.blankclip(width=tbw, height=tbh, color=$00FF00), x=tbx, y=tby, opacity=0.25, mode=mode).
-        \       :c
+	\		overlay((nfound)?c.blankclip(width=nw*2, height=nh, color=$00FF00):c.crop(nx,ny,4,2), x=nx-6, y=ny, opacity=(nfound)?0.25:0, mode=mode)
-        \   "
+	\		:c
 	\	"
-        return eval(rt_txtgetline("eval(textbox)"+chr(10)+"eval(qbox)",n ))
+
         qbox = "
         \	value = qarea.rt_averageluma(n=cur_frame)
         \	global analyzed = (value>qbthr)
         \	global yellow = (analyzed)?
         \		(yarea.RT_AverageLuma(n=cur_frame)>qbthr)
         \		:(yellow)
         \	mark = c.blankclip(width=qw, height=qh, color=$00FF00)
         \	(analyzed && debug)?
         \		c.overlay(mark, x=qxb, y=qyb, opacity=0.33, mode=mode).
-        \       global startframe = cur_frame
+        \		overlay(mark, x=qxr, y=qyr, opacity=0.33, mode=mode).
         \		overlay((yellow)?mark:c.crop(qxy, qyy, 4, 2), x=qxy, y=qyy, opacity=(yellow)?0.33:0, mode=mode)
         \		:c
         \	"
 
         return eval(rt_txtgetline("eval(textbox)"+chr(10)+"eval(qbox)",m ))
-	\	global endframe	= cur_frame
+
 
 function detect(int cur_frame)
     {
         (analyzed)?
-	\	:eval("global n = (n>=nmax)?0:n+1")
+
         \       nop
         \      :eval("
 	\	global detected = true
 	\       global startframe = cur_frame
 	\       global qbthr = qbthr-15
 	\       ")
-        (accepted)?
+
-        \    c.writefile(filename, "prepareline(stringtemplate, startframe+shift, startframe+round(delta*mult)+shift)", append=true, flush=debug)
+
-        \   :nop
+
 	\	global endframe	= cur_frame-1
 	\	global startshow = startframe
 	\	global qbthr = qbthr+15
 	\	validate()
 	\	")
 	\	:eval("global m = (m>=mmax)?0:m+1")
-        result = (n==1)?
+
 
 function validate()
     {
         global delta = endframe-startframe
         global accepted = (delta>minlength)
         (accepted)?	eval("""
-        \  :result
+	\    c.writefile(filename, "prepareline(stringtemplate, startframe+shift, startframe+round(delta*mult)+shift)", append=true, flush=debug)
-
+	\    fname=rt_strreplace(frame2time(startframe+shift),":","-")
 	\    converttorgb24
 	\    imagewriter(file=workdir+fname+"%0.0f.jpg",type="jpg", info=debug)
 	\    converttoyv12""")
 	\   :nop
 
     }
 
 function prepareline(string s, int b, int e)
     {
         result = RT_StrReplace(s, "0:00:00.00", frame2time(b))
         result = RT_StrReplace(result, "0:00:01.00", frame2time(e))
         result = (m==1)?
         \   (RT_StrReplace(result, "Style", "QB_Blue")+chr(10)
         \    +(yellow?
         \        RT_StrReplace(result, "Style", "QB_Yellow")+chr(10)
         \       :"")
         \    +RT_StrReplace(result, "Style", "QB_Red")
         \   ).RT_StrReplace("Actor", "Q-Box")
         \  :(m==0)?
         \      (nfound)?
         \          rt_strreplace(result,"Actor",rt_txtgetline(names,n))
         \          :result
         \     :result
         global nfound=false
         global n = 0
         #these 2 lines must be inside of detect() after validate() call
         #but Avisynth is retarded so I have to put them here for script to work
         return result
     }
 
 function frame2time(int f)
     {
         rawtime	= f/framerate
         hours = rawtime/3600.0
-global n = 0		global nmax = 1
+
         seconds	= frac(minutes)*60.0
         time = string(floor(hours), "%1.0f")+":"+string(floor(minutes), "%02.0f")+":"+string(seconds, "%05.2f")
 
         return time
     }
 
 # Textbox description
 global tbX = 238	global tbY = 584
 global tbW = 840	global tbH = 90
 global tarea = crop(tbx, tby, tbw, tbh).coloryuv(autogain=true)
 # Namebox description
 global names = \
 "Chihaya
 Hibiki
 Producer"
 global nfound = false
 global n = 0
-    \   rt_subtitle(frame2time(startshow)+" > "+frame2time(endframe)+chr(13)+(accepted?"Accepted":"REJECTED"))
+global nmax = RT_TxtQueryLines(names)-1
 global nx = 244		global ny = 552
 global nw = 62		global nh = 32
 global narea = crop(nx, ny, nw, nh).mt_edge
- #assumefps(500)	# Set Debug to false to get ~500 fps without visual indications (when you finished tuning the script and ready to process your videos).
+
 global qw  = 308 	global qh  = 120
 global qxb = 200	global qyb = 322
 global qxr = 772	global qyr = qyb
 global qxy = 486	global qyy = 180
 bluebox = crop(qxb, qyb, qw, qh)
 bluemask = bluebox.maskhs(starthue=360-60, endhue=360-20, maxsat=76, minsat=5).converttoyv12.mt_inflate.mt_expand
 redbox = crop(qxr, qyr, qw, qh)
 redmask = redbox. maskhs(starthue=80, endhue=120, maxsat=76, minsat=5).converttoyv12.mt_inflate.mt_expand
 global qarea = mt_logic(bluemask, redmask, mode="min")
 yellowbox = crop(qxy, qyy, qw, qh)
 yellowmask = yellowbox.maskhs(starthue=130, endhue=160, maxsat=75, minsat=5).converttoyv12.mt_inflate.mt_expand
 global yarea = yellowmask
 global yellow = false
 
 # Common variables
 global m = 0		global mmax = 1
 global framerate  = last.framerate
 global shift	  = round(shift/1000.0*framerate)
 global minlength  = round(minlength/1000.0*framerate)
 global startframe = 0
 global startshow  = 0
 global endframe	  = 0
 global analyzed   = false
 global detected	  = false
 global accepted	  = true
 writefilestart(filename, "chr(13)", append=!(overwrite))
 global c 	  = last
 
 # main()
 scriptclip("""
     analyze(current_frame)
     detect(current_frame)
     (debug)?
     \   rt_subtitle(((nfound)?rt_txtgetline(names,n):"")+chr(13)+
     \       frame2time(startshow)+" > "+frame2time(endframe)+chr(13)+
     \       (accepted?"Accepted":"REJECTED"))
     \  :last
  """)
 
  #assumefps(450)	# Set Debug to false to get ~450 fps without visual indications (when you finished tuning the script and ready to process your videos).