View difference between Paste ID: RhREuhjc and 9GF92sid
SHOW: | | - or go back to the newest paste.
1
2
PASTEBIN  |  #1 paste tool since 2002	
3
4
    create new paste
5
    tools
6
    api
7
    archive
8
    faq
9
10
PASTEBIN
11
create new paste     trending pastes
12
13
    Hi, Xzempt
14
    my pastebin
15
    my alerts
16
    my settings
17
    my profile
18
    logout
19
    Go PRO
20
21
Don't like ads? PRO users don't see any ads ;-)
22
My Pastes
23
24
    Untitled9 min ago
25
    Untitled11 min ago
26
    Untitled21 min ago
27
    Untitled39 min ago
28
    Untitled42 min ago
29
    Untitled57 min ago
30
    Untitled1 hour ago
31
    Untitled1 hour ago
32
33
0
34
0
35
Guest	
36
Untitled
37
By: Xzempt on Jun 3rd, 2013  |  syntax: None  |  size: 10.33 KB  |  hits: 12  |  expires: Never
38
edit  |  delete  |  download  |  raw  |  embed  |  report abuse  |  print
39
This paste has a previous version, view the difference.
40
41
        # Command Bindings
42-
	       if {[matchattr $hand o|o $chan]} {
42+
43
        bind pub -|- ~commands proc_commands
44
        bind pub -|- !bj proc_blackjackcommands
45
        bind pub -|- !coin_and_roll proc_coindandrollcommands
46
        bind pub -|- !fightcmds proc_fightcommands
47
        bind pub -|- !holdemcmds proc_holdemcommands
48
        bind pub -|- !fishing_and_hunting proc_fishingandhuntingcommands
49
        bind pub -|- !unocmds proc_unocommands
50
        bind pub -|- !misc_cmds proc_misccommands
51
        bind pub -|- !bot_mastercmds proc_bot_master
52
        bind pub -|- !auto_opcmds proc_auto_op
53
        # Commands Process
54
         
55
        proc proc_commands { nick uhost hand chan text } {
56
          if {[matchattr $hand m|m $chan]} {
57
           putquick "NOTICE $nick :You Are Currently Bot Master, And Have Access To The Following Commands"
58
           proc_listcommands $nick $uhost $hand $chan
59
           return 0
60
          } elseif {[matchattr $hand o|o $chan]} {
61
           putquick "NOTICE $nick :You Are Currently Auto-Op, And Have Access To The Following Commands"
62
           proc_listcommands $nick $uhost $hand $chan
63
           return 0
64
          } else {
65
              putquick "NOTICE $nick :You Are A Basic User, And Have Access To The Following Commands"
66
              proc_listcommands $nick $uhost $hand $chan
67
              return 0
68
         }
69
        }
70
         proc proc_listcommands { nick uhost hand chan } {
71
               global botnick
72
               putquick "NOTICE $nick :\002!bj - Commands for Blackjack\002"
73
               putquick "NOTICE $nick :\002!coin_and_roll - Commands for Coin and Roll\002"
74
               putquick "NOTICE $nick :\002!fightcmds - Commands for Fight\002"
75
               putquick "NOTICE $nick :\002!holdemcmds - Texas Holdem Commands\002"
76
               putquick "NOTICE $nick :\002!fishing_and_hunting - Fishing & Hunting Commands\002"
77
               putquick "NOTICE $nick :\002!unocmds - Uno Commands\002"
78
               putquick "NOTICE $nick :\002!misc_cmds - Miscellaneous Commands\002"
79
	       if {[matchattr $hand m|m $chan]} {
80
               putquick "NOTICE $nick :\002!bot_mastercmds - Bot Master Commands\002"
81
	       } elseif {[matchattr $hand o|o $chan]} {
82
               putquick "NOTICE $nick :\002!auto_opcmds - Auto op Commands\002"
83
	       }
84
      }
85
      proc proc_auto_op { nick uhost hand chan text } {
86
      if {[matchattr $hand o|o $chan]} {
87
              putquick "NOTICE $nick :\002AUTO-OP COMMANDS\002"
88
            putquick "NOTICE $nick :~commands\002 - Kinda Obvious Don't Ya Think.."
89
            putquick "NOTICE $nick :~opme\002 - Have The Bot Op You"
90
            putquick "NOTICE $nick :~deopme\002 - Have The Bot De-Op You"
91
            putquick "NOTICE $nick :~op <nickname>\002 - Have The Bot Op Someone"
92
            putquick "NOTICE $nick :~deop <nickname>\002 - Have Tbe Bot DeOp Someone"
93
            putquick "NOTICE $nick :~whois <nickname>\002 - Find Out If The Nickname Is In The Bots User Database"
94
            putquick "NOTICE $nick :~kick <nickname>\002 - Have The Bot To A Quick Kick Of Nickname"
95
            putquick "NOTICE $nick :~ban <nickname>\002 - Have The Bot Do A Quick Kick/Ban Of Nickname"
96
            putquick "NOTICE $nick :~server\002 - Find Out What Server:Port The Bot Is On"
97
            putquick "NOTICE $nick :~lc\002 - Lock The Channel To Prevent Flooding"
98
            putquick "NOTICE $nick :~uc\002 - Unlock The Channel"
99
            putquick "NOTICE $nick :\002END OF AUTO-OP COMMANDS\002"
100
            }
101
      }
102
     
103
      proc proc_bot_master { nick uhost hand chan text } {
104
          if {[matchattr $hand m|m $chan]} {
105
            putquick "NOTICE $nick :\002BOT MASTER COMMANDS\002"
106
            putquick "NOTICE $nick :~addop <nickname>\002 - Add The Nickname To The Bots Auto-Op List"
107
            putquick "NOTICE $nick :~delop <nickname>\002 - Remove The Nickname From The Bots Auto-Op List"
108
            putquick "NOTICE $nick :~adduser <nickname>\002 - Add  User To The User Database With Default Flags"
109
            putquick "NOTICE $nick :~deluser <nickname>\002 - Remove A User From The Bots Database, Can Be Used If User Needs To Re-Register With The Bot"
110
            putquick "NOTICE $nick :~jump <server>\002 - Forces The Bot To Change Servers To Server Entered"
111
            putquick "NOTICE $nick :~update\002 - Manually Update The Stats Site"
112
            putquick "NOTICE $nick :~gban <nickname>\002 - Add A Global Ban To The Bots Internal Ban List (ie: akick)"
113
            putquick "NOTICE $nick :\002END OF BOT MASTER COMMANDS"
114
          }
115
         }
116
         
117
         
118
     proc proc_blackjackcommands { nick uhost hand chan text } {
119
          global botnick
120
          putquick "NOTICE $nick :\002BLACKJACK COMMANDS\002 (must have more than 1 player to play)"
121
          putquick "NOTICE $nick :\002?blackjack on\002 - turn on blackjack in the channel (must be bot owner)"
122
          putquick "NOTICE $nick :\002?blackjack off\002 - turn off blackjack in the channel (must be bot owner)"
123
          putquick "NOTICE $nick :\002?blackjack\002 - start a game"
124
          putquick "NOTICE $nick :\002?blackjack stats\002 - get channel stats for blackjack"
125
          putquick "NOTICE $nick :\002?blackjack version\002 - shows the blackjack script version"
126
          putquick "NOTICE $nick :\002?join\002 - join a game once started"
127
          putquick "NOTICE $nick :\002?card\002 - get a card"
128
          putquick "NOTICE $nick :\002?enough\002 - finish with what cards you have"
129
          putquick "NOTICE $nick :\002?stop\002 - ends the game (must be bot owner)"
130
     
131
          }
132
         
133
     proc proc_coindandrollcommands { nick uhost hand chan text } {
134
          global botnick
135
          putquick "NOTICE $nick :\002COIN AND ROLL COMMANDS\002"
136
          putquick "NOTICE $nick :\002!coin nick\002 - to flip a coin between you and another nick"
137
          putquick "NOTICE $nick :\002!coin nick1 nick2\002 - to flip a coin between the two named nicks"
138
          putquick "NOTICE $nick :\002!roll nick1 nick2 nick3\002 - list any two or more nicks as the players, can use +me or your nick to include yourself"
139
          putquick "NOTICE $nick :\002!roll nick\002 - command user will be the second player"
140
          putquick "NOTICE $nick :\002!roll -all\002 - rolls the dice for every user in the channel"
141
          putquick "NOTICE $nick :\002!roll <number of players>\002 - example !roll 14, will roll 14 random nicks in the channel"
142
     
143
           }
144
           
145
     proc proc_fightcommands { nick uhost hand chan text } {
146
          global botnick
147
          putquick "NOTICE $nick :\002FIGHT COMMANDS\002"
148
          putquick "NOTICE $nick :\002!fight nick\002 - starts a fight with the nick"
149
          putquick "NOTICE $nick :\002!fj or !jab\002 - setup a jab"
150
          putquick "NOTICE $nick :\002!fp or !punch\002 - setup a punch"
151
          putquick "NOTICE $nick :\002!fk or !kick\002 - setup a kick"
152
          putquick "NOTICE $nick :\002!fu or !uppercut\002 - setup an uppercut"
153
          putquick "NOTICE $nick :\002!fg or !guard\002 - use guard"
154
          putquick "NOTICE $nick :\002!fd or !dodge\002 - dodge the attack"
155
          putquick "NOTICE $nick :\002!fs or !suicide\002 - kamikaze"
156
          putquick "NOTICE $nick :\002!fstat\002 - show your fight stats"
157
          putquick "NOTICE $nick :\002!fversion\002 - shows the script version"
158
          putquick "NOTICE $nick :\002!fhis\002 - shows fight history"
159
     
160
          }
161
         
162
     proc proc_holdemcommands { nick uhost hand chan text } {
163
          global botnick
164
          putquick "NOTICE $nick :\002!HOLDEM POKER COMMANDS\002"
165
          putquick "NOTICE $nick :\002!holdem\002 - starts the game"
166
          putquick "NOTICE $nick :\002!join\002 - joins a started game"
167
          putquick "NOTICE $nick :\002!play\002 - use to start a game without waiting 60secs for others to join"
168
          putquick "NOTICE $nick :\002call\002"
169
          putquick "NOTICE $nick :\002check\002"
170
          putquick "NOTICE $nick :\002raise amount\002 - use to raise the bet, ie. raise 20 or raise all-in"
171
          putquick "NOTICE $nick :\002fold\002 - give up on the current hand being played"
172
          putquick "NOTICE $nick :\002cards\002 - shows your current hand"
173
          putquick "NOTICE $nick :\002!endgame\002 - stops the game"
174
     
175
    }
176
     
177
    proc proc_fishingandhuntingcommands { nick uhost hand chan text } {
178
          global botnick
179
          putquick "NOTICE $nick :\002FISHING AND HUNTING COMMANDS\002"
180
          putquick "NOTICE $nick :\002!hunt\002 - try and hunt something"
181
          putquick "NOTICE $nick :\002!cast\002 - try to catch a fish"
182
          putquick "NOTICE $nick :\002!trophy\002 - shows current record holders"
183
     
184
          }      
185
         
186
     proc proc_unocommands { nick uhost hand chan text} {
187
          global botnick
188
          putquick "NOTICE $nick :\002UNO COMMANDS\002"
189
          putquick "NOTICE $nick :\002!uno\002 - starts a game of uno"
190
          putquick "NOTICE $nick :\002join\002 - join a game"
191
          putquick "NOTICE $nick :\002!remove\002 - remove yourself from a game in progress"
192
          putquick "NOTICE $nick :\002time\002 - shows how long the current game has been running"
193
          putquick "NOTICE $nick :\002order\002 - shows the order of players"
194
          putquick "NOTICE $nick :\002hand\002 - shows your current cards"
195
          putquick "NOTICE $nick :\002turn\002 - shows whos turn it is to play a card"
196
          putquick "NOTICE $nick :\002players\002 - shows the list of players in the current game"
197
          putquick "NOTICE $nick :\002play\002 - play a card. to play a yellow 2 you would type play y 2"
198
          putquick "NOTICE $nick :\002card\002 - shows the current card in play"
199
          putquick "NOTICE $nick :\002draw\002 - draw a card if you have nothing to use"
200
          putquick "NOTICE $nick :\002color\002 - used with WILD and WILD DRAW FOUR, usage is color yellow or color red etc."
201
          putquick "NOTICE $nick :\002pass\002 - use after drawing a card if you didnt pick up something you could use"
202
          putquick "NOTICE $nick :\002count\002 - shows how many cards each player has left in their hand"
203
          putquick "NOTICE $nick :\002!unowon\002 - shows how many games you have won"
204
          putquick "NOTICE $nick :\002!unotop10\002 - shows the top 10 players"
205
          putquick "NOTICE $nick :\002!unorules\002 - shows the rules for gameplay"
206
     
207
          }
208
         
209
      proc proc_misccommands { nick uhost hand chan text } {
210
          global botnick
211
          putquick "NOTICE $nick :\002MISC COMMANDS\002"
212
          putquick "NOTICE $nick :\002!pastlife\002 - usage is !pastlife month day year ie. !pastlife 9 17 1982"
213
          putquick "NOTICE $nick :\002!morbid\002 - will display a random morbid fact"
214
          putquick "NOTICE $nick :\002!fact\002 - will display a random fact"
215
          putquick "NOTICE $nick :\002!timebomb nick\002 - timebombs the nickname with random number of wires and time, user must cutwire color to save themselves"
216
          putquick "NOTICE $nick :\002trivia\002 - toggles start and stop of trivia game"
217
          putquick "NOTICE $nick :\002END OF BASIC USER COMMANDS\002"
218
     
219
        }
220
         
221
         
222
        putlog "*** Op Commands by xTc^bLiTz <[email protected]>  Loaded"