alias greetadmin { 
  set %greetadmin $1-
  echo -at [GreetAdmin] Admin olarak değiştirildi %greetadmin
}
 
on *:text:!greettype*:#:{ 
  if ($nick == %greetadmin) {
    if ($2 == $null) { notice $nick DeadLy: !greettype  }
    if ($2 == hash) { set %greettype hash | notice $nick Greet systeem için değişti  "HASH" }
    if ($2 == ini) { set %greettype ini | notice $nick Greet systeem için değişti  "INI" }
    if ($2 == variable) { set %greettype variable | notice $nick Greet systeem için değişti "VARIABLE" }
  }
}
 
on *:text:!greetset *:#: {
  if (%greettype == ini) { 
    notice $nick New greet set: $2-
    writeini greets.ini greets $nick $2-
  }
}
 
on *:join:#:{

  if ((%greettype == ini) || ($readini(greets.ini, greets , $nick) != $null)) { 
    set %stamp $chr(91) $+ $nick $+ $chr(93)
  msg $chan %stamp $readini(greets.ini, greets , $nick) }
  else {
 
    if ((%greet. [ $+ [ $nick ] ] != $null) || (%greettype == variable)) { 
      set %stamp $chr(91) $+ $nick $+ $chr(93)
    msg $chan %stamp %greet. [ $+ [ $nick ] ] }
    else {
 
      if ((%greettype == hash) || ($hget(greets,$address($nick,2)) != $null)){ 
        set %stamp $chr(91) $+ $nick $+ $chr(93)
      msg $chan %stamp $hget(greets,$address($nick,2)) }
      else { halt }
    }
  }
}
 
on *:text:!greetset *:#:{
  if (%greettype == variable) {
    set %greet. [ $+ [ $nick ] ] $2-
    notice $nick Greet değişti: $2-
  }
}
 
on *:text:!greetset *:#: {
  if (%greettype == hash) {
    if $exists($qt($scriptdirgreets.hsh)) { hload greets $qt($scriptdirgreets.hsh)    
      else { hmake greets 100 }
    }
    hadd -m greets $address($nick,2) $2-
    notice $nick Yeni greet set: $2-
    hsave greets greets.hsh
  }
}