    -6128 V1.0

SCREEN1,[0-2],[0-2]
    

STRIG(0-2) -  BASIC MSX,   "" (     ).
0 - 
1  2 -  1 ( 0Fh)

STICK(0-2) -  BASIC MSX,   
0 - 
1  2 -  1 ( 0Fh)

:
   STRIG  STICK  .    .
 STRIG  STICK      .



 ,   

   PUT   0
38AF lxi h,37D9h	;   6128    ,     
			;  shlx stc  rz stc    2.5
shlx     ,      put   0   .
      getput1.bas  basic 2.5   6128.


  PAUSE            182185    58080.
      pause         6128  -6128  ,    2.5  -06


      ,   BASIC 2.5 (  BASIC 2.5 COLOR 16+7,   6128 COLOR 7,     BASIC 2.5    COLOR 15)