Dabar yra 2019-09-16, 04:59




Naujos temos kūrimas Atsakyti į temą  [ 12 pranešimai(ų) ] 
Del .add scripto 
Autorius Žinutė

Užsiregistravo: 2010-10-12, 19:23
Pranešimai: 16
Forumo litai: 21
Pinigų pervedimas
Standartinė Del .add scripto
Sveiki, Pvz pradejus sukti gatheri idedi zmogu 1 karta parasius dar karta ideda antra karta i gatheri toki pati nicka, o noreciau kad ismestu [Sis zaidejas jau idetas i Gatheri] Galit pataisyt scripta, nes kaskas jam netaip jokios klaidos nemeta.

on *:text:*:%chan: {
if ($1 == .add) && ($2 ison %chan ) {
var %tnick $nick( $+ %chan $+ ,$nick( $+ %chan $+ ,$2))
var %ttt $read(gthtemp.txt,s, $+ $2 $+ )
if (%gth == on) {
if ($nick == %admin) && ($nick isop #) && ($2 != %admin) {
if (!$3) && ($2 != $me) {
if ($read(steamid.txt,s,$2)) {
if (!$read(blacklist.txt,s,$2)) {
if (!$read(gthtemp.txt,s,$2)) {
if ($calc(%gth.start.plrs1 + %gth.start.plrs2) != $calc(%pp1 + %pp2)) {
if (%gth.start.plrs1 > %gth.start.plrs2) {
write gthtemp.txt %tnick 0
inc %gth.start.plrs2
set %teamas2 $addtok(%teamas2, %tnick, 32)
rasytidalyvius
write -ds $2 list.txt
}
else {
write gthtemp.txt %tnick 1
inc %gth.start.plrs1
set %teamas1 $addtok(%teamas1, %tnick, 32)
rasytidalyvius
write -ds $2 list.txt
}
}
}
else { .msg %chan 0,1Zaidejas %spalva $+ $2 $+ jau ideta i Gatheri.
}
}
else { .msg %chan 0,1Zaidejas %spalva $+ $2 $+ 0 turi blacklist.
}
}
else { .msg %chan 0,1Zaidejas $+ %spalva $2 0neuzsiregistraves.
}
}
else {
if ($2 != $me) {
if ($3 == 1) && ($nick == %admin) {
if ($read(gthtemp.txt,s, $+ %tnick) != 1) {
if ($read(steamid.txt,s,$2)) {
if (!$read(blacklist.txt,s,$2)) {
if (%gth.start.plrs1 != %pp1) {
leavegth2 %tnick
write -ds $+ %tnick gthtemp.txt
write gthtemp.txt %tnick 1
inc %gth.start.plrs1
set %teamas1 $addtok(%teamas1, %tnick, 32)
rasytidalyvius
write -ds $+ %tnick list.txt
if ($read(gthtemp.txt,s, $+ %tnick) == 0) {
set %teamas2 $remtok(%teamas2, %tnick, 32)
write -ds $+ %tnick list.txt
}
}
else { .msg %chan 0,1Zaidejas %spalva $+ $2 $+ jau ideta i Gatheri.
}
}
else { .msg %chan 0,1Zaidejas %spalva $+ $2 $+ 0 turi blacklist.
}
}
else { .msg %chan 0,1Zaidejas $+ %spalva $2 0neuzsiregistraves.
}
}
}
else if ($3 == 2) && ($2 != $me) {
if ($nick == %admin) {
if ($read(gthtemp.txt,s, $+ %tnick) != 0) {
if ($read(steamid.txt,s,$2)) {
if (!$read(blacklist.txt,s,$2)) {
if (%gth.start.plrs2 != %pp2) {
leavegth2 %tnick
write -ds $+ %tnick gthtemp.txt
write gthtemp.txt %tnick 0
inc %gth.start.plrs2
set %teamas2 $addtok(%teamas2, %tnick, 32)
rasytidalyvius
write -ds $+ %tnick list.txt
if ($read(gthtemp.txt,s, $+ %tnick) == 1) {
set %teamas1 $remtok(%teamas1, %tnick, 32)
write -ds $+ %tnick list.txt
}
}
else { .msg %chan 0,1Zaidejas %spalva $+ $2 $+ jau ideta i Gatheri.
}
}
else { .msg %chan 0,1Zaidejas %spalva $+ $2 $+ 0 turi blacklist.
}
}
else { .msg %chan 0,1Zaidejas $+ %spalva $2 0neuzsiregistraves.
}
}
}
}
}
}
}
}
}
}


2013-03-09, 10:24
Aprašymas
Patyręs dalyvis
Patyręs dalyvis
Vartotojo avataras

