mIRC Home    About    Download    Register    News    Help

Print Thread
Page 2 of 2 1 2
Joined: Sep 2005
Posts: 21
D
Ameglian cow
OP Offline
Ameglian cow
D
Joined: Sep 2005
Posts: 21
Well, the remote seems to work perfectly, but the problem is that, when I restart my bot and I typed !listcmds it showed me There Aren't Any Cmd Restored even there are cmds were added in that channel already. After that, I tried to add cmds again, and it showed me /hadd: no such table 'h4ucmd', but table for this channel were created already and even stored some cmds too. frown

Joined: Oct 2004
Posts: 8,330
Hoopy frood
Offline
Hoopy frood
Joined: Oct 2004
Posts: 8,330
Make sure you have a HLOAD in the script you're using. In 2 spots above, there were HLOAD mentioned, but not in all replies, so you need to make sure you included HLOAD. That's what loads your hash table. Note that you also need HMAKE before using HLOAD.


Invision Support
#Invision on irc.irchighway.net
Joined: Aug 2005
Posts: 1,052
L
Hoopy frood
Offline
Hoopy frood
L
Joined: Aug 2005
Posts: 1,052
yeah I did mention it on top when i said you might want to include this also

on Join blah blah.. where i showed you a on join script with hmake and hload laugh

sorry about the elseif's again like i was saying yesterday im not feeling too well these days i got a dang head cold, as well has stuffed sinus and throath congestition

sorry about making you go back in fourth in the testing and all, i did attempt to test it but i didnt look at all causes before releasing it and the last edit i did i just real quick edited the current script


Code:
if $reality > $fiction { set %sanity Sane }
Else { echo -a *voices* }
Joined: Sep 2005
Posts: 21
D
Ameglian cow
OP Offline
Ameglian cow
D
Joined: Sep 2005
Posts: 21
Here are errors I've got:
/hload: unable to open 'C:\Program Files\mIRC\hchocolatecmd.hshcmd.hsh' (line 56, script12.ini)
Did not find hchocolatecmd.hshcmd.hsh on file

Joined: Aug 2005
Posts: 1,052
L
Hoopy frood
Offline
Hoopy frood
L
Joined: Aug 2005
Posts: 1,052
my mistake dude i already evaluated cmd.hsh lemme fix it real quick sorry the reason why it was loading like that i added $+ cmd.hsh too many times. but everything is fixed here guaranteed

Code:

on 1:JOIN:#: {

var %join.scan = $replace($chan,$chr(35),h)
var %join.scan2 =  %join.scan $+ cmd.hsh

if ($nick == $me) && ($exists(%join.scan2) == $true) {

hmake %join.scan 30

hload %join.scan %join.scan2

}

else { echo -a Did not find %join.scan2 on file }

}



Code:
if $reality > $fiction { set %sanity Sane }
Else { echo -a *voices* }
Joined: Sep 2005
Posts: 21
D
Ameglian cow
OP Offline
Ameglian cow
D
Joined: Sep 2005
Posts: 21
Here it is my original code. I stil got same errors. frown
Code:
;Snippet from http://www.mirc.co.uk
;By Lpfix5 and Riamus2

