diff -ur --new-file --recursive ircN707/system/bckgrnd.als $mircdirbckgrnd.als --- ircN707/system/bckgrnd.als Thu Apr 29 15:19:42 1999 +++ $mircdirbckgrnd.als Fri Aug 6 23:34:26 1999 @@ -73,7 +73,7 @@ ) } )} )colupdt { - if (%colnick == on) cline -r $ulcolor($2,$1,$level($address($2,5))) $1 $nick($2,$1) + if (%colnick == on) cline -r $ulcolor($2,$1,$level($address($2,5))) $1 $nick($1,$2) )} )colupdt2 { ) if (%colnick == on) { @@ -475,9 +475,9 @@ ) } )} )verset { - set %iver ircN 7.07 + set %iver ircN 7.08 ) if (%iver !isin %ver) { - if ((ircN isin %ver) && (%ver != %iver)) set %ver %iver + $remove(%ver,ircN,7.07) + if ((ircN isin %ver) && (%ver != %iver)) set %ver %iver + $remove(%ver,ircN,7.08) ) else set %ver %iver + %ver ) } ) set %irc2.ver irc2 v3.0 diff -ur --new-file --recursive ircN707/system/client.als $mircdirclient.als --- ircN707/system/client.als Tue Apr 27 15:20:52 1999 +++ $mircdirclient.als Fri Aug 6 23:19:44 1999 @@ -276,7 +276,7 @@ ) write $tp(pagetmp.txt) - ) write $tp(pagetmp.txt) exit $chr(123) window -c @pages $chr(125) ) window -al @Pages 30 30 570 300 $tp(pagetmp.txt) Fixedsys 412 - aline @Pages $str(70,-) + aline @Pages $str(-,70) ) set %i.f9 0 ) :start ) inc %i.f9 @@ -285,7 +285,7 @@ ) aline @Pages Nick: $gettok(%tmp.f9,1,32) ) aline @Pages From: $gettok(%tmp.f9,2,32) on ( $+ $gettok(%tmp.f9,3,32) at $gettok(%tmp.f9,4,32) $+ ) ) aline @Pages Page: $gettok(%tmp.f9,5-,32) - aline @Pages $str(70,-) + aline @Pages $str(-,70) ) goto start ) } )} diff -ur --new-file --recursive ircN707/system/ctcps.mrc $mircdirctcps.mrc --- ircN707/system/ctcps.mrc Wed Apr 28 16:07:16 1999 +++ $mircdirctcps.mrc Mon Aug 9 21:31:30 1999 @@ -125,6 +125,7 @@ ) else iecho $hc(CHAT) request by $u($hc($nick)) $rbrk($address) port[ $+ $sc($5) $+ ] )} )CTCP 1:DCC SEND:? { + if ($count($1-,") == 2) tokenize 44 $replace($1-2,$chr(32),$chr(44)) $+ , $+ $gettok($1-,2,34) $+ , $+ $replace($gettok($1-,3,34),$chr(32),$chr(44)) ) if ($5 == 19) .sreq ignore ) elseif ($chkflag($usrh($fulladdress),$null,s)) .sreq auto ) elseif ($findtok(%badfiles,$right($3,3),1,44)) { diff -ur --new-file --recursive ircN707/system/identfrs.als $mircdiridentfrs.als --- ircN707/system/identfrs.als Thu Apr 15 16:11:38 1999 +++ $mircdiridentfrs.als Fri Aug 6 23:23:22 1999 @@ -306,21 +306,6 @@ ) if ($2) return $readini -n users.ini $1 infoline. [ $+ [ $2 ] ] ) else return $readini -n users.ini $1 infoline )} -ishighlight { - if ($mflag(options,n0,5) == 0) return $1 - set %i 0 - :start - inc %i - if ($gettok($highlight,%i,44)) { - if (($gettok($highlight,%i,44) isin $3-) || (($gettok($highlight,%i,44) isin $2) && ($mflag(options,n2,25) == 1))) { - if ($mflag(options,n2,17) == 1) beep - if ($mflag(options,n4,25) == 1) flash -w [message waiting] - return $colour(Highlight) - } - else goto start - } - return $1 -} )isopped { ) set %i.isopped 0 ) :start @@ -460,21 +445,6 @@ )r return  $+ $iif($1 != $null,$1-) $+ $iif($1 != $null,) )rb return $remove($1-,[,]) )rbrk if ($1 != $null) return ( $+ $sc($1-) $+ ) -removecs { - if ($1 !isincs $2-) return $2- - set %tmp.removecs $2- - set %i.removecs 0 - :start - inc %i.removecs - if ($pos(%tmp.removecs,$1,%i.removecs) != $null) { - if ($mid(%tmp.removecs,$pos(%tmp.removecs,$1,%i.removecs),$len($1)) === $1) { - set %tmp.removecs $left(%tmp.removecs,$sub($pos(%tmp.removecs,$1,%i.removecs),1)) $+ $right(%tmp.removecs,$sub($len(%tmp.removecs),$pls($sub($pos(%tmp.removecs,$1,%i.removecs),1),$len($1)))) - dec %i.removecs - } - goto start - } - return %tmp.removecs -} )rndstr { ) unset %tmp.rndstr ) set %i.rndstr 0 diff -ur --new-file --recursive ircN707/system/partylin.als $mircdirpartylin.als --- ircN707/system/partylin.als Fri Apr 9 01:11:20 1999 +++ $mircdirpartylin.als Fri Aug 6 23:21:02 1999 @@ -95,7 +95,7 @@ ) } ) else set %tmp.partyline.chattr - $+ $flags($3) ) set %k.partyline.chattr $4 - if ($chkflag($gettok($1,2,46),$null,n) == $false) set %k.partyline.chattr $removecs(n,$removecs(r,%k.partyline.chattr)) + if ($chkflag($gettok($1,2,46),$null,n) == $false) set %k.partyline.chattr $removecs(%k.partyline.chattr,n,r) ) if ((+ isin %k.partyline.chattr) || (- isin %k.partyline.chattr)) { ) set %i.partyline.chattr 0 ) unset %j.partyline.chattr @@ -105,8 +105,8 @@ ) if ($mid(%k.partyline.chattr,%i.partyline.chattr,1) == +) set %j.partyline.chattr + ) elseif ($mid(%k.partyline.chattr,%i.partyline.chattr,1) == -) set %j.partyline.chattr - ) else { - if (%j.partyline.chattr == +) set %tmp.partyline.chattr - $+ $remove($removecs($mid(%k.partyline.chattr,%i.partyline.chattr,1),%tmp.partyline.chattr),-) $+ $mid(%k.partyline.chattr,%i.partyline.chattr,1) - elseif (%j.partyline.chattr == -) set %tmp.partyline.chattr - $+ $remove($removecs($mid(%k.partyline.chattr,%i.partyline.chattr,1),%tmp.partyline.chattr),-) + if (%j.partyline.chattr == +) set %tmp.partyline.chattr - $+ $removecs(%tmp.partyline.chattr,$mid(%k.partyline.chattr,%i.partyline.chattr,1),-) $+ $mid(%k.partyline.chattr,%i.partyline.chattr,1) + elseif (%j.partyline.chattr == -) set %tmp.partyline.chattr - $+ $removecs(%tmp.partyline.chattr,$mid(%k.partyline.chattr,%i.partyline.chattr,1),-) ) } ) goto start ) } diff -ur --new-file --recursive ircN707/system/raw3.mrc $mircdirraw3.mrc --- ircN707/system/raw3.mrc Fri Apr 9 01:33:26 1999 +++ $mircdirraw3.mrc Fri Aug 6 23:27:02 1999 @@ -179,10 +179,12 @@ ) if (%vercheck == on) { ) if ($server($server).group) { ) if (hybrid-6 isin $1-) netset $server($server).group 4 hybrid6 + elseif (TS3 isin $1-) netset $server($server).group 4 ) else netset $server($server).group 3 ) } ) elseif ($network) { ) if (hybrid-6 isin $1-) netset $network 4 hybrid6 + elseif (TS3 isin $1-) netset $network 4 ) else netset $network 3 ) } ) else { diff -ur --new-file --recursive ircN707/system/themes.mrc $mircdirthemes.mrc --- ircN707/system/themes.mrc Wed Apr 28 16:08:12 1999 +++ $mircdirthemes.mrc Mon Aug 9 21:29:14 1999 @@ -31,7 +31,7 @@ )} )on ^*:ACTION:*:# { ) if ($form(mIRC,action)) $readini %formats mIRC action - else echo $ishighlight($colour(Action),$nick,$1-) -ti2 $chan * $pst($nick,$chan) $+ $iif($chan != $target,:) $+ $iif($chan != $target,$target) $1- + else echo $colour(Action) -tli2 $chan * $pst($nick,$chan) $+ $iif($chan != $target,:) $+ $iif($chan != $target,$target) $1- ) haltdef )} )on ^*:BAN:# { @@ -192,7 +192,7 @@ )} )on ^*:TEXT:*:# { ) if ($form(mIRC,text)) $readini %formats mIRC text - else echo $ishighlight($colour(Normal),$nick,$1-) -ti2 $chan < $+ $pst($nick,$chan) $+ $+ $iif($chan != $target,:) $+ $iif($chan != $target,$target) $+ > $1- + else echo $colour(Normal) -tli2 $chan < $+ $pst($nick,$chan) $+ $+ $iif($chan != $target,:) $+ $iif($chan != $target,$target) $+ > $1- ) haltdef )} )on ^*:TOPIC:# { diff -ur --new-file --recursive ircN707/system/userlist.als $mircdiruserlist.als --- ircN707/system/userlist.als Wed Apr 28 15:52:58 1999 +++ $mircdiruserlist.als Fri Aug 6 23:21:38 1999 @@ -142,8 +142,8 @@ ) if ($mid($2,%i.chattr,1) == +) set %j.chattr + ) elseif ($mid($2,%i.chattr,1) == -) set %j.chattr - ) else { - if (%j.chattr == +) set %tmp.chattr - $remove($removecs($mid($2,%i.chattr,1),%tmp.chattr),-) $+ $mid($2,%i.chattr,1) - elseif (%j.chattr == -) set %tmp.chattr - $+ $remove($removecs($mid($2,%i.chattr,1),%tmp.chattr),-) + if (%j.chattr == +) set %tmp.chattr - $removecs(%tmp.chattr,$mid($2,%i.chattr,1),%tmp.chattr,-) $+ $mid($2,%i.chattr,1) + elseif (%j.chattr == -) set %tmp.chattr - $+ $removecs(%tmp.chattr,$mid($2,%i.chattr,1),-) ) } ) goto start ) } diff -ur --new-file --recursive ircN707/system/ircN708.pch ircN708/system/ircN708.pch --- ircN707/system/ircN708.pch Thu Jan 1 00:00:00 1970 +++ $mircdirircN708.pch Fri Aug 6 23:32:20 1999 @@ -0,0 +1,8 @@ +iecho (1) Updating version spec... +set %reldate (1999/08/09 22.00) +set %iver ircN 7.08 +set %ver ircN 7.08 + 7.0 +iecho (2) Deleting patch files... +.timer 1 1 .remove ircN708.dif +.timer 1 1 .remove ircN708.pch +iecho Upgrade to ircN 7.08 was successful!