24 lines
351 B
Plaintext
24 lines
351 B
Plaintext
WindowTitle {Run...}
|
|
WindowSize 512 64
|
|
|
|
Init
|
|
Begin
|
|
Set $ip = { } (GetOutput {echo `ifconfig | sed -ne '2s/.*inet addr:\([0-9]*\.[0-9]*\.[0-9]*\.[0-9]*\) .*/\1/p'`} 1 -1)
|
|
ChangeTitle 1 $ip
|
|
End
|
|
|
|
Widget 1
|
|
Property
|
|
Title {}
|
|
Size 496 24
|
|
Position 8 4
|
|
Flags NoReliefString
|
|
Type ItemDraw
|
|
Value 1
|
|
Main
|
|
Case message of
|
|
SingleClic :
|
|
Begin
|
|
End
|
|
End
|