SLPS V25 Users Guide
标签： UsersGuide SLPSV 25
上传时间： 2016-06-14
上传用户：elite_lee
asp实现限制一个ip只能访问一次的方法 <% '///////////////////////////////////////////////////// '// // '//作用：一个IP地址只允许访问本页一次 // '//引用：<!-- #include file="Check_Ip.asp" --> // '// // '///////////////////////////////////////////////////// 'Response.Charset = 936 '设置输出编码为简体中文 'Response.Buffer = false '关闭缓冲区 Dim Fso,ts,IpList,Cfs '设置Cookies函数 Function SetCookie() Response.Cookies("IsBrow") = "Brow" Response.Cookies("IsBrow").Expires = Date+365 End Function '记录IP地址函数 Function WriteIp(FileName, IpAddress) Set Fso = Server.CreateObject("Scripting.FileSystemObject") Set ts = Fso.OpenTextFile(Server.MapPath(FileName),8,true) ts.WriteLine IpAddress ts.Close Set ts = Nothing Set Fso = Nothing End Function '读取IP地址函数 Function ReadIpList(FileName) Set Fso = Server.CreateObject("Scripting.FileSystemObject") If Not Fso.FileExists(Server.MapPath(FileName)) Then CreateFile("Iplist.txt") Exit Function End If Set ts = Fso.OpenTextFile(Server.MapPath(FileName)) Iplist = ts.ReadAll ts.Close Set ts = Nothing Set Fso = Nothing ReadIpList = Iplist End Function '创建文件函数 Function CreateFile(FileName) Set Fso = Server.CreateObject("Scripting.FileSystemObject") Set Cfs = Fso.CreateTextFile(Server.MapPath(FileName)) Cfs.Close Set Cfs = Nothing Set Fso = Nothing End Function '关闭当前IE窗口函数(注:IE6下通过,其他浏览器未测试) Function CloseWindow() 'Response.Write "<script>window.location='javascript:window.opener=null;window.close();'</script>" Response.Redirect "http://www.baidu.com" End Function Ip = Request.ServerVariables("REMOTE_ADDR") '获取浏览者IP地址 Cookie = Request.Cookies("IsBrow") '获取当前Cookies 'Response.Write Cookie If Request.ServerVariables("HTTP_X_FORWARDED_FOR") <> "" Then Response.Write "本站不允许使用代理访问" Response.End() Else If Cookie = "Brow" Then CloseWindow() Else If Instr(ReadIpList("Iplist.txt"),Ip) <>0 Then CloseWindow() Else WriteIp "Iplist.txt" , Ip End If SetCookie() End If End If %>
上传时间： 2016-07-14
上传用户：helei0915
批处理感知器算法的代码matlab w1=[1,0.1,1.1;1,6.8,7.1;1,-3.5,-4.1;1,2.0,2.7;1,4.1,2.8;1,3.1,5.0;1,-0.8,-1.3; 1,0.9,1.2;1,5.0,6.4;1,3.9,4.0]; w2=[1,7.1,4.2;1,-1.4,-4.3;1,4.5,0.0;1,6.3,1.6;1,4.2,1.9;1,1.4,-3.2;1,2.4,-4.0; 1,2.5,-6.1;1,8.4,3.7;1,4.1,-2.2]; w3=[1,-3.0,-2.9;1,0.5,8.7;1,2.9,2.1;1,-0.1,5.2;1,-4.0,2.2;1,-1.3,3.7;1,-3.4,6.2; 1,-4.1,3.4;1,-5.1,1.6;1,1.9,5.1]; figure; plot(w3(:,2),w3(:,3),'ro'); hold on; plot(w2(:,2),w2(:,3),'b+'); W=[w2;-w3];%增广样本规范化 a=[0,0,0]; k=0;%记录步数 n=1; y=zeros(size(W,2),1);%记录错分的样本 while any(y<=0) k=k+1; y=a*transpose(W);%记录错分的样本 a=a+sum(W(find(y<=0),:));%更新a if k >= 250 break end end if k<250 disp(['a为：',num2str(a)]) disp(['k为：',num2str(k)]) else disp(['在250步以内没有收敛，终止']) end %判决面：x2=-a2*x1/a3-a1/a3 xmin=min(min(w1(:,2)),min(w2(:,2))); xmax=max(max(w1(:,2)),max(w2(:,2))); x=xmin-1:xmax+1;%(xmax-xmin): y=-a(2)*x/a(3)-a(1)/a(3); plot(x,y)
上传时间： 2016-11-07
上传用户：a1241314660
编译原理 1、读取所有的输入的文本，存入一个二维数组。（数组的宽度固定） 2、对二维数组一行行进行处理 3、对文本进行操作的时候，创建两个临时字符数组，一个存储变量名，一个存储常量。 对某行进行遍历的时候，倘若碰到字母，就读完该单词并存储到临时数组里，进行基本字判断后输出。 光标往后移动该单词的长度后，继续循环。(比如读到的是end，那么我该行的光标就要+3，然后继续循环) 倘若读到数字也是一样，只是不需要判断基本字，所以更为简单。
标签： 编译原理
上传时间： 2017-06-20
上传用户：lbxxx
PL0语言是与pascal类似的语言，但是比pascal语言的词法、语法更加严格苛刻。 在PL0语言中，只有五种类型的单词：关键字、用户自定义标识符、数字、特殊符号以及非法标识符。 根据题目给出的PL0的文法，关键字只有如下几个： Const——用来声明常量； Var——用来声明变量； Procedure——用来声明过程； Begin——声明过程的开始； End——声明过程的结束； Ood——单目运算符，声明为关键字； If——条件语句； Then——条件语句； Call——声明调用函数； While——循环语句； Read——读文件语句； Write——写文件语句； 对于用户自定义标识符应该满足：以字母开头，其后是字母和数字的组合，即：字母（字母|数字）* 数字则是数字字符（0——9）组成的数字串； 特殊符号有如下几个： +，-，*，/，=<>,<,>=,<=,:= 把关键字、算符和界符称为语言固有的单词，标识符、常量称为用户自定义的单词。 为此设置三个全程量：SYM,ID,NUM。 SYM：存放每个单词的类别，为内部编码的表示形式； ID:存放用户所定义的标识符的值，即标识符字符串的机内表示； NUM:存放用户定义的数。
上传时间： 2017-06-20
上传用户：lbxxx
photoshop软件（本例中使用CS5版本，当然各版本界面都大同小异） 界面篇 1 首先我们打开photoshop软件，界面就如下图所示了： 2 左侧的是工具箱调板，我们可以用鼠标单击相应的工具进行图片处理操作，鼠标右击可以进行某一工具选择（再使用熟练后，我们也可以按下相应的键盘键进行选择），如图： 3 右侧的是窗口调板，我们可以点击菜单中的窗口菜单，在下拉列表中选择我们需要的窗口调板，如图： 4 顶部的菜单栏中包含了全部photoshop常用的操作，我们不必去死记硬背，只要平时常用就会烂熟于心了。 5 在菜单栏的下方是属性栏，显示当前我们正在使用的工具的属性，如图： END 常用操作 1 打开一张图片，方法有三种：①使用菜单里面的打开命令；②使用快捷键Ctrl+O；③双击photoshop界面中心；④拖动想要处理的图片到photoshop中打开；⑤右键选择要处理的图片选择使用photoshop打开命令。 2 保存图片的方法：一般按下键盘上的快捷键Ctrl+S，或使用菜单保存命令（如果要另存的话就选择另存为选项；保存的图片可以选择任意格式，.psd是保存当前处理的所有步骤，下次打开还可以继续编辑，JPEG、png、gif格式就是处理好的图片格式） 3 历史记录面板的用法：我们处理图片的时候可能要反复修改获得最佳的效果，那么历史记录工具就可以很方便的返回之前我们的操作状态，如图，点击要恢复的步骤，即可恢复图片： END 使用技巧 如图所示黑色是前景色、白色是背景色，我们可以按下键盘上的X键进行前景色和背景色的互换： 图片移动操作，我们打开两张图片，想要移动其中的一张到另一张中，我们可以按住键盘的Ctrl键，使用鼠标拖动一张图片到另一张图片中，如图： 3 我们可以在处理图片的时候按下Z键使用放大镜放大图片的细节，处理图片的时候就会容易许多，我们可以按ATL键在放大和缩小之间切换！ 4 我们可以按住键盘上的空格键，移动图片，对于处理大型的图片还是非常方便的！ END 注意事项 photoshop入门相对来说比较简单，但熟练操作至少要3个月左右！ 精通photoshop是一条非常漫长的路程，有时候会打退堂鼓，但只要多操作，多制作，慢慢的时间久了也就精了。
上传时间： 2017-12-07
上传用户：1506034115
photoshop软件（本例中使用CS5版本，当然各版本界面都大同小异） 界面篇 1 首先我们打开photoshop软件，界面就如下图所示了： 2 左侧的是工具箱调板，我们可以用鼠标单击相应的工具进行图片处理操作，鼠标右击可以进行某一工具选择（再使用熟练后，我们也可以按下相应的键盘键进行选择），如图： 3 右侧的是窗口调板，我们可以点击菜单中的窗口菜单，在下拉列表中选择我们需要的窗口调板，如图： 4 顶部的菜单栏中包含了全部photoshop常用的操作，我们不必去死记硬背，只要平时常用就会烂熟于心了。 5 在菜单栏的下方是属性栏，显示当前我们正在使用的工具的属性，如图： END 常用操作 1 打开一张图片，方法有三种：①使用菜单里面的打开命令；②使用快捷键Ctrl+O；③双击photoshop界面中心；④拖动想要处理的图片到photoshop中打开；⑤右键选择要处理的图片选择使用photoshop打开命令。 2 保存图片的方法：一般按下键盘上的快捷键Ctrl+S，或使用菜单保存命令（如果要另存的话就选择另存为选项；保存的图片可以选择任意格式，.psd是保存当前处理的所有步骤，下次打开还可以继续编辑，JPEG、png、gif格式就是处理好的图片格式） 3 历史记录面板的用法：我们处理图片的时候可能要反复修改获得最佳的效果，那么历史记录工具就可以很方便的返回之前我们的操作状态，如图，点击要恢复的步骤，即可恢复图片： END 使用技巧 如图所示黑色是前景色、白色是背景色，我们可以按下键盘上的X键进行前景色和背景色的互换： 图片移动操作，我们打开两张图片，想要移动其中的一张到另一张中，我们可以按住键盘的Ctrl键，使用鼠标拖动一张图片到另一张图片中，如图： 3 我们可以在处理图片的时候按下Z键使用放大镜放大图片的细节，处理图片的时候就会容易许多，我们可以按ATL键在放大和缩小之间切换！ 4 我们可以按住键盘上的空格键，移动图片，对于处理大型的图片还是非常方便的！ END 注意事项 photoshop入门相对来说比较简单，但熟练操作至少要3个月左右！ 精通photoshop是一条非常漫长的路程，有时候会打退堂鼓，但只要多操作，多制作，慢慢的时间久了也就精了。
上传时间： 2017-12-07
上传用户：1506034115
简单的实现JPEG图像压缩编码方法一 clear all; RGB=imread('C:\Users\Administrator\Desktop\123.bmp');%读取内存中bmp格式的彩色图像 I=rgb2gray(RGB);%将彩色图像转换为灰度图像 I1=im2double(I);%将图像变换为双精度格式 T=dctmtx(8);%处理后返回一个8*8阶的DCT矩阵 B1=blkproc(I1,[8 8],'P1*x*P2',T,T');%对图像的每个8*8子块应用矩阵式‘P1*x*P2(像素块的处理函数，x是形式参数)进行处理，P1=T，P2=T’ mask=[1 1 1 1 0 0 0 0 1 1 1 0 0 0 0 0 1 1 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ];%选取10个DCT系数重构图像(DCT具有能量集中的性质，数据集中在左上角，故进行图像压缩时离散余弦变换矩阵可以舍弃右下角的高频数据) B2=blkproc(B1,[8 8],'P1.*x',mask);%舍弃每个块中的高频系数，达到压缩的目的 I2=blkproc(B2,[8 8],'P1*x*P2',T',T);%余弦反变换，重构图像 subplot(2,2,1);imshow(RGB);%原彩色图像 subplot(2,2,2);imshow(I);%灰度图像 subplot(2,2,3);imshow(I1);%双精度灰度图像 subplot(2,2,4);imshow(I2);%重构图像
标签： matlab
上传时间： 2018-03-15
上传用户：wlmelody
儿歌C:\Users\yuxiaofeng\Desktop\111故事C:\Users\yuxiaofeng\Desktop\111故事C:\Users\yuxiaofeng\Desktop\111故事
标签： MP3
上传时间： 2018-07-02
上传用户：bcocoy
function [alpha,N,U]=youxianchafen2(r1,r2,up,under,num,deta) %[alpha,N,U]=youxianchafen2(a,r1,r2,up,under,num,deta) %该函数用有限差分法求解有两种介质的正方形区域的二维拉普拉斯方程的数值解 %函数返回迭代因子、迭代次数以及迭代完成后所求区域内网格节点处的值 %a为正方形求解区域的边长 %r1,r2分别表示两种介质的电导率 %up,under分别为上下边界值 %num表示将区域每边的网格剖分个数 %deta为迭代过程中所允许的相对误差限 n=num+1; %每边节点数 U(n,n)=0; %节点处数值矩阵 N=0; %迭代次数初值 alpha=2/(1+sin(pi/num));%超松弛迭代因子 k=r1/r2; %两介质电导率之比 U(1,1:n)=up; %求解区域上边界第一类边界条件 U(n,1:n)=under; %求解区域下边界第一类边界条件 U(2:num,1)=0;U(2:num,n)=0; for i=2:num U(i,2:num)=up-(up-under)/num*(i-1);%采用线性赋值对上下边界之间的节点赋迭代初值 end G=1; while G>0 %迭代条件：不满足相对误差限要求的节点数目G不为零 Un=U; %完成第n次迭代后所有节点处的值 G=0; %每完成一次迭代将不满足相对误差限要求的节点数目归零 for j=1:n for i=2:num U1=U(i,j); %第n次迭代时网格节点处的值 if j==1 %第n+1次迭代左边界第二类边界条件 U(i,j)=1/4*(2*U(i,j+1)+U(i-1,j)+U(i+1,j)); end if (j>1)&&(j U2=1/4*(U(i,j+1)+ U(i-1,j)+ U(i,j-1)+ U(i+1,j)); U(i,j)=U1+alpha*(U2-U1); %引入超松弛迭代因子后的网格节点处的值 end if i==n+1-j %第n+1次迭代两介质分界面（与网格对角线重合）第二类边界条件 U(i,j)=1/4*(2/(1+k)*(U(i,j+1)+U(i+1,j))+2*k/(1+k)*(U(i-1,j)+U(i,j-1))); end if j==n %第n+1次迭代右边界第二类边界条件 U(i,n)=1/4*(2*U(i,j-1)+U(i-1,j)+U(i+1,j)); end end end N=N+1 %显示迭代次数 Un1=U; %完成第n+1次迭代后所有节点处的值 err=abs((Un1-Un)./Un1);%第n+1次迭代与第n次迭代所有节点值的相对误差 err(1,1:n)=0; %上边界节点相对误差置零 err(n,1:n)=0; %下边界节点相对误差置零 G=sum(sum(err>deta))%显示每次迭代后不满足相对误差限要求的节点数目G end
标签： 有限差分
上传时间： 2018-07-13
上传用户：Kemin
