| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 4264 人关注过本帖
标题:[原创]抓取屏幕内容(字符模式)
取消只看楼主 加入收藏
zhulei1978
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:53
帖 子:1351
专家分:1200
注 册:2006-12-17
结帖率:100%
收藏
 问题点数:0 回复次数:4 
[原创]抓取屏幕内容(字符模式)

*/ --------------------------------------------------------------------------------------
*/ 出自: 编程中国 http://www.bc-cn.net
*/ 作者: zhulei1978
*/ 时间: 2007-7-28 编程论坛首发
*/ 声明: 尊重作者劳动,转载请保留本段文字
*/ --------------------------------------------------------------------------------------

输入格式:
先输入抓取屏幕的左上角行列号,再输入抓取屏幕的右下角行列号.输入第3行要输入03
0=<行号<=24,0=<列号<=79


DATA SEGMENT
num db ?,?,?,?
nm1 db ?
nm2 db ?
message1 db 'row1:','$'
buf1 db 3,?
data1 db ?
data2 db ?
message2 db ' col1:','$'
buf2 db 3,?
data3 db ?
data4 db ?
message3 db ' row2:','$'
buf3 db 3,?
data5 db ?
data6 db ?
message4 db ' col2:','$'
buf4 db 3,?
data7 db ?
data8 db ?
shuju db 2000 dup(?)
DATA ENDS
CODE SEGMENT
ASSUME CS:CODE,DS:DATA
START:
MOV AX,DATA
MOV DS,AX

lea dx,message1
mov ah,9
int 21h
MOV DX,OFFSET buf1
MOV AH,0AH
INT 21H
mov cx,0
mov al,data1
sub al,30h
mov bl,10
mul bl
add cx,ax
mov al,data2
sub al,30h
add cx,ax
mov num,cl

mov dl,13
mov ah,2
int 21h
mov dl,10
mov ah,2
int 21h

lea dx,message2
mov ah,9
int 21h
MOV DX,OFFSET buf2
MOV AH,0AH
INT 21H
mov cx,0
mov al,data3
sub al,30h
mul bl
add cx,ax
mov al,data4
sub al,30h
add cx,ax
mov num+1,cl

mov dl,13
mov ah,2
int 21h
mov dl,10
mov ah,2
int 21h

lea dx,message3
mov ah,9
int 21h
MOV DX,OFFSET buf3
MOV AH,0AH
INT 21H
mov cx,0
mov al,data5
sub al,30h
mul bl
add cx,ax
mov al,data6
sub al,30h
add cx,ax
mov num+2,cl

mov dl,13
mov ah,2
int 21h
mov dl,10
mov ah,2
int 21h

lea dx,message4
mov ah,9
int 21h
MOV DX,OFFSET buf4
MOV AH,0AH
INT 21H
mov cx,0
mov al,data7
sub al,30h
mul bl
add cx,ax
mov al,data8
sub al,30h
add cx,ax
mov num+3,cl

mov al,num
cmp al,0
js exit1
cmp al,25
jns exit1

mov al,num+2
cmp al,0
js exit1
cmp al,25
jns exit1

mov al,num+1
cmp al,0
js exit1
cmp al,80
jns exit1

mov al,num+3
cmp al,0
js exit1
cmp al,80
jns exit1

mov al,num
mov ah,num+2
cmp ah,al
js exit1

mov al,num+1
mov ah,num+3
cmp ah,al
js exit1

mov al,num
mov ah,num+2
sub ah,al
add ah,1
mov nm1,ah

mov al,num+1
mov ah,num+3
sub ah,al
add ah,1
mov nm2,ah

mov ax,0b800h
mov es,ax
mov al,num
mov bl,80
mul bl
mov bh,0
mov bl,num+1
add ax,bx
mov bl,2
mul bx
mov bx,ax
jmp flag1

exit1:
jmp exit

flag1:
lea si,shuju
mov ch,0
mov cl,nm1
again1:
push cx
mov cl,nm2
push bx
push si
again2:
mov ah,byte ptr es:[bx]
mov [si],ah
add bx,2
add si,1
loop again2
pop si
add si,80
pop bx
add bx,160
pop cx
loop again1

lea si,shuju
mov ch,0
mov cl,nm1
again3:
mov dl,13
mov ah,2
int 21h
mov dl,10
mov ah,2
int 21h
push cx
mov cl,nm2
mov bx,0
push si
again4:
mov dl,[si]
mov ah,2
int 21h
add si,1
loop again4
pop si
add si,80
pop cx
loop again3

exit:
MOV AH,4CH
INT 21H
CODE ENDS
END START

[此贴子已经被作者于2007-7-30 14:50:42编辑过]

搜索更多相关主题的帖子: 屏幕 字符 模式 
2007-07-28 21:18
zhulei1978
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:53
帖 子:1351
专家分:1200
注 册:2006-12-17
收藏
得分:0 
以下是引用菜鸟上路在2007-7-29 9:19:14的发言:
,但是抓取的屏幕内容存放在哪呢?

显示在屏幕上。你是指原先内容会被替代的问题吗,为避免这种情况也可以保存在文件里。


其实我就是改变社会风气,提高少女素质,刺激电影市道,提高年轻人内涵,玉树临风,风度翩翩的整蛊专家,我名叫古晶,英文名叫JingKoo!
2007-07-29 17:04
zhulei1978
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:53
帖 子:1351
专家分:1200
注 册:2006-12-17
收藏
得分:0 
保存在shuju里

其实我就是改变社会风气,提高少女素质,刺激电影市道,提高年轻人内涵,玉树临风,风度翩翩的整蛊专家,我名叫古晶,英文名叫JingKoo!
2007-07-31 20:17
zhulei1978
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:53
帖 子:1351
专家分:1200
注 册:2006-12-17
收藏
得分:0 
呵呵

其实我就是改变社会风气,提高少女素质,刺激电影市道,提高年轻人内涵,玉树临风,风度翩翩的整蛊专家,我名叫古晶,英文名叫JingKoo!
2007-08-01 13:55
zhulei1978
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:53
帖 子:1351
专家分:1200
注 册:2006-12-17
收藏
得分:0 
以下是引用TE20在2007-8-5 15:40:26的发言:
哥们,保存到什么数据里啊,我怎么看我截的图片啊!!!

截取的是字符,不是图片。而且程序已经将截取的字符显示在屏幕上。


其实我就是改变社会风气,提高少女素质,刺激电影市道,提高年轻人内涵,玉树临风,风度翩翩的整蛊专家,我名叫古晶,英文名叫JingKoo!
2007-08-08 20:11
快速回复:[原创]抓取屏幕内容(字符模式)
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.033735 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved