Other image for circle-spinny progress thing Options

[Strictly4me]

Other image for same thing you can find here!
(*.psd file included and some led-image with other colors: red, orange, lime)
Thanks to "rouge" for this idea and to "LL-Hell" for rewrote the code to be slightly more compact!

CODE

$puts(count_idx,$add($mod(%_time_elapsed_seconds%,20),1))
$puts(count_path,images\circ_count\count$get(count_idx).png)
$imageabs($sub(%_width%,102),3,$get(count_path),)

Maybe someone can change this code for real progressbar? Would be nice, because i couln't find!

((((( Strictly4me )))))

This post has been edited by Strictly4me: Sep 26 2006, 21:53

Attached File(s)

 progress.zip ( 165.1K ) Number of downloads: 206

 

[Strictly4me]

New one! Check out the code in post above.
(*.psd file included)



((((( Strictly4me )))))

This post has been edited by Strictly4me: Sep 26 2006, 21:53

Attached File(s)

 progress_glass.zip ( 105.93K ) Number of downloads: 197

 

[mazy]

Strictly4me, you could make the second one make move possibly per pixel - add one image with the full progress bar, the draw black rectangle from the right according to the progress and then put the glass layer with the ticks over it. i recond that divided progress bar like the original one looks stylish though

[Strictly4me]

Update!

Now both of progressbars act as real progressbar!
Please download image again from above!
Now in both cases the imagenames are from count0.png - count20.png. Before they was from count1.png - count21.png!

How to use:
Put image count0.png as your backgroundimage and check the path in following new code, by example:

CODE

$imageabs(6,154,image\progress\count0.png,)
$imageabs($sub(%_width%,402),$sub(%_height%,102),image\progress\count$muldiv($muldiv(100,%playback_time_seconds%,%length_seconds%),20,100).png,)

Try to find out, how to put backgroundimage (count0.png) behind all other one in your trackinfo_mod and enjoy!

((((( Strictly4me )))))

[Yotsuya]

With regard to your glass progress bar, would it not be much easier to use a $drawrect() function to make a pixel-accurate progress bar, then overlay a semi-transparent png on top? This would make the bar more accurate and eliminate the need for most of the images.

Also, you could probably chop the image into a single segment and then place that image repeatedly horizontally.

EDIT: I guess mazy sort of said the same thing already :)

EDIT: As for the blueball looking thing, you could reduce it to two images.. one for the blue ball and one for the white ball. Then use a $progress2() function to display them appropriately. This approach would allow you to use %_width% in the $progress2() and scale the image with your panel.

This post has been edited by Yotsuya: Sep 26 2006, 22:03

[kockroach]

Also, you could probably chop the image into a single segment and then place that image repeatedly horizontally.

Couldn't you reduce it to two images of the same size, and use a change in padding over time to shift the overlay image across the background image? Also, using the %_width% function would allow one to allow flexibility in panel width without having to change the code.

[Strictly4me]

@Yotsuya

If you find a better way to do that ... no problem ... you are free to modify something! Don't forget to post it after!

((((( Strictly4me )))))

[Yotsuya]

huhu that's what I get for being critical of someone else's work. I had limited success making the glass bar scalable:

CODE

// Progress Bar
$drawrect(10,10,$sub(%_width%,20),25,brushcolor-0-0-0 pencolor-null)
$ifgreater(%playback_time_seconds%,1,
$drawrect(10,10,$muldiv($muldiv(100,%playback_time_seconds%,%length_seconds%),$sub(%_width%,20),100),25,brushcolor-66-153-153 pencolor-null)
,)

// Gradient
$drawrect(10,10,$sub(%_width%,20),2,pencolor-233-233-233 alpha-150)
$drawrect(10,12,$sub(%_width%,20),2,pencolor-233-233-233 alpha-125)
$drawrect(10,14,$sub(%_width%,20),2,pencolor-233-233-233 alpha-100)
$drawrect(10,16,$sub(%_width%,20),2,pencolor-233-233-233 alpha-75)
$drawrect(10,18,$sub(%_width%,20),2,pencolor-233-233-233 alpha-50)
$drawrect(10,20,$sub(%_width%,20),2,pencolor-233-233-233 alpha-25)

$drawrect(10,28,$sub(%_width%,20),1,pencolor-0-0-0 alpha-25)
$drawrect(10,29,$sub(%_width%,20),1,pencolor-0-0-0 alpha-50)
$drawrect(10,30,$sub(%_width%,20),1,pencolor-0-0-0 alpha-75)
$drawrect(10,31,$sub(%_width%,20),1,pencolor-0-0-0 alpha-100)
$drawrect(10,32,$sub(%_width%,20),1,pencolor-0-0-0 alpha-125)
$drawrect(10,33,$sub(%_width%,20),1,pencolor-0-0-0 alpha-150)

// Frame Overlay
$imageabs(10,10,images\progress_glass\glass.segment.left.png,)
$imageabs(52,10,images\progress_glass\glass.segment.leftcenter.png,)
$imageabs($sub(%_width%,10,42),10,images\progress_glass\glass.segment.right.png,)

$imageabs($sub($div(%_width%,2),21),10,images\progress_glass\glass.segment.center.png,)
$imageabs($sub($div(%_width%,2),21,$mul(42,1)),10,images\progress_glass\glass.segment.center.png,)
$imageabs($sub($div(%_width%,2),21,$mul(42,2)),10,images\progress_glass\glass.segment.center.png,)
$imageabs($sub($div(%_width%,2),21,$mul(42,3)),10,images\progress_glass\glass.segment.center.png,)
$imageabs($sub($div(%_width%,2),21,$mul(42,4)),10,images\progress_glass\glass.segment.center.png,)
$imageabs($sub($div(%_width%,2),21,$mul(42,5)),10,images\progress_glass\glass.segment.center.png,)
$imageabs($sub($div(%_width%,2),21,$mul(42,6)),10,images\progress_glass\glass.segment.center.png,)
$imageabs($sub($div(%_width%,2),21,$mul(42,7)),10,images\progress_glass\glass.segment.center.png,)

$imageabs($add($div(%_width%,2),21,),10,images\progress_glass\glass.segment.center.png,)
$imageabs($add($div(%_width%,2),21,$mul(42,1)),10,images\progress_glass\glass.segment.center.png,)
$imageabs($add($div(%_width%,2),21,$mul(42,2)),10,images\progress_glass\glass.segment.center.png,)
$imageabs($add($div(%_width%,2),21,$mul(42,3)),10,images\progress_glass\glass.segment.center.png,)
$imageabs($add($div(%_width%,2),21,$mul(42,4)),10,images\progress_glass\glass.segment.center.png,)
$imageabs($add($div(%_width%,2),21,$mul(42,5)),10,images\progress_glass\glass.segment.center.png,)
$imageabs($add($div(%_width%,2),21,$mul(42,6)),10,images\progress_glass\glass.segment.center.png,)
$imageabs($add($div(%_width%,2),21,$mul(42,7)),10,images\progress_glass\glass.segment.center.png,)

Images used:


glass.segment.left,
glass.segment.leftcenter,
glass.segment.center,
glass.segment.right

The problem is with the gradient. I tried adding a semi-transparent gradient to the glass.segment images however that caused a problem when the overlapped at the end. I think the solution is to add a gradient image like glass.png (from stereo display) between the rectangles and the segment overlays however I dont know how to clip the image to fit because there is no $imageabs2() function for trackinfomod.

Kockroach had an interesting idea shifting the image of the progress bar however there is no way to clip the image at the beginning of the bar.

Anyway this is what I came up with quickly and it is incomplete. The blueball thing shoule be easy I'll go work on that.

EDIT: Updated. Simulated gradient using $drawrect() functions. I'm surprised I was able to pull this part off. The more I think about it, I think this entire progress bar can be done with $drawrect() and eliminate the png's completely.

This post has been edited by Yotsuya: Sep 27 2006, 00:37

[Yotsuya]

er... "easier said than done" .. is there any way to position an image reletively instead of absolutely?

[Yotsuya]

So I rewrote the glass progressbar completely using code, no images needed. I think I got pretty close, maybe someone else can tweak the gradient to make it closer:

CODE

// Progress Bar
$drawrect(10,10,$sub(%_width%,20),25,brushcolor-0-0-0 pencolor-null)
$ifgreater(%playback_time_seconds%,1,
$drawrect(10,10,$muldiv($muldiv(100,%playback_time_seconds%,%length_seconds%),$sub(%_width%,20),100),25,brushcolor-110-170-170 pencolor-null)
,)

// Gradient
$drawrect(10,10,$sub(%_width%,20),4,brushcolor-0-0-0)
$drawrect(10,13,$sub(%_width%,20),1,pencolor-0-0-0 alpha-255)
$drawrect(10,14,$sub(%_width%,20),1,pencolor-0-0-0 alpha-240)
$drawrect(10,15,$sub(%_width%,20),1,pencolor-0-0-0 alpha-225)
$drawrect(10,16,$sub(%_width%,20),1,pencolor-0-0-0 alpha-210)
$drawrect(10,17,$sub(%_width%,20),1,pencolor-0-0-0 alpha-195)
$drawrect(10,18,$sub(%_width%,20),1,pencolor-0-0-0 alpha-180)
$drawrect(10,19,$sub(%_width%,20),1,pencolor-0-0-0 alpha-165)
$drawrect(10,20,$sub(%_width%,20),1,pencolor-0-0-0 alpha-150)
$drawrect(10,21,$sub(%_width%,20),1,pencolor-0-0-0 alpha-135)
$drawrect(10,22,$sub(%_width%,20),1,pencolor-0-0-0 alpha-120)
$drawrect(10,23,$sub(%_width%,20),1,pencolor-0-0-0 alpha-105)
$drawrect(10,24,$sub(%_width%,20),1,pencolor-0-0-0 alpha-90)
$drawrect(10,25,$sub(%_width%,20),1,pencolor-0-0-0 alpha-75)
$drawrect(10,26,$sub(%_width%,20),1,pencolor-0-0-0 alpha-60)
$drawrect(10,27,$sub(%_width%,20),1,pencolor-0-0-0 alpha-45)
$drawrect(10,28,$sub(%_width%,20),1,pencolor-0-0-0 alpha-30)
$drawrect(10,29,$sub(%_width%,20),1,pencolor-0-0-0 alpha-15)
$drawrect(10,30,$sub(%_width%,20),1,pencolor-0-0-0 alpha-1)

$drawrect(10,10,$sub(%_width%,20),2,pencolor-233-233-233 alpha-210)
$drawrect(10,12,$sub(%_width%,20),2,pencolor-233-233-233 alpha-180)
$drawrect(10,14,$sub(%_width%,20),2,pencolor-233-233-233 alpha-150)
$drawrect(10,16,$sub(%_width%,20),2,pencolor-233-233-233 alpha-120)
$drawrect(10,18,$sub(%_width%,20),2,pencolor-233-233-233 alpha-90)
$drawrect(10,20,$sub(%_width%,20),2,pencolor-233-233-233 alpha-60)
$drawrect(10,22,$sub(%_width%,20),2,pencolor-233-233-233 alpha-30)

