?? c5_2_2.dsp
字號:
dm(eit_int)=ar;
mx0=dm(rt); mx1=0;
my0=dm(eft1_fra); my1=dm(eft1_int);
call dpm;
mx0=dm(res_fra); mx1= dm(res_int);
my0=dm(at_fra); my1=dm(at_int);
call dpm;
ax0=dm(res_fra);
ax1=dm(res_int);
dm(temp1_fra)=ax0;
dm(temp1_int)=ax1;
mx0=dm(rrt); mx1=0;
my0=dm(eft2_fra); my1=dm(eft2_int);
call dpm;
ax0=dm(temp1_fra);
ax1=dm(temp1_int);
ay0=dm(res_fra);
ay1=dm(res_int);
ar=ax0+ay0;
dm(temp_fra)=ar;
ar=ax1+ay1+c;
dm(temp_int)=ar;
ax0=dm(eit_fra);
ax1=dm(eit_int);
ay0=dm(temp_fra);
ay1=dm(temp_int);
ar=ax0-ay0;
dm(eft_fra)=ar;
ar=ax1-ay1+c-1;
dm(eft_int)=ar;
mx0=dm(rt); mx1=0;
my0=dm(yft1_fra); my1=dm(yft1_int);
call dpm;
mx0=dm(res_fra); mx1= dm(res_int);
my0=dm(at_fra); my1=dm(at_int);
call dpm;
ax0=dm(res_fra);
ax1=dm(res_int);
dm(temp1_fra)=ax0;
dm(temp1_int)=ax1;
mx0=dm(rrt); mx1=0;
my0=dm(yft2_fra); my1=dm(yft2_int);
call dpm;
ax0=dm(temp1_fra);
ax1=dm(temp1_int);
ay0=dm(res_fra);
ay1=dm(res_int);
ar=ax0+ay0;
dm(temp_fra)=ar;
ar=ax1+ay1+c;
dm(temp_int)=ar;
ay0=dm(temp_fra);
ay1=dm(temp_int);
ax0=dm(yt_fra);
ax1=dm(yt_int);
ar=ax0-ay0;
dm(yft_fra)=ar;
ar=ax1-ay1+c-1;
dm(yft_int)=ar;
ax0=dm(at_fra);
ax1=dm(at_int);
dm(at1_fra)=ax0;
dm(at1_int)=ax1;
ax0=dm(eit1_fra);
ax1=dm(eit1_int);
dm(eit2_fra)=ax0;
dm(eit2_int)=ax1;
ax0=dm(eit_fra);
ax1=dm(eit_int);
dm(eit1_fra)=ax0;
dm(eit1_int)=ax1;
ax0=dm(eft1_fra);
ax1=dm(eft1_int);
dm(eft2_fra)=ax0;
dm(eft2_int)=ax1;
ax0=dm(eft_fra);
ax1=dm(eft_int);
dm(eft1_fra)=ax0;
dm(eft1_int)=ax1;
ax0=dm(yft1_fra);
ax1=dm(yft1_int);
dm(yft2_fra)=ax0;
dm(yft2_int)=ax1;
ax0=dm(yft_fra);
ax1=dm(yft_int);
dm(yft1_fra)=ax0;
dm(yft1_int)=ax1;
ax0=dm(pt_fra);
ax1=dm(pt_int);
dm(pt1_fra)=ax0;
dm(pt1_int)=ax1;
loop2: nop;
si=dm(at_fra);
sr=lshift si by –1(lo);
si=sr0;
sr=lshift si by –1(lo);
dm(xx)=sr0;
ax0=dm(at_int);
ay0=h#0ffff;
ar=ax0+ay0;
if not ac jump stone0;
ax0=dm(at_int);
ay0=h#0fffe;
ar=ax0+ay0;
if not ac jump stone1;
ax0=dm(xx);
ay0=h#0000;
ar=ax0+ay0;
if not ac jump stone2;
ax0=dm(xx);
ay0=h#0001;
if not ac jump stone3;
ax0=dm(xx);
ay0=h#0c000;
ar=ax0+ay0;
ar=ar-1;
jump stone;
stone3: ar=dm(xx);
ar=ar-1;
jump stone;
stone2: ax0=dm(xx);
ay0=h#0c000;
ar=ax0+ay0;
jump stone;
stone1: ax0=dm(xx);
ay0=h#04000;
ar=ax0+ay0;
jump stone;
stone0: ar=dm(xx);
stone: ar=-ar; ax0=0;
dm(temp_fra)=ax0;
dm(temp_int)=ax1;
mx0=ar; my0=ar;
dm(at_fra)=mx0;
cntr=10;
do loop4 until ce;
mr=mx0*my0(ss);
my0=mr1;
loop4: nop;
mx0=h#02dd;
mr=mx0*my0(ss);
ax0=mr1;
ay0=h#8000;
ar=ax0+ay0;
if not ac jump am1;
ar=dm(temp_int);
ar=ar-1;
dm(temp_int)=ar;
am1: si=ax0;
sr=lshift si by 1(lo);
dm(temp_fra)=sr0;
mx0=dm(at_fra);
my0=dm(at_fra);
cntr=8;
do loop5 until ce;
mr=mx0*my0(ss);
my0=mr1;
loop5: nop;
mx0=h#03e1;
mr=mx0*my0(ss);
ax0=mr1;
ay0=h#8000;
ar=ax0+ay0;
if not ac jump am2;
ar=dm(temp_int);
ar=ar-1;
dm(temp_int)=ar;
am2: si=mr1;
sr=lshift si by 1(lo);
ay0=sr0;
ax0=dm(temp_fra);
ar=ax0+ay0;
dm(temp_fra)=ar;
ax1=0;
ay1=dm(temp_int);
ar=ax1+ay1+c;
dm(temp_int)=ar;
mx0=dm(at_fra);
my0=dm(at_fra);
cntr=6;
do loop6 until ce;
mr=mx0*my0(ss);
my0=mr1;
loop6: nop;
mx0=h#06b6;
mr=mx0*my0(ss);
ax0=mr1;
ay0=h#8000;
ar=ax0+ay0;
if not ac jump am3;
ar=dm(temp_int);
ar=ar-1;
dm(temp_int)=ar;
am3: si=mr1;
sr=lshift si by 1(lo);
ax0=sr0;
ay0=dm(temp_fra);
ar=ax0+ay0;
dm(temp_fra)=ar;
ax1=0;
ay1=dm(temp_int);
ar=ax1+ay1+c;
dm(temp_int)=ar;
mx0=dm(at_fra);
my0=dm(at_fra);
cntr=4;
do loop7 until ce;
mr=mx0*my0(ss);
my0=mr1;
loop7: nop;
mx0=h#0aaa;
mr=mx0*my0(ss);
ax0=mr1;
ay0=h#8000;
ar=ax0+ay0;
if not ac jump am4;
ar=dm(temp_int);
ar=ar-1;
dm(temp_int)=ar;
am4: si=mr1;
sr=lshift si by 1(lo);
ax0=sr0;
ay0=dm(temp_fra);
ar=ax0+ay0;
dm(temp_fra)=ar;
ax1=0;
ay1=dm(temp_int);
ar=ax1+ay1+c;
dm(temp_int)=ar;
mx0=dm(at_fra);
my0=dm(at_fra);
mr=mx0*my0(ss);
my0=mr1;
mr=mx0*my0(ss);
mx0=mr1;
my0=h#01555;
mr=mx0*my0(ss);
ax0=mr1;ay0=h#8000;
ar=ax0+ay0;
if not ac jump am5;
ar=dm(temp_int);
ar=ar-1;
dm(temp_int)=ar;
am5: si=mr1;
sr=lshift si by 1(lo);
ax0=sr0;
ay0=dm(temp_fra);
ar=ax0+ay0;
dm(temp_fra)=ar;
ax1=0;
ay1=dm(temp_int);
ar=ax1+ay1+c;
dm(temp_int)=ar;
ax0=dm(at_fra);
ay0=h#08000;
ar=ax0+ay0;
if not ac jump am6;
ar=dm(temp_int);
ar=ar-1;
dm(temp_int)=ar;
am6: si=dm(at_fra);
sr=lshift si by 1(lo);
ay0=sr0; ax1=0;
ax0=dm(temp_fra);
ay1=dm(temp_int)
ar=ax0+ay0;
dm(temp_fra)=ar;
ar=ax1+ay1+c;
dm(temp_int)=ar;
ax0=dm(at_fra);
ay0=h#08000;
ar=ax0+ay0;
mx0=dm(at_fra);
my0=dm(at_fra);
cntr=12;
do loop8 until ce;
mr=mx0*my0(ss);
my0=mr1;
loop8: nop;
mx0=h#0238;
mr=mx0*my0(ss);
ax0=mr1;
ay0=h#8000;
ar=ax0+ay0;
if not ac jump am7;
ar=dm(temp_int);
ar=ar-1;
dm(temp_int)=ar;
am7: si=mr1;
sr=lshift si by 1(lo);
ax0=sr0;
ay0=dm(temp_fra);
ar=ax0+ay0;
dm(temp_fra)=ar;
ax1=0;
ay1=dm(temp_int);
ar=ax1+ay1+c;
dm(temp_int)=ar;
ax0=1;
ax1=h#921f;
ay0=dm(temp_int);
ay1=dm(temp_fra);
ar=ax1-ay1;
dm(temp_fra)=ar;
ar=ax0-ay0+c-1;
dm(temp_int)=ar;
mx0=h#028be;
mx1=0;
my0=dm(temp_fra);
my1=dm(temp_int);
call dpm;
mx0=dm(res_fra);
mx1=dm(res_int);
my0=0;my1=900;
call dpm;
jump csp5;
dpm ena m_mode;
MR=MX0*MY0(UU);
MR0=MR1;
MR1=MR2;
MR=MR+MX1*MY0(SU);
MR=MR+MX0*MY1(US);
DM(res_fra)=MR0;
MR0=MR1;
MR1=MR2;
MR=MR+MX1*MY1(SS);
DM(res_int)=MR0;
dis m_mode;
RTS;
CSP5: IDLE;
.endmod;
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -