Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- alias -l dcx { if ($isid) returnex $dll($mircdirdcx\dcx.dll,$1,$2-) | else dll " $+ $mircdirdcx\dcx.dll" $1 $2- }
- menu status,channel {
- access : xaccess
- }
- alias xaccess { dialog -m xaccess xaccess }
- dialog xaccess {
- title "Access Lister"
- size -1 -1 606 291
- }
- on *:dialog:xaccess:init:0:{
- dcx Mark $dname xaxi
- xdialog -b $dname +ty
- xdialog -c $dname 3 check 6 4 150 20 tabstop | xdid -t $dname 3 Auto Access Me
- xdialog -c $dname 6 comboex 170 4 100 300 dropdown tabstop
- xdid -a $dname 6 0 0 0 0 0 Owner
- xdid -a $dname 6 0 0 0 0 0 Host
- xdid -a $dname 6 0 0 0 0 0 HelpOp
- xdid -a $dname 6 0 0 0 0 0 Voice
- xdid -a $dname 6 0 0 0 0 0 Grant
- xdid -a $dname 6 0 0 0 0 0 Deny
- xdid -a $dname 6 0 0 0 0 0 Clear All
- xdialog -c $dname 7 button 338 5 100 20 tabstop | xdid -t $dname 7 Add Access Entry
- xdialog -c $dname 2 button 275 5 40 20 tabstop | xdid -t $dname 2 Clear
- xdialog -c $dname 5 button 445 4 75 20 tabstop | xdid -t $dname 5 Load
- xdialog -c $dname 4 button 525 4 75 20 tabstop | xdid -t $dname 4 Save
- xdialog -c $dname 1 listview 3 28 600 260 report singlesel fullrow nolabelwrap tooltip tabstop grid transparent showsel
- xdid -t $dname 1 +l 0 23 $null $chr(9) +l 0 100 User Name $chr(9) +l 0 150 Address $chr(9) +l 0 180 Reason $chr(9) +l 0 40 Time $chr(9) +l 0 100 Set By
- }
- alias xaxi { if (mouse isin $2) { halt } }
- alias -l udcx { if ($dcx(IsUnloadSafe)) $iif($menu, .timer 1 0) dll -u dcx.dll | else echo 4 -qmlbfti2 [DCX] Unable to Unload Dll. }
- alias -l xdid { if ( $isid ) returnex $dcx( _xdid, $1 $2 $prop $3- ) | dcx xdid $2 $3 $1 $4- }
- alias -l xdialog { if ( $isid ) returnex $dcx( _xdialog, $1 $prop $2- ) | dcx xdialog $2 $1 $3- }
- alias -l xpop { if ( $isid ) returnex $dcx( _xpop, $1 $prop $2- ) | dcx xpop $2 $1 $3- }
- alias -l xpopup { if ( $isid ) returnex $dcx( _xpopup, $1 $prop $2- ) | dcx xpopup $2 $1 $3- }
- alias -l mpopup { dcx mpopup $1 $2 }
- alias -l dcxml dcx dcxml $1-
- alias xpopup { if ( $isid ) returnex $dcx( _xpopup, $1 $prop $2- ) | dcx xpopup $2 $1 $3- }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement