I am testing it by getting the script to message the channel with test messages at different spots in the script. I have put this in the code to test it out:
I am testing this in a channel named #RuLerZ

Alias demo {
var %user = $$1, %chan = $2, %sockname = demo. $+ $ticks
hfree -w %sockname | hmake %sockname
hadd %sockname user %user
hadd %sockname chan %chan
hadd %sockname host api.twitch.tv
hadd %sockname port 443
hadd %sockname request /kraken/users/ $+ %user $+ /follows/channels/k3mistvideo
sockopen -e %sockname $hget(%sockname,host) $hget(%sockname,port)
/msg #RuLerZ test1
}

on *:text:!test:#:{
demo $nick #
}

on *:sockopen:demo.*: {
/msg #RuLerZ test2
var %<< = sockwrite -nt $sockname
%<< GET $hget($sockname,request) HTTP/1.0
%<< Host: $sock($sockname).addr
%<< $crlf
}

on *:sockread:demo.*: {
/msg #RuLerZ test3
var %header, %content
if (!$hget($sockname,header.complete)) {
sockread %header
while (%header != $null) {
if (HTTP/* 2?? * iswm %header) { hadd $sockname following $true }
elseif (HTTP/* 4?? * iswm %header) { hadd $sockname following $false }
;echo -ag %header
sockread %header
}
if ($sockbr) hadd $sockname header.complete $true
}

if ($hget($sockname,header.complete)) {
while ($sockbr) {
sockread -f %content
;if (%content != $null) echo -ag %content
}
}
}

on *:sockclose:demo.*:{
/msg #RuLerZ test4
if ($hget($sockname,following)) { var %msg = Following }
else { var %msg = Not following }

if ($hget($sockname,chan)) { msg $v1 %msg }
else { echo -ag %msg }

hfree $sockname
}

This is the response:

[02:12] <@RuLerZ1366> !test
[02:12] <@botttttttt> test1

I am not sure why but it is just not opening the socket for me. Thank you so much for helping me out and looking into this with me. I greatly appreciate all the help you can give me.

Last edited by RuLerZ; 11/05/13 06:27 AM.