Accueil > > > SOURIS, BOUTONS, CURSEUR
SOURIS, BOUTONS, CURSEUR
Information sur la source
Description
Bonjour , le programme qui suit est réalisé dans le cadre d'un mini projet semestriel. C'est le premier que j'e dépose sur ce site. cool .... c'est simple...... il vous donne la position il vous dit quel bouton est appuyé (TP dans le cadre d'un mini projet)
Source
- ;**************************************************************
- ;Programmed by Billal BEGUERADJ
- ;www.begueradj.50megs.com
- ;Bejaia University
- ;beg.bill@yahoo.com
- ;the aim of my program :
- ;vérifie si le driver de la souris est installe
- ;vous donne la position
- ;vous dit quel bouton est appuyé
- ;*************************************************************
- pile SEGMENT STACK
- dw 100 dup(?)
- pile ends
- ; ***********************************************
- data SEGMENT
- msg db 'il y a un driver de souris installé',10,13,'$'
- msgbd db 'vous avez apuye sur le bouton droit'
- db 'a la position:$'
- msgbg db 'vous avez apuye sur le bouton gauche'
- db 10,13,'ala position:$'
- esps db ',$'
- data ends
- ; ************************************************
- code SEGMENT
- assume cs:code,ds:data,ss:pile
- ;*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-
- mod_text proc
- push ax
- mov ax,03
- int 10h
- pop ax
- ret
- mod_text endp
- ;*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*
- mod_graph proc
- push ax
- mov ax,13h
- int 10h
- pop ax
- ret
- mod_graph endp
-
- readkey proc
- push ax
- mov ah,8
- int 21h
- pop ax
- ret
- readkey endp
- ;*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*
- aff_msg proc
- push ax
- mov ah,09h
- int 21h
- pop ax
- ret
- aff_msg endp
- ;*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*
- INIT_SOURIS proc
- mov ax,0
- int 33h
- ret
- init_souris endp
- ;*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*
- pointer_visibl proc
- push ax
- mov ax,01
- int 33h
- pop ax
- ret
- pointer_visibl endp
- ;*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*
- masqu_pointer proc
- push ax
- mov ax,2
- int 33h
- pop ax
- ret
- masqu_pointer endp
- ;*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*
- PEX_XY PROC
- push bx
- mov bl,8
- mov al,cl
- mul bl
- mov cx,ax
- mov bl,16
- mov al,dl
- mul bl
- mov dx,ax
- pop bx
- ret
- pex_xy endp
- ;*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*
- bouton_g proc
- mov ax,5
- mov bx,00
- int 33h
- ret
- bouton_g endp
- ;*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*
- bouton_d proc
- mov ax,5
- mov bx,01
- int 33h
- ret
- bouton_d endp
- ;*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*
- hex_dec proc
- mov cx,00
- mov bx,0ah
- ref:mov dx,00
- div bx
- push dx
- inc cx
- cmp ax,00
- jne ref
- ref2:pop dx
- call af_chif
- loop ref2
- ret
- hex_dec endp
- ;*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*
- af_chif proc
- add dl,30h
- mov ah,2
- int 21h
- ret
- af_chif endp
- ;*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*
- ;**************************************************************
- debut:mov ax,data
- mov ds,ax
- call mod_graph
- call init_souris
- call pointer_visibl
- call readkey
- call masqu_pointer
- call mod_text
- call init_souris
- call pointer_visibl
- call readkey
- lea dx,msg
- call aff_msg
- call readkey
- refair:mov ax,3
- int 33h
- cmp bx,1
- jne saut
- push cx
- push dx
- lea dx,msgbg
- call aff_msg
- jmp fin
- saut:cmp bx,2
- jne refair
- push cx
- push dx
- lea dx,msgbd
- call aff_msg
- fin:pop ax
- call hex_dec
- lea dx,esps
- call aff_msg
- pop ax
- call hex_dec
- call readkey
- call masqu_pointer
- mov ah,4ch
- int 21h
- code ends
- end debut
;**************************************************************
;Programmed by Billal BEGUERADJ
;www.begueradj.50megs.com
;Bejaia University
;beg.bill@yahoo.com
;the aim of my program :
;vérifie si le driver de la souris est installe
;vous donne la position
;vous dit quel bouton est appuyé
;*************************************************************
pile SEGMENT STACK
dw 100 dup(?)
pile ends
; ***********************************************
data SEGMENT
msg db 'il y a un driver de souris installé',10,13,'$'
msgbd db 'vous avez apuye sur le bouton droit'
db 'a la position:$'
msgbg db 'vous avez apuye sur le bouton gauche'
db 10,13,'ala position:$'
esps db ',$'
data ends
; ************************************************
code SEGMENT
assume cs:code,ds:data,ss:pile
;*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-
mod_text proc
push ax
mov ax,03
int 10h
pop ax
ret
mod_text endp
;*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*
mod_graph proc
push ax
mov ax,13h
int 10h
pop ax
ret
mod_graph endp
readkey proc
push ax
mov ah,8
int 21h
pop ax
ret
readkey endp
;*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*
aff_msg proc
push ax
mov ah,09h
int 21h
pop ax
ret
aff_msg endp
;*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*
INIT_SOURIS proc
mov ax,0
int 33h
ret
init_souris endp
;*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*
pointer_visibl proc
push ax
mov ax,01
int 33h
pop ax
ret
pointer_visibl endp
;*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*
masqu_pointer proc
push ax
mov ax,2
int 33h
pop ax
ret
masqu_pointer endp
;*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*
PEX_XY PROC
push bx
mov bl,8
mov al,cl
mul bl
mov cx,ax
mov bl,16
mov al,dl
mul bl
mov dx,ax
pop bx
ret
pex_xy endp
;*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*
bouton_g proc
mov ax,5
mov bx,00
int 33h
ret
bouton_g endp
;*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*
bouton_d proc
mov ax,5
mov bx,01
int 33h
ret
bouton_d endp
;*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*
hex_dec proc
mov cx,00
mov bx,0ah
ref:mov dx,00
div bx
push dx
inc cx
cmp ax,00
jne ref
ref2:pop dx
call af_chif
loop ref2
ret
hex_dec endp
;*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*
af_chif proc
add dl,30h
mov ah,2
int 21h
ret
af_chif endp
;*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*
;**************************************************************
debut:mov ax,data
mov ds,ax
call mod_graph
call init_souris
call pointer_visibl
call readkey
call masqu_pointer
call mod_text
call init_souris
call pointer_visibl
call readkey
lea dx,msg
call aff_msg
call readkey
refair:mov ax,3
int 33h
cmp bx,1
jne saut
push cx
push dx
lea dx,msgbg
call aff_msg
jmp fin
saut:cmp bx,2
jne refair
push cx
push dx
lea dx,msgbd
call aff_msg
fin:pop ax
call hex_dec
lea dx,esps
call aff_msg
pop ax
call hex_dec
call readkey
call masqu_pointer
mov ah,4ch
int 21h
code ends
end debut
Sources de la même categorie
Commentaires et avis
Discussions en rapport avec ce code source dans le forum
gerer le curseur de la souris [ par pythonien ]
slt je veus realiser un prog om qui prmet d effaer le curseur de l a souris de l ecran . voici mon code:.386 code segment use16 assume cs:code,ds:
Problème avec la fct 02h, int 33h [ par philippedu33 ]
Bonjour à tous !Je me suis y a à peu près 1 semaine à l'assembleur 16-bits.Je me heurte à un problème concernant l'interruption 33Fonction 01hMontre l
Utilisation de la Souris [ par Nowid50 ]
Bonjour,Je dispose d'un programme écrit en x86 en 32 bits (C'est du Win32 si je ne me trompe pas.). J'utilise un Deboggeur en Assembleur (OllyDGB), il
Tracer un rectangle [ par alibm ]
Bonjour,J'ai un projet à faire en assembleur (tasm) dont le sujet de programmer un programme qui verfie si la souris est installé ou non puis faire tr
Deplacer le curseur en mode texte sans les interruptions [ par kezsolo ]
Bonjour à toutes & à tous J'aimerai savoir s'il existe un moyen de deplacer le curseur en mode texte sous dos sans utiliser les interruptions Dos
assembleur [ par cana125 ]
Bonjour a tous les informaticien j'ai réaliser un engin et une souris et une cible mais malheureusement j'ai pas réussis a faire bouger l'engin par ra
Copier un disque dure vers un autre [ par tmsarts ]
Salut tous le monde; Je veut copier un disque dure vers un autre disque dure mais ça bloque au niveau des fichiers systèmes; NB : Le disque dure de d
curseur personalisé masm [ par Cendra ]
je cherche a mettre un curseur personalisé ( curseur.cur ) dans un de mes programmes mais j'ai du mal a utiliser l'api LoadCursorA ....on m'a parler d
Programmation assembleur d'un pilote de souris serie [ par Scaq ]
COUCOU, C SCAQ...J'ai du mal à recevoir les données de ma souris serie
|
Derniers Blogs
COMMENT MAPPER UNE VUE SQL SUR UNE COLLECTION DE COMPLEX TYPE?COMMENT MAPPER UNE VUE SQL SUR UNE COLLECTION DE COMPLEX TYPE? par Matthieu MEZIL
Avec EF, les vues doivent être mappées sur des entity types. Le problème c'est que les entity types doivent avoir une clé. Avec EF, nous avons les complex type qui n'ont pas de clé mais les vues ne peuvent pas être mappées dessus. Avec EF4, il est possibl...
Cliquez pour lire la suite de l'article par Matthieu MEZIL [WF4] UN BINDING ACTIVITY/ACTIVITYDESIGNER QUI PASSE MAL?[WF4] UN BINDING ACTIVITY/ACTIVITYDESIGNER QUI PASSE MAL? par JeremyJeanson
Certain d'entre vous on peut être vécu cette situation embarrassante après quelques temps passer avec WF4 : Au début avec mon " ActivityDesigner" , tout allait bien. Et puis un jour j'ai au des problèmes de " Binding" . Alors nous sommes allé sur le site ...
Cliquez pour lire la suite de l'article par JeremyJeanson MYTIC - SHAREPOINT 2010 : DéJà UN MYTHE MICROSOFT ?MYTIC - SHAREPOINT 2010 : DéJà UN MYTHE MICROSOFT ? par junarnoalg
La prochaine session de MyTIC aura lieu à Namur, le 23 mars prochain. Pendant presque une heure, nous parlerons de SharePoint 2010. Voici un aperçu du programme.
Accueil : 17h30 Début de la session : 18h00 - Les nouvelles int...
Cliquez pour lire la suite de l'article par junarnoalg
Forum
RE : ASSEMBLEURRE : ASSEMBLEUR par solleil
Cliquez pour lire la suite par solleil RE : ASSEMBLEURRE : ASSEMBLEUR par ghuysmans99
Cliquez pour lire la suite par ghuysmans99
Logiciels
Academy System (10.9.4.0)ACADEMY SYSTEM (10.9.4.0)Logiciel de gestion des établissements.
- élèves/étudiants (inscription, dossier, absence...)
-... Cliquez pour télécharger Academy System Xilisoft Convertisseur Vidéo Ultimate (5.1.39.0305)XILISOFT CONVERTISSEUR VIDéO ULTIMATE (5.1.39.0305)Xilisoft Convertisseur Vidéo Ultimate est un outil puissant de conversion vidéo, facile à utilise... Cliquez pour télécharger Xilisoft Convertisseur Vidéo Ultimate Xilisoft DVD Ripper Ultimate (5.0.64.0304)XILISOFT DVD RIPPER ULTIMATE (5.0.64.0304)Xilisoft DVD Ripper Ultimate est un logiciel excellent pour copier et convertir DVD vers presque ... Cliquez pour télécharger Xilisoft DVD Ripper Ultimate Rigs of Rods (63.3)RIGS OF RODS (63.3)c'est un jeu de multi-simulation camions,autobus voitures, avions, bateaux, hélicoptère avec défo... Cliquez pour télécharger Rigs of Rods
|