[Solved] Is it possible to make a "Click Counter"?

[balala]

That's fairly basic. Using Shape meters for that should be better than using an image - that reduces dependencies for image files etc.

Right. This is definitely possible without using images. And as said, it's much better and simpler to do it so.
If no one posts a sample, later today I'm gonna post one.

[balala]

If no one posts a sample, later today I'm gonna post one.

Alright, finally here is the promised code:

Code: Select all

[Variables]
Width=300
Clicks=0

[StringStyle]
Padding=15,5,15,5
FontEffectColor=0,0,0
StringEffect=Shadow
SolidColor=0,0,0,1
FontFace=Segoe UI
StringAlign=CenterCenter
AntiAlias=1
DynamicVariables=1

[MeterButton]
Meter=Shape
X=2
Y=60
Shape=Rectangle 0,10,#Width#,50,10 | Extend MyModifiers1
Shape2=Rectangle 0,0,#Width#,50,10 | Extend MyModifiers2
MyModifiers1=Fill Color 26,113,193 | StrokeWidth 0 | Stroke Color 26,113,193,0
MyModifiers2=Fill Color 41,141,223 | StrokeWidth 0 | Stroke Color 41,141,223,0
LeftMouseDownAction=[!SetVariable Clicks "(#Clicks#+1)"][!SetOption MeterButton Shape2 "Rectangle 0,10,#Width#,50,10 | Extend MyModifiers2"][!SetOption MeterButtonLabel Y "([MeterButton:Y]+[MeterButton:H]/2+5)"][!UpdateMeter "MeterButton"][!UpdateMeter "MeterButtonLabel"][!UpdateMeter "MeterResult"][!Redraw]
LeftMouseUpAction=[!SetOption MeterButton Shape2 "Rectangle 0,0,#Width#,50,10 | Extend MyModifiers2"][!SetOption MeterButtonLabel Y "([MeterButton:Y]+[MeterButton:H]/2-5)"][!UpdateMeter "MeterButton"][!UpdateMeter "MeterButtonLabel"][!Redraw]
MouseLeaveAction=[!SetOption MeterButton Shape2 "Rectangle 0,0,#Width#,50,10 | Extend MyModifiers2"][!SetOption MeterButtonLabel Y "([MeterButton:Y]+[MeterButton:H]/2-5)"][!UpdateMeter "MeterButton"][!UpdateMeter "MeterButtonLabel"][!Redraw]
DynamicVariables=1

[MeterButtonLabel]
Meter=STRING
MeterStyle=StringStyle
X=([MeterButton:X]+#Width#/2)
Y=([MeterButton:Y]+[MeterButton:H]/2-5)
FontColor=220,220,220
FontSize=12
StringStyle=BOLD
Text=Start Clicking

[MeterResult]
Meter=STRING
MeterStyle=StringStyle
X=0r
Y=24
FontColor=220,220,220
FontSize=40
Text=#Clicks#

[MeterReset]
Meter=STRING
MeterStyle=StringStyle
X=0r
Y=140
FontColor=26,113,193
FontSize=12
StringStyle=BOLD
Text=Reset
LeftMouseUpAction=[!SetVariable Clicks "0"][!UpdateMeter "MeterButton"][!UpdateMeter "MeterResult"][!Redraw]

[CodeCode]

Alright, finally here is the promised code:

Code: Select all

[Variables]
Width=300
Clicks=0

[StringStyle]
Padding=15,5,15,5
FontEffectColor=0,0,0
StringEffect=Shadow
SolidColor=0,0,0,1
FontFace=Segoe UI
StringAlign=CenterCenter
AntiAlias=1
DynamicVariables=1

[MeterButton]
Meter=Shape
X=2
Y=60
Shape=Rectangle 0,10,#Width#,50,10 | Extend MyModifiers1
Shape2=Rectangle 0,0,#Width#,50,10 | Extend MyModifiers2
MyModifiers1=Fill Color 26,113,193 | StrokeWidth 0 | Stroke Color 26,113,193,0
MyModifiers2=Fill Color 41,141,223 | StrokeWidth 0 | Stroke Color 41,141,223,0
LeftMouseDownAction=[!SetVariable Clicks "(#Clicks#+1)"][!SetOption MeterButton Shape2 "Rectangle 0,10,#Width#,50,10 | Extend MyModifiers2"][!SetOption MeterButtonLabel Y "([MeterButton:Y]+[MeterButton:H]/2+5)"][!UpdateMeter "MeterButton"][!UpdateMeter "MeterButtonLabel"][!UpdateMeter "MeterResult"][!Redraw]
LeftMouseUpAction=[!SetOption MeterButton Shape2 "Rectangle 0,0,#Width#,50,10 | Extend MyModifiers2"][!SetOption MeterButtonLabel Y "([MeterButton:Y]+[MeterButton:H]/2-5)"][!UpdateMeter "MeterButton"][!UpdateMeter "MeterButtonLabel"][!Redraw]
MouseLeaveAction=[!SetOption MeterButton Shape2 "Rectangle 0,0,#Width#,50,10 | Extend MyModifiers2"][!SetOption MeterButtonLabel Y "([MeterButton:Y]+[MeterButton:H]/2-5)"][!UpdateMeter "MeterButton"][!UpdateMeter "MeterButtonLabel"][!Redraw]
DynamicVariables=1

[MeterButtonLabel]
Meter=STRING
MeterStyle=StringStyle
X=([MeterButton:X]+#Width#/2)
Y=([MeterButton:Y]+[MeterButton:H]/2-5)
FontColor=220,220,220
FontSize=12
StringStyle=BOLD
Text=Start Clicking

[MeterResult]
Meter=STRING
MeterStyle=StringStyle
X=0r
Y=24
FontColor=220,220,220
FontSize=40
Text=#Clicks#

[MeterReset]
Meter=STRING
MeterStyle=StringStyle
X=0r
Y=140
FontColor=26,113,193
FontSize=12
StringStyle=BOLD
Text=Reset
LeftMouseUpAction=[!SetVariable Clicks "0"][!UpdateMeter "MeterButton"][!UpdateMeter "MeterResult"][!Redraw]

that lookss perfect! Niiice.

[balala]

that lookss perfect! Niiice.

I'm glad if you think so.

[chandkumar3g]

hello,

Thank you so much for sharing this helpful information, it helped me alot

Thanks and regards.

[glass-houses]

Hello, I am really grateful for this thread and to those who have replied. I would just like to ask if there is a way to retain the counter information regardless of refreshing or updating the skins? I sadly have little knowledge in coding and there's limited information I can find online on how to do this. I would very much appreciate your responses.

[balala]

Hello, I am really grateful for this thread and to those who have replied. I would just like to ask if there is a way to retain the counter information regardless of refreshing or updating the skins? I sadly have little knowledge in coding and there's limited information I can find online on how to do this. I would very much appreciate your responses.

For this you have to write the current value of the Clicks variable to the [Variables] section. Just add a [!WriteKeyValue Variables Clicks "(#Clicks#+1)"] bang beside [!SetVariable Clicks "(#Clicks#+1)"], in the LeftMouseDownAction option of the [MeterButton] meter into my previously posted code.

[glass-houses]

For this you have to write the current value of the Clicks variable to the [Variables] section. Just add a [!WriteKeyValue Variables Clicks "(#Clicks#+1)"] bang beside [!SetVariable Clicks "(#Clicks#+1)"], in the LeftMouseDownAction option of the [MeterButton] meter into my previously posted code.

I see, thank you very much for the help!

[balala]

I see, thank you very much for the help!

You're welcome. Did it help?