Gaming Community
Forum
 
Go Back   D3scene > Hot Games > Warcraft 3 forum > Warcraft 3 Tools > Stealthbot > Stealthbot Plugins
Register Blogs Live view Downloads Marketplace FAQ Members List Social Groups Calendar Search Today's Posts Mark Forums Read

Infochannel plugin, made by T[x]aS ! New version

This is a discussion on Infochannel plugin, made by T[x]aS ! New version within the Stealthbot Plugins forum part of the Stealthbot category; here it is ! i uploaded it because its very good and usefull Code: 'infochannel '1.6 'By DrOiD Dim AhoraC ...


Welcome on D3scene.com! Make sure to register - it's free and very quick! You have to register before you can post and participate in our discussions with 70000 other registered members. Downloads, user profiles and some forums can only be seen by registered members. After you create your free account you will be able to customize many options, you will have the full access to new hacks, latest cheats and last but not least will see no advertisements at all. We would love to see you around in our community!
Reply
 
LinkBack Thread Tools Display Modes
  #1  
Old 11-02-2007, 11:08 AM
xiN xiN is online now
The Almighty Frenchie

 
Join Date: Feb 2007
Location: Six feet under
Posts: 1,686
Thanks: 8
Thanked 12 Times in 9 Posts
Reputation: 314
Rep Power: 4
xiN is a jewel in the roughxiN is a jewel in the roughxiN is a jewel in the roughxiN is a jewel in the rough
Infochannel plugin, made by T[x]aS ! New version

here it is ! i uploaded it because its very good and usefull

Code:
'infochannel
'1.6
'By DrOiD


Dim AhoraC
dim Peon,Footman,Knight,Archmage,Medivh,Grunt,Tauren,Far_Seer,Thrall,Ghoul,Abomination,Lich,Tichondrius,Archer
dim Druid_of_the_Claw,Priestess_of_the_Moon,Furion_Stomrage,Green_Dragon_Whelp,Blue_Dragon,Red_Dragon,Deathwing
dim Total,LevelSum
Dim TotalNum
dim human,Orc,Undead,Night_Elf,Random
dim estado,StartTime,icgreet

dim TimeLastMsg

Sub infochannel_event_Load()
	      AhoraC = now()
              icgreet = "on"
              Estado = "off"
              Tseconds1 = 60 '60 seconds
              Tseconds2 = 50 '60 seconds
              TimerInterval "infochannel", "Timer1", (Tseconds1)
              TimerEnabled "infochannel", "Timer1", false
              TimerInterval "infochannel", "Timer2", (Tseconds2)
              TimerEnabled "infochannel", "Timer2", false
              addchat vbOrange, "** DrOiD'S INFOCHANNEL PluG LoaDeD ** Command: .iChannel On/off | .AccTested | .StartTime | .iCTiMER on/off | .ichannel1 | .ichannel2 | .iCGreet on/Off | Access > 120"
End Sub


'// Fires when a user leaves the channel.
 
Sub infochannel_Event_UserLeaves(Username, Flags)
	'Addq "/w " & username & " Bye " & username & " !, See You Soon in " & ucase(myChannel)
End Sub


