Commentçamarche.net
CodeS-SourceS
Rechercher un code, un tuto, une réponse

Dcx xpopups

0/5 (1 avis)

Vue 1 313 fois - Téléchargée 250 fois

Description

PLUG-IN for mIRC 7

Attributes:
Popups mIRC color, image background, icons, trasparency, personalized manner using the DCX library.DLL

Installation
Extract the folder,----> dlls in the root of mirc (warning: do not operate if installed in the sub directory) es. c:\mIRC\
Once extracted or copied to the folder "dlls" in mIRC, invoke the editbox mirc the load plug-in
using this string:

/load -rs VxD\reset.mrc

Run the command message confirmation that loading will be displayed.

To open the engine use the xPoPuPs link in the Menubar of mIRC.

Compatibility:
This addon is designed for mIRC 7 for so does not ensure the functioning in previous versions.

http://vxd.mobi/dcx-xpopups.html

Source / Exemple :


 ;===========================================================================================================================; ; menu | VxÐ ~ [http://vxd.altervista.org/VxD.htm] ~ caronte.ade@gmail.com | mIRC ?  VxÐ $¢®iþ? ?                             ; ;===========================================================================================================================; menu menubar,status,channel {   1 $chr(11) $+ 0,4POPUPS   .Colors   ..Background Color: { .set %background $dll(VxD\color.dll,Color,.) | .timer 2 0 xpopup_menu }   ..-   ..Icon Box: { .set %iconbox $dll(VxD\color.dll,Color,.) | .timer 2 0 xpopup_menu }   ..-   ..Check Box: { .set %checkbox $dll(VxD\color.dll,Color,.) | .timer 2 0 xpopup_menu }   ..-   ..Disable check Box: { .set %disablecheckbox $dll(VxD\color.dll,Color,.) | .timer 2 0 xpopup_menu }   ..-   ..Disabled Selected: { .set %disabledselected $dll(VxD\color.dll,Color,.) | .timer 2 0 xpopup_menu }   ..-   ..Disabled Text: { .set %disabledtext $dll(VxD\color.dll,Color,.) | .timer 2 0 xpopup_menu }   ..-   ..Highlighted Text: { .set %selecttext $dll(VxD\color.dll,Color,.) | .timer 2 0 xpopup_menu }   ..-   ..Selected Box: { .set %selectbox $dll(VxD\color.dll,Color,.) | .timer 2 0 xpopup_menu }   ..-   ..----Separator----:{ .set %separator $dll(VxD\color.dll,Color,.) | .timer 2 0 xpopup_menu }   ..-   ..Menu Text: { .set %menustext $dll(VxD\color.dll,Color,.) | .timer 2 0 xpopup_menu }   ..-   ..Selected Text: { .set %selectedtext $dll(VxD\color.dll,Color,.) | .timer 2 0 xpopup_menu }   .-   .Effect Icons   .. $iif((%linex == +p),$style(1)) Icon 3D: { .set %linex +p | .timer 2 0 xpopup_menu }   .. $iif((%linex == +i),$style(1)) Icon Shadow:  { .set %linex +i | .timer 2 0 xpopup_menu }   .-   .Frame border style    .. $iif((%round == 1),$style(1)) Enable Round Border: { .set %round 1 | .timer 2 0 xpopup_menu }   .. $iif((%round == 0),$style(1)) Linear Frame Border: { .set %round 0 | .timer 2 0 xpopup_menu }   .-   .Menù Style    .. $iif((%stile == office2003),$style(1)) Office2003: { .set %stile office2003 | .timer 2 0 xpopup_menu }   .. $iif((%stile == office2003rev),$style(1)) Office2003rev: { .set %stile office2003rev | .timer 2 0 xpopup_menu }   .. $iif((%stile == officexp),$style(1)) Office xP: { .set %stile officexp | .timer 2 0 xpopup_menu }   .. $iif((%stile == icy),$style(1)) ICY: { .set %stile icy | .timer 2 0 xpopup_menu }   .. $iif((%stile == icyrev),$style(1)) ICYrev: { .set %stile icyrev | .timer 2 0 xpopup_menu }   .. $iif((%stile == grade),$style(1)) Grade: { .set %stile grade | .timer 2 0 xpopup_menu }   .. $iif((%stile == graderev),$style(1)) Graderev: { .set %stile graderev | .timer 2 0 xpopup_menu }   .. $iif((%stile == normal),$style(1)) Normal: { .set %stile normal | .timer 2 0 xpopup_menu }   .. $iif((%stile == vertical),$style(1)) Vertical: { .set %stile vertical | .timer 2 0 xpopup_menu }   .. $iif((%stile == verticalrev),$style(1)) Verticalrev: { .set %stile verticalrev | .timer 2 0 xpopup_menu }   ..-   .. $iif((%stile == custom),$style(1)) Custom image background: { .set %stile custom |  .set %cust $sfile(*.bmp,Choose an image format .bmp,Ok) | xpopup -b xpopup_menu %cust | .timer 2 0 xpopup_menu }   .-   .$iif((%chiarox != 250),$style(1))  Transparency   ..$iif((%chiarox == 250),$style(1)) 0% : { .set %chiarox 250 | .timer 2 0 xpopup_menu }   ..-   ..$iif((%chiarox == 230),$style(1)) 25% : { .set %chiarox 230 | .timer 2 0 xpopup_menu }   ..-   ..$iif((%chiarox == 200),$style(1)) 50% : { .set %chiarox 200 | .timer 2 0 xpopup_menu }   ..-   ..$iif((%chiarox == 150),$style(1)) 75%  : { .set %chiarox 150 | .timer 2 0 xpopup_menu }   ..-   ..$iif((%chiarox == 100),$style(1)) 100% : { .set %chiarox 100 | .timer 2 0 xpopup_menu }   ..-   ..$iif((%chiarox != 100) && (%chiarox != 150) && (%chiarox != 200) && (%chiarox != 230) && (%chiarox != 250) ,$style(1)) Custom : { .set %chiarox $$?="enter a numeric value between 0 to 255 ( eg. 0 <- maximum transparency ) and ( eg. 255 <- transparency absent )" | .timer 2 0 xpopup_menu }   .-   ..????   .. 0,3EDIT ICON LIST : { .run VxD\ico\icon_list.txt }   ..-   .. 0,6README : { .run VxD\README.txt }   ..-   ..0,7REFRESH xPOPUPS: { .timer 1 0 vxd }   ..-   .. 0,12RESET: { .load -rs VxD\reset.mrc }   ..-   .. $iif(($me == $null),$style(2)) ? ? ? ? ???? ? ? ? ? : { if ($status = connected) /msg $chan($active) ---> click on 8,15? 4??Ð 0,1? 7,1 [http://vxd.altervista.org/VxD.htm] 4,1? 0,1?15,1?4,1?8?4,1?5,1?0,1?4,1?0,1?15,1?4,1? 0,1 ? 0,1 ? 4$8¢14®4i5þ4? }   ..0,4UNLOAD  : { editbox -ap /exit -nr | scarica }   .-   - } ;===========================================================================================================================; ; xMenu Ver.3 Rev. C | VxÐ ~ [http://vxd.altervista.org/VxD.htm] | ?NeCRoNoMiCoN? ?  $¢®iþ? | caronte.ade@gmail.com           ;                                                          ;===========================================================================================================================; alias -l shell alias shell returnex shell32.dll alias xpopup_menu {   var %menu xpopup_menu    if ($xpopup(%menu).ismenu) { xpopup -d %menu }    if ( $xpopup(%menu).ismenu == $false ) {     if (%stile == custom) {       mpopup mirc 1       mpopup mircbar 1       xpopup -c %menu %stile       xpopup -t mirc %stile       xpopup -t mircbar %stile       xpopup -x %menu %linex       xpopup -R %menu +r %round       xpopup -R mircbar +a %chiarox       xpopup -R mirc +a %chiarox       xpopup -i mirc 0 $shell       xpopup -i mircbar 0 $shell       xpopupstyle mirc       xpopupstyle mircbar       xpopupstyle2 mirc       xpopupstyle2 mircbar       xpopup -sm %menu + $mouse.dx $mouse.dy       mtest        mtest2      }     if (%stile != custom) {       mpopup mirc 1       mpopup mircbar 1       xpopup -c %menu %stile       xpopup -t mirc %stile       xpopup -t mircbar %stile       xpopup -x %menu %linex       xpopup -R %menu +r %round       xpopup -R mircbar +a %chiarox       xpopup -R mirc +a %chiarox       if ($isalias(shell)) xpopup -i mirc 0 $shell       if ($isalias(shell)) xpopup -i mircbar 0 $shell       xpopupstyle mirc       xpopupstyle mircbar       xpopupstyle2 mirc       xpopupstyle2 mircbar       xpopup -sm %menu + $mouse.dx $mouse.dy     }   } } alias xpopupstyle {    var %popups = $1   if (%popups ) {      xpopup -l %popups 1 %background     xpopup -l %popups 2 %iconbox     xpopup -l %popups 3 %checkbox     xpopup -l %popups 4 %disablecheckbox     xpopup -l %popups 5 %disabledselected     xpopup -l %popups 6 %disabledtext     xpopup -l %popups 7 %selecttext     xpopup -l %popups 8 %selectbox     xpopup -l %popups 9 %separator     xpopup -l %popups 10 %menustext     xpopup -l %popups 11 %selectedtext      xpopup -R %popups +r %round     xpopup -x %popups %linex   }   else return } alias mtest {   if (%stile == custom) {     if ($isalias(shell)) xpopup -i mirc 0 $shell     mpopup mirc 1     xpopup -t mirc custom     xpopup -b mirc $shortfn(%cust)     xpopupstyle mirc     xpopupstyle2 mirc   } } alias mtest2 {   if (%stile == custom) {     if ($isalias(shell)) xpopup -i mircbar 0 $shell     mpopup mircbar 1     xpopup -t mircbar custom     xpopup -b mircbar $shortfn(%cust)     xpopupstyle mircbar      xpopupstyle2 mircbar    } } on *:load:{   if (%stile == custom) {      /mtest     /mtest2   }   if (%stile != custom) {     xpopup -d xpopup_menu     if ($isalias(shell)) xpopup -i mirc 0 $shell     if ($isalias(shell)) xpopup -i mircbar 0 $shell     xpopup -t mirc %stile     xpopup -t mircbar %stile     xpopupstyle mirc     xpopupstyle mircbar     xpopupstyle2 mirc     xpopupstyle2 mircbar   } } on *:start:{    if (%stile == custom) {      /mtest     /mtest2   }   if (%stile != custom) {     xpopup_menu     if ($isalias(shell)) xpopup -i mirc 0 $shell     if ($isalias(shell)) xpopup -i mircbar 0 $shell     xpopup -t mirc %stile     xpopup -t mircbar %stile     xpopupstyle mirc     xpopupstyle mircbar     xpopupstyle2 mirc     xpopupstyle2 mircbar   } } alias vxd { .timer 1 0 udcx | .timer 2 0 xpopup_menu | .timer 3 0 if (%treex == ON ) /dcxtreebar } ;===========================================================================================================================; ; Icon List alias | VxÐ ~ [http://vxd.altervista.org/VxD.htm] ~ caronte.ade@gmail.com | mIRC ?  VxÐ $¢®iþ? ?                  ; ;===========================================================================================================================; alias xpopupstyle2 {    var %popups = $1   if (%popups ) {      xpopup -i %popups + 0 VxD\ico\1.ico     ;===================???????????===================NOT EDIT==================???????????====================;     ;                                                                                                          ;     ;===================???????????=====================EDIT BOTTOM=============???????????====================;     ; here the N° 2 icon -> xpopup -i %popups + 0 folders\icon.ico <- in mIRC editor -> menu Popups  -> 2 $chr(11) $+ name popups: /command <- ;   }   else return } ;;;;;;;;;;;;DCX.DLL~alias;;;;;;;;;;;; alias dcx {   if (%dcx_conflict) { echo 4 -s [DCX ERROR] Dll Conflict, Trying to load multiple copies of DCX: $+(06,$qt($dll(dcx.dll)),) and $+(03,$qt($scriptdirdcx\dcx.dll),) | halt }   if ($isid) returnex $dll($scriptdirdcx\dcx.dll,$1,$2-)   else dll $qt($scriptdirdcx\dcx.dll) $1 $2- } alias udcx {   if ($dcx(IsUnloadSafe)) $iif($menu, .timer 1 0) dll -u dcx.dll   else echo 4 -qmlbfti2 [DCX] Unable to Unload Dll. } alias xdid {   if ( $isid ) returnex $dcx( _xdid, $1 $2 $prop $3- )   dcx xdid $2 $3 $1 $4- } alias xdialog {   if ( $isid ) returnex $dcx( _xdialog, $1 $prop $2- )   dcx xdialog $2 $1 $3- } alias xpop {   if ( $isid ) returnex $dcx( _xpop, $1 $prop $2- )   dcx xpop $2 $1 $3- } alias xpopup {   if ( $isid ) returnex $dcx( _xpopup, $1 $prop $2- )   dcx xpopup $2 $1 $3- } alias xmenubar {   if ($isid) returnex $dcx(_xmenubar, $prop $1-)   dcx xmenubar $1- } alias mpopup {   dcx mpopup $1 $2 } alias xdock {   if ($isid) returnex $dcx( _xdock, $1 $prop $2- )   dcx xdock $1- } alias xtray {   if ($isid) returnex $dcx(TrayIcon, $1 $prop $2-)   dcx TrayIcon $1- } alias xstatusbar {   !if ($isid) returnex $dcx( _xstatusbar, mIRC $prop $1- )   dcx xstatusbar $1- } alias xtreebar {   !if ($isid) returnex $dcx( _xtreebar, mIRC $prop $1- )   dcx xtreebar $1- } alias dcxml {   !if ($isid) returnex $dcx( _dcxml, $prop $1- )   dcx dcxml $1- } ;xdidtok dialog ID N C Item Text[[C]Item Text[C]Item Text]... ;xdidtok $dname 1 0 44 SomeText1,SomeText2 ; xdidtok is only meant for list control! alias xdidtok {   if ($0 < 5) { echo 4 -smlbfti2 [ERROR] /xdidtok Invalid args | halt }   xdid -A $1 $2 $3 +T $4 $5- } alias tab {   var %i = 1, %tab   while (%i <= $0) {     if ($eval($+($,%i),2) != $null) {       %tab = $instok(%tab,$eval($+($,%i),2),$calc($numtok(%tab,9) + 1),9)     }     inc %i   }   return %tab } on *:start: {   unset %dcx_conflict   if ($dll(dcx.dll) != $null) {     if ($v1 != $scriptdirdcx\dcx.dll) {       set %dcx_conflict 1       echo 4 -s [DCX ERROR] Dll Conflict: Trying to load multiple copies of DCX: $+(04,$qt($v1),) and $+(03,$qt($scriptdirdcx\dcx.dll),)     }   } } 

Codes Sources

A voir également

Ajouter un commentaire

Commentaires

Votre évaluation

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.