feat: fichier/répertoire effacé

noyau/manette.asm

@@ -1,298 +0,0 @@
-.model tiny
-.486
-smart
-.code
-org 0h
-start:
-jmp tsr
-drv db 'JOYSTICK',0
-Tsr:
-cli
-cmp ax,1234h
-jne nomore
-mov ax,4321h
-jmp itsok
-nomore:
-push bx
-cmp byte ptr cs:isact,1
-je  nottest
-mov cs:isact,1
-jmp react
-mov bl,ah
-xor bh,bh
-shl bx,1
-mov bx,cs:[bx].tables
-mov cs:current,bx
-pop bx
-call cs:current
-itsok:
-jnc noerror
-push bp
-mov bp,sp
-or byte ptr [bp+6],1b
-pop bp
-mov ax,cs
-shl eax,16
-mov ax,cs:current
-jmp endofint
-noerror:
-push bp
-mov bp,sp
-and byte ptr [bp+6],0FEh
-pop bp
-endofint:
-mov cs:isact,0
-sti
-iret
-nottest:
-pop bx
-jmp endofint
-current dw 0
-tables   dw 0;detectjoystick
-         ;dw getjoystick
-         ;dw getjoystickscreen
-         ;dw configjoystick
-isact db 0
-
-;envoie en bx,cx les coordonn‚es et en dl les boutons
-getjoystick:
-push ax cx
-mov bx,cs:rx
-mov cx,cs:ry
-mov al,cs:button
-not al                   
-mov  cl,4
-shr al,cl   
-mov dl,al
-pop cx ax
-ret
-
-;envoie en di les coordonn‚es ecran et en dl les boutons
-getjoystickscreen:
-push ax cx
-mov di,cs:xy
-mov al,cs:button
-not al                   
-mov  cl,4
-shr al,cl   
-mov dl,al
-pop cx ax
-ret
-db 'button'
-Button  db 0
-db 'rx'
-rx      dw 0
-db 'ry'
-ry      dw 0
-db 'vx'
-VX      db 0
-db 'vy'
-VY      db 0
-db 'x'
-X       dw 7FFFh
-db 'y'
-Y       dw 7FFFh
-speed   db 6
-spherex db 0
-spherey db 0
-db 'count'
-count   db 0
-db 'error'
-error   db 0
-xy      dw 0
-old     db 0
-
-calibrate db 0
-db 'ticks'
-ticks dw 0
-db 'state'
-state db 0
-db 'connard'
-connard db 1
-connard2 db 1
-;Gestionnaire de joystick
-react:
-        push ax bx cx dx si di bp ds es
-       push cs
-       pop ds
-       mov     dx,201h    
-       cmp error, 1
-        je gest1        
-       cmp count,1
-       je gest1
-       cmp count,2
-       je gest2
-gest1:
-       mov error,0
-       mov count,2
-       call getticks
-        mov ticks,ax
-        out dx,al
-        in al,dx
-        and al,00000011b
-        mov state,al
-        jmp endgest
-gest2:
-not connard
-       call getticks
-       sub ax,ticks      
-        cmp ax,1FF0h
-        jb nofinish
-        mov error,1
-        jmp endgest
-nofinish:
-       mov bx,ax
-        in al,dx
-        and 	al,00000011b
-        cmp state,al
-        je endgest
-        xchg state,al
-        xor al,state
-        mov cl,4
-        or      bx,bx                
-        js      noadj
-        shr     bx,cl                  
-noadj:
-        test al,1
-        je isy
-        mov VX,bl
-        jmp wasx
-isy:
-        test al,2
-        je endgest
-       mov VY,bl 
-wasx:
-mov connard2,0fh
-        mov count,1 
-endgest:
-        in      al,dx               
-        not     al                   
-        mov     cl,4
-        shr     al,cl                  
-        mov button,al
-        push cs
-        pop es
-        mov di,offset infos
-        mov ah,34
-        int 47h              
-        mov cl,speed
-        movsx bx,VY
-        shl bx,cl
-        cmp spherey,0
-        jne nolimity
-        xor ah,ah
-        mov al,[di]
-       cmp byte ptr [di+7],4
-        jbe text4
-       shl ax,3
-text4:
-        dec ax
-        cmp bx,0
-        jg decy
-        cmp ry,ax
-        jae noaddy
-        jmp nolimity
-decy:
-        cmp ry,0
-        je noaddy
-nolimity:
-        sub y,bx
-noaddy:
-        movsx bx,VX
-        shl bx,cl
-        cmp spherex,0
-        jne nolimitx
-         xor ah,ah
-        mov al,[di+1]
-        cmp byte ptr [di+7],4
-        jbe text5
-       shl ax,3
-text5: 
-        dec ax
-        cmp bx,0
-        jl decx
-        cmp rx,ax
-        jae noaddx
-        jmp nolimitx
-decx:
-        cmp rx,0
-        je noaddx
-nolimitx:
-        add x,bx
-noaddx:
-        mov ax,x
-        mov bx,0FFFFh
-        xor ch,ch
-        mov cl,[di+1]
-       cmp byte ptr [di+7],4
-        jbe text1
-       shl cx,3
-text1:
-        mul cx
-        div bx
-        mov rx,ax
-        mov ax,y
-        xor ch,ch
-        mov cl,[di]
-       cmp byte ptr [di+7],4
-        jbe text2
-       shl cx,3
-text2:
-        mul cx
-        div bx
-        mov ry,ax
-        xor ch,ch
-        mov cl,[di+1]
-        cmp byte ptr [di+7],4
-        jbe text3
-       shl cx,3
-text3:   
-        mul cx
-        add ax,rx
-       cmp byte ptr [di+7],4
-        mov di,ax
-        jbe textpoint
-       mov ax,0A000h
-        mov es,ax
-        jmp graphpoint
-textpoint:
-        mov ax,0B800h
-        mov es,ax
-        shl di,1
-        inc di
-graphpoint: 
-        mov bx,xy
-        cmp byte ptr es:[bx],070h 	
-        jne waschanged
-        mov al,old
-        mov byte ptr es:[bx],al 
-waschanged:
-        mov xy,di
-        mov al,es:[di]
-        mov old,al
-        mov byte ptr es:[di],070h 
-        mov al, 20h
-        out 0a0h, al                         
-        out 20h, al             
-errormouse:
-        pop es ds bp di si dx cx bx ax
-        mov cs:isact,0
-        pop bx
-        iret
- infos db 40 dup (0)
-
-
-getticks:
-mov     al,0                 
-out     43h,al
-jmp    wait1
-wait1:                 
-in      al,40h               
-mov     ah,al
-jmp     wait2
-wait2:
-in      al,40h               
-xchg    ah,al                  
-ret
-
-end start