%-----------------------------------------------------------------------------%
% Touches.masd                                                                %
%-----------------------------------------------------------------------------%
% Gestion des touches                                                         %
%-----------------------------------------------------------------------------%

% Touche pour sortir (DROP)

!?FL=0.0 LC 001
!?FL=1.0 LC 010
!?FL=0.0 OUT=C=IN
!?FL=1.0 GOSBVL 00017
!?FL=0.0 ?CBIT=0.6 { GOTO Fin }
!?FL=1.0 ?CBIT=1.0 -> Fin

!?FL=0.0 LC 040
!?FL=0.0 OUT=C=IN
!?FL=0.0 ?CBIT=0.0 {
!?FL=0.0   D0=(5)ANGLE A=DAT0.B
!?FL=0.0   A+1.B DAT0=A.B }

!?FL=0.0 LC 040
!?FL=0.0 OUT=C=IN
!?FL=0.0 ?CBIT=0.2 {
!?FL=0.0   D0=(5)ANGLE A=DAT0.B
!?FL=0.0   A-1.B DAT0=A.B }

@