// Frame
$puts(divider.pos,12)
$drawrect($sub($get(divider.pos),1),12,1,22,pencolor-0-0-0)$drawrect($sub($get(divider.pos),1),12,1,15,pencolor-60-59-59)$drawrect($sub($get(divider.pos),1),12,1,6,pencolor-64-63-63)$drawrect($sub($get(divider.pos),1),12,1,5,pencolor-74-73-73)$drawrect($sub($get(divider.pos),1),12,1,4,pencolor-88-87-87)$drawrect($sub($get(divider.pos),1),12,1,3,pencolor-107-106-106)$drawrect($sub($get(divider.pos),1),12,1,2,pencolor-124-124-124)$drawrect($sub($get(divider.pos),1),12,1,1,pencolor-133-133-133)
$drawrect($get(divider.pos),12,1,22,pencolor-1-179-186)$drawrect($get(divider.pos),12,1,21,pencolor-2-191-199)$drawrect($get(divider.pos),12,1,20,pencolor-2-211-219)$drawrect($get(divider.pos),12,1,19,pencolor-2-228-237)$drawrect($get(divider.pos),12,1,18,pencolor-2-238-248)$drawrect($get(divider.pos),12,1,17,pencolor-124-249-254)
$drawrect($add($get(divider.pos),1),13,1,22,pencolor-0-0-0)$drawrect($add($get(divider.pos),1),13,1,14,pencolor-60-59-59)

$puts(divider.pos,$sub(%_width%,13))
$drawrect($sub($get(divider.pos),1),12,1,22,pencolor-0-0-0)$drawrect($sub($get(divider.pos),1),12,1,15,pencolor-60-59-59)$drawrect($sub($get(divider.pos),1),12,1,6,pencolor-64-63-63)$drawrect($sub($get(divider.pos),1),12,1,5,pencolor-74-73-73)$drawrect($sub($get(divider.pos),1),12,1,4,pencolor-88-87-87)$drawrect($sub($get(divider.pos),1),12,1,3,pencolor-107-106-106)$drawrect($sub($get(divider.pos),1),12,1,2,pencolor-124-124-124)$drawrect($sub($get(divider.pos),1),12,1,1,pencolor-133-133-133)
$drawrect($get(divider.pos),12,1,22,pencolor-1-179-186)$drawrect($get(divider.pos),12,1,21,pencolor-2-191-199)$drawrect($get(divider.pos),12,1,20,pencolor-2-211-219)$drawrect($get(divider.pos),12,1,19,pencolor-2-228-237)$drawrect($get(divider.pos),12,1,18,pencolor-2-238-248)$drawrect($get(divider.pos),12,1,17,pencolor-124-249-254)
$drawrect($add($get(divider.pos),1),13,1,22,pencolor-0-0-0)$drawrect($add($get(divider.pos),1),13,1,14,pencolor-60-59-59)

$drawrect(10,10,$sub(%_width%,20),25,brushcolor-null pencolor-174-174-174)
$drawrect(11,10,$sub(%_width%,22),25,brushcolor-null pencolor-0-0-0)
$drawrect(10,11,$sub(%_width%,20),23,brushcolor-null pencolor-0-0-0)

// Dividers
$puts(divider.pos,$muldiv(1,$sub(%_width%,10),10))
$drawrect($sub($get(divider.pos),1),12,1,22,pencolor-0-0-0)$drawrect($sub($get(divider.pos),1),12,1,15,pencolor-60-59-59)$drawrect($sub($get(divider.pos),1),12,1,6,pencolor-64-63-63)$drawrect($sub($get(divider.pos),1),12,1,5,pencolor-74-73-73)$drawrect($sub($get(divider.pos),1),12,1,4,pencolor-88-87-87)$drawrect($sub($get(divider.pos),1),12,1,3,pencolor-107-106-106)$drawrect($sub($get(divider.pos),1),12,1,2,pencolor-124-124-124)$drawrect($sub($get(divider.pos),1),12,1,1,pencolor-133-133-133)
$drawrect($get(divider.pos),12,1,22,pencolor-1-179-186)$drawrect($get(divider.pos),12,1,21,pencolor-2-191-199)$drawrect($get(divider.pos),12,1,20,pencolor-2-211-219)$drawrect($get(divider.pos),12,1,19,pencolor-2-228-237)$drawrect($get(divider.pos),12,1,18,pencolor-2-238-248)$drawrect($get(divider.pos),12,1,17,pencolor-124-249-254)
$drawrect($add($get(divider.pos),1),13,1,22,pencolor-0-0-0)$drawrect($add($get(divider.pos),1),13,1,14,pencolor-60-59-59)

