行业应用

开发平台：

VFP

FZBJS.PRG：源码内容

							6
x=nms1
x1=ncs1
7
x1=x1-ncs1
x=x-nms1
8
repl nms1 with x
repl ncs1 with x1
21
x=nms1
x1=ncs1
22
x=x-nms1
x1=x1-ncs1
23
repl nms1 with x
repl ncs1 with x1
28 
y1=ncs2
y2=nms2
29
y1=y1+ncs2
y2=y2+nms2
27
repl ncs2 with y1
repl nms2 with y2
41
x=nms1
y=ncs1
42
x=x+nms1
y=y+ncs1
43
x=x+nms1
y=y+ncs1
40
repl nms1 with x
repl ncs1 with y
28 
x=nms2
29
x=nms2+x
27
repl nms2 with x
******
2
x=nms1
x0=ncs1
y0=ncs2
y=nms2
3
y=y+nms2
y0=y0+ncs2
4
x=x+nms1
x0=x0+ncs1
y=y+nms2
y0=y0+ncs2
5
x=x+nms1
x0=x0+ncs1
y=y+nms2
y0=y0+ncs2
6
y=y+nms2
y0=y0+ncs2
7
y=y+nms2
y0=y0+ncs2
8
x=x+nms1
x0=x0+ncs1
y=y+nms2
y0=y0+ncs2
9
x=x+nms1
x0=x0+ncs1
y=y+nms2
y0=y0+ncs2
10
x=x+nms1
x0=x0+ncs1
y=y+nms2
y0=y0+ncs2
11
x=x+nms1
x0=x0+ncs1
y=y+nms2
y0=y0+ncs2
12
x=x+nms1
x0=x0+ncs1
y=y+nms2
y0=y0+ncs2
13
x=x+nms1
x0=x0+ncs1
y=y+nms2
y0=y0+ncs2
14
x=x+nms1
x0=x0+ncs1
y=y+nms2
y0=y0+ncs2
15
x=x+nms1
x0=x0+ncs1
repl nms2 with y
repl ncs2 with y0
y1=y
y2=y0
16
x=x+nms1
x0=x0+ncs1
17
repl nms1 with x
repl ncs1 with x0
y=nms2
y0=ncs2
x1=x
x2=x0
18
y=y+nms2
y0=y0+ncs2
19
x1=x1+nms1
x2=x2+ncs1
y=y+nms2
y0=y0+ncs2
20
y=y+nms2
y0=y0+ncs2
22
repl nms2 with y
repl ncs2 with y0
y1=y1+y
y2=y2+y0
23
x=nms1
x0=ncs1
24
x=x+nms1
x0=x0+ncs1
y1=y1+nms2
y2=y2+ncs2
25
x=x+nms1
x0=x0+ncs1
repl nms2 with y1
repl ncs2 with y2
26
x=x+nms1
x0=x0+ncs1
27
repl nms1 with x
repl ncs1 with x0
x1=x1+x
x2=x2+x0
y=nms2
y0=ncs2
29
x=nms1
x0=ncs1
30
x=x+nms1
x0=x0+ncs1
31
repl nms1 with x
repl ncs1 with x0
x1=x1+x
x2=x2+x0
y=y+nms2
y0=y0+ncs2
32
y=y+nms2
y0=y0+ncs2
33
x1=x1+nms1
x2=x2+ncs1
34
y=y+nms2
y0=y0+ncs2
35
x1=x1+nms1
x2=x2+ncs1
repl nms2 with y
repl ncs2 with y0
y1=y1+y
y2=y2+y0
36
repl ncs1 with x2
repl nms1 with x1
repl ncs2 with y2
repl nms2 with y1
retu

						