Hi, just 2 issues:
first use alias so that you can check the script; second you should consider an anti-flood mechanism otherwise you will get kicked.
This code works: (to check it use: !define love nature's way of tricking people into reproducing. )
on *:INPUT:#: {
if ($1 == !define) { define $me $2- | haltdef }
elseif ($1 == !explain) { explain $2 | haltdef }
}
on 1:TEXT:!define :#: define $nick $2-
on 1:TEXT:!explain :#: explain $2
alias -l define {
if (%noflood) { halt }
; Silently exits
set -u10 %noflood $true
.writeini Worddata.ini Define-Explain $2- ::: Last Modified by $1 @ $date - $time
msg $chan The Definition Of ( $2 ) Has Been Set by $1 $+ .
}
alias -l explain {
if (%noflood) { halt }
; Silently exits
set -u10 %noflood $true
if ($readini(Worddata.ini,Define-Explain,$1) == $null) {
msg $chan $1 --->> Undefined.
}
else {
msg $chan $1 --->> $readini(Worddata.ini,Define-Explain,$1)
}
}
Little script that allows to capture all dialogues among a selected number of users. Use: to add a new member select a user in the 'user list' then either use the right mouse key menu or press the F8 key. To delete a user from the list, select the user in the 'user list' then press CF8. The selected users will have their nick yellow colored. To stop capturing dialogues use the right mouse key menu.
Wonderful script. Just a typo (I think): in clear and cleanup should be hdel instead of hadd.
I also added an alias to display all the users in a room at once:
alias akaall {
var %max = $nick(#,0)
var %c = 1
while (%c <= %max) {
var %nick = $nick(#,%c)
if ($gettok($hget(NickNames,$+($network,$address(%nick,2))),0,126) > 1) {
NickNames.display %nick $active $network $address(%nick,2)
}
inc %c 1
}
}
Thanks a lot Ford, you are a very good scripter.
A note on geolocation.
The user's geolocation is derived from public database of ISPs, so actually it is the geolocation of user's ISP.
For those who might be interested, the error is very high and is related to the precision of Lat/Long numbers
(i.e.: how many decimal digit you have after the dot) according to the following table
dec. degrees distance
0 1 111 km
1 0.1 11.1 km
2 0.01 1.11 km
3 0.001 111 m
4 0.0001 11.1 m
5 0.00001 1.11 m
6 0.000001 0.111 m
7 0.0000001 1.11 cm
8 0.00000001 1.11 mm
Regards
Lucyfero