Author Topic: Commands on PM  (Read 2458 times)

0 Members and 1 Guest are viewing this topic.

Offline nErBoS

  • Emperor
  • **
  • Posts: 1 149
  • Karma: +3/-1
Commands on PM
« on: 14 October, 2003, 13:28:47 »
Hi all,

How can i do to call commands on a pm with the bot ??

Best regrads, nErBoS
--## nErBoS Spot ##--

PtokaX forum

Commands on PM
« on: 14 October, 2003, 13:28:47 »

Offline pHaTTy

  • Forum Legend
  • ***
  • Posts: 1 916
  • Karma: +5/-1
(No subject)
« Reply #1 on: 14 October, 2003, 14:01:26 »
in data arrival change ==

Code: [Select]

if strsub(data, 1, 1) == "<" then
data=strsub(data,1,strlen(data)-1)
s,e,cmd = strfind(data,"%b<>%s+(%S+)")


to

Code: [Select]

if (strfind(data,"$To: ".. BotName)
data=strsub(data,1,strlen(data)-1)
s,e,cmd = strfind(data,"%b<>%s+(%S+)")


if i remember correctly its like that l8rr,,


-phatty
Resistance is futile!

Offline nErBoS

  • Emperor
  • **
  • Posts: 1 149
  • Karma: +3/-1
(No subject)
« Reply #2 on: 15 October, 2003, 02:06:07 »
hum nop isn?t working :(
--## nErBoS Spot ##--

[NL]Pur

  • Guest
(No subject)
« Reply #3 on: 15 October, 2003, 10:55:56 »
can we see your whole script , then it whould be easier too give you feedback where too change te script.

Offline nErBoS

  • Emperor
  • **
  • Posts: 1 149
  • Karma: +3/-1
(No subject)
« Reply #4 on: 15 October, 2003, 13:46:20 »
Is working...

Code: [Select]
if (strfind(data, "$To:")) or (strsub(data, 1, 1) == "<") then
data=strsub(data,1,strlen(data)-1)
s,e,cmd = strfind(data,"%b<>%s+(%S+)")

This send in pm and mail !!

Thanks (uk-kingdom)pH?tt?

Best regrads, nErBoS
--## nErBoS Spot ##--

PtokaX forum

(No subject)
« Reply #4 on: 15 October, 2003, 13:46:20 »