1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
|
alias gettrigger {
return %hirebot.trigger
}
on *:TEXT:*:#: {
if ($left($1,1) == $gettrigger) && ($1 == $gettrigger $+ hire) {
;set any var's we have.
var %s = Syntax: $1 <slots> <starttime> <endtime> <Payment Method - Valid Payment Methods: SMS & Paypal> - example: $gettrigger $+ hire 12
var %d = $ial($address($nick,5)).addr
;check for missing data
if (!$2) || (!$3) || (!$4) || (!$5) { notice $nick %s }
else {
;if all data appears to be there ser variables.
set %hireslots. [ $+ [ %d ] ] $2
set %hirestart. [ $+ [ %d ] ] $3 $+ $chr(95) $+ $date
set %hireend. [ $+ [ %d ] ] $4 $+ $chr(95) $+ $date
set %hirepayment. [ $+ [ %d ] ] $5
set %hireuser. [ $+ [ %d ] ] $nick
set %hirechan. [ $+ [ %d ] ] $chan
notice %hireuser. [ $+ [ %d ] ] I've receieved your request. Please read the details below and confirm, by using /msg $me email <e-mail> <confirm e-mail>
notice %hireuser. [ $+ [ %d ] ] You are hiring a server: slots: %hireslots. [ $+ [ %d ] ] start time: %hirestart. [ $+ [ %d ] ] endtime: %hireend. [ $+ [ %d ] ] payment method: %hirepayment. [ $+ [ %d ] ] $+ .
}
}
}
on *:TEXT:EMAIL*:?: {
if ($2 != $3) { msg $nick You two email addresses you specified aren't the same! | halt }
set %hire.email $2
msg $nick Thank you for your order. It will be sent now.
/sockopen vi2.co.uk hire. [ $+ [ $ticks ] ] 80
}
on *:SOCKOPEN:hire.*: {
sockwrite -tn $sockname GET /hire/process.php?slots= $+ %hire.slots $+ ×tart= $+ %hire.start $+ &timeend= $+ %hire.end $+ &pmethod= $+ %hire.payment $+ &email= $+ %hire.email $+ &user= $+ %hire.user $+ &chan= $+ %hire.chan
sockwrite -tn $sockname Host: vi2.co.uk
sockwrite -tn $sockname $crlf
msg %hire.chan Sent request for %hire.user
unset %hire.*
}
|