Sub infochannel_event_UserTalk(Username, Flags, Message, Ping)
    Message = lcase(Message)
    Call ssc.GetDBEntry(username, Access, Flags)

    if access > 120 then

    If LCase(Left(Message, 10)) = BotVars.Trigger & "ichannel " Then
        Estado = mid(Message, 11)
        if estado = "on" then
            addq "/emote ** Infochannel PLuG [On] ChanneL: " & myChannel
            TimerEnabled "infochannel", "Timer1", true
            TimerEnabled "infochannel", "Timer2", true
            StartTime = time
            call Limpia()
        else
            addq "/emote ** Infochannel PLuG [OFF]"
            TimerEnabled "infochannel", "Timer1", false
            TimerEnabled "infochannel", "Timer2", false
            call Limpia()
        end if
    end if
    If LCase(Left(Message, 10)) = BotVars.Trigger & "acctested" Then
            addq "/emote Acc. Tested: [" & total & "]"
    end if
    If LCase(Left(Message, 10)) = BotVars.Trigger & "starttime" Then
            txtMin = DateDiff("s", StartTime, time)
            txtMin = left(txtMin / 60,3)
            addq "/emote Start Time: [" & StartTime & "] " & txtmin & " Minutes ago"
    end if
    If LCase(Left(Message, 9)) = BotVars.Trigger & "ictimer " Then
        IdleMsg = mid(Message, 10)
        if IdleMsg = "on" then
            addq "/emote ** Timer Idle InFoChannel [On] Showing Mode"
            TimerEnabled "infochannel", "Timer1", true
            TimerEnabled "infochannel", "Timer2", true
        else
            addq "/emote ** Timer Idle InFoChannel [OFF] Silence Mode"
            TimerEnabled "infochannel", "Timer1", false
            TimerEnabled "infochannel", "Timer2", false
        end if
    end if

    If LCase(Left(Message, 10)) = BotVars.Trigger & "ichannel1" Then
        if estado = "on" then
           call Info1()
        else
           addq "/emote ** InFoChanneL is not Activated ** Type: .iChannel On"
        end if
    end if
    If LCase(Left(Message, 10)) = BotVars.Trigger & "ichannel2" Then
        if estado = "on" then
           call Info2()
        else
           addq "/emote ** InFoChanneL is not Activated ** Type: .iChannel On"
        end if
    end if

    If LCase(Left(Message, 9)) = BotVars.Trigger & "icgreet " Then
        icgreet = mid(Message, 10)
        if icgreet = "on" then
            addq "/emote ** Greet Users [On]"
        else
            addq "/emote ** Greet Users [OFF]"
        end if
    end if

    
    end if 'End if the Acces
end sub



Sub infochannel_Event_UserJoins(Username, Flags, Message, Ping, Product, Level, OriginalStatstring)
	totalnum = totalnum + 1
        if Estado = "on" then
                Level = GetStat(OriginalStatstring,1)
	        LevelSum = LevelSum + level
	        BestRace = GetStat(OriginalStatstring,2)
	        icono = GetStat(OriginalStatstring,3)
	        clan = GetStat(OriginalStatstring,4)
                total = total + 1
         end if

        if icgreet = "on" then
                   txtSecs = DateDiff("s",TimeLastMsg, now())
                   if txtSecs <= 3 then
                      addchat vbred," DrOiD's Anti Greets FlooD Detected | Time Last Greet: " & txtSecs
                      exit sub
                   end if
                   if Estado <> "on" then
                      Level = GetStat(OriginalStatstring,1)
	              BestRace = GetStat(OriginalStatstring,2)
	              icono = GetStat(OriginalStatstring,3)
                      clan = GetStat(OriginalStatstring,4)
                      if clan <> "" then clan = "[Clan " & clan & "]"
                      addq  "/w " & username & " [ /!\  Welcome To " & ucase(myChannel) & " /!\ ] " & clan & Username & " | RaCe: " & BesTRace & " | iCon: " & icono & " | " & categoria(level) & " | " & CategoriaPing(ping) & " | ViSitOr NuMber: [ " & totalnum & " ] SinCe: " & ahorac
                      TimeLastMsg = now()
		      'addq  "/w " & username & " " & USername & " Did You Know... " & gettipt()
                   end if
        end if
        

        'addchat vbgreen,"Join: " & clan & Username & " | BesTRaCe " & BesTRace & " | Icon: " & icono & " | " & categoria(level) & " | " & CategoriaPing(ping)
End Sub

Sub infochannel_timer1_Timer()
    call Info1()
end sub

Sub infochannel_timer2_Timer()
    call info2()
end sub

function GetPer(Num,total)
         getper = left(num * 100 / total,4) & "%"
end function

function Categoria(level)
	 Categoria = "Level 0 T.t"
         if level > 1 then Categoria = "NooB Level : " & level
         if level > 5 then Categoria = "Naap Level : " & level
         if level > 10 then Categoria = "Medium Level : " & level
         if level > 20 then Categoria = "GooD Level : " & level
         if level > 35 then Categoria = "Very GooD Level : " & level
         if level > 40 then Categoria = "GooD Gosu Level : " & level
         if level > 50 then Categoria = "TOP ELITE GOSU Level : " & level
end function
function CategoriaPing(ping)
         if ping > 15 then CategoriaPing = "GoSu Ping : " & ping
         if ping > 30 then CategoriaPing = "Very GooD Ping : " & ping
         if ping > 60 then CategoriaPing = "Nice PinG : " & ping
         if ping > 90 then CategoriaPing = "GooD PinG : " & ping
         if ping > 110 then CategoriaPing = "Normal PinG : " & ping
         if ping > 150 then CategoriaPing = "BAD PinG : " & ping
         if ping >= 1000 then CategoriaPing = "Exit Bnet , VERY BaD PinG : " & ping
