View difference between Paste ID: McRKTt2Q and dr7v2Zmq
SHOW: | | - or go back to the newest paste.
1
### nOwn.tcl 1.2.0 dr7v2Zmq
2
3
#SUGGESTED
4
# PBinSrc.tcl fMrtKqyq
5
# TCLLoader.tcl smApj15u
6
7
#LICENSE
8
# Copyright © 2013 Alberto Dietze "DoctorD90"
9
#
10
#    This program is free software: you can redistribute it and/or modify
11
#    it under the terms of the GNU General Public License as published by
12
#    the Free Software Foundation, either version 3 of the License, or
13
#    (at your option) any later version.
14
#
15
#    This program is distributed in the hope that it will be useful,
16
#    but WITHOUT ANY WARRANTY; without even the implied warranty of
17
#    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
18
#    GNU General Public License for more details.
19
#
20
#    You should have received a copy of the GNU General Public License
21
#    along with this program.  If not, see <http://www.gnu.org/licenses/>.
22
#
23
# Full GPLv3 Text: http://www.gnu.org/licenses/gpl.txt
24
25
#PATERNITY
26
#Coder: DoctorD90
27
#Network: irc.OnlineGamesNet.net
28
#Chan: #eHito
29
#Mail: [email protected]
30
#Script's List: www.EggTcl.tk
31
32
#PURPOSE
33
#Get always the nick of bot's owner.
34
35
#USAGE
36
#Use [nown] where you want put the nick of bot's owner.
37
38
39
### DON'T EDIT ANYTHING BELOW ###
40
41
proc nown { } {
42
  if {[handonchan $::owner]} {
43
    set o [hand2nick $::owner]
44
  } else {
45
    set o $::owner
46
  }
47
  return $o
48
}
49
50
###
51
putlog "nOwn.tcl LOADED"