Jump to content

Adolf

Members
  • Posts

    6
  • Joined

  • Last visited

Profile Information

  • Country
    United States

Adolf's Achievements

Newbie

Newbie (1/14)

0

Reputation

  1. mk is there any tuts on coding a hash table and I'll come back to you if I have any more problems then? I dont remember half the stuff I used to know. Hmm wait maybe I'll just look it up. I know that asking for something thats already here is a no no among coders. Thanks error.
  2. yea like I cant figure out how to do it I've tried using $replace but for some reason I just cant code like I used to, and as its pulling up the cords [Player]: !cords -u Holder [bot]: Holder's cords are: 970:920 980:1012 981:1010 985:1014 982:1020 984:1020 983:1018 983:1026 984:1028 985:1034 986:1028 987:1026 976:1048 ^ I'm trying to get it to do something like that but I cant seem to figure out how to make it do it. So after about 6 hours of trying to figure it out I came here to see if anyone could help me with it.
  3. on LO:TEXT:*:#:{ var %c = $strip($2), %cc = $strip($1) if (!%c) && (%cc == !cords) { .privmsg $chan 4Let me explain how to use this command real quick. .privmsg $chan 4This is a multi-command. Meaning it has more then one use. To save space in my data base. .privmsg $chan 4Its very simple to use. So heres how to use it with examples: .privmsg $chan 4!cords -a/-u/+a/+h/-h/-ah the -a, -u, +a, +h, -h, are sub-commands to the command. .privmsg $chan 0Examples: !cords -a Will show all the cords of every user by for 4Example: Adolf 150:1600 in my data base. .privmsg $chan 0!cords -u [Player's Name] Will show only the cords for that player. .privmsg $chan 0!cords +a [Player's Name] [Cords] Will add a user's cords to my data base. 4Example: Adolf 150:1600 This would now be logged in my data base for later use. .privmsg $chan 0!cords +h [Player's Name] [Cords] This will add the user to my known hits for that cord. .privmsg $chan 0!cords -h [Player's Name] This will show the cords hit on the player. .privmsg $chan 0Note any cords shown 9in0 have already been hit. Those shown 4in0 have not been hit. } if (%cc == !cords) && (%c == -a) { .privmsg $chan Pulling up all the names in my data base... var %x = 1, %l = $ini($cf,Lords,0) while (%x <= %l) { var %n = $ini($cf,Lords,%x), %c = $readini($cf,Lords,%n) .timer 1 $calc(%x + 2) /privmsg $chan %n $+ 's Cords are: %c inc %x } .timer 1 $calc(%x + 3) /privmsg $chan All the cords in my data base $nick <img src='http://www.tg007.net/forum/public/style_emoticons/<#EMO_DIR#>/smile.gif' class='bbc_emoticon' alt=':)' /> } if (%cc == !cords) && (%c == -u) { if ($3) { var %h = $readini($cf,Hits,$3), %n = $readini($cf,Lords,$strip($3)) if (%n) { .privmsg $chan $3 $+ 's cords are:4 %n } elseif (!%n) { .privmsg $chan $3 isnt on my data base sorry. } } } if (%cc == !cords) && (%c == +a) { var %n = $3, %c = $readini($cf,Lords,%n), %c = %c $4- $+ $chr(32) if (%n) { .writeini $cf Lords %n %c | .privmsg $chan The cords for %n have been added to my data base. $4- has been added to %c } } if (%cc == !cords) && (%c == -h) { var %n = $3, %c = $readini($cf,Hits,%n) .privmsg $chan %n $+ 's cords that have been hit are: %c } if (%cc == !cords) && (%c == +h) { var %n = $3, %cord = $strip($4-), %cord = %cord $readini($cf,Lords,%n) $+ $chr(32) if (%n) && (%cord) { .writeini $cf Hits %n $hits(%cord) .privmsg $chan %n $+ 's cords have been added to hitlist. } } } is the full code I still cant seem to figure out how to add the color tags he wanted.
  4. I've got this code I've just put togaether and a friend of mine who plays this game with me needs it to pull up some infomation for it with color tags for example: [Player Name] 555:677 999:677 and since this is a war game those up there would be the cords to that player's (cities) so I made him a bot to allow him to pull up the players cords to their city but he wants it to have color like red for the cords he hasn't attacked yet and green for the ones he has and I've tried to use replace but I'm really rusty at this coding stuff I haven't coded since the msn days. So; if (%cc == !cords) && (%c == -a) { .privmsg $chan Pulling up all the names in my data base... var %x = 1, %l = $ini($cf,Lords,0), while (%x <= %l) { var %n = $ini($cf,Lords,%x), %c = $readini($cf,Lords,%n), %h = $readini($cf,Hits,%n), %c = $replace(%c,%h,9 %h 4) .timer 1 $calc(%x + 2) /privmsg $chan %n $+ 's Cords are: %c inc %x } .timer 1 $calc(%x + 3) /privmsg $chan All the cords in my data base $nick <img src='http://www.tg007.net/forum/public/style_emoticons/<#EMO_DIR#>/smile.gif' class='bbc_emoticon' alt=':)' /> } I dono where I went wrong only that its not working. $cf is the dir for the ini file. and I need it to replace the ones on the hit list to be color green while the other cords arent effected. So it would pull up in the list as: Mark's cords are: 888:999 977:225 799:5667 The reason I use var for !cords and the sub-command is cuz the server I'm on has webchat and I have to strip away all the html coding.
  5. Adolf

    Proxy Checker

    I did send you a message. In the message I explain. Because it would be called spamming I refuse to post it here.
  6. I used to script a long time ago ages ago really and was a very active member on this site but since I haven't been on here since msn shut down all the chat rooms I'm not exactly sure on the rules anymore I'm hoping asking for help on a mirc based script for checking proxies is allowed. Though I need it to use sockets because I'm playing a game called Lords Online where I've got a private channel for the other alliances to come and talk to each other without having to wait for a 3 sec flood protection on the world chat. And it gets used often but I dont like the fact people can see my isp on my bot since it runs 24/7. Though I've came up with a small script for checking the proxy list however it still needs work is why I'm here asking is there a way to use a socket to check the proxy ip and connect that way then disconnect and reconnect with just the mirc. alias fdir { return $mircdir $+ core\firewall.txt } alias cfire { .firewall -p %fip | .server %server %port | .sockclose FireWall | unset %fip } alias nfw { if (!%count) { set %count 1 } var %f = $read($fdir, %count), %s = $gettok(%f,1,58), %p = $gettok(%f,2,58), %l = $lines($fdir), %l2 = %count if (!$window(@FireWall)) { .window -ek0 @FireWall } if (%s) { if ($status == Connected) { .timerfirewall off | halt } if (%count >= $lines($fdir)) { unset %count } else { .sockclose FireWall .sockopen Firewall %s %p .echo @FireWall %l2 [FIREWALL] Checking $+(%s,:,%p) .titlebar @FireWall Attempt %l2 of %l inc %count } } } on *:SOCKOPEN:Firewall:{ var %s = $sock($sockname).wserr, %ss = $sock($sockname).wsmsg set %fip $sock($sockname).ip $sock($sockname).port .echo @FireWall [FIREWALL] SockOpen %fip : %ss .echo @FireWall - if (%s == 0) { .echo @FireWall [FIREWALL] Connect Attempt: %fip | .titlebar @FireWall Attempting To Connect... | .timerfirewall 1 10 /nfw | .echo @Firewall - | .cfire } elseif (%s) { .nfw } else { .cfire } } menu @FireWall { Find:/nfw Clear Screen:/clear Attempts %count:/unset %count } on *:DISCONNECT:{ .timer 1 5 /nfw } on *:START:{ .nfw } on *:CONNECT:{ .timerfirewall off | .titlebar @FireWall Connected. } though this version uses the error message 0 which there are 280 proxies I can use however it has to go through the whole list before it actually finds one and each one has an online percent of between 20-90% of the time. And since I know sockets are faster at checking this instead of using mirc and having to back track and rewrite a whole new script is there anyone here that can help. Also if this isn't allowed here I request the mods to remove it asap. Thank you. Note: Since the script picks up on the 0 error message and will attempt a connection to it. There are times where it wont go through is another reason I rather just to use a socket since I can hide most of the connection fails and such and giving the bot a cleaner look. And for the future if I decided to release the finished script as giving credit to those whom helped. I wouldn't want it giving off a crappy look to anyone else.
×
×
  • Create New...