Tweet
Để làm cho một vật chuyển động từ một điểm này đến 1 điểm kia thì mình đã làm được, ví dụ như làm cho thang máy chuyển động từ tầng 1 đến tầng 10 chẳng hạn:
Tuy nhiên để làm cho một băng tải chuyển động thì mình mò mãi mà vẫn chưa được. Bạn nào có cao kiến xin trao đổi để mọi người và đặc biệt là mình có thể học tập:
Code:
#include "apdefap.h"
int gscAction( void )
{
int cbmocua1;
int cbdongcua1;
int dtbt1;
int mocua;
int dongcua;
int dc1len;
int dc1xuong;
int dc1lentocdocham;
int dc1xuongtocdocham;
int vitrithang;
int vitriDC_mocua1;
dtbt1=GetTop("2 thang.Pdl","DTBT1"); //Return-Type: long int
mocua=GetTop("2 thang.Pdl","mo cua"); //Return-Type: long int
dongcua=GetTop("2 thang.Pdl","Dong cua"); //Return-Type: long int
vitrithang=GetTop("2 thang.Pdl","Cabin1"); //Return-Type: long int
vitriDC_mocua1=GetTop("2 thang.Pdl","DC mocua1"); //Return-Type: long int
cbdongcua1=GetTop("2 thang.Pdl","CBdong cua 1"); //Return-Type: long int
cbmocua1=GetTop("2 thang.Pdl","CB mo cua 1"); //Return-Type: long int
dc1len=GetTagBit("dc1len"); //Return-Type: BOOL
dc1xuong=GetTagBit("dc1xuong"); //Return-Type: BOOL
dc1lentocdocham=GetTagBit("dc1lentocdocham"); //Return-Type: BOOL
dc1xuongtocdocham=GetTagBit("dc1xuongtocdocham"); //Return-Type: BOOL
if(dc1lentocdocham==1)
{
vitrithang = vitrithang-2;
vitriDC_mocua1=vitriDC_mocua1-2;
dtbt1=dtbt1-2;
mocua=mocua-2;
dongcua=dongcua-2;
cbmocua1=cbmocua1-2;
cbdongcua1=cbdongcua1-2;
}
else
{
if(dc1len==1)
{
vitrithang=vitrithang-4;
vitriDC_mocua1=vitriDC_mocua1-4;
dtbt1=dtbt1-4;
mocua=mocua-4;
dongcua=dongcua-4;
cbmocua1=cbmocua1-4;
cbdongcua1=cbdongcua1-4;
}
else
{
if(dc1xuongtocdocham==1)
{
vitrithang=vitrithang+2;
vitriDC_mocua1=vitriDC_mocua1+2;
dtbt1=dtbt1+2;
mocua=mocua+2;
dongcua=dongcua+2;
cbmocua1=cbmocua1+2;
cbdongcua1=cbdongcua1+2;
}
else
{
if(dc1xuong==1)
{
vitrithang=vitrithang+4;
vitriDC_mocua1=vitriDC_mocua1+4;
dtbt1=dtbt1+4;
mocua=mocua+4;
dongcua=dongcua+4;
cbmocua1=cbmocua1+4;
cbdongcua1=cbdongcua1+4;
}
else
{
vitrithang=vitrithang;
vitriDC_mocua1=vitriDC_mocua1;
dtbt1=dtbt1;
mocua=mocua;
dongcua=dongcua;
}
}
}
}
SetTop("2 thang.Pdl","Cabin1",vitrithang); //Return-Type: BOOL
SetTop("2 thang.Pdl","DC mocua1",vitriDC_mocua1); //Return-Type: BOOL
SetTop("2 thang.Pdl","Dong cua",dongcua); //Return-Type: BOOL
SetTop("2 thang.Pdl","DTBT1",dtbt1); //Return-Type: BOOL
SetTop("2 thang.Pdl","mo cua",mocua); //Return-Type: BOOL
SetTop("2 thang.Pdl","CBdong cua 1",cbdongcua1); //Return-Type: BOOL
SetTop("2 thang.Pdl","CB mo cua 1",cbmocua1); //Return-Type: BOOL
return 0;
}
Comment