|
ZVSE
;--------------------------------------------------------------------------
!#VRv84:C15;
;----------------------------------------------------------------------
!?BA0&1000;
!!IF:Wv84;
!!VRw5&w5=0:S1;
!!VRw5:+1;
!!BA:H0/?v9555;
!!BA:H1/?v9560;
!?BF&1000;
!!DO7055/0/20/1&v9555=v84:P;
!!DO7055/21/41/1&v9560=v84:P;
!!DO7056/21/41/1&v9555=v84:P;
!!DO7056/0/21/1&v9560=v84:P;
;---------------------------------------------------------
!?FU7055;
!!HEv84:E?y21/?y22;
!!BMx16:T?y-30;
!!FU&y-30=145:E;
!!FU&y-30=146:E;
!!FU&y-30=147:E;
!!FU&y-30=148:E;
!!FU&y-30=149:E;
!!BMx16:H?y-31;
!!VRy-31::20;
!!VRy-32:Sy-31 *w5;
!!VRy-32&y-32=0:S1;
!!BMx16:Hdy-32;
!!BMx16:A?y-33;
!!VRy-33::50;
!!VRy-34:Sy-33 *w5;
!!VRy-34&y-34=0:S1;
!!BMx16:Ady-34;
!!BMx16:D?y-35;
!!VRy-35::50;
!!VRy-36:Sy-35 *w5;
!!VRy-36&y-36=0:S1;
!!BMx16:Ddy-36;
!!BMx16:U1/?y-37;
!!VRy-37::50;
!!VRy-38:Sy-37 *w5;
!!VRy-38&y-38=0:S1;
!!BMx16:U1/dy-38;
!!BMx16:U2/?y-39;
!!VRy-39::50;
!!VRy-40:Sy-39 *w5;
!!VRy-40&y-40=0:S1;
!!BMx16:U2/dy-40;
!!VRy23&y22<11:S6;
!!VRy23&y22>10/y22<21:S12;
!!VRy23&y22>20/y22<31:S18;
!!VRy23&y22>30/y22<41:S24;
!!VRy23&y22>40/y22<51:S30;
!!VRy23&y22>50:S36;
!!BMx16:Sdy23;
!!BMx16:M27/9/2 M48/9/2;
!?FU7056;
!!BMx16:S?y32;
!!FU&y32=0:E;
!!VRy33&y32<3:S-1;
!!VRy33&y32>2/y32<5:S-2;
!!VRy33&y32>4/y32<7:S-3;
!!VRy33&y32>6/y32<9:S-4;
!!VRy33&y32>8/y32<11:S-5;
!!VRy33&y32>10/y32<13:S-6;
!!VRy33&y32>=12:S-7;
!!BMx16:Sdy33;
!!BMx16:M52/9/2 M54/9/2;
;------------------------------END-------------------------------- |
|