!remove script

By Memoli on Oct 01, 2010

USAGE:

<~Download> !remove test
<&ultrAslan> test
<&ultrAslan> tes
<&ultrAslan> te
<&ultrAslan> t

Have Fun ;)

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;!remove script by Download;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;FUN SCRIPT;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;ITS 100% MY OWN WORK;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

on *:TEXT:!remove *:#: {
  if ($istok(%remove,ON,32)) {
    set %remove $len($$2)
    alias harr {
      while (%remove >= 1) {
        msg $chan $left($2,%remove)
        dec %remove 1
      }
    }
  }
}

on *:TEXT:!rem on:#: { set %remove on | msg $chan !remove is now on }
on *:TEXT:!rem off:#: { set %remove off | msg $chan !remove is now off }

Like Page Follow Author

Comments

Jethro - Dec 06, 2010

Excuse me for the belated reply.

gerjoaguimar, you just have to modify it by increment:

alias go {
  var %r 1
  while %r <= $len($$1) {
    echo -a $left($1,%r)
    inc %r
  }
}

h
he
hel
hell
helloThe command is: /go OneWordHere

If you want to be able to enter more than one word, add a dash next to $1 as in $1-

Respond

GuitarMasterx7 - Oct 07, 2010

@gerjoaguimar Considering you can't spell the most common word in the English language. No i can't.

roflmmfao what a dick xD!

pfft cmon hawkee why you add filters</3 lolz

Respond

Massivity - Oct 05, 2010

good job ;)

Respond

Sorasyn - Oct 03, 2010

@gerjoaguimar Considering you can't spell the most common word in the English language. No i can't.

Respond

gerjoaguimar - Oct 03, 2010

!remove hello h he hel hell hello enybody can do that?

Respond

sk68 - Oct 03, 2010

...why...just...why?

Respond

Memoli - Oct 02, 2010

menu channel {
  >>> Trun <<< Remove script $iif($group(#rem) = on,Off,On):{
    $+(.,$iif($group(#rem) = on,dis,en),able) #rem
    msg # !remove is now $group(#rem)
  }
}

sometimes u fail too :P

Turn not Trun :)

and i am not very good at scripting i try for learn more

Respond

napa182 - Oct 01, 2010

true but either does $$2

Respond

Jethro - Oct 01, 2010

or if you still only want it for only 1 word then change the (.+) in the text event to (\S+)Well napa, that still doesn't change the fact that it'll match one or more non-whitespace character...

Respond

Sorasyn - Oct 01, 2010

Any reason you defined an alias inside of the text event lol

Respond

napa182 - Oct 01, 2010

this made me laugh tho...

;;;ITS 100% MY OWN WORK;;;;;;;;;

there are so many diff ways of making something like this you can do it like this as well..

#rem on
on $*:TEXT:/^!remove\s(.+)/iS:#: {
  if (!%f) {
    inc -u4 %f
    var %r $len($regml(1))
    while (%r >= 1) {
      msg # $left($regml(1),%r)
      dec %r 1
    }
  }
}
#rem end
menu channel {
  Turn Remove script $iif($group(#rem) = on,Off,On):{
    $+(.,$iif($group(#rem) = on,dis,en),able) #rem
    msg # !remove is now $group(#rem)
  }
}

and you can add more then 1 word

<~napa182> !remove hello to you
<&Sick0> hello to you
<&Sick0> hello to yo
<&Sick0> hello to y
<&Sick0> hello to
<&Sick0> hello to
<&Sick0> hello t
<&Sick0> hello
<&Sick0> hello
<&Sick0> hell
<&Sick0> hel
<&Sick0> he
<&Sick0> h

or if you still only want it for only 1 word then change the (.+) in the text event to (\S+)

Respond

WorldDMT - Oct 01, 2010

:/ ?!

Respond