Koordinata git Yapımı
Koordinata git Yapımı
2 Adet Text 1. Text (Name:Tx) 2. Text (Name:Ty)
1 Adet Comander
Comander Kodu :
Dim VVA As Single
VVA = ReadFloat(KO_ADR_CHR + KO_OFF_X)
WriteFloat KO_ADR_CHR + KO_OFF_X, VVA + Tx
Dim VVA2 As Single
VVA2 = ReadFloat(KO_ADR_CHR + KO_OFF_Y)
WriteFloat KO_ADR_CHR + KO_OFF_Y, VVA2 + Ty
1 Adet Comander
Comander Kodu :
Dim VVA As Single
VVA = ReadFloat(KO_ADR_CHR + KO_OFF_X)
WriteFloat KO_ADR_CHR + KO_OFF_X, VVA + Tx
Dim VVA2 As Single
VVA2 = ReadFloat(KO_ADR_CHR + KO_OFF_Y)
WriteFloat KO_ADR_CHR + KO_OFF_Y, VVA2 + Ty