[openMSX-commits] SF.net SVN: openmsx:[11559] openmsx/trunk/share/scripts/reverse.tcl

[<va...@us...>]

Revision: 11559
          http://openmsx.svn.sourceforge.net/openmsx/?rev=11559&view=rev
Author:   vampier
Date:     2010-06-26 00:32:14 +0000 (Sat, 26 Jun 2010)

Log Message:
-----------
Updated the look of the 'reverse bar' using the OSD box widget. The bar now looks like the rest of the widgets. 

Modified Paths:
--------------
    openmsx/trunk/share/scripts/reverse.tcl

Modified: openmsx/trunk/share/scripts/reverse.tcl
===================================================================
--- openmsx/trunk/share/scripts/reverse.tcl	2010-06-25 21:58:45 UTC (rev 11558)
+++ openmsx/trunk/share/scripts/reverse.tcl	2010-06-26 00:32:14 UTC (rev 11559)
@@ -132,28 +132,26 @@
 		# Set time indicator position (depending on reverse bar position)
 		variable overlayOffset [expr ($led_y >16) ? 1.3 : -1.3]
 
+		# Reversebar
 		set fade [expr $visible ? 1.0 : 0.0]
-		osd create rectangle reverse \
-			-scaled true -x 35 -y $y -w 250 -h 6 \
-			-rgba 0x00000080 -fadeCurrent $fade -fadeTarget $fade
-		osd create rectangle reverse.top \
-			-x -1 -y   -1 -relw 1 -w 2 -h 1 -z 4 -rgba 0xFFFFFFC0
-		osd create rectangle reverse.bottom \
-			-x -1 -rely 1 -relw 1 -w 2 -h 1 -z 4 -rgba 0xFFFFFFC0
-		osd create rectangle reverse.left \
-			-x -1         -w 1 -relh 1      -z 4 -rgba 0xFFFFFFC0
-		osd create rectangle reverse.right \
-			-relx 1       -w 1 -relh 1      -z 4 -rgba 0xFFFFFFC0
+		osd_widgets::box reverse \
+			-scaled true -x 35 -y $y -w 250 -h 6 -z 4 \
+			-rgba 0xffffffff -fadeCurrent $fade -fadeTarget $fade \
+			-fill 0x000080d0 -border -0.5
 		osd create rectangle reverse.bar \
-			-relw 0 -relh 1                 -z 0 -rgba "0x0044aa80 0x2266dd80 0x0055cc80 0x44aaff80"
+			-relw 0 -relh 1	-z 0 -rgba "0x0044aa80 0x2266dd80 0x0055cc80 0x55eeff80"
 		osd create rectangle reverse.end \
-			-relx 0 -x -1 -w 2 -relh 1      -z 2 -rgba 0xFF8080C0
+			-relx 0 -x -1 -w 2 -relh 1      -z 2 -rgba 0xff8080c0
 		osd create text      reverse.text \
-			-x -10 -y 0 -relx 0.5 -size 5   -z 3 -rgba 0xFFFFFFC0
-		osd create rectangle reverse.mousetime \
-			-relx 0.5 -rely 1.1 -relh 1 -relw 0.10 -z 4 -rgba 0xffff00c0
-		osd create text      reverse.mousetime.text \
-			-relx 0.25 -size 5	-z 4 -rgba 0x000000ff
+			-x -10 -y 0 -relx 0.5 -size 5   -z 3 -rgba 0xffffffff	
+		
+		# on mouse over hover box 
+		osd_widgets::box reverse.mousetime \
+			-relx 0.5 -rely 1.1 -relh 1 -relw 0.10 -z 4 \
+			-fill "0xffdd55e8 0xddbb33e8 0xccaa22e8 0xffdd55e8" \
+			-border 0.5 -rgba 0xffff4480
+		osd create text reverse.mousetime.text \
+			-relx 0.25 -size 5	-z 4 -rgba 0x000000ff 
 
 		update_reversebar
 


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.