[WIP] !liebe und !hass ;)

[KytoN]

So, vielleicht interessierts jemanden, ich möchte hier ein kleines Scriptlein veröffentlichen
Ehrlich gesagt ist es nicht ganz von mir, es waren noch andere daran beteiligt...

on *:text:!liebe:#:{
  $userpuffer($nick)
  if (($readini(liebe.ini,längen,$address($nick,1)) == $null) && (%liebe == on)) {
    writeini liebe.ini längen $address($nick,1) $rand(0,100) $+ $chr(44) $+ $rand(00,99) $+ %
    msg $chan [liebe] $nick liebt sich selbst zu $readini(liebe.ini,längen,$address($nick,1))
  }
  else {
    msg $chan [liebe] $nick wir wissen bereits, dass du dich selbst zu $readini(liebe.ini,längen,$address($nick,1)) liebst
  }
}

on *:text:!liebe &:#:{
  $userpuffer($nick)
  if (($2 == on) && ($address($nick,2) == *!*@just.ocrana.com || $address($nick,2) == *!*@Mastermind1337.users.quakenet.org)) {
    set %liebe on
    msg $chan [liebe] !liebe ist nun aktiviert!
  }
  elseif (($2 == off) && ($address($nick,2) == *!*@just.ocrana.com || $address($nick,2) == *!*@Mastermind1337.users.quakenet.org)) {
    set %liebe off 
    msg $chan [liebe] !liebe ist nun deaktiviert!
  }
  elseif (($readini(liebe2.ini,$address($nick,1),$2) == $null) && ($2 ison $chan) && ($2 != $nick) && (%liebe == on)) {
    writeini liebe2.ini $address($nick,1) $2 $rand(0,100) %
    msg $chan [liebe] $nick liebt $$2 zu $readini(liebe2.ini,$address($nick,1),$2) 
  }
  elseif (($readini(liebe2.ini,$address($nick,1),$2) != $null) && ($2 ison $chan) && ($2 != $nick) && (%liebe == on)) {
    msg $chan [liebe] $nick wir wissen bereits, dass du $$2 zu $readini(liebe2.ini,$address($nick,1),$2) liebt
  }
  else { msg $chan [liebe] $2 ist nicht auf $chan oder !liebe wurde ausgeschaltet!
  }
}


on *:text:!hass &:#:{
  $userpuffer($nick)
  if (($2 == on) && ($address($nick,2) == *!*@just.ocrana.com || $address($nick,2) == *!*@Mastermind1337.users.quakenet.org)) {
    set %hass on
    msg $chan [hass] !hass ist nun aktiviert!
  }
  elseif (($2 == off) && ($address($nick,2) == *!*@just.ocrana.com || $address($nick,2) == *!*@Mastermind1337.users.quakenet.org)) {
    set %hass off 
    msg $chan [hass] !hass ist nun deaktiviert!
  }
  elseif (($readini(hass2.ini,$address($nick,1),$2) == $null) && ($2 ison $chan) && ($2 != $nick) && (%hass == on)) {
    writeini hass2.ini $address($nick,1) $2 $rand(0,100) %
    msg $chan [hass] $nick hasst $$2 zu $readini(hass2.ini,$address($nick,1),$2) 
  }
  elseif (($readini(hass2.ini,$address($nick,1),$2) != $null) && ($2 ison $chan) && ($2 != $nick) && (%hass == on)) {
    msg $chan [hass] $nick wir wissen bereits, dass du $$2 zu $readini(hass2.ini,$address($nick,1),$2) hasst
  }
  else { msg $chan [hass] $2 ist nicht auf $chan oder !hass wurde ausgeschaltet!
  }
}

on *:text:!hass:#:{
  $userpuffer($nick)
  if (($readini(hass.ini,längen,$address($nick,1)) == $null) && (%hass == on)) {
    writeini hass.ini längen $address($nick,1) $rand(0,100) $+ $chr(44) $+ $rand(00,99) $+ %
    msg $chan [hass] $nick hasst sich selbst zu $readini(hass.ini,längen,$address($nick,1))
  }
  elseif (($readini(hass.ini,längen,$address($nick,1)) != $null) && (%hass == on)) {
    msg $chan [hass] $nick wir wissen bereits, dass du dich selbst zu $readini(hass.ini,längen,$address($nick,1)) hasst
  }
  else {
    msg $chan [hass] ist deaktiviert!
  }
}

Statt "($address($nick,2) == *!*@just.ocrana.com || $address($nick,2) == *!*@Mastermind1337.users.quakenet.org)" kann man natürlich andere Hosts eintragen oder ($nick isop $chan) oder weiß der Geier was machen
Vielleicht nicht sehr gut gecodet, aber es funktioniert!

[WME`Stone]

Nett von dir, nur wäre eine genauere Beschreibung gut, also was es bewirkt und so.

Edit: Das Script ist nicht komplett, wo ist z.b. das alias für $userpuffer?

[KytoN]

Hm, kennst du von #Sicherheit nicht ?liebe <nick> und ?hass <nick> ??

Also, wenn liebe (bzw hass) angeschaltet ist und person-A schreibt !liebe person-B, erscheint:
[liebe] person-A liebt person-B zu (zufallszahl)%
Schreibt person-A das gleiche noch einmal, erscheint:
[liebe] person-A wir wissen bereits, dass du person-B zu (die zahl von oben)% liebst.
Es wird also gespeichert, in der liebe2.ini
Schreib person-A nur !liebe, ohne nick hintendran, erscheint:
[liebe] person-A liebt sich zu (zufallszahl)%.
Joah, und so weiter, das ganze auch mit !hass.
Ist die Person nicht auf dem Channel funktioniert es nicht, genau wie wenn der User mit der im Script eingetragenen Hostmask (*!*@Mastermind1337.users.quakenet.org) vorher !liebe off bzw !hass off geschrieben hat.

[WME`Stone]

#sicherheit? Ne lass mal, wir haben unsere eigenen Eggdrops, wir sind gegen solche Channelbots.

[KytoN]

Das ist ja auch nur das msl-script, welches ihr spiel darstellt

[WME`Stone]

Schon, nur kann ichs daher auch nicht kennen.

Zumal wie ich oben schon sagte fehlen da auch noch aliases?

[KytoN]

ups
das mit dem userpuffer hab ich noch nich raus, bin kein sehr guter scripter, das hat sich einfach mit der zeit so ergeben das script :P

[WME`Stone]

Noch nicht so raus? bitte? Das ist doch nicht etwa gerippt? :eek:
Man weiß doch was man codet?

Ich stells mal auf WIP, nen Release kann man das ja nicht nennen.

[KytoN]

Schon, aber darin hab ich auch wirklich alles was ich bisher kann
mühsam zusammengekratzt von etlichen tutorial seiten -.-

[WME`Stone]

Also das beste Tutorial ist immernoch /help finde ich. Damit kann man es nach ca. 2-3 Monaten komplett.
Vorrausgesetzt man ist des Englisch mächtig...