Užsiregistravo: 2009-12-08, 21:19
Pranešimai: 955
Forumo litai: 1125
Pinigų pervedimas
Miestas: Vilnius
Standartinė Re: Del .add scripto
if (!$read(gthtemp.txt,s,$2)) {
}
else { .msg %chan 0,1Zaidejas %spalva $+ $2 $+ jau ideta i Gatheri. }


tai:
a) kode klaida, (aliasas rasytdalyvius ?)
b) pas tave tiesiog .add metu neideda zmogaus i jokius sarasus (gthtemp.txt ?) ir poto patikrinimas meta $false :)

write gthtemp $2 1

_________________
!!! <-

search.php & Google

Respect Existence or Expect Resistance


2013-03-09, 14:47
Aprašymas

Užsiregistravo: 2010-10-12, 19:23
Pranešimai: 16
Forumo litai: 21
Pinigų pervedimas
Standartinė Re: Del .add scripto
Bandziau pasitaisyti bet misraine pasidare galetumet pataisyt?

on *:text:*:%chan: {
if ($1 == .add) && ($2 ison %chan ) {
var %tnick $nick( $+ %chan $+ ,$nick( $+ %chan $+ ,$2))
var %ttt $read(gthtemp.txt,s, $+ $2 $+ )
if (%gth == on) {
if ($nick == %admin) && ($nick isop #) && ($2 != %admin) {
if (!$3) && ($2 != $me) {
if ($read(steamid.txt,s,$2)) {
if (!$read(blacklist.txt,s,$2)) {
if (!$read(gthtemp.txt,s,$2)) {
if ($calc(%gth.start.plrs1 + %gth.start.plrs2) != $calc(%pp1 + %pp2)) {
if (%gth.start.plrs1 > %gth.start.plrs2) {
write gthtemp.txt $2 0
inc %gth.start.plrs2
set %teamas2 $addtok(%teamas2, %tnick, 32)
rasytidalyvius
write -ds $2 list.txt
}
else {
write gthtemp.txt %tnick 1
inc %gth.start.plrs1
set %teamas1 $addtok(%teamas1, %tnick, 32)
rasytidalyvius
write -ds $2 list.txt
}
}
}
else { .msg %chan 0,1Zaidejas %spalva $+ $2 $+ jau ideta i Gatheri.
}
}
else { .msg %chan 0,1Zaidejas %spalva $+ $2 $+ 0 turi blacklist.
}
}
else { .msg %chan 0,1Zaidejas $+ %spalva $2 0neuzsiregistraves.
}
}
else {
if ($2 != $me) {
if ($3 == 1) && ($nick == %admin) {
if ($read(gthtemp.txt,s, $+ %tnick) != 1) {
if ($read(steamid.txt,s,$2)) {
if (!$read(blacklist.txt,s,$2)) {
if (%gth.start.plrs1 != %pp1) {
leavegth2 %tnick
write -ds $+ %tnick gthtemp.txt
write gthtemp.txt $2 1
inc %gth.start.plrs1
set %teamas1 $addtok(%teamas1, %tnick, 32)
rasytidalyvius
write -ds $+ %tnick list.txt
if ($read(gthtemp.txt,s, $+ %tnick) == 0) {
set %teamas2 $remtok(%teamas2, %tnick, 32)
write -ds $+ %tnick list.txt
}
}
else { .msg %chan 0,1Zaidejas %spalva $+ $2 $+ jau ideta i Gatheri.
}
}
else { .msg %chan 0,1Zaidejas %spalva $+ $2 $+ 0 turi blacklist.
}
}
else { .msg %chan 0,1Zaidejas $+ %spalva $2 0neuzsiregistraves.
}
}
}
else if ($3 == 2) && ($2 != $me) {
if ($nick == %admin) {
if ($read(gthtemp.txt,s, $+ %tnick) != 0) {
if ($read(steamid.txt,s,$2)) {
if (!$read(blacklist.txt,s,$2)) {
if (%gth.start.plrs2 != %pp2) {
leavegth2 %tnick
write -ds $+ %tnick gthtemp.txt
write gthtemp.txt $2 0
inc %gth.start.plrs2
set %teamas2 $addtok(%teamas2, %tnick, 32)
rasytidalyvius
write -ds $+ %tnick list.txt
if ($read(gthtemp.txt,s, $+ %tnick) == 1) {
set %teamas1 $remtok(%teamas1, %tnick, 32)
write -ds $+ %tnick list.txt
}
}
else { .msg %chan 0,1Zaidejas %spalva $+ $2 $+ jau ideta i Gatheri.
}
}
else { .msg %chan 0,1Zaidejas %spalva $+ $2 $+ 0 turi blacklist.
}
}
else { .msg %chan 0,1Zaidejas $+ %spalva $2 0neuzsiregistraves.
}
}
}
}
}
}
}
}
}
}