$puts(divider.pos,$muldiv(2,$sub(%_width%,10),10))
$drawrect($sub($get(divider.pos),1),12,1,22,pencolor-0-0-0)$drawrect($sub($get(divider.pos),1),12,1,15,pencolor-60-59-59)$drawrect($sub($get(divider.pos),1),12,1,6,pencolor-64-63-63)$drawrect($sub($get(divider.pos),1),12,1,5,pencolor-74-73-73)$drawrect($sub($get(divider.pos),1),12,1,4,pencolor-88-87-87)$drawrect($sub($get(divider.pos),1),12,1,3,pencolor-107-106-106)$drawrect($sub($get(divider.pos),1),12,1,2,pencolor-124-124-124)$drawrect($sub($get(divider.pos),1),12,1,1,pencolor-133-133-133)
$drawrect($get(divider.pos),12,1,22,pencolor-1-179-186)$drawrect($get(divider.pos),12,1,21,pencolor-2-191-199)$drawrect($get(divider.pos),12,1,20,pencolor-2-211-219)$drawrect($get(divider.pos),12,1,19,pencolor-2-228-237)$drawrect($get(divider.pos),12,1,18,pencolor-2-238-248)$drawrect($get(divider.pos),12,1,17,pencolor-124-249-254)
$drawrect($add($get(divider.pos),1),13,1,22,pencolor-0-0-0)$drawrect($add($get(divider.pos),1),13,1,14,pencolor-60-59-59)

$puts(divider.pos,$muldiv(3,$sub(%_width%,10),10))
$drawrect($sub($get(divider.pos),1),12,1,22,pencolor-0-0-0)$drawrect($sub($get(divider.pos),1),12,1,15,pencolor-60-59-59)$drawrect($sub($get(divider.pos),1),12,1,6,pencolor-64-63-63)$drawrect($sub($get(divider.pos),1),12,1,5,pencolor-74-73-73)$drawrect($sub($get(divider.pos),1),12,1,4,pencolor-88-87-87)$drawrect($sub($get(divider.pos),1),12,1,3,pencolor-107-106-106)$drawrect($sub($get(divider.pos),1),12,1,2,pencolor-124-124-124)$drawrect($sub($get(divider.pos),1),12,1,1,pencolor-133-133-133)
$drawrect($get(divider.pos),12,1,22,pencolor-1-179-186)$drawrect($get(divider.pos),12,1,21,pencolor-2-191-199)$drawrect($get(divider.pos),12,1,20,pencolor-2-211-219)$drawrect($get(divider.pos),12,1,19,pencolor-2-228-237)$drawrect($get(divider.pos),12,1,18,pencolor-2-238-248)$drawrect($get(divider.pos),12,1,17,pencolor-124-249-254)
$drawrect($add($get(divider.pos),1),13,1,22,pencolor-0-0-0)$drawrect($add($get(divider.pos),1),13,1,14,pencolor-60-59-59)

$puts(divider.pos,$muldiv(4,$sub(%_width%,10),10))
$drawrect($sub($get(divider.pos),1),12,1,22,pencolor-0-0-0)$drawrect($sub($get(divider.pos),1),12,1,15,pencolor-60-59-59)$drawrect($sub($get(divider.pos),1),12,1,6,pencolor-64-63-63)$drawrect($sub($get(divider.pos),1),12,1,5,pencolor-74-73-73)$drawrect($sub($get(divider.pos),1),12,1,4,pencolor-88-87-87)$drawrect($sub($get(divider.pos),1),12,1,3,pencolor-107-106-106)$drawrect($sub($get(divider.pos),1),12,1,2,pencolor-124-124-124)$drawrect($sub($get(divider.pos),1),12,1,1,pencolor-133-133-133)
$drawrect($get(divider.pos),12,1,22,pencolor-1-179-186)$drawrect($get(divider.pos),12,1,21,pencolor-2-191-199)$drawrect($get(divider.pos),12,1,20,pencolor-2-211-219)$drawrect($get(divider.pos),12,1,19,pencolor-2-228-237)$drawrect($get(divider.pos),12,1,18,pencolor-2-238-248)$drawrect($get(divider.pos),12,1,17,pencolor-124-249-254)
$drawrect($add($get(divider.pos),1),13,1,22,pencolor-0-0-0)$drawrect($add($get(divider.pos),1),13,1,14,pencolor-60-59-59)