end function

Sub Info1()
       PeonPer = getper( peon , total )
       FootmanPer = getper( Footman , total )
       KnightPer = getper( Knight , total )
       ArchmagePer = getper( Archmage , total )
       MedivhPer = getper( Medivh , total )
       GruntPer = getper( Grunt , total )
       TaurenPer = getper( Tauren , total )
       Far_SeerPer = getper( Far_Seer , total )
       ThrallPer = getper( Thrall , total )
       '___________
       humanPer = getper( human , total )
       OrcPer = getper( Orc , total )
       UndeadPer = getper( Undead , total )
       Night_ElfPer = getper( Night_Elf , total )
       RandomPer = getper( Random , total )
       '___________
       LevelPer = getper( levelsum , total ) 'Level medio = SumLevels / TotalPlayers

       addq  "/emote Peon: " & PeonPer & " FooTman: " & FootmanPer & " Knight: " & KnightPer & " Archmage: " & ArchmagePer & " Medivh: " & MedivhPer
       addq  "/emote Grunt: " & GruntPer & " Tauren: " & TaurenPer & " Far Seer: " & Far_SeerPer & " ThraLL: " & ThrallPer
       addq  "/emote [RACE PLAYERS] Ne: " & Night_ElfPer & " | Orc: " & OrcPer & " | Human: " & humanPer & " | Undead: " & UndeadPer & " | Level Average: " & levelper '" | Random: " & RandomPer
end sub
SuB info2()
       PeonPer = getper( peon , total )
       GhoulPer = getper( Ghoul , total )
       AbominationPer = getper( Abomination , total )
       LichPer = getper( Lich , total )
       TichondriusPer = getper( Tichondrius , total )
       ArcherPer = getper( Archer , total )
       Druid_of_the_ClawPer = getper( Druid_of_the_Claw , total )
       Priestess_of_the_MoonPer = getper( Priestess_of_the_Moon , total )
       Furion_StomragePer = getper( Furion_Stomrage , total )
       Green_Dragon_WhelpPer = getper( Green_Dragon_Whelp , total )
       Blue_DragonPer = getper( Blue_Dragon , total )
       Red_DragonPer = getper( Red_Dragon , total )
       DeathwingPer  = getper( DeathwingPer , total )

       addchat vbgreen , "-TOTAL: " & total

       addq "/emote Peon: " & PeonPer & " Ghoul: " & GhoulPer & " Abomination: " & AbominationPer & " Lich: " & LichPer & " Tichondrius: " & TichondriusPer
       addq "/emote Archer: " & ArcherPer & " Dotc: " & Druid_of_the_ClawPer & " PoTM: " & Priestess_of_the_MoonPer & " Furion: " & Furion_StomragePer
       addq "/emote Green Dragon: " & Green_Dragon_WhelpPer & " Blue Dragon: " & Blue_DragonPer & " Red Dragon: " & Red_DragonPer & " Deathwing: " & DeathwingPer
end sub

'/////// FUNCTION GETSTATS /////  Usando Statstring  Valido para Roc@Tft

