ô > BLib.IP 1.00 12Feb2009 : 0ô IP_Stn - Returns dotted net&station number (0ô ------------------------------------------ 2*Ý¤IP_Stn(A%):ê B%:Þ B%-1:!B%=A%:B%!4=0 <'=ÃB%?3+"."+ÃB%?2+"."+ÃB%?1+"."+Ã?B% F: PBô IP_StnFixed - Returns fixed-length dotted net&station number ZFô ---------------------------------------------------------------- d(Ý¤IP_StnFixed(A%):ê B%:Þ B%-1:!B%=A% n?=¤d0(B%?3,3)+"."+¤d0(B%?2,3)+"."+¤d0(B%?1,3)+"."+¤d0(?B%,3) x: ‚>ô IP_StnNum - Convert dotted IP address string into number Œ>ô -------------------------------------------------------- –2Ý¤IP_StnNum(A$):ê B%:Þ B%-1:!B%=0:õ!B%=!B%+»A$ /A%=§A$,"."):çA%:A$=ÁA$,A%+1):B%!1=!B%:?B%=0 ªýA%=0:=!B% ´: ¾/ô swap_16 - Swap b0-b7 and b8-b15 of number È1ô ------------------------------------------- ÒÝ¤swap_16(A%) Ü,ê B%:Þ B%-1:!B%=A%:B%!2=A%:=(B%!1)€&FFFF æ: ð5ô swap_32 - Swap word from &AABBCCDD to &DDCCBBAA ú5ô ----------------------------------------------- Ý¤swap_32(A%) 9ê B%:Þ B%-1:!B%=A%:B%?4=B%?2:B%?5=B%?1:B%?6=?B%:=B%!3 : "#Ý¤d0(A%,N%)=Â"00000000"+ÃA%,N%) ,: 6: ÿ