Linux websever 5.15.0-153-generic #163-Ubuntu SMP Thu Aug 7 16:37:18 UTC 2025 x86_64
Apache/2.4.52 (Ubuntu)
: 192.168.3.70 | : 192.168.1.99
Cant Read [ /etc/named.conf ]
8.1.2-1ubuntu2.23
urlab
www.github.com/MadExploits
Terminal
AUTO ROOT
Adminer
Backdoor Destroyer
Linux Exploit
Lock Shell
Lock File
Create User
CREATE RDP
PHP Mailer
BACKCONNECT
UNLOCK SHELL
HASH IDENTIFIER
CPANEL RESET
CREATE WP USER
README
+ Create Folder
+ Create File
/
opt /
miniconda3 /
python /
lib /
tk8.6 /
ttk /
[ HOME SHELL ]
Name
Size
Permission
Action
altTheme.tcl
3.52
KB
-rw-rw-r--
aquaTheme.tcl
3.63
KB
-rw-rw-r--
button.tcl
2.86
KB
-rw-rw-r--
clamTheme.tcl
4.55
KB
-rw-rw-r--
classicTheme.tcl
3.66
KB
-rw-rw-r--
combobox.tcl
11.98
KB
-rw-rw-r--
cursors.tcl
4.36
KB
-rw-rw-r--
defaults.tcl
4.31
KB
-rw-rw-r--
entry.tcl
16.96
KB
-rw-rw-r--
fonts.tcl
5.36
KB
-rw-rw-r--
menubutton.tcl
6.03
KB
-rw-rw-r--
notebook.tcl
5.53
KB
-rw-rw-r--
panedwindow.tcl
2.13
KB
-rw-rw-r--
progress.tcl
1.06
KB
-rw-rw-r--
scale.tcl
2.63
KB
-rw-rw-r--
scrollbar.tcl
3.08
KB
-rw-rw-r--
sizegrip.tcl
2.34
KB
-rw-rw-r--
spinbox.tcl
4.7
KB
-rw-rw-r--
treeview.tcl
9.57
KB
-rw-rw-r--
ttk.tcl
4.7
KB
-rw-rw-r--
utils.tcl
8.09
KB
-rw-rw-r--
vistaTheme.tcl
9.26
KB
-rw-rw-r--
winTheme.tcl
2.72
KB
-rw-rw-r--
xpTheme.tcl
1.99
KB
-rw-rw-r--
Delete
Unzip
Zip
${this.title}
Close
Code Editor : scale.tcl
# scale.tcl - Copyright (C) 2004 Pat Thoyts <patthoyts@users.sourceforge.net> # # Bindings for the TScale widget namespace eval ttk::scale { variable State array set State { dragging 0 } } bind TScale <Button-1> { ttk::scale::Press %W %x %y } bind TScale <B1-Motion> { ttk::scale::Drag %W %x %y } bind TScale <ButtonRelease-1> { ttk::scale::Release %W %x %y } bind TScale <Button-2> { ttk::scale::Jump %W %x %y } bind TScale <B2-Motion> { ttk::scale::Drag %W %x %y } bind TScale <ButtonRelease-2> { ttk::scale::Release %W %x %y } bind TScale <Button-3> { ttk::scale::Jump %W %x %y } bind TScale <B3-Motion> { ttk::scale::Drag %W %x %y } bind TScale <ButtonRelease-3> { ttk::scale::Release %W %x %y } ## Keyboard navigation bindings: # bind TScale <<LineStart>> { %W set [%W cget -from] } bind TScale <<LineEnd>> { %W set [%W cget -to] } bind TScale <<PrevChar>> { ttk::scale::Increment %W -1 } bind TScale <<PrevLine>> { ttk::scale::Increment %W -1 } bind TScale <<NextChar>> { ttk::scale::Increment %W 1 } bind TScale <<NextLine>> { ttk::scale::Increment %W 1 } bind TScale <<PrevWord>> { ttk::scale::Increment %W -10 } bind TScale <<PrevPara>> { ttk::scale::Increment %W -10 } bind TScale <<NextWord>> { ttk::scale::Increment %W 10 } bind TScale <<NextPara>> { ttk::scale::Increment %W 10 } proc ttk::scale::Press {w x y} { variable State set State(dragging) 0 switch -glob -- [$w identify $x $y] { *track - *trough { set inc [expr {([$w get $x $y] <= [$w get]) ^ ([$w cget -from] > [$w cget -to]) ? -1 : 1}] ttk::Repeatedly Increment $w $inc } *slider { set State(dragging) 1 set State(initial) [$w get] } } } # scale::Jump -- Button-2/3 binding for scale acts like # Press except that clicking in the trough jumps to the # clicked position. proc ttk::scale::Jump {w x y} { variable State set State(dragging) 0 switch -glob -- [$w identify $x $y] { *track - *trough { $w set [$w get $x $y] set State(dragging) 1 set State(initial) [$w get] } *slider { Press $w $x $y } } } proc ttk::scale::Drag {w x y} { variable State if {$State(dragging)} { $w set [$w get $x $y] } } proc ttk::scale::Release {w x y} { variable State set State(dragging) 0 ttk::CancelRepeat } proc ttk::scale::Increment {w delta} { if {![winfo exists $w]} return if {([$w cget -from] > [$w cget -to])} { set delta [expr {-$delta}] } $w set [expr {[$w get] + $delta}] }
Close