Function GetStat(Statstring, Value)
  Dim Product, StatArray, StatArray2(50), SaveStatString
  StatArray = Split(Statstring, " ")
  Product = Left(Statstring, 4)
  GetStat = ""
  Select Case Product
    Case "3RAW"
      If Len(Statstring) = 4 And Value <> 0 Then
        Exit Function
      End If
      Select Case Value
        Case 0
          GetStat = "WarCraft III: Reign of Chaos"
        Case 1
          GetStat = StatArray(2)
        Case 2
          Select Case Mid(StatArray(1), 2, 1)
            Case "H"
              GetStat = "Human"
              human = human + 1
            Case "O"
              GetStat = "Orc"
              Orc = orc + 1
            Case "U"
              GetStat = "Undead"
              Undead = undead + 1
            Case "N"
              GetStat = "Night Elf"
              Night_Elf = Night_Elf +1
            Case "R"
              GetStat = "Random"
              Random = random + 1
          End Select
        Case 3
          Select Case Mid(StatArray(1), 2, 1)
            Case "H"
              Select Case Mid(StatArray(1), 1, 1)
                Case 1
                  GetStat = "Peon"
                  peon = peon +1
                Case 2
                  GetStat = "Footman"
                  Footman = Footman +1
                Case 3
                  GetStat = "Knight"
                  Knight = Knight +1
                Case 4
                  GetStat = "Archmage"
                  Archmage = Archmage + 1
                Case 5
                  GetStat = "Medivh"
                  Medivh = Medivh +1
              End Select
            Case "O"
              Select Case Mid(StatArray(1), 1, 1)
                Case 1
                  GetStat = "Peon"
                  Peon = Peon +1
                Case 2
                  GetStat = "Grunt"
                  Grunt = Grunt +1
                Case 3
                  GetStat = "Tauren"
                  Tauren = Tauren +1
                Case 4
                  GetStat = "Far Seer"
                  Far_Seer = Far_Seer +1
                Case 5
                  GetStat = "Thrall"
                  Thrall = Thrall + 1
              End Select
            Case "U"
              Select Case Mid(StatArray(1), 1, 1)
                Case 1
                  GetStat = "Peon"
                  Peon = Peon + 1
                Case 2
                  GetStat = "Ghoul"
                  Ghoul = Ghoul + 1
                Case 3
                  GetStat = "Abomination"
                  Abomination = Abomination + 1
                Case 4
                  GetStat = "Lich"
                  Lich = Lich +1
                Case 5
                  GetStat = "Tichondrius"
                  Tichondrius = Tichondrius +1
              End Select
            Case "N"
              Select Case Mid(StatArray(1), 1, 1)
                Case 1
                  GetStat = "Peon"
                  Peon = Peon + 1
                Case 2
                  GetStat = "Archer"
                  Archer = Archer +1
                Case 3
                  GetStat = "Druid of the Claw"
                  Druid_of_the_Claw = Druid_of_the_Claw +1
                Case 4
                  GetStat = "Priestess of the Moon"
                  Priestess_of_the_Moon = Priestess_of_the_Moon + 1
                Case 5
                  GetStat = "Furion Stomrage"
                  Furion_Stomrage = Furion_Stomrage +1
              End Select
            Case "R"
              Select Case Mid(StatArray(1), 1, 1)
                Case 1
                  GetStat = "Peon"
                  Peon = Peon +1
                Case 2
                  GetStat = "Green Dragon Whelp"
                  Green_Dragon_Whelp = Green_Dragon_Whelp +1
                Case 3
                  GetStat = "Blue Dragon"
                  Blue_Dragon = Blue_Dragon +1
                Case 4
                  GetStat = "Red Dragon"
                  Red_Dragon = Red_Dragon +1
                Case 5
                  GetStat = "Deathwing"
                  Deathwing = Deathwing +1
              End Select
          End Select
        Case 4
          If UBound(StatArray) > 2 Then
            GetStat = StrReverse(StatArray(3))
          End If
      End Select
    Case "PX3W"
      If Len(Statstring) = 4 And Value <> 0 Then
        Exit Function
      End If
      Select Case Value
        Case 0
          GetStat = "WarCraft III: The Frozen Throne"
        Case 1
          GetStat = StatArray(2)
        Case 2
          Select Case Mid(StatArray(1), 2, 1)
            Case "H"
              GetStat = "Human"
            Case "O"
              GetStat = "Orc"
            Case "U"
              GetStat = "Undead"
            Case "N"
              GetStat = "Night Elf"
            Case "R"
              GetStat = "Random"
            Case "D"
              GetStat = "Tournament"
          End Select
        Case 3
          Select Case Mid(StatArray(1), 2, 1)
            Case "H"
              Select Case Mid(StatArray(1), 1, 1)
                Case 1
                  GetStat = "Peon"
                Case 2
                  GetStat = "Rifleman"
                Case 3
                  GetStat = "Sorceress"
                Case 4
                  GetStat = "Spellbreaker"
                Case 5
                  GetStat = "Blood Mage"
                Case 6
                  GetStat = "Jaina"  
              End Select
            Case "O"
              Select Case Mid(StatArray(1), 1, 1)
                Case 1
                  GetStat = "Peon"
                Case 2
                  GetStat = "Troll headhunter"
                Case 3
                  GetStat = "Shaman"
                Case 4
                  GetStat = "Spirit Walker"
                Case 5
                  GetStat = "Shadow hunter"
                Case 6
                  GetStat = "Rexxar"
              End Select
            Case "U"
              Select Case Mid(StatArray(1), 1, 1)
                Case 1
                  GetStat = "Peon"
                Case 2
                  GetStat = "Crypt Fiend"
                Case 3
                  GetStat = "Banshee"
                Case 4
                  GetStat = "Destroyer"
                Case 5
                  GetStat = "Crypt Lord"
                Case 6
                  GetStat = "Sylvanas"
              End Select
            Case "N"
              Select Case Mid(StatArray(1), 1, 1)
                Case 1
                  GetStat = "Peon"
                Case 2
                  GetStat = "Huntress"
                Case 3
                  GetStat = "Druid of the Talon"
                Case 4
                  GetStat = "Dryad"
                Case 5
                  GetStat = "Keeper of the Grove"
                Case 6
                  GetStat = "Maiev"
              End Select
            Case "R"
              Select Case Mid(StatArray(1), 1, 1)
                Case 1
                  GetStat = "Peon"
                Case 2
                  GetStat = "Myrmidon"
                Case 3
                  GetStat = "Siren"
                Case 4
                  GetStat = "Dragon Turtle"
                Case 5
                  GetStat = "Sea Witch"
                Case 6
                  GetStat = "Illidan"
              End Select
            Case "D"
              Select Case Mid(StatArray(1), 1, 1)
                Case 1
                  GetStat = "Peon"
                Case 2
                  GetStat = "Felguard"
                Case 3
                  GetStat = "infernal"
                Case 4
                  GetStat = "Doomguard"
                Case 5
                  GetStat = "Pit Lord"
                Case 6
                  GetStat = "Archimonde"
              End Select
          End Select
        Case 4
          If UBound(StatArray) > 2 Then
            GetStat = StrReverse(StatArray(3))
          End If
      End Select
    Case "LTRD", "RHSD"
      Select Case Value
        Case 0
          Select Case Product
            Case "LTRD"
              GetStat = "Diablo"
            Case "RHSD"
              GetStat = "Diablo: Shareware"
          End Select
        Case 1
           GetStat = StatArray(1)
        Case 2
           GetStat = StatArray(2)
        Case 3
          Select Case StatArray(2)
            Case 0
              GetStat = "Warrior"
            Case 1
              GetStat = "Rogue"
            Case 2
              GetStat = "Sorceror"
          End Select
        Case 4
          GetStat = StatArray(4)
        Case 5
          GetStat = StatArray(5)
        Case 6
          GetStat = StatArray(6)
        Case 7
          GetStat = StatArray(7)
        Case 8
          GetStat = StatArray(8)
        Case 9
          If UBound(StatArray) <> 9 Then
            GetStat = True
          Else
            GetStat = False
          End If
      End Select
    Case "RATS", "PXES", "RTSJ", "NB2W"
      Select Case Value
        Case 0
          Select Case Product
            Case "RATS"
              GetStat = "Starcraft"
            Case "PXES"
              GetStat = "Starcraft: Brood War"
            Case "RTSJ"
              GetStat = "Starcraft: Japanese"
            Case "NB2W"
              GetStat = "Warcraft II: Battle.net Edition"
          End Select
        Case 1
          GetStat = StatArray(3)
        Case 2
          If StatArray(1) <> "0" Then
            GetStat = StatArray(1)
          End If
        Case 3
          If StatArray(5) <> "0" Then
            GetStat = StatArray(5)
          End If
        Case 4
          If StatArray(2) <> "0" Then
            GetStat = StatArray(2)
          End If
        Case 5
          If StatArray(4) = 1 Then
            GetStat = True
          Else
            GetStat = False
          End If
        Case 6
          If UBound(StatArray) <> 9 Then
            GetStat = "True"
          Else
            GetStat = "False"
          End If
      End Select
    Case "RHSS"
      If Value = 0 Then
        GetStat = "Starcraft: Shareware"
      End If
    Case "TAHC"
      If Value = 0 Then
        GetStat = "Chat Bot"
      End If
    Case "PX2D", "VD2D"
      Select Case Value
        Case 0
          Select Case Product
            Case "PX2D"
              GetStat = "Diablo II: Lord of Destruction"
            Case "VD2D"
              GetStat = "Diablo II"
          End Select
        Case 1
          If Len(Statstring) = 4 Then
            GetStat = True
          Else
            GetStat = False
          End If
        Case 2
          GetStat = Mid(statstring, 5, InStr(5, statstring, ",") - 5)
        Case 3
          GetStat = Mid(statstring, InStr(5, statstring, ",") + 1, InStr(InStr(5, statstring, ",") + 1, statstring, ",") - InStr(5, statstring, ",") - 1)
      End Select
    Case Else
      If Value = 0 Then
        GetStat = "Unknown"
      End If
  End Select