alias rasytidalyvius {
var %teame1, %teame2, %tstr
var %t1 %gth.start.plrs1
var %t2 %gth.start.plrs2
var %tint 1
while (%t1 || %t2) {
%tstr = $read(gthtemp.txt,%tint)
tokenize 32 %tstr
if ($2) {
var %teame1 = %teame1 ~ $+(%spalva) $+ $1 $+ 00,01
dec %t1
}
else {
var %teame2 = %teame2 ~ $+(%spalva) $+ $1 $+ 00,01
dec %t2
}
inc %tint
}
.msg %chan 0,1Zaidejai %spalva $+ (00,01 $+ $calc(%gth.start.plrs1 + %gth.start.plrs2) $+ %spalva $+ /00,01 $+ $calc(%pp1 + %pp2) $+ %spalva $+ )0 %tm1 $+ : $+ %spalva $iif($mid(%teame1,2,$len(%teame1)),$mid(%teame1,2,$len(%teame1)),-) $+ 0. 0,1 $+ %tm2 $+ : $+ %spalva $iif($mid(%teame2,2,$len(%teame2)),$mid(%teame2,2,$len(%teame2)),-) $+ 0.
}


2013-03-09, 16:44
Aprašymas

Užsiregistravo: 2010-10-12, 19:23
Pranešimai: 16
Forumo litai: 21
Pinigų pervedimas
Standartinė Re: Del .add scripto
Padetumet kas?


2013-03-10, 13:37
Aprašymas

Užsiregistravo: 2013-01-27, 00:29
Pranešimai: 10
Forumo litai: 11
Pinigų pervedimas
Standartinė Re: Del .add scripto
if ($read(gthtemp.txt,s,$2) == $null) {
}
Manau turėtu atrodyti maždaug taip.


2013-03-11, 12:46
Aprašymas

Užsiregistravo: 2010-10-12, 19:23
Pranešimai: 16
Forumo litai: 21
Pinigų pervedimas
Standartinė Re: Del .add scripto
Dekui viskas veikia :)


2013-03-11, 17:09
Aprašymas

Užsiregistravo: 2010-10-12, 19:23
Pranešimai: 16
Forumo litai: 21
Pinigų pervedimas
Standartinė Re: Del .add scripto
Galetumet biski padet man neveikia .add nick 1 ir .add nick 2 padetumet kas??

on *:text:*:%chan: {
if ($1 == .add) && ($2 ison %chan ) {
var %tnick $nick( $+ %chan $+ ,$nick( $+ %chan $+ ,$2))
var %ttt $read(gthtemp.txt,s, $+ $2 $+ )
if (%gth == on) {
if ($nick == %admin) && ($nick isop #) && ($2 != %admin) {
if (!$3) && ($2 != $me) {
if ($read(steamid.txt)) {
if (!$read(blacklist.txt,s,$2)) {
if ($read(gthtemp.txt,s,$2) == $null) {
if ($calc(%gth.start.plrs1 + %gth.start.plrs2) != $calc(%pp1 + %pp2)) {
if (%gth.start.plrs1 > %gth.start.plrs2) {
write gthtemp.txt %tnick 0
inc %gth.start.plrs2
set %teamas2 $addtok(%teamas2, %tnick, 32)
rasytidalyvius
write -ds $2 list.txt
}
else {
write gthtemp.txt %tnick 1
inc %gth.start.plrs1
set %teamas1 $addtok(%teamas1, %tnick, 32)
rasytidalyvius
write -ds $2 list.txt
}
}
}
else { .msg %chan 0,1Zaidejas %spalva $+ %tnick 0jau idetas i Gatheri.
}
}
else { .msg %chan 0,1Zaidejas %spalva $+ %tnick $+ 0 turi blacklist.
}
}
else { .msg %chan 0,1Zaidejas $+ %spalva %tnick 0neuzsiregistraves.
}
}
else {
if ($2 != $me) {
if ($3 == 1) && ($nick == %admin) {
if ($read(gthtemp.txt,s, $+ %tnick) != 1) {
if ($read(steamid.txt)) {
if (!$read(blacklist.txt,s,$2)) {
if (%gth.start.plrs1 != %pp1) {
leavegth2 %tnick
write -ds $+ %tnick gthtemp.txt
write gthtemp.txt %tnick 1
inc %gth.start.plrs1
set %teamas1 $addtok(%teamas1, %tnick, 32)
rasytidalyvius
write -ds $+ %tnick list.txt
if ($read(gthtemp.txt,s, $+ %tnick) == 0) {
set %teamas2 $remtok(%teamas2, %tnick, 32)
write -ds $+ %tnick list.txt
}
}
}
else { .msg %chan 0,1Zaidejas %spalva $+ %tnick $+ 0 turi blacklist.
}
}
else { .msg %chan 0,1Zaidejas $+ %spalva %tnick 0neuzsiregistraves.
}
}
else { .msg %chan 0,1Zaidejas %spalva $+ %tnick 0jau idetas i Gatheri.
}
}
else if ($3 == 2) && ($2 != $me) {
if ($nick == %admin) {
if ($read(gthtemp.txt,s,$2) == 1) {
if ($read(steamid.txt)) {
if (!$read(blacklist.txt,s,$2)) {
if (%gth.start.plrs2 != %pp2) {
leavegth2 %tnick
write -ds $+ %tnick gthtemp.txt
write gthtemp.txt %tnick 0
inc %gth.start.plrs2
set %teamas2 $addtok(%teamas2, %tnick, 32)
rasytidalyvius
write -ds $+ %tnick list.txt
if ($read(gthtemp.txt,s, $+ %tnick) == 1) {
set %teamas1 $remtok(%teamas1, %tnick, 32)
write -ds $+ %tnick list.txt
}
}
}
else { .msg %chan 0,1Zaidejas %spalva $+ %tnick $+ 0 turi blacklist.
}
}
else { .msg %chan 0,1Zaidejas $+ %spalva %tnick 0neuzsiregistraves.
}
}
}
}
}
}
}
}
}
}


2013-04-05, 22:20
Aprašymas

Užsiregistravo: 2010-10-12, 19:23
Pranešimai: 16
Forumo litai: 21
Pinigų pervedimas
Standartinė Re: Del .add scripto
Padesit kas?


2013-04-07, 12:29
Aprašymas
Kalbusis dalyvis
Kalbusis dalyvis
Vartotojo avataras

Užsiregistravo: 2006-02-05, 16:05
Pranešimai: 1554
Forumo litai: 937
Pinigų pervedimas
Miestas: Klaipeda
Standartinė Re: Del .add scripto
Neveikia, nes 3 parametro nieks nefiksuoja

if ($1 == .add) && ($2 ison %chan ) {


Turetu but dar if ($3 != $null) {
arba ($3 isnum) {

ir priskirt zmogu butent i tam tikra komanda.

_________________
Niekas nezino ka savyje slepia, kol neparagauja valdzios.


2013-04-07, 16:35
Aprašymas WWW

Užsiregistravo: 2010-10-12, 19:23
Pranešimai: 16
Forumo litai: 21
Pinigų pervedimas
Standartinė Re: Del .add scripto
Galetum pataisyt?


2013-04-07, 17:09
Aprašymas

Užsiregistravo: 2010-10-12, 19:23
Pranešimai: 16
Forumo litai: 21
Pinigų pervedimas
Standartinė Re: Del .add scripto
Tai galit padet, kuroj cia vietoj reikia pakeist kaip parase iso, buciau dekingas.


2013-04-08, 14:48
Aprašymas

Užsiregistravo: 2013-01-22, 01:19
Pranešimai: 5
Forumo litai: 8
Pinigų pervedimas
Standartinė Re: Del .add scripto
man irgi tapati problema yra,pasidariau tai nejo pagal teams det,dabar pasidariau kad tik pagal teamus eitu det..,o niekaip nepasidarau kad ir taip ir taip eitu;D


2013-08-18, 14:52
Aprašymas
Rodyti paskutinius pranešimus:  Rūšiuoti pagal  
Naujos temos kūrimas Atsakyti į temą  [ 12 pranešimai(ų) ] 


Dabar prisijungę

Vartotojai naršantys šį forumą: Registruotų vartotojų nėra ir 1 svečias


Jūs negalite kurti naujų temų šiame forume
Jūs negalite atsakinėti į temas šiame forume
Jūs negalite redaguoti savo pranešimų šiame forume
Jūs negalite trinti savo pranešimų šiame forume
Jūs negalite prikabinti failų šiame forume

Ieškoti:
Pereiti į:  
cron
© phpBB Group. Veikia phpBB pagrindu.
Dizaino autorius Vjacheslav Trushkin, adaptavo Igor „MucTuK“ Gubaidulin
Vertė Vilius Šumskas © 2003, 2005, 2007