Cs launcher codé en 2 heures (le code n'est pas optimisé mais il fonctionne)
gère une liste de favoris permet de changer de pseudo etc..c'est en dialogs
Source / Exemple :
;Codé Par _NicX_
menu channel,menubar,status {
[Cs_LauncheR]:dialog -mr cs cs
}
dialog cs {
title "Cs "
size -1 -1 149 178
option dbu
box "Counter-Strike Launcher", 1, 1 1 147 62
text "IP", 2, 4 11 17 8, center
edit "", 3, 24 10 121 10
text "L'annoncer en public ?", 5, 15 35 76 8, center
text "Pseudo en absence ?", 8, 7 48 62 8, center
edit %pseudocs, 9, 72 47 69 10
button "Fermer", 10, 111 167 36 10, ok
button "HL Répertoire", 11, 75 148 70 15
list 12, 2 65 70 101, size hsbar vsbar
button "Ajouter Aux favoris", 13, 95 22 50 10
box "", 14, 73 64 74 51
button "Ajouter", 15, 75 69 70 21
button "Enlever", 16, 75 92 70 21
box "", 17, 73 115 74 50
button "Se connecter", 18, 75 120 70 15
edit "", 19, 2 167 107 10, read
button "Se connecter", 20, 25 22 37 10
button "Annoncer en public", 21, 75 136 70 11
button "On", 22, 94 34 14 9
button "Off", 23, 109 34 14 9
}
on *:dialog:cs:init:0: { loadbuf 1-100 -o cs 12 Serverscs.jcvd | did -r cs 9 | did -a cs 9 $me | did -r cs 19 | did -a cs 19 %csRep
}
on *:dialog:cs:sclick:22: { enable #annoncs | set %ipancs $did(cs,3)
if (%ipancs == $null) { echo -a Tu n'as pas entré d'ip }
else { amsg 7,1C4,1ounter 7,1S4,1trike 7,1 IP : 4,1 %ipancs }
set %pseudocss $did(cs,9)
nick %pseudocss
unset %pseudocss
set %pseudocsa $me
}
on *:dialog:cs:sclick:23: { disable #annoncs | /nick %pseudocsa }
on *:dialog:cs:sclick:11: { /set %csRep $sfile(c:) }
on *:dialog:cs:sclick:20: { /set %ipCs $did(cs,3) | set %pseudocss $did(cs,9) | nick %pseudocss | unset %pseudocss | /run %csRep -console -game cstrike +connect %ipCs | unset %ipCs }
on *:dialog:cs:sclick:21: { annoncsp }
on *:dialog:cs:sclick:15: { ajoutcs }
on *:dialog:cs:sclick:16: { virecs }
on *:dialog:cs:sclick:18: { conncs }
on *:dialog:cs:sclick:13: { ajoutvcs }
on *:dialog:cs:sclick:11: { set %csRep $sfile(c:)
did -r cs 19 |
did -a cs 19 %csRep
}
on *:dialog:cs:dclick:12: { set %ipCsd $did(12).seltext | /run %csRep -console -game cstrike +connect %ipCsd | unset %ipCsd
set %pseudocss $did(cs,9)
nick %pseudocss
unset %pseudocss
}
alias ajoutvcs {
/write serverscs.jcvd $did(cs,3)
/did -a cs 12 $did(cs,3)
}
alias ajoutcs {
set %ipaj $$?="Entre l'ip"
write serverscs.jcvd %ipaj
echo -a L'ip %ipaj a bien été ajoutée à la liste
did -a cs 12 %ipaj
unset %ipaj
}
alias annoncsp {
set %anncs $did(12).seltext
if (%anncs == $null) { echo -a Tu n'as rien sélectionné ! }
else {
amsg 7,1C4,1ounter 7,1S4,1trike 7,1 IP : 4,1 %anncs
unset %anncs
}
}
alias virecs {
set %vircs $did(12).sel
if (%vircs == $null) { echo -a Tu n'as rien sélectionné ! }
else {
write -dw"* $+ $did(12,$did(12).sel).text $+ *" serverscs.jcvd
echo -a L'ip $did(12).seltext a bien été effacée de la liste
did -d cs 12 $did(12).sel
unset %vircs
}
}
alias conncs {
set %ipcsl $did(12).seltext
if (%ipcsl == $null) { echo -a Tu n'as rien sélectionné ! }
else {
set %pseudocss $did(cs,9)
nick %pseudocss
run %csRep -console -game cstrike +connect %ipCsl
unset %ipcsl
unset %pseudocss
}
}
#annoncs on
on 1:text:!server:#: {
if (%ipancs == $null) { //notice $nick $me ne joue pas à 7,1C4,1ounter 7,1S4,1trike }
if (%ipancs != $null) { //notice $nick 7,1C4,1ounter 7,1S4,1trike 7,1 IP : 4,1 %ipancs
}
}
#annoncs end
Conclusion :
faites ce que vous voulez vous pouvez ripper je m'en fou mais laissez au moins mon pseudo..
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.