Find the missing letter!

By co2h on Oct 29, 2007

This game displays a group of letters (in alphabetical order) and removes one of them. You have three seconds to find the missing letter and put it in. This game consists of nine levels. If you lose one of them, you lose all of your progress in the game and have to start over. /txtfind to open. If you feel the need to stop the game at anytime, /find_stop will stop the game and exit the browser. Hope you guys like this game. =)

  • updated! have added four new levels
alias txtfind { 
  if ($window(findtxt)) { window -c @findtxt } 
  window -l15e @findtxt
  set %findwon 1
  txtfind_ game
}
alias -l txtfind_ { 
  if ($1 = game) { 
    clear @findtxt
    if (%findwon = 1) {  
      echo @findtxt $str(-,6)
      echo @findtxt Now starting $+($sline($active,1),...)
      echo @findtxt $str(-,6)
      var %x = a b c d e, %y = $r(1,$numtok(%x,32))
      aline -p @findtxt %x
      set -e %find.get.data $gettok(%x,%y,32)
      .timer 1 1 aline -p @findtxt $deltok(%x,%y,32)
      .timerfind 0 1 getfind
    }
    if (%findwon = 2) {  
      echo @findtxt $str(-,6)
      echo @findtxt Now starting $+($sline($active,1),...)
      echo @findtxt $str(-,6)
      var %x = a b c d e f g, %y = $r(1,$numtok(%x,32))
      aline -p @findtxt %x
      set -e %find.get.data $gettok(%x,%y,32)
      .timer 1 1 aline -p @findtxt $deltok(%x,%y,32)
      .timerfind 0 1 getfind
    }
    if (%findwon = 3) {  
      echo @findtxt $str(-,6)
      echo @findtxt Now starting $+($sline($active,1),...)
      echo @findtxt $str(-,6)
      var %x = a b c d e f g h i, %y = $r(1,$numtok(%x,32))
      aline -p @findtxt %x
      set -e %find.get.data $gettok(%x,%y,32)
      .timer 1 1 aline -p @findtxt $deltok(%x,%y,32)
      .timerfind 0 1 getfind
    }
    if (%findwon = 4) {  
      echo @findtxt $str(-,6)
      echo @findtxt Now starting $+($sline($active,1),...)
      echo @findtxt $str(-,6)
      var %x = a b c d e f g h i j k l, %y = $r(1,$numtok(%x,32))
      aline -p @findtxt %x
      set -e %find.get.data $gettok(%x,%y,32)
      .timer 1 1 aline -p @findtxt $deltok(%x,%y,32)
      .timerfind 0 1 getfind
    }
    if (%findwon = 5) {  
      echo @findtxt $str(-,6)
      echo @findtxt Now starting $+($sline($active,1),...)
      echo @findtxt $str(-,6)
      var %x = a b c d e f g h i j k l m n o, %y = $r(1,$numtok(%x,32))
      aline -p @findtxt %x
      set -e %find.get.data $gettok(%x,%y,32)
      .timer 1 1 aline -p @findtxt $deltok(%x,%y,32)
      .timerfind 0 1 getfind
    }
    if (%findwon = 6) {  
      echo @findtxt $str(-,6)
      echo @findtxt Now starting $+($sline($active,1),...)
      echo @findtxt $str(-,6)
      var %x = a b c d e f g h i j k l m n o p q r, %y = $r(1,$numtok(%x,32))
      aline -p @findtxt %x
      set -e %find.get.data $gettok(%x,%y,32)
      .timer 1 1 aline -p @findtxt $deltok(%x,%y,32)
      .timerfind 0 1 getfind
    }
    if (%findwon = 7) {  
      echo @findtxt $str(-,6)
      echo @findtxt Now starting $+($sline($active,1),...)
      echo @findtxt $str(-,6)
      var %x = a b c d e f g h i j k l m n o p q r s t u, %y = $r(1,$numtok(%x,32))
      aline -p @findtxt %x
      set -e %find.get.data $gettok(%x,%y,32)
      .timer 1 1 aline -p @findtxt $deltok(%x,%y,32)
      .timerfind 0 1 getfind
    }
    if (%findwon = 8) {  
      echo @findtxt $str(-,6)
      echo @findtxt Now starting $+($sline($active,1),...)
      echo @findtxt $str(-,6)
      var %x = a b c d e f g h i j k l m n o p q r s t u v w x, %y = $r(1,$numtok(%x,32))
      aline -p @findtxt %x
      set -e %find.get.data $gettok(%x,%y,32)
      .timer 1 1 aline -p @findtxt $deltok(%x,%y,32)
      .timerfind 0 1 getfind
    }
    if (%findwon = 9) {  
      echo @findtxt $str(-,6)
      echo @findtxt Now starting $+($sline($active,1),...)
      echo @findtxt $str(-,6)
      var %x = a b c d e f g h i j k l m n o, p q r s t u v w x y z, %y = $r(1,$numtok(%x,32))
      aline -p @findtxt %x
      set -e %find.get.data $gettok(%x,%y,32)
      .timer 1 1 aline -p @findtxt $deltok(%x,%y,32)
      .timerfind 0 1 getfind
    }
  }
}
on *:input:@findtxt:{ 
  if ($1 iswm %find.get.data) { 
    .timerfind off
    unset %timerfind
    inc %findwon 1
    echo @findtxt $str(-,6)
    echo @findtxt Now proceeding to level %findwon $+ ...
    echo @findtxt $str(-,6)
    .timer 1 3 txtfind_ game  
    if (%findwon = 10) { 
      echo @findtxt You have won the game! Good job.
      .timer 1 2 find_stop
    }
  }
  if ($1 !iswm %find.get.data) {  
    echo @findtxt $str(-,6) 
    echo @findtxt You have lost the game. Now unsetting all data...
    echo @findtxt $str(-,6)
    unset %findwon %timerfind
    .timerfind off
    .timer 1 1 find_stop 
  }
}

alias -l getfind {  
  inc %timerfind 1
  if (%timerfind <= 3) { 
    if ($v1 = 1) aline -p @findtxt $v1
    else rline -p @findtxt 6 $v1
  }
  if (%timerfind > 3) { 
    .timerfind off
    unset %find.get.*
    unset %findwon %timerfind
    find_stop
    txtfind_ game
  }
}

alias find_stop { 
  .timerfind off
  unset %find.get.*
  unset %timerfind
  window -c @findtxt
}

Comments

Sign in to comment.
co2h   -  Nov 01, 2007

Comments?

 Respond  
co2h   -  Oct 30, 2007

Have added four new levels. Should be a lot harder now ^_^

 Respond  
Deathmage12   -  Oct 29, 2007

its ok but it would be better if it was a room game

 Respond  
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.