End Function

sub limpia()
    Peon = 0
    Footman  = 0
    Knight = 0
    Archmage = 0
    Medivh = 0
    Grunt = 0
    Tauren = 0
    Far_Seer = 0
    Thrall = 0
    Ghoul = 0
    Abomination = 0
    Lich = 0
    Tichondrius = 0
    Archer = 0
    Druid_of_the_Claw = 0
    Priestess_of_the_Moon = 0
    Furion_Stomrage = 0
    Green_Dragon_Whelp  = 0
    Blue_Dragon = 0
    Red_Dragon = 0
    Deathwing = 0
    Total = 0
    LevelSum = 0
    human = 0
    Orc = 0
    Undead  = 0
    Night_Elf  = 0
    Random  = 0
    StartTime  = ""
end sub

function gettipt()
	
	content=ScINet.OpenURL("http://roc.replayers.com/")	
	Posx = Instr(Content, "C9B03B")
	content = mid(content,posx,1000)
	Posx = Instr(Content, "/CENTER")
	content = mid(content,17,posx-18)
	content = Replace(content,"</FONT>","")	
        MsG = "[w3TiPs] " &  rndCHannelPlayer() & ", " & GetTexTR(content)
	Posx = Instr(MsG,"?")
	t1 = mid(msg,1,posx)
        t2 = mid(msg,posx+6)

	gettipt = t2 