on *:TEXT:*:#: {
  if (! isin $1) {
    %active.chan = $replace($chan,$chr(291),h) $+ cmd
    %active2.chan = %active.chan $+ .hsh
  }
  if ($1 == !listaction) {
    if ($hget(%active.chan,0).item == 0) { notice $nick Sorry $nick $+ , There aren't any actions stored. }
    if ($hget(%active.chan,0).item >= 1) { 
      var %listcmds.inc = 1
      while (%listcmds.inc <= $hget(%active.chan,0).item) {
        notice $nick $hget(%active.chan,%listcmds.inc).item
        inc %listcmds.inc
      }
    }
  }
  if ($1 == !addaction) && (! == $left($2,+1)) {
    if ($nick isop $chan) && ($2 == $hfind(%active.chan,$2)) { notice $nick you cannot add  $2  to file it's already exist. | halt }
    elseif ($nick isop $chan) { hadd %active.chan $2 $3-
      hsave %active.chan %active.chan $+ .hsh
      notice $nick  $2  has been stored in file successfully.
    }
    else { notice $nick Sorry $nick $+ , you don't have enough permission to add  $2  into file. }
  }
  if ($1 == !delaction) && (! == $left($2,+1)) {
    if ($nick isop $chan) {
      hdel %active.chan $2
      hsave %active.chan %active.chan $+ .hsh
      notice $nick  $2  has been removed from file successfully.
    }
    elseif ($2 == $hfind(%active.chan,$2)) { notice $nick Sorry $nick $+ , You don't have enough permission to del  $2  from file. }
  }
  if ($hget(%active.chan,$1)) {

    var %hreplace = $replacex($hget(%active.chan,$1),hnick,$2,hchan,$chan,hname,$nick)

    msg $chan %hreplace

  }

}

alias cmdlist {
  var %hchan = $replace($active,$chr(291),h) $+ cmd
  hmake %hchan $?="How many items? 30 is average"
  hsave %hchan %hchan $+ .hsh
}

on 1:JOIN:#: {

  var %join.scan = $replace($chan,$chr(35),h)
  var %join.scan2 =  %join.scan $+ cmd.hsh

  if ($nick == $me) && ($exists(%join.scan2) == $true) {

    hmake %join.scan 30

    hload %join.scan %join.scan2

  }

  else { echo -a Did not find %join.scan2 on file }

}

 

Joined: Aug 2005
Posts: 1,052
L
Hoopy frood
Offline
Hoopy frood
L
Joined: Aug 2005
Posts: 1,052
AGAIN another error sheesh i dont know whats up i think this cold is giving me braindead syndrome

i tested this one 3 times to make sure now it should work successfully if not ill tear my hair out

Code:

on *:TEXT:*:#: {
  if (! isin $1) {
    %active.chan = $replace($chan,$chr(291),h) $+ cmd
    %active2.chan = %active.chan $+ .hsh
  }
  if ($1 == !listaction) {
    if ($hget(%active.chan,0).item == 0) { notice $nick Sorry $nick $+ , There aren't any actions stored. }
    if ($hget(%active.chan,0).item >= 1) { 
      var %listcmds.inc = 1
      while (%listcmds.inc <= $hget(%active.chan,0).item) {
        notice $nick $hget(%active.chan,%listcmds.inc).item
        inc %listcmds.inc
      }
    }
  }
  if ($1 == !addaction) && (! == $left($2,+1)) {
    if ($nick isop $chan) && ($2 == $hfind(%active.chan,$2)) { notice $nick you cannot add  $2  to file it's already exist. | halt }
    elseif ($nick isop $chan) { hadd %active.chan $2 $3-
      hsave %active.chan %active.chan $+ .hsh
      notice $nick  $2  has been stored in file successfully.
    }
    else { notice $nick Sorry $nick $+ , you don't have enough permission to add  $2  into file. }
  }
  if ($1 == !delaction) && (! == $left($2,+1)) {
    if ($nick isop $chan) {
      hdel %active.chan $2
      hsave %active.chan %active.chan $+ .hsh
      notice $nick  $2  has been removed from file successfully.
    }
    elseif ($2 == $hfind(%active.chan,$2)) { notice $nick Sorry $nick $+ , You don't have enough permission to del  $2  from file. }
  }
  if ($hget(%active.chan,$1)) {

    var %hreplace = $replacex($hget(%active.chan,$1),hnick,$2,hchan,$chan,hname,$nick)

    msg $chan %hreplace

  }

}

alias cmdlist {
  var %hchan = $replace($active,$chr(291),h) $+ cmd
  hmake %hchan $?="How many items? 30 is average"
  hsave %hchan %hchan $+ .hsh
}

on 1:JOIN:#: {
  var %join.scan = $replace($chan,$chr(35),h) $+ cmd
  var %join.scan2 =  %join.scan $+ .hsh
  if ($nick == $me) && ($exists(%join.scan2) == $true) {
    hmake %join.scan 30
    hload %join.scan %join.scan2
  }
  else { echo -a Did not find %join.scan2 on file }
}




Code:
if $reality > $fiction { set %sanity Sane }
Else { echo -a *voices* }
Joined: Sep 2005
Posts: 21
D
Ameglian cow
OP Offline
Ameglian cow
D
Joined: Sep 2005
Posts: 21
Hehe... You will never ever tear your hair out. It works without any errors. You guys are briiliants. smile

Joined: Aug 2005
Posts: 1,052
L
Hoopy frood
Offline
Hoopy frood
L
Joined: Aug 2005
Posts: 1,052
Sweet i guess i get to style and comb my hair every day still opposed to the cold days up here


Code:
if $reality > $fiction { set %sanity Sane }
Else { echo -a *voices* }
Page 2 of 2 1 2

Link Copied to Clipboard