kostenloser Webspace werbefrei: lima-city

Problem bei TCL script

lima-city → Forum → Programmiersprachen → Sonstige Programmiersprachen

1. Autor dieses Themas

   toby01

   

   toby01 hat kostenlosen Webspace.

   11:03, 16.10.2008

   hallo,
   
   ich habe letztens ein TCL script gefunden und wollte es anpassen, leider fand ich nirgenswo hilfe.
   
   das script soll bewirken das der regestrierte user aller 15 minuten einen keks bekommt, leider bekomm ich immer kein ergebtniss :(
   
   hier das script:
   
   

   foreach a [users] {
           if { [isreg $a] } {
              if { [regget $a kekse] < [sql cnum maxcookies] && [expr ([clock seconds] - [useriget $a logintimestamp]) % 900 == 0] && [clock seconds] != [useriget $a logintimestamp] } { 
                   regset $a kekse [expr 1 + [regget $a kekse]]
                   set add ""
                   if { [expr [clock seconds] - [useriget $a logintimestamp]] >= 900 } { set add "weitere" }
                   sendroom $a "[img info] <i>[yacetime] [colornick $a] war jetzt 15 $add Minuten im Chat und bekommt daher einen keks! <img src="http://chat.hanzi.cc/imgs/keks.gif" /></i>"
                   
               }
           }
       }

   
   
   ich hoffe jemand kann mir dabei helfen.
   
   MFG toby01
   
   
   Beitrag geändert: 16.10.2008 11:04:08 von toby01

2. Diskutiere mit und stelle Fragen: Jetzt kostenlos anmelden!

   lima-city: Gratis werbefreier Webspace für deine eigene Homepage

3. dkurs

   

   dkurs hat kostenlosen Webspace.

   15:56, 14.11.2008

   Naja, das ist ein kleiner ausschnitt aus einem großen Script:
   
   

   foreach a [users] {
   -- also da gibts ein Feld users das durchiteriert wird
    if { [isreg $a] } {
   -- isreg ist eine Funktion mit einem user-element als param
   -- die wahrscheinlich true zurückgibt wenn ein user
   -- registriert ist.
    if { [regget $a kekse] < [sql cnum maxcookies] && [expr ([clock seconds] - [useriget $a logintimestamp]) % 900 == 0] && [clock seconds] != [useriget $a logintimestamp] } {
   -- in dieser Abfrage wird ermittelt, wie lange der Benutzer im
   -- Chat ist und wenn lännger als 900 Sekunden => wird ein 
   -- counter (hier kekse) hochgezählt 
    regset $a kekse [expr 1 + [regget $a kekse]]
    set add ''
    if { [expr [clock seconds] - [useriget $a logintimestamp]] >= 900 } { set add 'weitere' }
    sendroom $a '[img info] <i>[yacetime] [colornick $a] war jetzt 15 $add Minuten im Chat und bekommt daher einen keks! <img src='http://chat.hanzi.cc/imgs/keks.gif' /></i>'
   -- und im Messagefenster eine Meldung dazu gemacht.
    }
    }
    }

   
   
   ich hoffe jemand kann mir dabei helfen.
   
   MFG toby01
   
   
   Beitrag geändert: 16.10.2008 11:04:08 von toby01[/quote]

4. Diskutiere mit und stelle Fragen: Jetzt kostenlos anmelden!

   lima-city: Gratis werbefreier Webspace für deine eigene Homepage

Dir gefällt dieses Thema?