Pick-up script
Description
Voila un gestionnaire de Pick-up cs 1.5 et 1.6.
Particularité:
Statut du pick-up sur le topic
Rétablissement du topic a la fin du pick-up ou le désactivant
Change automatiquement le pseudo d'une personne qui change de nick
Suppression d'un nick après être partit du channel ou a été kicker
Possibilité de mettre le tag team
Un Message avertit à la personne qui rentre sur le channel que le pick-up est lancé
Possibilité de préciser si le pick-up est 1.5 ou 1.6
Peut lancer un amsg au début du pick-up
Fournit en pv le serveur + pass après avoir taper !start
Fonctionnement + instalation et detailé dans le .txt du zip
Particularité:
Statut du pick-up sur le topic
Rétablissement du topic a la fin du pick-up ou le désactivant
Change automatiquement le pseudo d'une personne qui change de nick
Suppression d'un nick après être partit du channel ou a été kicker
Possibilité de mettre le tag team
Un Message avertit à la personne qui rentre sur le channel que le pick-up est lancé
Possibilité de préciser si le pick-up est 1.5 ou 1.6
Peut lancer un amsg au début du pick-up
Fournit en pv le serveur + pass après avoir taper !start
Source / Exemple :
;-------------------------------------------------------------------------
;Autheur: Lodtripe Mail: lodtripe@clan-ck.com
;
;Script: Pickup Organizer
;-------------------------------------------------------------------------
dialog pickup {
title "Pick-up Script By Lodtripe"
size -1 -1 136 191
option dbu
edit "", 10, 66 12 67 10
text "Chanel du Pick-up :", 11, 5 13 54 8, center
text "Map(s) :", 12, 5 31 54 8, center
edit "", 13, 66 30 67 10
edit "", 14, 66 47 67 10
text "Ip Serveur :", 15, 5 48 54 8, center
text "Pass Serveur:", 16, 5 64 54 8, center
edit "", 17, 66 63 67 10
box "Group Box", 51, -20 -125 160 255
check "Mettre le Statut du pick-up en topic du chanel", 19, 4 133 122 10
check "Prévenir du pick-up en /amsg", 20, 4 148 124 10
button "Go !", 21, 19 171 37 12, ok
link "www.lod-script.fr.st", 22, 81 178 52 8
radio "Cs 1.5", 29, 47 96 37 10, group
radio "Cs 1.6", 30, 92 96 36 10
text "Version :", 31, 8 97 27 8
check "Donner un Tag au team A et B", 1, 17 112 88 10
text "Nombre de place :", 50, 3 79 57 8, center
edit "", 18, 66 78 67 10
menu "Fenetre", 9
item "Quitter", 25, 9, cancel
}
dialog changepck {
title "Modification du pickup"
size -1 -1 136 128
option dbu
edit %chan.gather, 10, 66 12 67 10
text "Chanel du Pick-up :", 11, 5 13 54 8, center
text "Map(s) :", 12, 5 31 54 8, center
edit %pick.map, 13, 66 30 67 10
edit %pick.server, 14, 66 47 67 10
text "Ip Serveur :", 15, 5 48 54 8, center
text "Pass Serveur:", 16, 5 66 54 8, center
edit %pick.pass, 17, 67 64 67 10
button "Go !", 21, 12 107 37 12, ok
link "www.lod-script.fr.st", 22, 74 114 52 8
check "Modifier / Ajouter un Tag au team A et B", 40, 12 84 112 10
menu "Fenetre", 9
item "Quitter", 25, 9, cancel
}
dialog nteam {
title "Tag Team"
size -1 -1 134 77
option dbu
text "Tag de la team A :", 2, 4 21 52 9
edit "", 3, 63 19 60 10
text "Tag de la team B :", 4, 4 40 52 8
edit "", 5, 63 38 61 10
button "ok", 6, 48 59 37 12, ok
text "Donner un tag au team :", 7, 4 4 66 8
}
dialog nteam2 {
title "Tag Team"
size -1 -1 134 77
option dbu
text "Tag de la team A :", 41, 4 21 52 9
edit %namea, 42, 63 19 60 10
text "Tag de la team B :", 43, 4 40 52 8
edit %nameb, 44, 63 38 61 10
button "ok", 45, 48 59 37 12, ok
text "Donner un tag au team :", 46, 4 4 66 8
}
alias ntopic {
if (%topic.ok == 1) {
if (%name.on == 1) { topic %chan.gather 4 P ickup %csversion en cour2 ??7 Team A 4( %pick.slotA / %place ) 14:: %namea 14:3 %a 144147 Team B 4( %pick.slotA / %place ) 14:: %nameb 14:3 %b 2?? 7Map:3 %pick.map 2?? 7Serveur:3 %pick.server }
elseif (%name.on != 1) { topic %chan.gather 4 P ickup %csversion en cour2 ??7 Team A 4( %pick.slotA / %place ) 14:3 %a 144147 Team B 4( %pick.slotB / %place ) 14:3 %b 2?? 7Map:3 %pick.map 2?? 7Serveur:3 %pick.server }
}
}
alias oldtopic {
if ( %topic.ok == 1) { topic %chan.gather %stopic }
}
alias pick.amsg {
amsg 4Pickup3 %csversion 4Lancé sur3 %chan.gather 4, Rejoint nous !!
}
alias start { msg %chan.gather 4 P ickup lancé! 12Pass fournit en Pv. | pick.pass }
alias pick.pass {
var %zi 0
:suivant
inc %zi
msg $wildtok(%pick.nick,*,%zi,59) 14Le Pickup ready, 6IP:4 %pick.server 3- 6Pass:4 %pick.pass
msg $wildtok(%pick.nick,*,%zi,59) 2Team 4A 3::4Tag: %namea 3::4 %a 14?4? 4?14? 2Team 7B 3::7Tag: %nameb 3::7 %b
if ( %zi >= $wildtok(%pick.nick,*,0,59) ) goto end
else goto suivant
:end
reset
}
alias reset { oldtopic | unset %pick.slotA | unset %pick.slotB | unset %name.on | set %namea Team-A | set %nameb Team-B | unset %csversion | unset %a | unset %topic.ok | unset %pick.on | unset %b | unset %pick.nick | unset %pick.map | set %nombre-placeA 5 | set %nombre-placeB 5 | set %chan.gather Pas_de_pickup_actif | unset %pick.server | unset %pick.pass }
alias adda1 {
if (%nombre-placeA == 0) { msg $chan %namea complet }
elseif (%nombre-placeA >= 0) {
if ( %adda1 !isin %pick.nick && %adda1 ison %chan.gather ) { dec %nombre-placeA | inc %pick.slotA | set %pick.nick $addtok(%pick.nick,%adda1,59) | msg $chan 6Playeur %adda1 Ajouté au groupe A :4Tag: %namea 3:: 6Reste7 %nombre-placeA places6 dans le Groupe A | set %a $addtok(%a,%adda1,59) | ntopic }
elseif ( %adda1 !ison %chan.gather ) { echo -a 4 Attention Pseudo %adda1 n'est pas présent sur %chan.gather , ou il est mal taper. Réessayer !! }
elseif ( %adda1 isin %pick.nick ) { echo -a 4 Le pseudo %adda1 est deja present dans le pickup }
}
}
alias addb1 {
if (%nombre-placeB == 0) { msg $chan %nameb complet }
elseif ( %nombre-placeB >= 0 ) {
if ( %addb1 !isin %pick.nick && %addb1 ison %chan.gather ) { dec %nombre-placeB | inc %pick.slotB | set %pick.nick $addtok(%pick.nick,%addb1,59) | msg $chan 6Playeur %addb1 Ajouté au groupe B :4Tag: %nameb 3:: 6Reste7 %nombre-placeB places6 dans le Groupe B | set %b $addtok(%b,%addb1,59) | ntopic }
elseif ( %addb1 !ison %chan.gather ) { echo -a 4 Attention Pseudo %addb1 n'est pas présent sur %chan.gather , ou il est mal taper. Réessayer !! }
elseif ( %addb1 isin %pick.nick ) { echo -a 4 Le pseudo %addb1 est deja présent dans le pickup }
}
}
alias supa1 {
if (%supa1 isin %pick.nick) {
if ( %supa1 isin %a ) { inc %nombre-placeA | dec %pick.slotA | set %a $replace(%a, %supa1, $chr(256)) }
if ( $nick isin %b ) { inc %nombre-placeB | dec %pick.slotB | set %b $replace(%b, %supa1, $chr(256)) }
set %pick.nick $replace(%pick.nick, %supa1, $chr(256))
msg $chan 4 %supa1 à été effacé
ntopic
}
else echo -a 4 Impossible de supprimer %supa1, car pseudo non enregistré. Taper le pseudo exactement comme il a été rentré.
}
on 1:dialog:pickup:sclick:21:{
set %chan.gather $did(10)
set %pick.map $did(13)
set %pick.server $did(14)
set %pick.pass $did(17)
set %nombre-placeA $did(18)
set %nombre-placeB $did(18)
set %place $did(18)
set %pick.on 1
set %stopic $chan(%chan.gather).topic
if ($did(pickup,19).state == 0) { set %topic.ok 0 }
elseif ($did(pickup,19).state == 1) { set %topic.ok 1 }
if ($did(pickup,20).state == 1) { pick.amsg }
if ($did(pickup,29).state == 1) { set %csversion Cs 1.5 }
if ($did(pickup,30).state == 1) { set %csversion Cs 1.6 }
echo -a 4 Pickup Lancé sur %chan.gather
msg %chan.gather 4Pickup7 %csversion 4Lancé 3?? 2Aide6 avec commande !pickup
}
on 1:dialog:changepck:sclick:21:{
set %chan.gather $did(10)
set %pick.map $did(13)
set %pick.server $did(14)
set %pick.pass $did(17)
set %pick.on 1
echo -a 4 Modification du Pickup pour %chan.gather effectué
msg %chan.gather 4Pickup %csversion Lancé 3?? 2Aide6 avec commande !pickup
}
on 1:dialog:pickup:sclick:1:{ dialog -md nteam nteam }
on 1:dialog:changepck:sclick:40:{ dialog -md nteam2 nteam2 }
on 1:dialog:nteam:sclick:6:{
set %namea $did(3)
set %nameb $did(5)
set %name.on 1
}
on 1:dialog:nteam2:sclick:45:{
set %namea $did(42)
set %nameb $did(44)
set %name.on 1
}
on *:PART:%chan.gather:{
if ( $nick isin %pick.nick ) {
if ( $nick isin %a ) { inc %nombre-placeA | set %a $replace(%a, $nick, $chr(256)) }
if ( $nick isin %b ) { inc %nombre-placeB | set %b $replace(%b, $nick, $chr(256)) }
set %pick.nick $replace(%pick.nick, $nick, $chr(256))
msg %chan.gather 4 $nick quit %chan.gather
msg %chan.gather 4 $nick à été supprimer du pickup
}
}
on *:QUIT:{
if ( $chan == %chan.gather ) {
if ( $nick isin %pick.nick ) {
if ( $nick isin %a ) { inc %nombre-placeA | set %a $replace(%a, $nick, $chr(256)) }
if ( $nick isin %b ) { inc %nombre-placeB | set %b $replace(%b, $nick, $chr(256)) }
set %pick.nick $replace(%pick.nick, $nick, $chr(256))
msg %chan.gather 4 $nick quit %chan.gather
msg %chan.gather 4 $nick à été supprimer du pickup
}
}
}
ON *:JOIN:%chan.gather: {
notice $nick 4 Pick-up En cours , tape !pickup pour obtenir l'aide
}
on *:KICK:%chan.gather:{
if ( $knick isin %pick.nick ) {
if ( $knick isin %a ) { inc %nombre-placeA | set %a $replace(%a, $knick, $chr(256)) }
if ( $knick isin %b ) { inc %nombre-placeB | set %b $replace(%b, $knick, $chr(256)) }
set %pick.nick $replace(%pick.nick, $knick, $chr(256))
msg %chan.gather 4 $knick à été kicker de %chan.gather
msg %chan.gather 4 $knick à été supprimer du pickup
}
}
on *:NICK:{
if ( $nick isin %a ) { set %adda1 $newnick | set %pick.nick %pick.nick %adda1 | msg %chan.gather 7 $nick 6est remplacer par3 $newnick | set %a %a %adda1 | set %a $replace(%a, $nick, $chr(256)) | set %pick.nick $replace(%pick.nick, $nick, $chr(256)) }
if ( $nick isin %b ) { set %addb1 $newnick | set %pick.nick %pick.nick %addb1 | msg %chan.gather 7 $nick 6est remplacer par3 $newnick | set %b %b %addb1 | set %b $replace(%b, $nick, $chr(256)) | set %pick.nick $replace(%pick.nick, $nick, $chr(256)) }
}
ON *:TEXT:!add *:%chan.gather:{
if ( %nombre-placeA == 0 ) { msg $chan %namea complet }
elseif ( %nombre-placeA >= 0 ) {
if ( $2 == a ) {
if ( $nick !isin %pick.nick ) { dec %nombre-placeA | inc %pick.slotA | set %pick.nick $addtok(%pick.nick,$nick,59) | msg $chan 6Playeur $nick Ajouté au goupe A :4Tag: %namea 3:: 6Reste7 %nombre-placeA places6 dans le Groupe A | set %a $addtok(%a,$nick,59) | ntopic }
else /notice $nick 4On ne s'inscrit pas 2 fois merci.
}
}
if ( %nombre-placeB == 0 ) { msg $chan %nameb complet }
elseif ( %nombre-placeB >= 0 ) {
if ( $2 == b ) {
if ( $nick !isin %pick.nick ) { dec %nombre-placeB | inc %pick.slotB | set %pick.nick $addtok(%pick.nick,$nick,59) | msg $chan 6Playeur $nick Ajouté au groupe B :4Tag: %nameb 3:: 6Reste7 %nombre-placeB places6 dans le Groupe B | set %b $addtok(%b,$nick,59) | ntopic }
else notice $nick 4Tu es deja inscrit.
}
}
if ($2 == $null) { notice $nick 4Rentre !add a ou !add b pour faire etre ajouté a l'un des groupes }
}
on *:INPUT:%chan.gather:{
if ($1 == !add_a) { set %adda1 $me | adda1 }
if ($1 == !add_b) { set %addb1 $me | addb1 }
if ($1 == !remove) { set %supa1 $me | supa1 }
if ($1 == !statut) { pick.statut }
if ($1 == !start) { start }
if ($1 == !pickup) { echo -a 4L'aide est disponible que pour les personnes extérieures et en pv. }
}
ON *:TEXT:!remove:%chan.gather:{
if ( $nick isin %pick.nick ) {
if ( $nick isin %a ) { inc %nombre-placeA | dec %pick.slotA | set %a $replace(%a, $nick, $chr(256)) }
if ( $nick isin %b ) { inc %nombre-placeB | dec %pick.slotB | set %b $replace(%b, $nick, $chr(256)) }
set %pick.nick $replace(%pick.nick, $nick, $chr(256))
msg $chan 4 $nick supprimé du pickup.
ntopic
}
else notice $nick 4Tu n'es pas encore inscrit au pickup.
}
on *:TEXT:!pickup:%chan.gather:{
msg $nick 4Pickup help 3:
msg $nick 4
msg $nick 6T'ajouter a la %namea 3::7 !add a
msg $nick 6T'ajouter a la %nameb 3::7 !add b
msg $nick 6Te supprimer des teams 3::7 !remove
msg $nick 6Statut des teams 3::7 !Statut
msg $nick 4
msg $nick 2[ 6Pickup Script by 4Lodtripe3 ??7 http://www.lod-script.fr.st 2]
}
on *:TEXT:!statut:%chan.gather:{ pick.statut }
alias pick.statut {
if (%name.on == 1) {
msg %chan.gather 4 Team 7A 4( %pick.slotA / %place ) 14:6 %namea 3::7 %a
msg %chan.gather 4 Team 7B 4( %pick.slotB / %place ) 14:6 %nameb 3::7 %b
msg %chan.gather 4Info pickup 3:: 6Maps:7 %pick.map 14|12|14| 6Serveur %csversion :7 %pick.server
}
elseif (%name.on != 1) {
msg %chan.gather 4 %namea ( %pick.slotA / %place ) 3::7 %a
msg %chan.gather 4 %nameb ( %pick.slotB / %place ) 3::7 %b
msg %chan.gather 4Info pickup 3:: 6Maps:7 %pick.map 14|12|14| 6Serveur %csversion :7 %pick.server
}
}
on *:load:{ unset %a | unset %pick.slotA | unset %pick.slotB | set %namea Team-A | set %nameb Team-B | unset %b | unset %pick.nick | set %chan.gather Pas_de_pickup_actif | set %nombre-placeA 5 | set %nombre-placeB 5 | echo -a 4 Pickup Organizer est maintenant chargé | echo -a 4Script by Lodtripe }
menu menubar,channel {
-
:: Pickup organizer ::
.Activer:{ dialog -md pickup pickup | set %nombre-placeA 5 | set %nombre-placeB 5 }
.Modifier pickup Actif:{ if (%pick.on == 1) { dialog -md changepck changepck } | else echo -a 4 Aucun Pickup Actif }
.Désactiver:{ reset | echo -a 4 Pickup arreté sur %chan.gather }
.-
.Reset:{ reset | echo -a 4Toutes les valeurs du pickup organizer sont effacé ! }
.-
.Mode Manuelle
..Ajouter
...Team A:{ set %adda1 $$?="Playeur name" | adda1 }
...Team B:{ set %addb1 $$?="Playeur name" | addb1 }
..Effacer:{ set %supa1 $$?="Playeur name" | supa1 }
}
Conclusion :
Fonctionnement + instalation et detailé dans le .txt du zip
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.