$puts(divider.pos,$muldiv(5,$sub(%_width%,10),10))
$drawrect($sub($get(divider.pos),1),12,1,22,pencolor-0-0-0)$drawrect($sub($get(divider.pos),1),12,1,15,pencolor-60-59-59)$drawrect($sub($get(divider.pos),1),12,1,6,pencolor-64-63-63)$drawrect($sub($get(divider.pos),1),12,1,5,pencolor-74-73-73)$drawrect($sub($get(divider.pos),1),12,1,4,pencolor-88-87-87)$drawrect($sub($get(divider.pos),1),12,1,3,pencolor-107-106-106)$drawrect($sub($get(divider.pos),1),12,1,2,pencolor-124-124-124)$drawrect($sub($get(divider.pos),1),12,1,1,pencolor-133-133-133)
$drawrect($get(divider.pos),12,1,22,pencolor-1-179-186)$drawrect($get(divider.pos),12,1,21,pencolor-2-191-199)$drawrect($get(divider.pos),12,1,20,pencolor-2-211-219)$drawrect($get(divider.pos),12,1,19,pencolor-2-228-237)$drawrect($get(divider.pos),12,1,18,pencolor-2-238-248)$drawrect($get(divider.pos),12,1,17,pencolor-124-249-254)
$drawrect($add($get(divider.pos),1),13,1,22,pencolor-0-0-0)$drawrect($add($get(divider.pos),1),13,1,14,pencolor-60-59-59)


$puts(divider.pos,$muldiv(6,$sub(%_width%,10),10))
$drawrect($sub($get(divider.pos),1),12,1,22,pencolor-0-0-0)$drawrect($sub($get(divider.pos),1),12,1,15,pencolor-60-59-59)$drawrect($sub($get(divider.pos),1),12,1,6,pencolor-64-63-63)$drawrect($sub($get(divider.pos),1),12,1,5,pencolor-74-73-73)$drawrect($sub($get(divider.pos),1),12,1,4,pencolor-88-87-87)$drawrect($sub($get(divider.pos),1),12,1,3,pencolor-107-106-106)$drawrect($sub($get(divider.pos),1),12,1,2,pencolor-124-124-124)$drawrect($sub($get(divider.pos),1),12,1,1,pencolor-133-133-133)
$drawrect($get(divider.pos),12,1,22,pencolor-1-179-186)$drawrect($get(divider.pos),12,1,21,pencolor-2-191-199)$drawrect($get(divider.pos),12,1,20,pencolor-2-211-219)$drawrect($get(divider.pos),12,1,19,pencolor-2-228-237)$drawrect($get(divider.pos),12,1,18,pencolor-2-238-248)$drawrect($get(divider.pos),12,1,17,pencolor-124-249-254)
$drawrect($add($get(divider.pos),1),13,1,22,pencolor-0-0-0)$drawrect($add($get(divider.pos),1),13,1,14,pencolor-60-59-59)

