作者: Tscccn |
日期: 2010 年 09 月 27 日 |
围观: 6722次+ |
没有评论
CODE SEGMENT
ASSUME CS:CODE
MAIN: MOV AH,1
INT 21H
MOV BL,AL
INT 21H
MOV CL,AL
INT 21H[……]
汇编 实现三个数字大小的比较
汇编 输出输入字母在英文表中的顺序号
作者: Tscccn |
日期: 2010 年 09 月 27 日 |
围观: 6025次+ |
没有评论
code segment
assume cs:code
main:mov ah,1
int 21h
MOV BL,AL
MOV AH,2
MOV DL,13
INT 21H
MOV D[……]
汇编 用10号功能把输入的数倒过来输出
作者: Tscccn |
日期: 2010 年 09 月 27 日 |
围观: 5118次+ |
没有评论
data segment
buf db 100,101 dup(0)
buf1 db ‘qing shu ru’,13,10,'(ge shu zai 100 yi nei)=’,’$’
data ends
code segment
assume ds:data,cs:code
main:mov dx,data
mov ds,dx
lea dx,[buf1]
&[……]
汇编 求两个数相加输出 没最前面的进位
作者: Tscccn |
日期: 2010 年 09 月 27 日 |
围观: 5475次+ |
没有评论
data segment
int1 db ‘935797238’,13,10,24h
int2 db ‘843758912’,13,10,24hdata ends
code segment
assume cs:code,ds:data
main: mov ax,data
mov ds,ax
lea dx,[int1][……]
汇编 编写程序段把int1和int2中以字符串形式存放的两个长整数相加，结果仍然以同样的形式放会变量int1中，不计溢出
作者: Tscccn |
日期: 2010 年 09 月 27 日 |
围观: 6005次+ |
没有评论
；设变量int1和int2的定义如下
；int1 ‘935797238’
；int2 ‘843758912’
；编写程序段把int1和int2中以字符串形式存放的两个长整数相加，结果仍然以同样的形式放会变量int1中，不计溢出！
data segment
int1 db ‘935797238’,13,10,24h
int2 db ‘843758912’,13,10,24h
data ends
code segment
assume cs:code,ds:data[……]
汇编 输入一个数,输出相应的ASCII值（带效果图）
作者: Tscccn |
日期: 2010 年 09 月 27 日 |
围观: 6685次+ |
没有评论
data segment
buf db ‘THE ASCII CODE OF[‘,’$’
buf1 db ‘] IS ‘,’$’
buf2 db 13,10,’$’
data ends
code segment
assume cs:code,ds:data
main:mov ax,data
mov ds,ax
lea dx,[buf]
mov ah,9;输入提示
int 21h[……]
汇编 输入单词,按字典顺序输出结果（有效果图）
作者: Tscccn |
日期: 2010 年 09 月 27 日 |
围观: 8419次+ |
2 条评论
data segment
int1 db 30,31 dup(0),’$’
int2 db 30,31 dup(0),’$’
space db 13,10,’$’
data ends
code segment
assume cs:code,ds:data
main:mov dx,data
mov ds,dx
lea dx,[i[……]
汇编 输入带空格的代词,输出时把空格删掉（有效果图）
作者: Tscccn |
日期: 2010 年 09 月 27 日 |
围观: 20257次+ |
16 条评论
data segment
buf1 db ‘shu ru yi ge dan ci,jieguo:huo ba kong ge shan diao’,13,10,’$’
int1 db 100,101 dup(0),’$’
buf db 100,101 dup(0),’$’
data ends
code segment
assume cs:code,ds:data
main:mov dx,data
mov ds,dx[……]
汇编 用子程序输出道三角（有效果图）
作者: Tscccn |
日期: 2010 年 09 月 27 日 |
围观: 5627次+ |
没有评论
stack1 segment stack
dw 32 dup(0)
stack1 ends
code segment
assume cs:code,ss:stack1
main:mov cx,5
mov si,5
mov bx,9
main1:call space
call string
[……]
汇编 输入密码.并严整在第几次正确.次数为3次（效果图）
作者: Tscccn |
日期: 2010 年 09 月 27 日 |
围观: 4931次+ |
没有评论
现在汇编忘记的查不多了~
data segment
passw db ‘123456’
buf db 80,81 dup(0)
disp1 db 13,10,’password is true.try time=$’
disp2 db 13,10,’password is ereer.$’
data ends
code segment
assume cs:code,ds:data
main:mov ax,data
mov[……]
VB编写，输入身份证号，输出年月日
作者: Tscccn |
日期: 2010 年 09 月 27 日 |
围观: 7889次+ |
没有评论
Private Sub Command1_Click()
Dim nian, yue, ri As Integer
Dim sfzh As String
sfzh = Text1.Text
nian = Mid(sfzh, 7, 4)
yue = Mid(sfzh, 11, 2)
riri = Mid(sfzh, 13, 2)
[……]
VB成的 计算周长和面积
作者: Tscccn |
日期: 2010 年 09 月 27 日 |
围观: 5302次+ |
没有评论
Private Sub Command1_Click()
Dim a, b, mj, zhch As Integer
a = Val(Text1.Text)
b = Val(Text2.Text)
If a = 0 Or b = 0 Then
MsgBox "你见过没有长或宽的矩形吗", vbOKOnly, "提示"
Else
zhch = (a + b) * 2
Text4.Text = zhch
mj = a * b
Text3.Text =[……]
VB写的简单登陆框
作者: Tscccn |
日期: 2010 年 09 月 27 日 |
围观: 5458次+ |
没有评论
Private Sub Command1_Click()
Dim name, mima As Single
name = Text1.Text
mima = Val(Text2.Text)
If name = "abc" And mima = 123456 Then
MsgBox "登陆成功", vbOKOnly, "恭喜你。。"
Else
MsgBox "登录失败", vbOKOnly, "提示"
Text1.SetFocus
End If
E[……]
.htaccess 参考代码
作者: Tscccn |
日期: 2010 年 09 月 27 日 |
围观: 5493次+ |
没有评论
本文来自网络 （Tsing’s Blog） http://qingyan.net/archives/122#comment-7
关于htaccess转向的一些例子。将来也许会用得着的东西，先写在这里备用，以免到时找得头大。毕竟这是Apache方面的知识，自己一窍不通。
怎样做301转向
（1）单页面转向
－－－－－－－－－－－－－
比如把/old.htm转到http://www.domain.com/new.htm
可以用这个指令：
redirect 301 /old.htm http://www.domain.com/new.htm
－－－－－－－－－－－[……]
终于被百度收录了~
作者: Tscccn |
日期: 2010 年 09 月 26 日 |
围观: 12356次+ |
2 条评论
之前提交到百度，一直也没有被百度收录，无论怎么搜索也搜索不到kinggoo.com相关的内容。
刚刚没目的性的试了下，竟然被收录了~哈哈····原来是时间问题啊。
原来怀才真的跟怀孕好像啊，时间久了才能看出来！
如图：
[……]
玩趣儿
最新评语