in：LastStructur,in_out：FirstStructur, Temp:ptr 均为相同结构类型，FirstStructur,LastStructur 在同一数据块中，之间还有一些相同的连续的结构体。下面的程序(scl编译的程序)用于将第i个结构体赋值给ptr,请问SCL的源代码应该怎么写?
结构体定义如下：
Vrs REAL 0.000000e+000
Dsa WORD W#16#0
Ala BOOL FALSE
Inp BOOL FALSE
Rst BOOL FALSE
LivCou INT 0
程序如下：
L #i
ITD
L L#0
+D
L L#80 //结构体长度10字节
*D
L P##FirstStructur
LAR1
TAK
T LD 18
TAK
L W [AR1,P#0.0]
T LW 22
OPN DB [LW 22]
L D [AR1,P#2.0]
L LD 18
+D
LAR1
L D [AR1,P#0.0]
T #ptr.Vrs
L P##FirstStructur
LAR1
L W [AR1,P#0.0]
T LW 22
OPN DB [LW 22]
L D [AR1,P#2.0]
L LD 18
+D
LAR1
L D [AR1,P#4.0]
T LD 4
L P##FirstStructur
LAR1
L W [AR1,P#0.0]
T LW 22
OPN DB [LW 22]
L D [AR1,P#2.0]
L LD 18
+D
LAR1
L W [AR1,P#8.0]
T #ptr.LivCou