Autojoin

Contenu du snippet

Un autoJoin un peut merdiques mais bon ..
utilisable .. Ya mieux quoi ..

Source / Exemple :


dialog aj {
  title "Autojoin by pcHiT Script XP ®"
  size -1 -1 100 250
  option dbu
  box "Salons",1, 5 25 90 180
  radio "Joindre à la connection",2, 5 210 65 10,
  radio "Ne pas joindre à la connection",3, 5 220 100 10,
  button "Joindre tous",4, 5 230 40 8,
  button "Reset",5, 50 230 40 8,
  button "Enregistré",6, 5 240 85 8,
  button "Fermer",19, 5 250 85 8,ok
  edit %aj1 ,8, 10 35 80 10, 
  edit %aj2 ,9, 10 50 80 10,
  edit %aj3 ,10, 10 65 80 10,
  edit %aj4 ,11, 10 80 80 10,
  edit %aj5 ,12, 10 95 80 10,
  edit %aj6 ,13, 10 110 80 10,
  edit %aj7 ,14, 10 125 80 10,
  edit %aj8 ,15, 10 140 80 10,
  edit %aj9 ,16, 10 155 80 10,
  edit %aj10 ,17, 10 170 80 10,
  text "® pcHiT Script XP",18, 15 190 80 10, 
}
on *:dialog:aj:sclick:6:{ set %aj1 $did(8) | set %aj2 $did(9) | set %aj3 $did(10) | set %aj4 $did(11) | set %aj5 $did(12) | set %aj6 $did(13) | set %aj7 $did(14) | set %aj8 $did(15) | set %aj9 $did(16) | set %aj10 $did(17) | dialog -m charge charge | halt }
on *:connect:{ /join %aj1 | /join %aj2 | /join %aj3 | /join %aj4 | /join %aj5 | /join %aj6 | /join %aj7 | /join %aj8 | /join %aj9 | /join %aj10 | halt }
on *:dialog:aj:sclick:5:{ unset %aj1 | unset %aj2 | unset %aj3 | unset %aj4 | unset %aj5 | unset %aj6 | unset %aj7 | unset %aj8 | unset %aj9 | unset %aj10 | halt }
on *:dialog:aj:sclick:4:{ /join %aj1 | /join %aj2 | /join %aj3 | /join %aj4 | /join %aj5 | /join %aj6 | /join %aj7 | /join %aj8 | /join %aj9 | /join %aj10 | halt }
} 
on *:dialog:aj:init:0:{ 
  dll dll\mdx.dll MarkDialog $dname
  dll dll\mdx.dll SetDialog $dname style border aj minbox
} }

Conclusion :


Pas de bugs ..

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.