S3F84B8简单入门例程
S3F84B8简单入门例程
;------------------------
;---------------------
.INCLUDE "S3F94C4.REG"
.INCLUDE "\myfile\sam\mysam.inc"
;---------------------
;---------------------------------------------
;LED屏显示RAM定义
;共分7个位,仅用了低位
;高位未用,扫描时应全部置0
GRID_CODE_ADD
;--------------------
;----------------------
;----------------------
&&&&&&&&ORG
&&&&&&&&DB
&&&&&&&&DB
&&&&&&&&DB
&&&&&&&&DB
;-------------------------
&;0-9数码显示代码定义
DIGIT_CODE:
&&&&&&&&DB
&&&&&&&&DB
&&&&&&&&DB
&&&&&&&&DB
&&&&&&&&DB
&&&&&&&&DB
&&&&&&&&DB
&&&&&&&&DB
&&&&&&&&DB
&&&&&&&&DB
&&&&&&&&DB
&&&&&&&&DB
&&&&&&&&DB
&&&&&&&&DB
&&&&&&&&DB
&&&&&&&&DB
&&&&&&&&DB
&&&&&&&&DB
&&&&&&&&DB
&&&&&&&&DB
011H关闭显示代码
012H显示'U'
;-------------------------
&&&&&&&&ORG
&&&&&&&&DI
&&&&&&&&LD
&&&&&&&&LD
BTCON,#0A0H
&&&&&&&&LD
&&&&&&&&LD
P0CONH,#02H
&&&&&&&&LD
&&&&&&&&CALL
DELAY_100MS
&&&&&&&&CALL
DISPLAY_INIT
&&&&&&&&LD
R10,#WADD_H
&&&&&&&&LD
R11,#WADD_L
&&&&&&&&LDC
&&&&&&&&INC
&&&&&&&&LDC
&&&&&&&&INC
&&&&&&&&LDC
&&&&&&&&CP
&&&&&&&&JR
&&&&&&&&CP
&&&&&&&&JR
&&&&&&&&CP
&&&&&&&&JR
&&&&&&&&LD
CNT_H,#00H
&&&&&&&&LD
CNT_M,#00H
&&&&&&&&LD
CNT_L,#00H
&&&&&&&&CLR
&&&&&&&&JR
&&&&&&&&LD
&&&&&&&&LD
&&&&&&&&LD
&&&&&&&&CLR
&&&&&&&&JR
;-----------------------------------------
;---------------------------
&&&&&&&&CLR
&&&&&&&&LD
R10,#WADD_H
&&&&&&&&LD
R11,#WADD_L
&&&&&&&&CALL
ERASE_94C4_SECTOR
;-------------------------
&&&&&&&&LD
R10,#WADD_H
&&&&&&&&LD
R11,#WADD_L
&&&&&&&&LDCI
&&&&&&&&CP
&&&&&&&&JP
NE,W_ERROR
&&&&&&&&CP
&&&&&&&&JR
ULT,CHK_LOOP
;----------------------------
&&&&&&&&;CALL
&&&&&&&&;CP
ERRFLAG,#00H
&&&&&&&&;JR
NE,W_ERROR
&&&&&&&&;CALL
&&&&&&&&;CP
ERRFLAG,#00H
&&&&&&&&;JR
NE,W_ERROR
&&&&&&&&CALL
&&&&&&&&CP
ERRFLAG,#00H
&&&&&&&&JR
NE,W_ERROR
;---------------------
DISPLAY_CNT:
&&&&&&&&CALL
COUNT_TOABCDE
&&&&&&&&CALL
DIGIT_CONVERT
&&&&&&&&CALL
&&&&&&&&ADD
CNT_L,#01H
&&&&&&&&ADC
CNT_M,#00H
&&&&&&&&ADC
CNT_H,#00H
&&&&&&&&CALL
&&&&&&&&;CALL
DELAY_50MS
&&&&&&&&;CALL
DELAY_50MS
&&&&&&&&;CALL
DELAY_50MS
&&&&&&&&CLR
&&&&&&&&JP
;---------------------------
&&&&&&&&INC
&&&&&&&&CP
&&&&&&&&JR
&&&&&&&&LD
&&&&&&&&LD
BTCON,#02H
&&&&&&&&JR
;----------------------------------------------
WRITE_CNT:
&&&&&&&&CLR
&&&&&&&&LD
R10,#WADD_H
&&&&&&&&LD
R11,#WADD_L
&&&&&&&&CALL
START_94C4_PROG
&&&&&&&&LD
R10,#WADD_H
&&&&&&&&LD
R11,#WADD_L
&&&&&&&&LD
&&&&&&&&LDC
&&&&&&&&INC
&&&&&&&&DELAY
&&&&&&&&DELAY
&&&&&&&&DELAY
&&&&&&&&LD
&&&&&&&&LDC
&&&&&&&&INC
&&&&&&&&DELAY
&&&&&&&&DELAY
&&&&&&&&DELAY
&&&&&&&&LD
&&&&&&&&LDC
&&&&&&&&INC
&&&&&&&&DELAY
&&&&&&&&DELAY
&&&&&&&&DELAY
&&&&&&&&CALL
END_94C4_PROG
&&&&&&&&CALL
&&&&&&&&LD
R10,#WADD_H
&&&&&&&&LD
R11,#WADD_L
&&&&&&&&LDC
&&&&&&&&CP
&&&&&&&&JR
&&&&&&&&INC
&&&&&&&&LDC
&&&&&&&&CP
&&&&&&&&JR
&&&&&&&&INC
&&&&&&&&LDC
&&&&&&&&CP
&&&&&&&&JR
&&&&&&&&JR
&&&&&&&&LD
ERRFLAG,#1
&&&&&&&&RET
;----------------------------------------------
WRITE_55H:
&&&&&&&&CLR
&&&&&&&&LD
R10,#WADD_H
&&&&&&&&LD
R11,#WADD_L
&&&&&&&&CALL
START_94C4_PROG
&&&&&&&&LD
R10,#WADD_H
&&&&&&&&LD
R11,#WADD_L
&&&&&&&&LD
&&&&&&&&LDC
&&&&&&&&INC
&&&&&&&&DELAY
&&&&&&&&DELAY
&&&&&&&&DELAY
&&&&&&&&CP
&&&&&&&&JR
ULT,W55_LOOP
&&&&&&&&LD
R10,#WADD_H
&&&&&&&&LD
R11,#WADD_L
&&&&&&&&CP
&&&&&&&&JR
UGE,W55_BACK
&&&&&&&&LDCI
&&&&&&&&CP
&&&&&&&&JR
EQ,R55_LOOP
&&&&&&&&;出错
&&&&&&&&LD
ERRFLAG,#1
;------------------
&&&&&&&&CALL
END_94C4_PROG
&&&&&&&&RET
;------------------------------------------------------------------------------
WRITE_AAH:
&&&&&&&&CLR
&&&&&&&&LD
R10,#WADD_H
&&&&&&&&LD
R11,#WADD_L
&&&&&&&&CALL
START_94C4_PROG
&&&&&&&&LD
R10,#WADD_H
&&&&&&&&LD
R11,#WADD_L
&&&&&&&&LD
&&&&&&&&LDC
&&&&&&&&INC
&&&&&&&&DELAY
&&&&&&&&DELAY
&&&&&&&&DELAY
&&&&&&&&CP
&&&&&&&&JR
ULT,WAA_LOOP
&&&&&&&&LD
R10,#WADD_H
&&&&&&&&LD
R11,#WADD_L
&&&&&&&&CP
&&&&&&&&JR
UGE,WAA_BACK
&&&&&&&&LDCI
&&&&&&&&CP
R0,#00H由于前面已写入了55H,再写入AAH，则应变为00H
&&&&&&&&JR
EQ,RAA_LOOP
&&&&&&&&;出错
&&&&&&&&LD
ERRFLAG,#1
;------------------
&&&&&&&&CALL
END_94C4_PROG
&&&&&&&&RET
;--------------------------------------------------------------------------------
;将计数值转化为A,B,C,D,E五位显示数码的过程
COUNT_TOABCDE:
&&&&&&&&LD
&&&&&&&&LD
&&&&&&&&AND
&&&&&&&&LD
&&&&&&&&RR
&&&&&&&&RR
&&&&&&&&RR
&&&&&&&&RR
&&&&&&&&AND
&&&&&&&&LD
&&&&&&&&LD
&&&&&&&&LD
&&&&&&&&AND
&&&&&&&&LD
&&&&&&&&RR
&&&&&&&&RR
&&&&&&&&RR
&&&&&&&&RR
&&&&&&&&AND
&&&&&&&&LD
&&&&&&&&LD
DIGITA,CNT_H
&&&&&&&&AND
DIGITA,#0FH
&&&&&&&&&&&&&&
ABCDE_BACK:
&&&&&&&&RET
;--------------------------------------------------------------------------------
;four digit code convert display
;-------------------------------
DIGIT_CONVERT:
DIGITA,#OFF_DISP
DIGITB,#OFF_DISP
DIGITC,#OFF_DISP
DIGITD,#OFF_DISP
R1,#DIGIT_CODE
&&&&&&&ADD
&&&&&&&LDC
R10,@RR0get DIGITA hsb into R10
GRID1L,R10
&&&&&&&&&&&&&
R1,#DIGIT_CODE
&&&&&&&ADD
&&&&&&&LDC
R10,@RR0get DIGITB hsb into R12
GRID2L,R10
R1,#DIGIT_CODE
&&&&&&&ADD
&&&&&&&LDC
GRID3L,R10
R1,#DIGIT_CODE
&&&&&&&ADD
&&&&&&&LDC
GRID4L,R10
R1,#DIGIT_CODE
&&&&&&&ADD
&&&&&&&LDC
GRID5L,R10
&&&&&&&&&&&
&&&&&&&;col=0,now it is no display
;-------------------------------------------------------------------------------
CONVERT_DG_BACK:
&&&&&&&RET
;------------------------------------------------------------
;上电时初始化显示屏显示状态过程
DISPLAY_INIT:
&&&&&&&&;首先设置1628为7位,10段
&&&&&&&&LD
&&&&&&&&CALL
&&&&&&&&;首先关闭屏显示,并设置当前消光模式为14/16脉冲宽度
&&&&&&&&LD
&&&&&&&&CALL
&&&&&&&&;----------------
&&&&&&&&;点亮所有LED点,进行测试
&&&&&&&&;送设置数据指令
&&&&&&&&LD
R0,#B地址自动增量,写数据到显示寄存器
&&&&&&&&CALL
&&&&&&&&;送显示数据起始地址
&&&&&&&&LD
R0,#B设置写地址00H
&&&&&&&&CALL
&&&&&&&&;送出所有显示数据均为0FFH
&&&&&&&&LD
SEND_LOOPA:
&&&&&&&&LD
&&&&&&&&CALL
SENDTO1628
&&&&&&&&DEC
&&&&&&&&JR
NZ,SEND_LOOPA
&&&&&&&&LD
&&&&&&&&CALL
DELAY_100MS
&&&&&&&&DEC
&&&&&&&&JR
NZ,WAIT_1S
&&&&&&&&&&&&
&&&&&&&&;打开显示屏显示
&&&&&&&&LD
R0,#B并设置当前消光模式为14/16脉冲宽度
&&&&&&&&CALL
&&&&&&&&;送设置数据指令
&&&&&&&&LD
R0,#B地址自动增量,写数据到显示寄存器
&&&&&&&&CALL
&&&&&&&&;送显示数据起始地址
&&&&&&&&LD
R0,#B设置写地址00H
&&&&&&&&CALL
&&&&&&&&;送出所有显示数据均为00H
&&&&&&&&LD
SEND_LOOPB:
&&&&&&&&LD
&&&&&&&&CALL
SENDTO1628
&&&&&&&&DEC
&&&&&&&&JR
NZ,SEND_LOOPB
&&&&&&&&CALL
DISP_INIT_BACK:
&&&&&&&&RET
;----------------------------------------------------------------
;LED屏显示扫描过程
&&&&&&&&;将RAM显示数据发送至1628
&&&&&&&&;送设置数据指令
&&&&&&&&LD
R0,#B地址自动增量,写数据到显示寄存器
&&&&&&&&CALL
&&&&&&&&;送显示数据起始地址
&&&&&&&&LD
R0,#B设置写地址00H
&&&&&&&&CALL
&&&&&&&&LD
R8,#GRID_CODE_ADD
SEND_NEXT:
&&&&&&&&LD
&&&&&&&&CALL
SENDTO1628
&&&&&&&&INC
&&&&&&&&CP
R8,#GRID_CODE_ADD+0DH
&&&&&&&&JR
ULE,SEND_NEXT
&&&&&&&&CALL
&&&&&&&&RET
;------------------------------------------------------------
;该过程用来发送给1628一个指令,以设置其显示参数
;设置数据置在R0中
&&&&&&&&CALL
&&&&&&&&;设置数据在R0中
&&&&&&&&CALL
SENDTO1628
&&&&&&&&RET
;------------------------------------------------------------
;设置1629的STB线,准备发送指令到1628
&&&&&&&&SETBIT
&&&&&&&&DELAY
&&&&&&&&CLRBIT
&&&&&&&&RET
;------------------------------------------------------------
;复位1628的STB线,以停止指令及数据传送
RESET_STB:
&&&&&&&&SETBIT
&&&&&&&&DELAY
&&&&&&&&RET
;------------------------------------------------------------
&&&&&&&&;ORG
;送一个字节数据/指令到1628的过程
;1628的数据在时钟上升沿被锁存
;R0----要送出的数据/指令字节
SENDTO1628:
&&&&&&&&PUSH
&&&&&&&&CLRBIT
CLK_1628set clock line is low
&&&&&&&&DELAY
&&&&&&&&CLRBIT
DIO_1628set data line is low
&&&&&&&&LD
SENDA_1628:
&&&&&&&&DELAY
&&&&&&&&RRC
R0right shift R0,bit0 into C
&&&&&&&&SETBIT
DIO_1628set data line
&&&&&&&&JR
C,SENDB_1628if C=1,skip
&&&&&&&&CLRBIT
DIO_1628clear data line
SENDB_1628:
&&&&&&&&DELAY
&&&&&&&&SETBIT
CLK_1628send one clock pulse
&&&&&&&&DELAY
&&&&&&&&CLRBIT
&&&&&&&&DEC
&&&&&&&&JR
NZ,SENDA_1628
SEND1628_BACK:
&&&&&&&&POP
&&&&&&&&RET
;------------------------------------------------------------
&&&&&&&&;ORG
;------------------------------------------------------
;擦除芯片内一个SECTOR
;RR10--要擦除的SECTOR地址高低位
;注意: 每个扇区被定义为128个字节
;每个256字节段被分为2个扇区,由FMSECL的值来区分是高位和低位扇区
ERASE_94C4_SECTOR:
&&&&&&&&LD
FMSECH,R10
&&&&&&&&LD
FMSECL,R11
&&&&&&&&LD
FMUSR,#0A5H
&&&&&&&&LD
FMCON,#0A1H
&&&&&&&&NOP
&&&&&&&&NOP
&&&&&&&&TM
&&&&&&&&JR
&&&&&&&&;CALL
DELAY_10MS
&&&&&&&&LD
FMUSR,#00H
&&&&&&&&RET
;-------------------------------------------------------
;扇区写功能启动初始化
;RR10---要写入的扇区地址起始
START_94C4_PROG:
&&&&&&&&LD
FMSECH,R10
&&&&&&&&LD
FMSECL,R11
&&&&&&&&LD
FMUSR,#0A5H
&&&&&&&&LD
FMCON,#51H
&&&&&&&&RET
;-------------------------------------------------------
END_94C4_PROG:
&&&&&&&&AND
FMCON,#0FEH
&&&&&&&&LD
FMUSR,#00H
&&&&&&&&RET
;---------------------------------------------------------
DELAY_100MS:
&&&&&&&&PUSH
&&&&&&&&LD
&&&&&&&&CALL
&&&&&&&&DEC
&&&&&&&&JR
&&&&&&&&POP
&&&&&&&&RET
;---------------------------------------------------------
DELAY_50MS:
&&&&&&&&PUSH
&&&&&&&&LD
&&&&&&&&CALL
&&&&&&&&DEC
&&&&&&&&JR
&&&&&&&&POP
&&&&&&&&RET
;-----------------------------------------
DELAY_10MS:
&&&&&&&&PUSH
&&&&&&&&LD
&&&&&&&&CALL
&&&&&&&&DEC
&&&&&&&&JR
&&&&&&&&POP
&&&&&&&&RET
;---------------------------------------------------------
DELAY_1MS:
&&&&&&&&PUSH
&&&&&&&&LD
&&&&&&&&DELAY
&&&&&&&&DELAY
&&&&&&&&DEC
&&&&&&&&JR
&&&&&&&&POP
&&&&&&&&RET
;----------------------------------------------------------我使用Idmessage、idpop3收邮件，代码如下：
procedure&TForm1.Button1Click(Sender:&TObject);
&&idpop31.Host:='.cn';
&&IdPOP31.Port:=110;//这个端口号只能是110吗？
&&idpop31.Username:='inteler';
&&idpop31.Password:='&&&&';
&&idpop31.C&//连接服务器
&&ShowMessage('已连接！');
&&Label1.Caption&:=inttostr(idpop31.CheckMessages);
&&for&i:=1&to&&idpop31.CheckMessages&&&do
&&&&IdMessage1.C
&&&&idpop31.Retrieve(i,IdMessage1);
&&&&Memo1.Lines.Add(IdMessage1.Subject);//邮件主题是乱码
&&&&Memo2.Lines.Add(????????);/如何获取发件人的电子邮件
&&idpop31.D
显示效果如下：
=?GB2312?B?1Nq0y8rkyOvTyrz+1vfM4g==?=
=?GB2312?B?1Nq0y8rkyOvTyrz+1vfM4g==?=
=?GB2312?B?1Nq0y8rkyOvTyrz+1vfM4g==?=
=?GB18030?B?1Pi659TGLMvEtKjKobPJtry6vb/VuaTStdGn0KM=?=&=?GB18030?B?LTkzMjIgtcTNrNGnw8e2vLrcz+vE7sTjo6E=?=
=?GB18030?B?1Pi659TGLMvEtKjA7bmk0afUui3J5s3ixvPStQ==?=&=?GB18030?B?udzA7Tk2MSC1xM2s0afDx7a8utzP68TuxOOjoQ==?=
=?GB18030?B?1Pi659TGLMvEtKjA7bmk0afUui3Cw9POudw=?=&=?GB18030?B?wO05NjEgtcTNrNGnw8e2vLrcz+vE7sTjo6E=?=
=?GBK?B?P9XiwO+/tLXEtb0gzP21xLW9?=
=?GBK?B?ysC8zbzR1LVfQUQg1KrP/LzRvdqw2s3RtaXJ7aOsxOO1xLCuyMu+zdTa1eLA76Oh?=
=?GB2312?B?1Nq0y8rkyOvTyrz+1vfM4g==?=
=?GBK?B?ysC8zbzR1LVfQUQgvNHIy9XQwezNqNaqo7rLrbDRsK7Iy7aq1NrV4sDvwcujvw==?=
=?GBK?B?1sfBqtXQxrggX0FEIMWjxOqjrMWjSm9io6HX7tDCw/vG89XQxrjQxc+io6y/7LLp0a/J6sfro6E=?=
请问如何解决：1、邮件乱码问题。2、获取发件人的Email到Memo2?3、端口号只能是110？
回复讨论(解决方案)
另外补充下：Memo2.Lines.Add(IdMsgSend.From.Text);这样后获取收件人地址是：
=?GBK?B?ysC8zbzR1LUg?=&&&
=?GBK?B?ysC8zbzR1LUg?=&&&
=?GBK?B?1sfBqtXQxrgg?=&&&
怎么处理，我的要求是只显示：这种格式的
还有收了邮件后如何把此邮件标记为已读？
这是ＢＡＳＥ６４加密的，要解密才行
function&TEmail_mainfrm.Base64ToString(const&Value:&string):&&
x,&y,&n,&l:&I&
d:&array[0..3]&of&B&
&&#$40&+#$40&+#$40&+#$40&+#$40&+#$40&+#$40&+#$40&+#$40&+#$40&+#$3E&+#$40&
&&+#$40&+#$40&+#$3F&+#$34&+#$35&+#$36&+#$37&+#$38&+#$39&+#$3A&+#$3B&+#$3C&
&&+#$3D&+#$40&+#$40&+#$40&+#$40&+#$40&+#$40&+#$40&+#$00&+#$01&+#$02&+#$03&
&&+#$04&+#$05&+#$06&+#$07&+#$08&+#$09&+#$0A&+#$0B&+#$0C&+#$0D&+#$0E&+#$0F&
&&+#$10&+#$11&+#$12&+#$13&+#$14&+#$15&+#$16&+#$17&+#$18&+#$19&+#$40&+#$40&
&&+#$40&+#$40&+#$40&+#$40&+#$1A&+#$1B&+#$1C&+#$1D&+#$1E&+#$1F&+#$20&+#$21&
&&+#$22&+#$23&+#$24&+#$25&+#$26&+#$27&+#$28&+#$29&+#$2A&+#$2B&+#$2C&+#$2D&
&&+#$2E&+#$2F&+#$30&+#$31&+#$32&+#$33&+#$40&+#$40&+#$40&+#$40&+#$40&
SetLength(Result,&Length(Value));&
while&x&&&Length(Value)&do&
&&for&n&:=&0&to&3&do&
&&&&if&x&&&Length(Value)&then&
&&&&&&d[n]&:=&64&
&&&&begin&
&&&&&&y&:=&Ord(Value[x]);&
&&&&&&if&(y&&&33)&or&(y&&&127)&then&
&&&&&&&&d[n]&:=&64&
&&&&&&else&
&&&&&&&&d[n]&:=&Ord(Table[y&-&32]);&
&&&&Inc(x);&
&&Result[l]&:=&Char((D[0]&and&$3F)&shl&2&+&(D[1]&and&$30)&shr&4);&
&&Inc(l);&
&&if&d[2]&&&&64&then&
&&&&Result[l]&:=&Char((D[1]&and&$0F)&shl&4&+&(D[2]&and&$3C)&shr&2);&
&&&&Inc(l);&
&&&&if&d[3]&&&&64&then&
&&&&begin&
&&&&&&Result[l]&:=&Char((D[2]&and&$03)&shl&6&+&(D[3]&and&$3F));&
&&&&&&Inc(l);&
SetLength(Result,&l);&
function&TEmail_mainfrm.GetTitle(const&Value:&string):&&
　　iPos:&&
　Result&:=&V&
&&ff&Copy(Value,&1,&2)&&&&'=?'&then&&
&&iPos&:=&Pos('?B?',&Value);&
&&Inc(iPos,&3);&
&&Result&:=&Copy(Value,&iPos,&Length(Value)&-&iPos&-&1);&
&&Result&:=&Base64ToString(Result);&
//首先LZ要明白这是什么编码，这是base64编码！
//编码的格式是什么？拿第1行来说=?GB2312?B?1Nq0y8rkyOvTyrz+1vfM4g==?=&，正文部分为&1Nq0y8rkyOvTyrz+1vfM4g==&，其它部分仅仅是告诉之编码格式是什么，正文从哪开始什么的！
//知道这些后，可以用字符串处理把正文部分取出，而后用TIdDecoderMime对其解码即可！
Showmessage(idcdrm1.DecodeString('1Nq0y8rkyOvTyrz+1vfM4g=='));//idcdrm1为TIdDecoderMime的实例
//显示结果为
&在此输入邮件主题
对于UTF8编码的，即?=UTF8?B?XXXXXXXXXXXXXXXXXXXX这样的数据用UTF8Decode(DecodeString('XXXXXXXXXXXXX'))&
怎么可能是乱码呢？
发邮件何必要加密呢？
&if&idpop31.CheckMessages&0&then
&&&&for&i:=0&to&&&idpop31.CheckMessages&&&do
&&&&&&IdMsgSend.C
&&&&&&idpop31.Retrieve(i,IdMsgSend);
&&&&&&temp1:=GetTitle(IdMsgSend.Subject);
&&&&&&ListBox1.Items.Add(temp1);
&&&&&&body[I]:=///邮件正文怎么写？body是字符串数组
没有附件哦，分不够我再加
没人知道怎么做？君，已阅读到文档的结尾了呢~~
《POP设计》课程教学大纲
扫扫二维码，随身浏览文档
手机或平板扫扫即可继续访问
《POP设计》课程教学大纲
举报该文档为侵权文档。
举报该文档含有违规或不良信息。
反馈该文档无法正常浏览。
举报该文档为重复文档。
推荐理由：
将文档分享至：
分享完整地址
文档地址：
粘贴到BBS或博客
flash地址：
支持嵌入FLASH地址的网站使用
html代码：
&embed src='/DocinViewer--144.swf' width='100%' height='600' type=application/x-shockwave-flash ALLOWFULLSCREEN='true' ALLOWSCRIPTACCESS='always'&&/embed&
450px*300px480px*400px650px*490px
支持嵌入HTML代码的网站使用
您的内容已经提交成功
您所提交的内容需要审核后才能发布，请您等待！
3秒自动关闭窗口