learning.ini

[script]
n0=on 500,543:TEXT:*:#: { halt }
n1=on *:START: {
n2=  set %knownwordsmode 0
n3=}
n4=on *:LOAD: {
n5=  set %knownwordsmode 0
n6=  echo -at Loaded Learning mode
n7=  echo -at Set knownwordsmode to 0
n8=}
n9=on *:UNLOAD: {
n10=  unset %knownwordsmode
n11=  unset %oldknownwordsamount
n12=  unset %scannedwords
n13=  echo -at Unloaded Learning mode
n14=  echo -at Unset temporary variables + knownwordsmode
n15=}
n16=
n17=on *:TEXT:!learningmode:#: {
n18=  if ($me == %bot1) {
n19=    if (%knownwordsmode == 0) { scon $bot_say($chan) msg $chan Learning mode is turned off. }
n20=    elseif (%knownwordsmode == 1) { scon $bot_say($chan) msg $chan Learning mode is turned on (learned $calc(%knownwordsamount - %oldknownwordsamount) words up till now - %scannedwords scanned). }
n21=    else {
n22=      scon $bot_say($chan) msg $chan 4ERROR: Unknown status
n23=    }
n24=  }
n25=  elseif ($me == %bot1) { scon $bot_say($chan) msg $chan 4ERROR: You do not have the required status }
n26=}
n27=on *:TEXT:!learningmode *:#: {
n28=  if ($nick == %owner && $me == %bot1) {
n29=    if ($2 == ON) {
n30=      if (%knownwordsmode != 1) {
n31=        set -e %oldknownwordsamount %knownwordsamount
n32=        set -e %scannedwords 0
n33=        set %knownwordsmode 1
n34=        scon $bot_say($chan) msg $chan Learning mode turned ON
n35=      }
n36=      elseif (%knownwordsmode == 1) {
n37=        scon $bot_say($chan) msg $chan 4ERROR: Learning mode was already on...
n38=      }
n39=    }
n40=    elseif ($2 == OFF) {
n41=      if (%knownwordsmode != 0) {
n42=        set %knownwordsmode 0
n43=        scon $bot_say($chan) msg $chan Learning mode turned OFF (learned $calc(%knownwordsamount - %oldknownwordsamount) words - %scannedwords scanned).
n44=        unset %oldknownwordsamount
n45=        unset %scannedwords
n46=      }
n47=      elseif (%knownwordsmode == 0) {
n48=        scon $bot_say($chan) msg $chan 4ERROR: Learning mode was already off...
n49=      }
n50=    }
n51=    else {
n52=      scon $bot_say($chan) msg $chan 4ERROR: Mode $2 doesn't exist (choose ON|OFF)
n53=    }
n54=  }
n55=  elseif ($me == %bot1) { scon $bot_say($chan) msg $chan 4ERROR: You do not have the required status }
n56=}
n57=on *:TEXT:!dictionary:#: {
n58=  if ($me == %bot1) {
n59=    scon $bot_say($chan) msg $chan We currently know %knownwordsamount words (in %knownwordsfile files).
n60=  }
n61=}