$puts(divider.pos,$muldiv(7,$sub(%_width%,10),10))
$drawrect($sub($get(divider.pos),1),12,1,22,pencolor-0-0-0)$drawrect($sub($get(divider.pos),1),12,1,15,pencolor-60-59-59)$drawrect($sub($get(divider.pos),1),12,1,6,pencolor-64-63-63)$drawrect($sub($get(divider.pos),1),12,1,5,pencolor-74-73-73)$drawrect($sub($get(divider.pos),1),12,1,4,pencolor-88-87-87)$drawrect($sub($get(divider.pos),1),12,1,3,pencolor-107-106-106)$drawrect($sub($get(divider.pos),1),12,1,2,pencolor-124-124-124)$drawrect($sub($get(divider.pos),1),12,1,1,pencolor-133-133-133)
$drawrect($get(divider.pos),12,1,22,pencolor-1-179-186)$drawrect($get(divider.pos),12,1,21,pencolor-2-191-199)$drawrect($get(divider.pos),12,1,20,pencolor-2-211-219)$drawrect($get(divider.pos),12,1,19,pencolor-2-228-237)$drawrect($get(divider.pos),12,1,18,pencolor-2-238-248)$drawrect($get(divider.pos),12,1,17,pencolor-124-249-254)
$drawrect($add($get(divider.pos),1),13,1,22,pencolor-0-0-0)$drawrect($add($get(divider.pos),1),13,1,14,pencolor-60-59-59)

$puts(divider.pos,$muldiv(8,$sub(%_width%,10),10))
$drawrect($sub($get(divider.pos),1),12,1,22,pencolor-0-0-0)$drawrect($sub($get(divider.pos),1),12,1,15,pencolor-60-59-59)$drawrect($sub($get(divider.pos),1),12,1,6,pencolor-64-63-63)$drawrect($sub($get(divider.pos),1),12,1,5,pencolor-74-73-73)$drawrect($sub($get(divider.pos),1),12,1,4,pencolor-88-87-87)$drawrect($sub($get(divider.pos),1),12,1,3,pencolor-107-106-106)$drawrect($sub($get(divider.pos),1),12,1,2,pencolor-124-124-124)$drawrect($sub($get(divider.pos),1),12,1,1,pencolor-133-133-133)
$drawrect($get(divider.pos),12,1,22,pencolor-1-179-186)$drawrect($get(divider.pos),12,1,21,pencolor-2-191-199)$drawrect($get(divider.pos),12,1,20,pencolor-2-211-219)$drawrect($get(divider.pos),12,1,19,pencolor-2-228-237)$drawrect($get(divider.pos),12,1,18,pencolor-2-238-248)$drawrect($get(divider.pos),12,1,17,pencolor-124-249-254)
$drawrect($add($get(divider.pos),1),13,1,22,pencolor-0-0-0)$drawrect($add($get(divider.pos),1),13,1,14,pencolor-60-59-59)

$puts(divider.pos,$muldiv(9,$sub(%_width%,10),10))
$drawrect($sub($get(divider.pos),1),12,1,22,pencolor-0-0-0)$drawrect($sub($get(divider.pos),1),12,1,15,pencolor-60-59-59)$drawrect($sub($get(divider.pos),1),12,1,6,pencolor-64-63-63)$drawrect($sub($get(divider.pos),1),12,1,5,pencolor-74-73-73)$drawrect($sub($get(divider.pos),1),12,1,4,pencolor-88-87-87)$drawrect($sub($get(divider.pos),1),12,1,3,pencolor-107-106-106)$drawrect($sub($get(divider.pos),1),12,1,2,pencolor-124-124-124)$drawrect($sub($get(divider.pos),1),12,1,1,pencolor-133-133-133)
$drawrect($get(divider.pos),12,1,22,pencolor-1-179-186)$drawrect($get(divider.pos),12,1,21,pencolor-2-191-199)$drawrect($get(divider.pos),12,1,20,pencolor-2-211-219)$drawrect($get(divider.pos),12,1,19,pencolor-2-228-237)$drawrect($get(divider.pos),12,1,18,pencolor-2-238-248)$drawrect($get(divider.pos),12,1,17,pencolor-124-249-254)
$drawrect($add($get(divider.pos),1),13,1,22,pencolor-0-0-0)$drawrect($add($get(divider.pos),1),13,1,14,pencolor-60-59-59)

[Strictly4me]

Not bad! Works fine here.

((((( Strictly4me )))))