Linux premium180.web-hosting.com 4.18.0-553.54.1.lve.el8.x86_64 #1 SMP Wed Jun 4 13:01:13 UTC 2025 x86_64
LiteSpeed
: 162.0.209.168 | : 216.73.216.187
Cant Read [ /etc/named.conf ]
8.3.30
nortrmdp
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
BLACK DEFEND!
README
+ Create Folder
+ Create File
/
lib64 /
tcl8.6 /
Tix8.4.3 /
[ HOME SHELL ]
Name
Size
Permission
Action
bitmaps
[ DIR ]
drwxr-xr-x
html
[ DIR ]
drwxr-xr-x
pref
[ DIR ]
drwxr-xr-x
Balloon.tcl
12.97
KB
-rw-r--r--
BtnBox.tcl
2.61
KB
-rw-r--r--
CObjView.tcl
7.56
KB
-rw-r--r--
ChkList.tcl
4.97
KB
-rw-r--r--
ComboBox.tcl
35.42
KB
-rw-r--r--
Compat.tcl
870
B
-rw-r--r--
Console.tcl
14.95
KB
-rw-r--r--
Control.tcl
12.11
KB
-rw-r--r--
DefSchm.tcl
2.94
KB
-rw-r--r--
DialogS.tcl
4.2
KB
-rw-r--r--
DirBox.tcl
5.3
KB
-rw-r--r--
DirDlg.tcl
2.15
KB
-rw-r--r--
DirList.tcl
6.9
KB
-rw-r--r--
DirTree.tcl
8.76
KB
-rw-r--r--
DragDrop.tcl
3.93
KB
-rw-r--r--
DtlList.tcl
1002
B
-rw-r--r--
EFileBox.tcl
11.12
KB
-rw-r--r--
EFileDlg.tcl
1.68
KB
-rw-r--r--
Event.tcl
5.11
KB
-rw-r--r--
FileBox.tcl
14
KB
-rw-r--r--
FileCbx.tcl
2.42
KB
-rw-r--r--
FileDlg.tcl
2.13
KB
-rw-r--r--
FileEnt.tcl
7.15
KB
-rw-r--r--
FloatEnt.tcl
3.1
KB
-rw-r--r--
Grid.tcl
21.16
KB
-rw-r--r--
HList.tcl
17.72
KB
-rw-r--r--
HListDD.tcl
4.39
KB
-rw-r--r--
IconView.tcl
5.97
KB
-rw-r--r--
Init.tcl
6.05
KB
-rw-r--r--
LabEntry.tcl
2.09
KB
-rw-r--r--
LabFrame.tcl
1.15
KB
-rw-r--r--
LabWidg.tcl
3.86
KB
-rw-r--r--
ListNBk.tcl
3.5
KB
-rw-r--r--
Meter.tcl
3.04
KB
-rw-r--r--
MultView.tcl
3.62
KB
-rw-r--r--
NoteBook.tcl
6.02
KB
-rw-r--r--
OldUtil.tcl
2.98
KB
-rw-r--r--
OptMenu.tcl
9.17
KB
-rw-r--r--
PanedWin.tcl
27.68
KB
-rw-r--r--
PopMenu.tcl
5.37
KB
-rw-r--r--
Primitiv.tcl
10.28
KB
-rw-r--r--
README.txt
987
B
-rw-r--r--
ResizeH.tcl
12.94
KB
-rw-r--r--
SGrid.tcl
5.8
KB
-rw-r--r--
SHList.tcl
3.7
KB
-rw-r--r--
SListBox.tcl
6.97
KB
-rw-r--r--
STList.tcl
2.37
KB
-rw-r--r--
SText.tcl
3.09
KB
-rw-r--r--
SWidget.tcl
9.52
KB
-rw-r--r--
SWindow.tcl
6.75
KB
-rw-r--r--
Select.tcl
7.04
KB
-rw-r--r--
Shell.tcl
1.06
KB
-rw-r--r--
SimpDlg.tcl
1.13
KB
-rw-r--r--
StackWin.tcl
1.95
KB
-rw-r--r--
StatBar.tcl
1.31
KB
-rw-r--r--
StdBBox.tcl
1.62
KB
-rw-r--r--
StdShell.tcl
1.15
KB
-rw-r--r--
TList.tcl
17.59
KB
-rw-r--r--
Tix.tcl
9.51
KB
-rw-r--r--
Tree.tcl
4.57
KB
-rw-r--r--
Utils.tcl
10.54
KB
-rw-r--r--
VResize.tcl
4.95
KB
-rw-r--r--
VStack.tcl
9.42
KB
-rw-r--r--
VTree.tcl
4.31
KB
-rw-r--r--
Variable.tcl
2.5
KB
-rw-r--r--
WInfo.tcl
965
B
-rw-r--r--
fs.tcl
3.9
KB
-rw-r--r--
libTix.so
341.3
KB
-rwxr-xr-x
license.terms
2.76
KB
-rw-r--r--
pkgIndex.tcl
122
B
-rw-r--r--
Delete
Unzip
Zip
${this.title}
Close
Code Editor : Meter.tcl
# -*- mode: TCL; fill-column: 75; tab-width: 8; coding: iso-latin-1-unix -*- # # $Id: Meter.tcl,v 1.3 2001/12/09 05:04:02 idiscovery Exp $ # # Meter.tcl -- # # Implements the tixMeter widget # # Copyright (c) 1993-1999 Ioi Kim Lam. # Copyright (c) 2000-2001 Tix Project Group. # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. # tixWidgetClass tixMeter { -classname TixMeter -superclass tixPrimitive -method { } -flag { -foreground -text -value } -configspec { {-fillcolor fillColor FillColor #8080ff} {-foreground foreground Foreground black} {-text text Text ""} {-value value Value 0} } -default { {.relief sunken} {.borderWidth 2} {.width 150} } } proc tixMeter:InitWidgetRec {w} { upvar #0 $w data global env tixChainMethod $w InitWidgetRec } #---------------------------------------------------------------------- # Construct widget #---------------------------------------------------------------------- proc tixMeter:ConstructWidget {w} { upvar #0 $w data tixChainMethod $w ConstructWidget set data(w:canvas) [canvas $w.canvas] pack $data(w:canvas) -expand yes -fill both tixMeter:Update $w } proc tixMeter:SetBindings {w} { upvar #0 $w data tixChainMethod $w SetBindings } proc tixMeter:Update {w} { upvar #0 $w data # set the width of the canvas set W [expr $data(-width)-\ ([$data(w:root) cget -bd]+[$data(w:root) cget -highlightthickness]*2)] $data(w:canvas) config -width $W if {$data(-text) == ""} { set text [format "%d%%" [expr int($data(-value)*100)]] } else { set text $data(-text) } # (Create/Modify) the text item. # if {![info exists data(text)]} { set data(text) [$data(w:canvas) create text 0 0 -text $text] } else { $data(w:canvas) itemconfig $data(text) -text $text } set bbox [$data(w:canvas) bbox $data(text)] set itemW [expr [lindex $bbox 2]-[lindex $bbox 0]] set itemH [expr [lindex $bbox 3]-[lindex $bbox 1]] $data(w:canvas) coord $data(text) [expr $W/2] [expr $itemH/2+4] set H [expr $itemH + 4] $data(w:canvas) config -height [expr $H] set rectW [expr int($W*$data(-value))] if {![info exists data(rect)]} { set data(rect) [$data(w:canvas) create rectangle 0 0 $rectW 1000] } else { $data(w:canvas) coord $data(rect) 0 0 $rectW 1000 } $data(w:canvas) itemconfig $data(rect) \ -fill $data(-fillcolor) -outline $data(-fillcolor) $data(w:canvas) raise $data(text) } #---------------------------------------------------------------------- # Configuration #---------------------------------------------------------------------- proc tixMeter:config-value {w value} { upvar #0 $w data set data(-value) $value tixMeter:Update $w } proc tixMeter:config-text {w value} { upvar #0 $w data set data(-text) $value tixMeter:Update $w } proc tixMeter:config-fillcolor {w value} { upvar #0 $w data set data(-fillcolor) $value tixMeter:Update $w }
Close
