这是什么语言？ （对于IRC机器人）

Question

终于找到了我10年前为IRC Bot编写的一些非常老的脚本。我不知道我在做什么，并想知道是否有人知道这是什么写的和任何信息？

on *:sockread:$1:{
  var %stattype $1
  if ($sockerr) {
    .notice [ %nickname [ $+ [ %stattype ] ] ] Error.
    halt
  }
  else {
    var %statread
    sockread %statread
    if (Stat:* * * * iswm %statread) {
      .tokenize 32 %statread
      .notice [ %nickname [ $+ [ %stattype ] ] ] 1[ Username:7 $upper( [ %username [ $+ [ %stattype ] ] ] ) 1] [ Skill: 7 $upper(%stattype) 1] 
      .notice [ %nickname [ $+ [ %stattype ] ] ] 1[ Level:7 $3 1 $chr(124) Exp:7 $4 1 $chr(124) Rank:7 $2 1]
      .notice [ %nickname [ $+ [ %stattype ] ] ] 1[ Next lvl:7 $calc($3 + 1) 1 $chr(124) Exp to:7 $bytes($calc( [ %lvl [ $+ [ $calc($3 + 1) ] ] ] - $remove($4,$chr(44))),b) 1]
      .notice [ %nickname [ $+ [ %stattype ] ] ] 1[ Bandits:7 $bytes($calc($calc( [ %lvl [ $+ [ $calc($3 + 1) ] ] ] - $remove($4,$chr(44)))/(51*1.33)),b) 1 $chr(124) S.Warriors:7 $bytes($calc($calc( [ %lvl [ $+ [ $calc($3 + 1) ] ] ] - $remove($4,$chr(44)))/(67*1.33)),b) 1 $chr(124) Dagg(74):7 $bytes($calc($calc( [ %lvl [ $+ [ $calc($3 + 1) ] ] ] - $remove($4,$chr(44)))/(70*1.33)),b) 1 $chr(124) Ogre(53)/Ice Warrior:7 $bytes($calc($calc( [ %lvl [ $+ [ $calc($3 + 1) ] ] ] - $remove($4,$chr(44)))/(60*1.33)),b) 1]
      .sockclose %stattype
    }
  }
}

on $*:TEXT:$(/@(hp|att|str|ran|mag|pra|def|coo|woo|fir|fle|run|sla|min|smi|cra)/):#: {
  var %stattype $left($remove($1,!,@),3)
  .tokenize %stattype 32
  if ($2 != $null) {
    sockopen %stattype rscript.org 80
    set [ %username [ $+ [ %stattype ] ] ] $2
    set [ %nickname [ $+ [ %stattype ] ] ] $nick
  }
  elseif ($2 == $null) {
    sockopen hp rscript.org 80
    set [ %username [ $+ [ %stattype ] ] ] $nick
    set [ %nickname [ $+ [ %stattype ] ] ] $nick
  }
  else {
    .notice $nick Error. Sorry.
  }
}

Answer 1

这是mIRC客户端的mIRC scripting language。

---

哦，它似乎做了一些事情（从我12岁时的pff知识）通过服务rscript.org训练盗贼游戏runescape中的盗贼。

Answer 2

MIRC Remote Events

Answer 3

我确信您使用mIRC脚本语言（非官方mSL）编写了程序。您可以在其官方website上找到更多相关信息。目前我试图找出你在做什么;）我敬请期待。