End function
Reply With Quote
D3scene
Welcome to D3scene - probably the best location for all Gamers.

To participate in our friendly environment you have to register. After completing registration you will have full access to all threads and features. We care about members and try to make your stay as pleasant as possible. We are unique with the following feature for members - you will not see a single Advertisement!


The best: registration is completely free. It will not cost you a single penny or harm you in any way. You will lose nothing except 1 minute of your time. So why not register? We would be happy to see you around!
  #2  
Old 11-10-2007, 06:32 PM
Samsunait's Avatar
Member

 
Join Date: Aug 2007
Posts: 47
Thanks: 0
Thanked 0 Times in 0 Posts
Reputation: 5
Rep Power: 3
Samsunait is an unknown quantity at this point
I'm getting this kind of errors:

[21.47.32] <Samsunait> .ichannel on
[21.47.32] <TagS.Gnome ** Infochannel PLuG [On] ChanneL: Clan TagS>
[21.47.58] Timer Call Error On Script: Prefix> infochannel TimerName> Timer2
[21.47.58] Error Number: 6 Description: Overflow
[21.48.08] <Samsunait> .ichannel1
[21.48.08] UserTalk Call Error On File> C:\Programmi\StealthBot\Gnome\plugins\infochannel. txt
[21.48.08] Error Number: 6 Description: Overflow
[21.48.11] <Samsunait> .ichannel2
[21.48.11] UserTalk Call Error On File> C:\Programmi\StealthBot\Gnome\plugins\infochannel. txt
[21.48.11] Error Number: 6 Description: Overflow
[21.48.28] Timer Call Error On Script: Prefix> infochannel TimerName> Timer1
[21.48.28] Error Number: 6 Description: Overflow
[21.48.48] Timer Call Error On Script: Prefix> infochannel TimerName> Timer2
[21.48.48] Error Number: 6 Description: Overflow

Do you got this?
Reply With Quote
  #3  
Old 11-12-2007, 05:30 PM
xiN xiN is online now
The Almighty Frenchie

 
Join Date: Feb 2007
Location: Six feet under
Posts: 1,686
Thanks: 8
Thanked 12 Times in 9 Posts
Reputation: 314
Rep Power: 4
xiN is a jewel in the roughxiN is a jewel in the roughxiN is a jewel in the roughxiN is a jewel in the rough
no, and i dont know why there is it :o
Reply With Quote
  #4  
Old 11-12-2007, 10:01 PM
Samsunait's Avatar
Member

 
Join Date: Aug 2007
Posts: 47
Thanks: 0
Thanked 0 Times in 0 Posts
Reputation: 5
Rep Power: 3
Samsunait is an unknown quantity at this point
Well, i tryed again in a clear bot without plugins, have a look:

Code:
 [22.31.28] <Samsunait> .ichannel on
 [22.31.28] <TagS-Clan ** Infochannel PLuG [On] ChanneL: Clan TagS>
 [22.31.37] <Samsunait> .starttime
 [22.31.37] UserTalk Call Error On File> C:\Programmi\StealthBot\plugins\infochannel.txt
 [22.31.37] Error Number: 13   Description: Type mismatch
 [22.31.44] <Samsunait> .acctested
 [22.31.45] <TagS-Clan Acc. Tested: [0]>
 [22.32.08] <Samsunait> .icgreet off
 [22.32.08] <TagS-Clan ** Greet Users [OFF]>
 [22.32.18] Timer Call Error On Script: Prefix> infochannel TimerName> Timer2
 [22.32.18] Error Number: 6   Description: Overflow
 [22.32.28] Timer Call Error On Script: Prefix> infochannel TimerName> Timer1
 [22.32.28] Error Number: 6   Description: Overflow
 [22.33.08] <Samsunait> .ichannel1
 [22.33.08] UserTalk Call Error On File> C:\Programmi\StealthBot\plugins\infochannel.txt
 [22.33.08] Error Number: 6   Description: Overflow
 [22.33.08] Timer Call Error On Script: Prefix> infochannel TimerName> Timer2
 [22.33.08] Error Number: 6   Description: Overflow
 [22.33.13] <Samsunait> .ichannel2
 [22.33.13] UserTalk Call Error On File> C:\Programmi\StealthBot\plugins\infochannel.txt
 [22.33.13] Error Number: 6   Description: Overflow
 [22.33.19] <Samsunait> .starttime
 [22.33.19] UserTalk Call Error On File> C:\Programmi\StealthBot\plugins\infochannel.txt
 [22.33.19] Error Number: 13   Description: Type mismatch
 [22.33.23] <Samsunait> .ictimer on
 [22.33.23] <TagS-Clan ** Timer Idle InFoChannel [On] Showing Mode>
 [22.33.29] Timer Call Error On Script: Prefix> infochannel TimerName> Timer1
 [22.33.29] Error Number: 6   Description: Overflow
 [22.33.47] <Samsunait> .ichannel off
 [22.33.48] <TagS-Clan ** Infochannel PLuG [OFF]>
are you sure that is working for you? can you post a log? i'll do a forecast: you play Reign of Chaos, this is the cause^^
well, post a log to see if my forecast is right.
Reply With Quote
  #5  
Old 11-14-2007, 05:56 PM
xiN xiN is online now
The Almighty Frenchie

 
Join Date: Feb 2007
Location: Six feet under
Posts: 1,686
Thanks: 8
Thanked 12 Times in 9 Posts
Reputation: 314
Rep Power: 4
xiN is a jewel in the roughxiN is a jewel in the roughxiN is a jewel in the roughxiN is a jewel in the rough
its a weird bug u should ask the real T[x]aS in w3roc.com ( droid3 )
Reply With Quote
  #6  
Old 12-07-2007, 03:17 PM
lolercakess's Avatar
Member

 
Join Date: Jul 2007
Posts: 48
Thanks: 0
Thanked 0 Times in 0 Posts
Reputation: 36
Rep Power: 3
lolercakess is on a distinguished road
it work well for me thx
Reply With Quote
D3scene
Welcome to D3scene - probably the best location for all Gamers.

To participate in our friendly environment you have to register. After completing registration you will have full access to all threads and features. We care about members and try to make your stay as pleasant as possible. We are unique with the following feature for members - you will not see a single Advertisement!


The best: registration is completely free. It will not cost you a single penny or harm you in any way. You will lose nothing except 1 minute of your time. So why not register? We would be happy to see you around!
Reply

Thread Tools
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are Off


Similar Threads
Thread Thread Starter Forum Replies Last Post
Kalbintion's Guide To Get To Hidden Area's Kalbintion WoW Private Server Info & Help 32 10-08-2007 04:33 PM


All times are GMT +1. The time now is 12:42 AM.

Powered by vBulletin® Version 3.8.4
Copyright ©2000 - 2009, Jelsoft Enterprises Ltd.
SEO by vBSEO 3.3.0 ©2009, Crawlability, Inc.
vBulletin style developed by Transverse Styles