I was bored and i wrote this script :D
Add script from Alt+R then write "/matrix" and watch it :d

alias matrix {
  .clear @Matrix
  window @Matrix
  var %c 1
  var %v 68
  :Loop
  var %i 1
  var %x 150
  while ( %i <= %x ) {
    var %Number $rand(0,1)
    var %Numbers %Numbers %Number
    inc %i
  }
  echo @Matrix $remove($replace(%Numbers,0,030,1,091),$chr(32))
  inc %c
  if ( %c <= %v ) {
    var %Numbers $null
    goto Loop
  }
}