Dabar yra 2019-09-16, 04:59




Naujos temos kūrimas Atsakyti į temą  [ 2 pranešimai(ų) ] 
.savaite script 
Autorius Žinutė
Patyręs dalyvis
Patyręs dalyvis
Vartotojo avataras

Užsiregistravo: 2009-04-04, 15:02
Pranešimai: 815
Forumo litai: 716
Pinigų pervedimas
Miestas: Heaven
Standartinė .savaite script
Kodas:
  if ($left($1,8) == .savaite) && (%siunciu == off) {
    var %week $left($duration($calc($ctime - $ctime(2012.03.19) + $duration($calc(86400 * 4.95)))),2)
    var %ttop $iif($remove($1,.savaite),$remove($1,.savaite),10)
    if $istok(10.20.30.40.50.60.70.80.90.100,%ttop,46) {
      if (%ttop <= 100) {
        .ignore -u3 $address($nick,1)
        if ($file(sav/ $+ %week $+ .txt)) {
          var %tint 1
          var %tviso 0
          var %lines $lines(sav/ $+ %week $+ .txt)
          var %tmsg, %tstr, %tnick, %tscore, %ttok, %t12h,
          while (%tint <= %lines) {
            %tstr = $read(sav/ $+ %week $+ .txt,%tint)
            %tnick = $gettok(%tstr,1,32)
            %tscore = $gettok(%tstr,2,32)
            %tviso = $calc(%tviso + %tscore)
            %ttok = %ttok %tscore $+ @ $+ %tnick
            inc %tint
          }
          %ttok = $sorttok(%ttok,32,nar)
          %tint = $iif($calc(%ttop - 9) > 0,$calc(%ttop - 9),1)
          %lines = $iif(%ttop > %lines,%lines,%ttop)
          while (%tint <= %lines) {
            %tstr = $gettok(%ttok,%tint,32)
            %t12h = $readini(12h.ini,score,$gettok(%tstr,2,64))
            %tmsg = %tmsg 10 $+ %tint $+ . 0,01 $+ $gettok(%tstr,2,64) $gettok(%tstr,1,64) $+ .
            inc %tint
          }
          if (%tmsg) .notice $nick 10,1Sios savaites administratoriu0 TOP $+ %ttop $+ : $iif(%tmsg,%tmsg,N/A.) $+ 0,1 $+ %spalva :: 0,01Viso: %tviso %spalva $+ ::     
        }
        else { .notice $nick 0,1Sia savaite zaidimu $+ %spalva nevyko0. }
      }
    }
  }


Kame problema, kodel raso "Sia savaite zaidimu nevyko"?

_________________
Paveikslėlis


2012-03-23, 00:56
Aprašymas ICQ WWW
Vartotojo avataras

Užsiregistravo: 2012-03-14, 17:12
Pranešimai: 9
Forumo litai: 14
Pinigų pervedimas
Standartinė Re: .savaite script
Tai turbūt, kad tokio failo nėra sav/%week.txt.


2012-03-24, 21:26
Aprašymas
Rodyti paskutinius pranešimus:  Rūšiuoti pagal  
Naujos temos kūrimas Atsakyti į temą  [ 2 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