//+——————————————————————+
//| Yevheniy |
//| Nucleo v 2.5.2.mq4 |
//| |
//+——————————————————————+property copyright «Yevheniy Kopanitskyy»

property link «https://www.mql5.com/en/users/eugeniokp»

property version «2.5»

property strict

//—–EXTERNAL VAR—–
bool LongPosition=false;//Long moneda
bool ShortPosition=false;//Short moneda
extern bool BinIndWRITE=true;//moneda
extern bool Array_Errors=false;
bool ALLtoARRAYWRITE=true;//moneda
bool BODYHorizont=true;//moneda
extern string NAA_1=»YevheniyKopanitskyy»;
extern string NAA_2=»TetianaPalchykova»;
extern string NAA_3=»DenisPryymak»;
extern string NAA_4=»KristynaKopanitska»;
extern string NAA_5=»»;
extern string NAA_6=»SofiiaPalchykova»;
extern string NAA_7=»»;
extern string NAA_8=»OlgaPryymak»;
extern string NAA_9=»MarceloArandano»;
extern string NAA_10=»AlinaPryymak»;
extern string NAA_11=»»;
extern string NAA_12=»AbigailKopanitska»;
extern string NAA_13=»»;
extern string NAA_14=»»;
extern string NAA_15=»»;
extern string NAA_16=»»;
extern string NAA_17=»»;
extern string NAA_18=»»;
extern string NAA_19=»»;
extern string NAA_20=»»;
extern string NAA_21=»»;
extern string NAA_22=»»;
extern string NAA_23=»»;
extern string NAA_24=»»;
extern string NAA_25=»»;
extern string NAA_26=»»;
extern string NAA_27=»»;
extern string NAA_28=»»;
extern string NAA_29=»»;
extern string NAA_30=»»;
extern string NAA_31=»»;
extern string NAA_32=»»;
//–END—EXTERNAL VAR—–
//——Importing TELEGRAM library – Sending messages to a channel——————————

import «Telegram4Mql.dll»

string TelegramSendTextAsync(string apiKey,string chatId,string chatText);
string TelegramSendText(string apiKey,string chatId,string chatText);
string TelegramSendScreenAsync(string apiKey,string chatId,string caption=»»);
string TelegramSendScreen(string apiKey,string chatId,string caption=»»);
string TelegramGetUpdates(string apiKey,string validUsers,bool confirmUpdates);
string TelegramSendPhoto(string apiKey,string chatId,string filePath,string caption=»»);
string TelegramSendPhotoAsync(string apiKey,string chatId,string filePath, string caption = «»);
string TelegramSendDocument(string apiKey, string chatId, string filePath, string caption = «»);
string TelegramSendDocumentAsync(string apiKey,string chatId,string filePath,string caption=»»);
//…

import

//—END—Importing TELEGRAM library – Sending messages to a channel——————————
//Все массивы double заполняютя по 5 знакам после запятой. Пример 99999 = 0,001€ в итоге весь массив = 1€
//——ARRAYS—–
double body[99999,20];//m
//double BinaryKeys[9999,2000];
int MaxMinArr[9,3];//
double kompa[10000];
double kompa1[10000];
datetime PIPS_COL_DT[99999];
double PIPS_COL_Price[99999,6];
int bbb[1681,3];
int bbb_compare[9999,2,1681];
int errorprint[50];
int errorprint2[150];
//int priceBEBO[100000,2];
double AllAnalisysData[7205,20];
datetime DT_AllAnalisysData[7205,1];
double BodyHorizont_Bin[7210,2000];
double BodyHorizont_Price[7210,2000];
datetime BodyHorizont_Time[7210];
double bodyAR[90000,50];
datetime bodydt[90000];
double body_Plus[99999,20];//Массив для перезаписи
double komp1[99999];// Array for displaying the synapse in the record
int ArrayMaximum_0[10000];//999999
int ArrayMaximum_1[10000];//999999
int flower[99,99];//Мaссив для получения архитектуры
datetime flower_Price_3_TIME[200001,1000];
float flower_Price_3[200001,100];
int KlasterTime[9,385];// 8 linias 8 petalos,celdas, numero de fraccion» 1- 4″,num agija de reloj «1234»,»03,36,69,91″» Numero de variable,Numero asignado segun calculo.
datetime TimeArrSignal_Wordpress[9999];
int TimeArrSignal_Int_Wordpress[9999,5];
datetime TimeArrSignal_Wordpress_24[9999];
datetime TimeArrSignal_Wordpress_168[9999];
//int bintoarr[1441,1001];//запись параметров бинарного кода в массив.Запись массива раз в сутки в бинарный фаил
//int IFb1;//Индекс 1 для массива bintoarr
//int IFb2;//Индекс 2 для массива bintoarr
//int BinaryToArray[32000,1001];//месяц записи в массив бинарного кода. Записись нужно производить другим скриптом
//datetime bintoarrTIME [1441];//Массив для записи времени свечи
//datetime BinaryToArrayTIME[32000];//Массив для обьеденения времени свечи
//double bintoarrBID[1441,1001];//Массив для записи бид цены по тику
//double BinaryToArrayBID[32000,1001];//Массив для записи бид
//int temparrbin[1441,1001];//Массив для записи отсеенных данных бинарного кода
//double temparrbid[1441,1001];
//datetime temparrtime[1441];
//datetime binrepit[32000,1001];//Запись повторов бинарных свечей
double bodypips[99999,5];// Array for data analysis using the Sunflower method
double comp_bodypips[99999];int Particula[33];// Array en el cual se cuadran los numeros de claster

int Sev_Part_Lic[5,33];// 1-4 N centros – Tiempo asignado. 5-12 dobavochnie»2 po poryadku 1-4 » 13-16 Cotejo.17 -32 Fracciones de 1-4
int Vost_Part_Lic[5,33];// 1-4 N centros – Tiempo asignado. 5-6 dobavochnie»2 po poryadku 1-4 » 7 Cotejo.7 -11 Fracciones de 1-4
int Yug_Part_Lic[5,33];// 1-4 N centros – Tiempo asignado. 5-6 dobavochnie»2 po poryadku 1-4 » 7 Cotejo.7 -11 Fracciones de 1-4
int Zap_Part_Lic[5,33];// 1-4 N centros – Tiempo asignado. 5-6 dobavochnie»2 po poryadku 1-4 » 7 Cotejo.7 -11 Fracciones de 1-4
//+——————————————————————+
int Sev_Part_Izn[5,33];// 1-4 N centros – Tiempo asignado. 5-12 dobavochnie»2 po poryadku 1-4 » 13-16 Cotejo.17 -32 Fracciones de 1-4
int Vost_Part_Izn[5,33];// 1-4 N centros – Tiempo asignado. 5-6 dobavochnie»2 po poryadku 1-4 » 7 Cotejo.7 -11 Fracciones de 1-4
int Yug_Part_Izn[5,33];// 1-4 N centros – Tiempo asignado. 5-6 dobavochnie»2 po poryadku 1-4 » 7 Cotejo.7 -11 Fracciones de 1-4
int Zap_Part_Izn[5,33];// 1-4 N centros – Tiempo asignado. 5-6 dobavochnie»2 po poryadku 1-4 » 7 Cotejo.7 -11 Fracciones de 1-4
//+——————————————————————+
//—END—ARRAYS—-
//——DOUBLE VARS—–
long calcday;
string retsimb3,retsimb4,retsimb5,retsimb9,retsimb13,retsimb15,retsimb11,retsimb12,retsimb18;
int Yearf;
datetime Time_from_Array;
uint NInt,NDT,NDT2,NDT3;
uint test2,test3,test4;
uint test1;
int Arch3=0;
double normalLevel;//moneda
double center;//moneda
double DoublspredPoint;//moneda
double LEVELUP;//moneda
double LEVELDOWN;//moneda
double PriceZero;//moneda
double CopenRes;//moneda
double CcloseRes;//moneda
double Level;//moneda
double LEVELK=1;//moneda
double Onda1;//moneda
double CurPips;//moneda
double price_Menus_one,pips_Menus_one;
double restanteminimum;//moneda
double restantemaximum;
double Str_Pr_Bar=0;
double Price1;
double Price0;
double price_minus;
double price_plus;
double BoolInd;//Bool
double BearInd;
double Maximum;//bool
double Minimum;
double PipsDif;
double IpaintFiboLineUP_2;
double IpaintFiboLineUP_3;
double IpaintFiboLineUP_5;
double IpaintFiboLineUP_8;
double IpaintFiboLineUP_13;
double IpaintFiboLineUP_21;
double IpaintFiboLineUP_34;
double IpaintFiboLineUP_55;
double IpaintFiboLineUP_89;
double IpaintFiboLineUP_144;
double IpaintFiboLineDOWN_2;
double IpaintFiboLineDOWN_3;
double IpaintFiboLineDOWN_5;
double IpaintFiboLineDOWN_8;
double IpaintFiboLineDOWN_13;
double IpaintFiboLineDOWN_21;
double IpaintFiboLineDOWN_34;
double IpaintFiboLineDOWN_55;
double IpaintFiboLineDOWN_89;
double IpaintFiboLineDOWN_144;
double HIGHT;
double LOW;
double CLOSE;
double OPEN;
double resOperandMax;
double resOperandMin;
//–END—-DOUBLE VARS—–
//–Claster Variables
//–
//Angelusvitae fond
int odna_chaska_kofe;
int kolvo_gram_1_chashka_kofe;
double ves_1_zerno;
double kolvo_zeren_1_chashka_Kofe;
int one_kg_kofe_soderzhit_chawek;
double Kolvo_zeren_v_kilograme;
extern int Kolvo_sredstv_dlya_sbora=15000;
int Kolvo_chashek_kofe_dlya_sbora;
int Kolvo_zeren_dlya_Sbora;
int kolvo_zeren_sessiya;
int kolvo_zeren;
int Gx,Gy;
int fgf;
int fgi;
int fgo;
int k;
int printdesc1;
int printdesc2;
int printdesc3;
int printdesc4;
int printdesc5, permis;
int LongShort;
int Counter1;
int Counter1_1;
int Counter0;
int Counter0_1;
int Counter_Summa1;
int Counter_Summa0;
int zeroindex;
int Counter=0;
int TotaltuADDtoSELLTEXT,TotaltuADDtoBUYTEXT;
int file_handle4;
int iarw,BinInd3,BinInd3BO,BinInd3BE;
int spredpoints=15;
int Handle;
int MaxBinNumber_1Index;
int MaxBinNumber_0Index;
int MaxBinNumber_1;
int MaxBinNumber_0;
int mult=100000;
int IndexMaximum;
int IndexMinimum;
int MaxInd_bodypips;
int Switch1;
int iaq,ibq;
int ONE_BE;
int IreceiveLevelresult;
int NormalizaDigi=5;
int im;
int Bear_Z,Bool_Z;
int Switch_L_S;
int Rez_BE,one_BE;
//—END—INTEGER VARS—–
//—Переменные индикатора Маховик Времени
int comp_Sev[9,9];//Массив для сравнения после пересчёта
double Form_Patern_Finder[1002,121];//Массив для отслеживания формации Патернов на купольной архитектуре
datetime DT_Form_Patern_Finder[1002,121];//Массив для отслеживания времени формации Патернов на купольной архитектуре
int PipsNumber; //1,2,3,4,5
int N_Centro_r;
//Часы 1
// Массивы для пересчётов
int Sev[9,9];
int Var1_Be_0;
int Var1_Bo_0;
int Var1_Be_1;
int Var1_Bo_1;
int Var2_Be_0;
int Var2_Bo_0;
int Var2_Be_1;
int Var2_Bo_1;
// Переменные для разрешений
int sev;
int yug;
int zap;
int vost;
// Переменные для лица и изнанки
int lic;
int izn;
//Подача данных из подсолнуха
double Price_Compare;
int Be_0=0;
int Bo_0=0;
int Be_1=0;
int Bo_1=0;
int Be_0_Asign=0;
int Bo_0_Asign=0;
int Be_1_Asign=0;
int Bo_1_Asign=0;
int CheFe=0;
//Часы 2
int Be_0_C=0;
int Bo_0_C=0;
int Be_1_C=0;
int Bo_1_C=0;
// Массивы для пересчётов для Z Оси
int z_Sev[9,9];
int z_Var1_Be_0;
int z_Var1_Bo_0;
int z_Var1_Be_1;
int z_Var1_Bo_1;
int z_Var2_Be_0;
int z_Var2_Bo_0;
int z_Var2_Be_1;
int z_Var2_Bo_1;
// Переменные для разрешений
int z_sev;
int z_yug;
int z_zap;
int z_vost;
// Переменные для лица и изнанки
int z_lic;
int z_izn;
//Подача данных из подсолнуха
int z_Be_0;
int z_Bo_0;
int z_Be_1;
int z_Bo_1;
int z_Be_0_Asign;
int z_Bo_0_Asign;
int z_Be_1_Asign;
int z_Bo_1_Asign;
int z_CheFe=0;
int z_Sev_1;
int z_Yug_1;
int z_Vost_1;
int z_Zap_1;
string z_BlockNum=»0″;
int z_errorprint[150];
int z_errorprint2[150];
int z_Gx,z_Gy;
int N_Petalo;
int N_Petalo_1;
int Petalos_32=0;
//Купол – Против Часовой Стрелки
// —— Свод Цена-Купол + Свод Цена – Крест Абьём
int Per_Sev1=0;//Be_0 лиц
int Per_Sev2=0;//Bo_0 лиц
int Per_Sev3=0;//Be_1 лиц
int Per_Sev4=0;//Bo_1 лиц
int Per_Sev5=0;//Be_0 изн
int Per_Sev6=0;//Bo_0 изн
int Per_Sev7=0;//Be_1 изн
int Per_Sev8=0;//Bo_1 изн
int w;
int w1;
int w2;
int w3;
bool flower_perm=false;
int InternalPat_1;//индикатор формирования внутреннего патерна вокруг цены
int ExternalPat_1;//индикатор формирования Внешнего патерна вокруг цены
// Пример. Массива Север
// Sev[1,1]=0; Be_0
// Sev[1,2]=0; Bo_0
// Sev[1,3]=0; Be_1
// Sev[1,4]=0; Bo_1
double PriceConv1;
double Veinte=20;
double cien=100;
double cienm=100000;
int N_Gr20;
int PriceConv2;
double PriceConv3;
double PriceConv4;
int N_Centro;
float Price;
int zapret_podachi_input=0;
int zapret_podachi_output=0;
int zaryad;
int f_Bo_0;
int f_Be_0;// Складывание в Лепесток
int f_Bo_1;// Складывание в Лепесток
int f_Be_1;// Складывание в Лепесток
int Contra_Reloj;
int Rest_Vost;
int Rest_Sever;
int Rest_Yug;
int Rest_Zap;
int Sev_B=0;//Заполненность модуля
int Zap_B=0;
int Yug_B=0;
int Vost_B=0;
int SZBV=0;
//По часовой стрелке
int Reloj;
int Sum_Vost;
int Sum_Sever;
int Sum_Yug;
int Sum_Zap;
int Sum_B=0;//Заполненность модуля
int Sum_Zap_B=0;
int Sum_Yug_B=0;
int Sum_Vost_B=0;
int Sum_Sev_B=0;
int Sum_SZBV=0;
int insert_chanel_1;
int insert_chanel_2;
int output_Dir;//vostok
//По часовой Bo_0
int Reloj_1;
int Sum_Vost_1;
int Sum_Sever_1;
int Sum_Yug_1;
int Sum_Zap_1;
int Sum_B_1=0;//Заполненность модуля
int Sum_Zap_B_1=0;
int Sum_Yug_B_1=0;
int Sum_Vost_B_1=0;
int Sum_Sev_B_1=0;
int Sum_SZBV_1=0;
int flower_Plus=0;//Цветок склался 0
//Против Часовой Bo_0
int Contra_Reloj_1;
int Rest_Vost_1;
int Rest_Sever_1;
int Rest_Yug_1;
int Rest_Zap_1;
int Sev_B_1=0;//Заполненность модуля
int Zap_B_1=0;
int Yug_B_1=0;
int Vost_B_1=0;
int SZBV_1=0;
//Массивы для регистра суммы обьёмав в 8 частях куба
int kubo_1=0;
int kubo_2=0;
int kubo_3=0;
int kubo_4=0;
int kubo_5=0;
int kubo_6=0;
int kubo_7=0;
int kubo_8=0;
//указать в ссылке обратную индексацию
// Расшифровка символов. 1 число Архитектура 2 число x коордената 3 число y коордената
int C_Ar_1,C_Ar_2,C_Ar_3,C_Ar_4,C_Ar_5,C_Ar_6,C_Ar_7,C_Ar_8,C_Ar_9,C_Ar_10,C_Ar_11,C_Ar_12,C_Ar_13,C_Ar_14,C_Ar_15,C_Ar_16,C_Ar_17,C_Ar_18,C_Ar_19,C_Ar_20,C_Ar_21,C_Ar_22,C_Ar_23,C_Ar_24,C_Ar_25,C_Ar_26,C_Ar_27,C_Ar_28,C_Ar_29,C_Ar_30,C_Ar_31,C_Ar_32;
string G111211311411Be0l111221311421Bo0i;
string Ar_1=G111211311411Be0l111221311421Bo0i+NAA_1;//OlgGuclenko;4 ok1
string G111221311421Bo0l111211311411Be0i;
string Ar_2=G111221311421Bo0l111211311411Be0i+NAA_2;//YevheniKopnitsk;4 2ok
string G111211311411Be0i111221311421Bo0l;
string Ar_3=G111211311411Be0i111221311421Bo0l+NAA_3;//InnCim;4 ok1
string G111221311421Bo0i111211311411Be0l;
string Ar_4=G111221311421Bo0i111211311411Be0l+NAA_4;//SergeiDolzhikov;4 ok1
string G111222312421Be1l111212312411Bo1i;
string Ar_5=G111222312421Be1l111212312411Bo1i+NAA_5;//ElenZhulitsk; 4 ok1
string G111212312411Bo1l111222312421Be1i;
string Ar_6=G111212312411Bo1l111222312421Be1i+NAA_6;//SergeZvidn; 4 ok1
string G111222312421Be1i111212312411Bo1l;
string Ar_7=G111222312421Be1i111212312411Bo1l+NAA_7;//IrinDzhuli;4 ok1
string G111212312411Bo1i111222312421Be1l;
string Ar_8=G111212312411Bo1i111222312421Be1l+NAA_8;//SergeSoloviov;4 ok1
string G111221311421Be0l111222312421Bo0i;
string Ar_9=G111221311421Be0l111222312421Bo0i+NAA_9;//AlinaPriimak;4ok1
string G111222312421Bo0l111221311421Be0i;
string Ar_10=G111222312421Bo0l111221311421Be0i+NAA_10;//MarceloArandano;4 ok1
string G111221311421Be0i111222312421Bo0l;
string Ar_11=G111221311421Be0i111222312421Bo0l+NAA_11;//ConchaTorres;4 ok1
string G111222312421Bo0i111221311421Be0l;
string Ar_12=G111222312421Bo0i111221311421Be0l+NAA_12;//AngelDelRosario;4 ok1
string G111212312411Be1l111211311411Bo1i;
string Ar_13=G111212312411Be1l111211311411Bo1i+NAA_13;//MashaDidenko;4 ok1
string G111211311411Bo1l111212312411Be1i;
string Ar_14=G111211311411Bo1l111212312411Be1i+NAA_14;//AnatoliMacola;4 ok1
string G111212312411Be1i111211311411Bo1l;
string Ar_15=G111212312411Be1i111211311411Bo1l+NAA_15;//NataliaFurina;4 ok1
string G111211311411Bo1i111212312411Be1l;
string Ar_16=G111211311411Bo1i111212312411Be1l+NAA_16;//YuriSarapin;4 ok1
string G111222312421Be0l11121231241iBo0i;
string Ar_17=G111222312421Be0l11121231241iBo0i+NAA_17;//ValentinaShavritskaa;4 ok1
string G111212312411Bo0l111222312421Be0i;
string Ar_18=G111212312411Bo0l111222312421Be0i+NAA_18;//BeiViktorZotov;4 +-ok1
string G111222312421Be0111212312411lBo0i;
string Ar_19=G111222312421Be0111212312411lBo0i+NAA_19;//ViktoriaDunaeva;4 ok1 +-
string G111212312411Bo0i111222312421Be0l;
string Ar_20=G111212312411Bo0i111222312421Be0l+NAA_20;//BelOlegDunaev;4 ok1
string G111211311411Be1l111221311421Bo1i;
string Ar_21=G111211311411Be1l111221311421Bo1i+NAA_21;//Bo1iMarinaGudimenko;4 ok1
string G111221311421Bo1l111211311411Be1i;
string Ar_22=G111221311421Bo1l111211311411Be1i+NAA_22;//Be1iDimaGudimenko;4 ok1
string G111211311411Be1i111221311421Bo1l;
string Ar_23=G111211311411Be1i111221311421Bo1l+NAA_23;//Bo1lSvetlanaVarazhko;4 ok1
string G111221311421Bo1i111211311411Be1l;
string Ar_24=G111221311421Bo1i111211311411Be1l+NAA_24;//Be1lArtemVarazhko;4 ok
string G111212312411Be0l111211311411Bo0i;
string Ar_25=G111212312411Be0l111211311411Bo0i+NAA_25;//RozaBerioza;4 ok1
string G111211311411Bo0l111212312411Be0i;
string Ar_26=G111211311411Bo0l111212312411Be0i+NAA_26;//YuriTurasov;4 ok1
string G111211311411Be0i111211311411Bo0l;
string Ar_27=G111211311411Be0i111211311411Bo0l+NAA_27;//AnnaDanko; ok1
string G111211311411Bo0i111212312411Be0l;
string Ar_28=G111211311411Bo0i111212312411Be0l+NAA_28;//RomanTischenko;4 ok1
string G111221311421Be1l111222312421Bo1i;
string Ar_29=G111221311421Be1l111222312421Bo1i+NAA_29;//MarinaEletskaa;4 ok1
string G111222312421Bo1l111221311421Be1i;
string Ar_30=G111222312421Bo1l111221311421Be1i+NAA_30;//DenisVinnikov;4 ok1
string G111221311421Be1i111222312421Bo1l;
string Ar_31=G111221311421Be1i111222312421Bo1l+NAA_31;//TetianaPalchkova;4 ok1
string G111222312421Bo1i111221311421Be1l;
string Ar_32=G111222312421Bo1i111221311421Be1l+NAA_32;//AndrePalchkov;4 ok1
string Pr_C_Ar_1,Pr_C_Ar_2,Pr_C_Ar_3,Pr_C_Ar_4,Pr_C_Ar_5,Pr_C_Ar_6,Pr_C_Ar_7,Pr_C_Ar_8,Pr_C_Ar_9,Pr_C_Ar_10,Pr_C_Ar_11,Pr_C_Ar_12,Pr_C_Ar_13,Pr_C_Ar_14,Pr_C_Ar_15,Pr_C_Ar_16,Pr_C_Ar_17,Pr_C_Ar_18,Pr_C_Ar_19,Pr_C_Ar_20,Pr_C_Ar_21,Pr_C_Ar_22,Pr_C_Ar_23,Pr_C_Ar_24,Pr_C_Ar_25,Pr_C_Ar_26,Pr_C_Ar_27,Pr_C_Ar_28,Pr_C_Ar_29,Pr_C_Ar_30,Pr_C_Ar_31,Pr_C_Ar_32;
string Pr_Arch;
string Text_Kubo_1=»0″;
string Text_Kubo_2=»0″;
string Text_Kubo_3=»0″;
string Text_Kubo_4=»0″;
string Text_Kubo_5=»0″;
string Text_Kubo_6=»0″;
string Text_Kubo_7=»0″;
string Text_Kubo_8=»0″;
string Obiekt3001=»3001″;
//Класификация части куба
// kube_1 – Be_o_x_Lic / Bo_0_Z_izn
// kube_2 – Bo_o_x_Lic / Bo_0_Z_lic
// kube_3 – Be_1_x_Lic / Bo_1_Z_lic
// kube_4 – Bo_1_x_Lic / Be_0_Z_izn
// kube_5 – Be_o_x_izn / Bo_0_Z_lic
// kube_6 – Bo_o_x_izn / Be_0_Z_izn
// kube_7 – Be_1_x_izn / Bo_1_Z_izn
// kube_8 – Bo_o_x_izn / Be_1_Z_lic
string obiekt502=»502″;
string obiekt503=»503″;
string obiekt504=»504″;
string obiekt505=»505″;
string obiekt506=»506″;
string obiekt507=»507″;
string obiekt508=»508″;
string obiekt509=»509″;
extern bool Vol_B_Chang_1=false;
extern bool Compens=true;
extern bool GAP=false;
// Подача разрешений для сторон света
int Sev_1;
int Yug_1;
int Vost_1;
int Zap_1;
//–Угловая направленность ядра
int Nucleo_0_Gr;
int Nucleo_45_Gr;
int Nucleo_90_Gr;
int Nucleo_135_Gr;
int Nucleo_180_Gr;
int Nucleo_225_Gr;
int Nucleo_270_Gr;
int Nucleo_315_Gr;
int Nucleo_Gradus[15];//Показатель направления ядра после прокручивания электронами. Исходная позиция север архитектура 3 после сигнала. 8 позиций для углов 45градусов + и 4 позиции для регистрации точьки зрения с использованием архитектур 1234
// Разметка 4 переменных по 4 сторонам света с лицом и изнанкой и привязкой к Северной стороне как исходной позиции
//Север
// Sev[1,1]=0; Be_0
// Sev[1,2]=0; Bo_0
// Sev[1,3]=0; Be_1
// Sev[1,4]=0; Bo_1
// Изнанка
// Sev[1,5]=1; Bo_0
// Sev[1,6]=1; Be_0
// Sev[1,7]=1; Bo_1
// Sev[1,8]=1; Be_1
//Юг
// Sev[1,1]=0; Be_1
// Sev[1,2]=0; Bo_1
// Sev[1,3]=0; Be_0
// Sev[1,4]=0; Bo_0
// Изнанка
// Sev[1,5]=1; Bo_1
// Sev[1,6]=1; Be_1
// Sev[1,7]=1; Bo_0
// Sev[1,8]=1; Be_0
//Запад
// Sev[1,1]=0; Bo_0
// Sev[1,2]=0; Be_1
// Sev[1,3]=0; Bo_1
// Sev[1,4]=0; Be_0
// Изнанка
// Sev[1,5]=1; Be_1
// Sev[1,6]=1; Bo_0
// Sev[1,7]=1; Be_0
// Sev[1,8]=1; Bo_1
//Восток
// Sev[1,1]=0; Bo_1
// Sev[1,2]=0; Be_0
// Sev[1,3]=0; Bo_0
// Sev[1,4]=0; Be_1
// Изнанка
// Sev[1,5]=1; Be_0
// Sev[1,6]=1; Bo_1
// Sev[1,7]=1; Be_1
// Sev[1,8]=1; Bo_0
//—
//int Andryuschenko_I;
//int Antipenko_P;
//int Buyakov_D;
//int Ryabashtan_N;
//int Krivenko_L;
//int Kopanitskyy_E;
//int Elizarova_G;
//int Cima_I;
//int Konyahina_A;
//int Parmuzina_N;
//int Matvienko_L;
//int Zhulickaya_L;
//int Pravda_Y;
//int Furina_N;
//int Zotov_V;
//int Jarkina_T;
//int Moroz_I;
//int Turasov_Y;
//int Macola_A;
//int Sarapin_Y;
//int Nasypaiko_O;
//int Prityupa_V;
//int Golovchuk_D;
//int Shpilevoy_R;
//int Vaskevich_L;
//int Yurchenko_D;
//int Vinokurov_R;
//int Taran_R;
//int Plasovenko_A;
//int Bilichenko_V;
//int Romanyuk_I;
//int Malaya_A_S;
//int Dunaeva_V_A;
//int Kamashko_V;
//int Zimuha_V;
//int Galushko_R;
//——STRING VARS—–
string File_Name=»File.csv»;
string FR_Nm=».csv»;
string filename;
string Sw_On;
string copy=»copy»;
string SYmbol=Symbol();
string RectanglLabel;
string TextVisualIndicator;
string Bo,Be;
string Obiekt101=»Obiekt101″;
string Obiektcampo1=»100″,Obiektcampo2=»101″,Obiektcampo3=»102″,Obiektcampo4=»103″,Obiektcampo5=»104″,Obiektcampo6=»105″,Obiektcampo7=»106″,Obiektcampo8=»107″,Obiektcampo9=»108″,Obiektcampo10=»109″,Obiektcampo11=»110″,Obiektcampo12=»111″,Obiektcampo13=»112″,Obiektcampo14=»113″,Obiektcampo15=»114″;
//—END—STRING VARS—–
//—–FILE NAMES—–
//string FileName1=SYmbol+» MEMORYnature.txt»;
//string FileName3=SYmbol+» MEMORYnature_FTP.txt»;
//string FileName2=SYmbol+» MEMORYnature-ALLSIGNALS.txt»;
string FileName4=SYmbol+»1.8Long&Short-Signals.txt»;
//string FileName5=SYmbol+» LEVELS PRICE.txt»;
string FileName6=SYmbol+»1.8indexarray.bin»;
string FileName7=SYmbol+»1.8alltoarray.bin»;
//string FileName8=SYmbol+» BinaryKeys_BIN.bin»;
//string FileName9=SYmbol+» BinaryKeys_BID.bin»;
string FileName10=SYmbol+»DT_CupolPat1.bin»;
string FileName12=»1.8bbb.bin»;
//string FileName11=SYmbol+» BinaryKeys-Repit_TIME.bin»;//массив в котором хранятся повторы ключей по времени, если повтор был то фиксируется время открытия свечи
string FileName13=»1.8bbb_compare.bin»;
string FileName14=SYmbol+»1.8PIPS_COLLECTION.txt»;
string FileName15=SYmbol+»1.8PIPS_COL_DT.bin»;
string FileName16=SYmbol+»1.8PIPS_COL_Price.bin»;
string FileName17=SYmbol+»1.8DataCompare.txt»;
string FileName18=SYmbol+»CupolPat1.bin»;//Фаил отгрузки и загрузки
string FileName19=SYmbol+»1.8AllAnalisysData.bin»;//m
string FileName20=SYmbol+»1.8DT_AllAnalisysData.bin»;
string FileName21=SYmbol+»1.8BodyHorizont_Bin.bin»;
string FileName22=SYmbol+»1.8BodyHorizont_Price.bin»;
string FileName23=SYmbol+»1.8BodyHorizont_Time.bin»;
string FileName25=SYmbol+»flower_Price_3.bin»;
string FileName26=SYmbol+»flower_Price_3_TIME.bin»;
string FileName27=SYmbol+»SunwlowerSignals.txt»;
string FileName33=SYmbol+»ImporShopSignals.txt»;
string FileName32=»ImporWORDPRESS_1_7_D.txt»;
string FileName28=»KlasterTime.bin»;
string FileName30=»1.8_TimeArrSignal_Wordpress.bin»;
string FileName31=»1.8_TimeArrSignal_Int_Wordpress.bin»;
string FileName40=»1.8_TimeArrSignal_Wordpress_24.bin»;
string FileName41=»1.8_TimeArrSignal_Wordpress_168.bin»;

string apikey=»630515987:AAHk0ChIBaW3aOZBP1mFQBSK-4HXsBvbB6I»;//f9b317ac95d043fb843fdb6a54b84ebb
string chatid=»-1001177290832″;//654751710 bot chat //934069395
//–END—FILE NAMES—–
//——DATETIME VARS—–
datetime time_bar,time_BR,Bar_Tm=0;
datetime BrTime;
datetime bartimeresult;
//—END—DATETIME VARS—–
//——BOOL VARS—–
bool write=true;
bool writeall=true;
bool write_Zero=true;
//—END—BOOL VARS—–
//——LONG VARS—–
long CHWPX;
//—END—LONG VARS—–
//+——————————————————————+
//| Expert initialization function |
//+——————————————————————+
int init()
{
// — REVISIONS — //
//—1.9.1
// — Added enabling and disabling writing to arrays ALLtoARRAYWRITE
// — Added enabling and disabling recording to BODYHorizont arrays
// — Added changing the ONE_be variable to int in the cycle of transferring messages to telegrams and writing data to a file
//——-imag fibanachi—–
string Kubo_Img=»\Images\Kubo_Mql4.bmp»;
//———————–
string obiekt501=»501″;
ObjectDelete(0,obiekt501);
ObjectDelete(Obiekt3001);
ObjectDelete(obiekt501);
ObjectCreate(obiekt501,OBJ_BITMAP_LABEL,0,BrTime,HIGHT+0.00015);
ObjectSetString(0,obiekt501,OBJPROP_BMPFILE,Kubo_Img);
ObjectSetInteger(0,obiekt501,OBJPROP_XDISTANCE,CHWPX+1450);
ObjectSetInteger(0,obiekt501,OBJPROP_YDISTANCE,350);
//——-imag emoji—–
//string fileemoji=»\Images\11_p.bmp»;
//for(int x; x<500; x++) //{ //for(int y; y<2000; y++) //{ // Sleep(20); //Comment(» «,x); //———————– // string Obiekt3001=»3001″; // ObjectDelete(Obiekt3001); // ObjectCreate(Obiekt3001,OBJ_BITMAP_LABEL,0,BrTime,HIGHT+0.00015); // ObjectSetString(0,Obiekt3001,OBJPROP_BMPFILE,fileemoji); // ObjectSetInteger(0,Obiekt3001,OBJPROP_XDISTANCE,CHWPX+500); // ObjectSetInteger(0,Obiekt3001,OBJPROP_YDISTANCE,100); // } // } ObjectDelete(0,obiekt502); ObjectDelete(obiekt502); ObjectCreate(obiekt502,OBJ_LABEL,0,BrTime,HIGHT+0.00015); ObjectSetString(0,obiekt502,OBJPROP_TEXT,Text_Kubo_1); ObjectSetInteger(0,obiekt502,OBJPROP_COLOR,clrRed); ObjectSetInteger(0,obiekt502,OBJPROP_FONTSIZE,9); ObjectSetInteger(0,obiekt502,OBJPROP_XDISTANCE,CHWPX+1565); ObjectSetInteger(0,obiekt502,OBJPROP_YDISTANCE,450); ObjectDelete(0,obiekt503); ObjectDelete(obiekt503); ObjectCreate(obiekt503,OBJ_LABEL,0,BrTime,HIGHT+0.00015); ObjectSetString(0,obiekt503,OBJPROP_TEXT,Text_Kubo_2); ObjectSetInteger(0,obiekt503,OBJPROP_COLOR,clrRed); ObjectSetInteger(0,obiekt503,OBJPROP_FONTSIZE,9); ObjectSetInteger(0,obiekt503,OBJPROP_XDISTANCE,CHWPX+1665); ObjectSetInteger(0,obiekt503,OBJPROP_YDISTANCE,450); ObjectDelete(0,obiekt504); ObjectDelete(obiekt504); ObjectCreate(obiekt504,OBJ_LABEL,0,BrTime,HIGHT+0.00015); ObjectSetString(0,obiekt504,OBJPROP_TEXT,Text_Kubo_3); ObjectSetInteger(0,obiekt504,OBJPROP_COLOR,clrRed); ObjectSetInteger(0,obiekt504,OBJPROP_FONTSIZE,9); ObjectSetInteger(0,obiekt504,OBJPROP_XDISTANCE,CHWPX+1665); ObjectSetInteger(0,obiekt504,OBJPROP_YDISTANCE,540); ObjectDelete(0,obiekt505); ObjectDelete(obiekt505); ObjectCreate(obiekt505,OBJ_LABEL,0,BrTime,HIGHT+0.00015); ObjectSetString(0,obiekt505,OBJPROP_TEXT,Text_Kubo_4); ObjectSetInteger(0,obiekt505,OBJPROP_COLOR,clrRed); ObjectSetInteger(0,obiekt505,OBJPROP_FONTSIZE,9); ObjectSetInteger(0,obiekt505,OBJPROP_XDISTANCE,CHWPX+1565); ObjectSetInteger(0,obiekt505,OBJPROP_YDISTANCE,540); ObjectDelete(0,obiekt506); ObjectDelete(obiekt506); ObjectCreate(obiekt506,OBJ_LABEL,0,BrTime,HIGHT+0.00015); ObjectSetString(0,obiekt506,OBJPROP_TEXT,Text_Kubo_5); ObjectSetInteger(0,obiekt506,OBJPROP_COLOR,clrRed); ObjectSetInteger(0,obiekt506,OBJPROP_FONTSIZE,9); ObjectSetInteger(0,obiekt506,OBJPROP_XDISTANCE,CHWPX+1710); ObjectSetInteger(0,obiekt506,OBJPROP_YDISTANCE,350); ObjectDelete(0,obiekt507); ObjectDelete(obiekt507); ObjectCreate(obiekt507,OBJ_LABEL,0,BrTime,HIGHT+0.00015); ObjectSetString(0,obiekt507,OBJPROP_TEXT,Text_Kubo_6); ObjectSetInteger(0,obiekt507,OBJPROP_COLOR,clrRed); ObjectSetInteger(0,obiekt507,OBJPROP_FONTSIZE,9); ObjectSetInteger(0,obiekt507,OBJPROP_XDISTANCE,CHWPX+1590); ObjectSetInteger(0,obiekt507,OBJPROP_YDISTANCE,350); ObjectDelete(0,obiekt508); ObjectDelete(obiekt508); ObjectCreate(obiekt508,OBJ_LABEL,0,BrTime,HIGHT+0.00015); ObjectSetString(0,obiekt508,OBJPROP_TEXT,Text_Kubo_7); ObjectSetInteger(0,obiekt508,OBJPROP_COLOR,clrRed); ObjectSetInteger(0,obiekt508,OBJPROP_FONTSIZE,9); ObjectSetInteger(0,obiekt508,OBJPROP_XDISTANCE,CHWPX+1470); ObjectSetInteger(0,obiekt508,OBJPROP_YDISTANCE,520); ObjectDelete(0,obiekt509); ObjectDelete(obiekt509); ObjectCreate(obiekt509,OBJ_LABEL,0,BrTime,HIGHT+0.00015); ObjectSetString(0,obiekt509,OBJPROP_TEXT,Text_Kubo_8); ObjectSetInteger(0,obiekt509,OBJPROP_COLOR,clrRed); ObjectSetInteger(0,obiekt509,OBJPROP_FONTSIZE,9); ObjectSetInteger(0,obiekt509,OBJPROP_XDISTANCE,CHWPX+1760); ObjectSetInteger(0,obiekt509,OBJPROP_YDISTANCE,500); // — initialization of arrays—– ArrayInitialize(body,10); ArrayInitialize(bodypips,0); ArrayInitialize(comp_bodypips,0); ArrayInitialize(PIPS_COL_DT,0); ArrayInitialize(PIPS_COL_Price,0); ArrayInitialize(comp_Sev,0); ArrayInitialize(Form_Patern_Finder,0); ArrayInitialize(AllAnalisysData,1000);//Массив инициализирую числом ArrayInitialize(BodyHorizont_Bin,10); ArrayInitialize(BodyHorizont_Price,10); ArrayInitialize(bodyAR,61); ArrayInitialize(flower_Price_3,0); ArrayInitialize(flower_Price_3_TIME,0); ArrayInitialize(Particula,0); ArrayInitialize(KlasterTime,0); // —END—initialization of arrays—– // — Initialization of the Telegram Bot string Testtelegr = TelegramSendText(apikey,chatid,»Tatiana_Bot_Initialized_V_1.8″); //Comment(Testtelegr); // —END—Initialization of the Telegram Bot //–Индикатор бинарный код – цель получение повторений индикатора Price1=0; Price0=0; // присваивание значения индексам для массива // IFb1=0;//номер строки // IFb2=0;// ячейка в строке // ArrayInitialize(bintoarr,10);//Инициализирую массив при запуске советника // ArrayInitialize(BinaryToArray,10);//Инициализирую массив при запуске советника // ArrayInitialize(temparrbin,10); // ArrayInitialize(temparrbid,10); // ArrayInitialize(temparrtime,10); // ArrayInitialize(bintoarrBID,10); // ArrayInitialize(BinaryToArrayBID,10); // ArrayInitialize(binrepit,10); //–Autentification // if(AccountNumber()!=29856891) // { // Alert(» Autentificacion Faild «); // } // return(0); //–END — Autentification // – Working with charts — ChartSetInteger(0,CHART_SHOW_GRID,0,false); ChartSetInteger(0,CHART_DRAG_TRADE_LEVELS,0,false); ChartSetInteger(0,CHART_SHIFT,0,true); ChartSetDouble(0,CHART_SHIFT_SIZE,25); ChartSetSymbolPeriod(0,Symbol(),PERIOD_M1); ChartSetInteger(0,CHART_MODE,CHART_CANDLES); ChartSetInteger(0,CHART_COLOR_BACKGROUND,clrWhite); ChartSetInteger(0,CHART_COLOR_FOREGROUND,clrBlack); ChartSetInteger(0,CHART_COLOR_CHART_UP,clrBlack); ChartSetInteger(0,CHART_COLOR_CHART_DOWN,clrBlack); ChartSetInteger(0,CHART_COLOR_CHART_LINE,clrBlack); ChartSetInteger(0,CHART_COLOR_CANDLE_BULL,clrWhite); ChartSetInteger(0,CHART_COLOR_CANDLE_BEAR,clrBlack); ChartSetInteger(0,CHART_COLOR_BID,clrGreen); //—END— Working with charts — printdesc1=1; printdesc2=0; printdesc3=0; printdesc4=0; printdesc5=0; // —– rectangular window object—– CHWPX=-1; ChartGetInteger(0,CHART_WIDTH_IN_PIXELS,0,CHWPX); // —END — rectangular window object—– //—-General Variables—— BrTime=iTime(Symbol(),0,1); HIGHT=iHigh(Symbol(),0,1); im=0; //–END–General Variables—— //———————–Loading Files bbb.bin i bbb_compare.bin into an array—————————// int file_handle12=FileOpen(FileName12,FILE_READ|FILE_WRITE|FILE_BIN);//Loading bbb.bin //Print(«HANDLE bbb.bin «,file_handle12); if(file_handle12>0)
{
FileSeek(file_handle12,0,SEEK_CUR);
uint test=FileReadArray(file_handle12,bbb,0,WHOLE_ARRAY);
//Print(«READ bbb.bin «,test);
FileClose(file_handle12);
}
//———————————————————————————–
int file_handle13=FileOpen(FileName13,FILE_READ|FILE_WRITE|FILE_BIN);//Loading
//Print(«HANDLE bbb_compare «,file_handle13);
if(file_handle13>0)
{
FileSeek(file_handle13,0,SEEK_CUR);
uint test=FileReadArray(file_handle13,bbb_compare,0,WHOLE_ARRAY);
//Print(«READ bbb_compare «,test);
FileClose(file_handle13);
}
//———————————————————————————–
int file_handle25=FileOpen(FileName18,FILE_READ|FILE_WRITE|FILE_BIN);//Loading
//Print(«HANDLE CupolPat1.bin Load «,file_handle25);
if(file_handle25>0)
{
FileSeek(file_handle25,0,SEEK_CUR);
uint test=FileReadArray(file_handle25,Form_Patern_Finder,0,WHOLE_ARRAY);
Print(«READ CupolPat1.bin «,test);
FileClose(file_handle25);
}
//———————————————————————————–
//———————————————————————————–
int file_handle26=FileOpen(FileName10,FILE_READ|FILE_WRITE|FILE_BIN);//Loading
//Print(«HANDLE CupolPat1.bin Load «,file_handle25);
if(file_handle26>0)
{
FileSeek(file_handle26,0,SEEK_CUR);
uint test=FileReadArray(file_handle26,DT_Form_Patern_Finder,0,WHOLE_ARRAY);
//Print(«READ CupolPat1.bin «,test);
FileClose(file_handle26);
}
//———————————————————————————–
//———————————————————————————–
int file_handle27=FileOpen(FileName25,FILE_READ|FILE_WRITE|FILE_BIN);//Loading
//Print(«HANDLE CupolPat1.bin Load «,file_handle25);
if(file_handle27>0)
{
FileSeek(file_handle27,0,SEEK_CUR);
uint test=FileReadArray(file_handle27,flower_Price_3,0,WHOLE_ARRAY);
//Print(«READ CupolPat1.bin «,test);
FileClose(file_handle27);
}
//———————————————————————————–
//———————————————————————————–
int file_handle28=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);//Loading
//Print(«HANDLE CupolPat1.bin Load «,file_handle25);
if(file_handle28>0)
{
FileSeek(file_handle28,0,SEEK_CUR);
uint test=FileReadArray(file_handle28,flower_Price_3_TIME,0,WHOLE_ARRAY);
//Print(«READ CupolPat1.bin «,test);
FileClose(file_handle28);
}
//———————————————————————————–
// int file_handle15=FileOpen(FileName15,FILE_READ|FILE_WRITE|FILE_BIN);//Загрузка
// Print(«PIPS_COL_DT «,file_handle15);
// if(file_handle15>0)
// {
//FileSeek(file_handle15,0,SEEK_CUR);
// uint test=FileReadArray(file_handle15,PIPS_COL_DT,0,WHOLE_ARRAY);
// Print(«READ PIPS_COL_DT «,test);
// FileClose(file_handle15);
// }
//———————————————————————————–
//int file_handle16=FileOpen(FileName16,FILE_READ|FILE_WRITE|FILE_BIN);//Загрузка
// Print(«PIPS_COL_Price «,file_handle16);
// if(file_handle16>0)
// {
// FileSeek(file_handle16,0,SEEK_CUR);
// uint test=FileReadArray(file_handle16,PIPS_COL_Price,0,WHOLE_ARRAY);
// Print(«READ PIPS_COL_Price «,test);
// FileClose(file_handle16);
// }
//——-Loading previously collected and filtered data—————————–
int file_handle17=FileOpen(FileName21,FILE_READ|FILE_WRITE|FILE_BIN);//Loading
if(file_handle17>0)
{
FileSeek(file_handle17,0,SEEK_CUR);
uint test=FileReadArray(file_handle17,BodyHorizont_Bin,0,WHOLE_ARRAY);
FileClose(file_handle17);
}
//———————————————————————————–
int file_handle18=FileOpen(FileName22,FILE_READ|FILE_WRITE|FILE_BIN);//Loading
if(file_handle18>0)
{
FileSeek(file_handle18,0,SEEK_CUR);
uint test=FileReadArray(file_handle18,BodyHorizont_Price,0,WHOLE_ARRAY);
FileClose(file_handle18);
}
//———————————————————————————–
int file_handle19=FileOpen(FileName23,FILE_READ|FILE_WRITE|FILE_BIN);//m
if(file_handle19>0)
{
FileSeek(file_handle19,0,SEEK_CUR);
uint test=FileReadArray(file_handle19,BodyHorizont_Time,0,WHOLE_ARRAY);
FileClose(file_handle19);
}

//———————————————————————————–
int file_handle30=FileOpen(FileName28,FILE_READ|FILE_WRITE|FILE_BIN);//m
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_CUR);
uint test=FileReadArray(file_handle30,KlasterTime,0,WHOLE_ARRAY);
FileClose(file_handle30);
}

//———————————————————————————–
int file_handle40=FileOpen(FileName30,FILE_READ|FILE_WRITE|FILE_BIN);//Загрузка
if(file_handle40>0)
{
FileSeek(file_handle40,0,SEEK_CUR);
uint test=FileReadArray(file_handle40,TimeArrSignal_Wordpress,0,WHOLE_ARRAY);

  FileClose(file_handle40);
 }

//———————————————————————————–
int file_handle41=FileOpen(FileName31,FILE_READ|FILE_WRITE|FILE_BIN);//Загрузка
if(file_handle41>0)
{
FileSeek(file_handle41,0,SEEK_CUR);
uint test=FileReadArray(file_handle41,TimeArrSignal_Int_Wordpress,0,WHOLE_ARRAY);

  FileClose(file_handle41);
 }

//—–END Loading previously collected and filtered data—————————-
// —– The function that reflects the «circle» symbol on the chart when loading the algorithm into memory–
time_BR=Time[0];
if(time_BR!=0)
Text_OBJ_LABEL(«Tx_FM»,1,1,50,»l»,28,»Wingdings»,clrGreen);
else
Text_OBJ_LABEL(«Tx_FM»,1,1,50,»l»,28,»Wingdings»,clrRed);
// —–END — The function that reflects the «circle» symbol on the chart when loading the algorithm into memory–
return(0);
}
//+——————————————————————+
//| Expert tick function |
//+——————————————————————+
int start()
{
if(time_bar!=Time[0])// Body area containing binary code analyzers
{
//—-
time_bar=Time[0];
// —- unwrap writing the body array and writing data to the week array
// — I write to 3 arrays using the index. Array 1 Binary sequence Array 2 price corresponding to the binary sequence 3 candle open time
// — It is necessary to combine the array data with a separate script
// — arrays are 7210 lines in size and 10000 width
Print(» TC»,TimeCurrent(),» tSim»,iTime(Symbol(),0,1));
int inx;
for(inx=1; inx<=7209; inx++) { if(Array_Errors==true) { Print(» Index Array «,inx,» Array Name BodyHorizont_Bin 937″); } if(BodyHorizont_Bin[inx,1]==10)//индекс заполняемой строки в массиве { break; } } // rewrite from vertical to horizontal // Assigning candle time values ​​to an array BodyHorizont_Time[inx]=iTime(Symbol(),0,1); int inx_1; for(inx_1=1; inx_1<=99998; inx_1++) { if(Array_Errors==true) { Print(» Index Array «,inx_1,» Array Name Body 952″); } //Print(«Body Init «,body[inx_1,0]);//Ошибок НЕТ if(body[inx_1,0]==10)// line number where writing to the array ended { break; } } // Add the use of Hep overshoot to the top or bottom // For gaps, use calculations that determine the number of pips. // Correction of the first value from the previous record. // You need to select the value of the last item in the array // Assign the binary code values ​​to the BodyHorizont_Bin and BodyHorizont_Price array and compare with the first price and bincode value in the Body array // If the price is the same as in the body, then the new record is assigned the value of the last record of the body array. Horizon example Body 1 1.13200 and body horizon 1 1.13200 // If the price is the same as in the body, then the new record is assigned the value of the last record of the body array. Horizon example Body 1 1.13200 and body horizon 0 1.13200 then change the value to 0 // if the price in the body has decreased from the price of the bodyhorizon, then set 0; if it has risen, then set 1 // define the end of the previous record in the BodyHorizont_Bin array through the pho loop if(GAP==true) { int fg; int swi=0; if(inx>1)// the first record in the array is skipped
{
for(fg=1; fg<=1999; fg++) { if(Array_Errors==true) { Print(» Index Array «,fg,» Array Name BodyHorizont_Bin 979″); } //Print(«fg «,fg); if(BodyHorizont_Bin[inx-1,fg]==10) { break; } } // —– Defining a gap when opening a new bar—– if(inx>1 && body[1,0]<3)// the first record in the array is skipped { if(BodyHorizont_Price[inx-1,fg-1]!=body[1,0]) { if(BodyHorizont_Price[inx-1,fg-1]>body[1,0])// The closing price is higher than the opening price, which means the price has dropped
{
PipsDif=NormalizeDouble(((NormalizeDouble(BodyHorizont_Price[inx-1,fg-1],5)-NormalizeDouble(body[1,0],5))100000),0);// Get the number of pips of the price difference //Print(» PipsDIf 1 «,PipsDif); swi=1; } if(BodyHorizont_Price[inx-1,fg-1]100000),0);// Get the number of pips of the price difference
//Print(» PipsDIf 2 «,PipsDif,» body[1,0] «,body[1,0],» BodyHorizont_Price[inx-1,fg-1] «,BodyHorizont_Price[inx-1,fg-1]);
swi=2;
}
}
}
if(inx>1 && body[1,3]<3)// the first record in the array is skipped { if(BodyHorizont_Price[inx-1,fg-1]!=body[1,3]) { if(BodyHorizont_Price[inx-1,fg-1]>body[1,3])// The closing price is higher than the opening price, which means the price has dropped
{
PipsDif=NormalizeDouble(((NormalizeDouble(BodyHorizont_Price[inx-1,fg-1],5)-NormalizeDouble(body[1,3],5))100000),0);// Get the number of pips of the price difference //Print(» PipsDIf 3 «,PipsDif); swi=1; } if(BodyHorizont_Price[inx-1,fg-1]100000),0);// Get the number of pips of the price difference
//Print(» PipsDIf 4 «,PipsDif);
swi=2;
}
}
}
// —– I overwrite arrays to add values —–
// —–I transfer the values ​​of the body array to the body plus
if(inx>1)// the first record in the array is skipped
{
for(fgf=1; fgf<=99998; fgf++)
{
if(Array_Errors==true)
{
Print(» Index Array «,fgf,» Array Name Body 1032″);
}
//Print(«fg «,fg);
if(body[fgf,0]==10)
{
break;
}
}
}
// —– I overwrite arrays —————–for(fgo=0; fgo<4; fgo++) { for(fgi=1; fgibody[1,0])// If the price is the same in the arrays and the binary code is the same, then I skip the action
{
body[1,1]=0;// If the price in BODY is less than in BodyHorizont then I assign 0
}
if(BodyHorizont_Price[inx-1,fg-1]==body[1,0] && BodyHorizont_Bin[inx-1,fg-1]!=body[1,1])// If the price is the same in the arrays and the binary code is the same, then I skip the action
{
body[1,1]=BodyHorizont_Bin[inx-1,fg-1];// If the price in the body is more than in the bodyhorizont, then I assign 1
}
}
int inx_2;
for(inx_2=1; inx_20)
{
FileSeek(file_handle21,0,SEEK_CUR);
uint test=FileWriteArray(file_handle21,BodyHorizont_Bin,0,WHOLE_ARRAY);
FileClose(file_handle21);
}
//———————————————————————————–
int file_handle22=FileOpen(FileName22,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle22>0)
{
FileSeek(file_handle22,0,SEEK_CUR);
uint test=FileWriteArray(file_handle22,BodyHorizont_Price,0,WHOLE_ARRAY);
FileClose(file_handle22);
}
//———————————————————————————–
int file_handle23=FileOpen(FileName23,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle23>0)
{
FileSeek(file_handle23,0,SEEK_CUR);
uint test=FileWriteArray(file_handle23,BodyHorizont_Time,0,WHOLE_ARRAY);
FileClose(file_handle23);
}
}
}//END GAP
//——Loading data from an array———–
// —– testing process
//—–Индексы
//Print(«Индекс записи inx «,inx);
//Print(«Глубина Боди inx_1 «,inx_1);
//Print(«Колличество заполненных элементов inx_2 «,inx_2);
//—–Проверка записи
//for(int ghj=1; ghj<2000; ghj++) // { // if(BodyHorizont_Price[inx,ghj]==10) //{ // Print(» Конец заполненой строки «,ghj); // break; // } // } // Print(«Цена начало боди «,body[1,0]); // Print(«Цена конец боди «,body[inx_1-1,0]); // Print(«Бинкод начало боди «,body[inx_1,1]); // Print(«Бинкод Конец боди «,body[inx_1-1,1]); //Print(«Бинкод начало массива «,BodyHorizont_Bin[inx,1]); //Print(«Бинкод Конец массива «,BodyHorizont_Bin[inx,inx_1-1]); //Print(«Цена начало массива «,BodyHorizont_Price[inx,1]); //Print(«Цена конец массива «,BodyHorizont_Price[inx,inx_1-1]); //Print(«Цена начало массива -контроль «,BodyHorizont_Price[inx,0]); //Print(«Цена конец массива – контроль «,BodyHorizont_Price[inx,inx_1]); //Print(«Бинкод начало массива -контроль «,BodyHorizont_Bin[inx,0]); //Print(«Бинкод конец массива – контроль «,BodyHorizont_Bin[inx,inx_1]); //Print(«Время – контроль «,BodyHorizont_Time[inx]); //———————————————————- //for(int mn=1; mn0 && body[1,0]<3) { if(body[1,1]==1)// If there is 1 in a binary cell, then indicate the price above + 0.00001 { // Indicate the price double price=body[1,0]+0.00001;// Get the price of the pointer bodypips[1,0]=price;// Assign the price to the first box of the array. The array is filled with 0; bodypips[1,1]=bodypips[1,1]+1;// Increase the value of the array + 1; } if(body[1,1]==0)// If in binary cell 1, then indicate the price higher – 0.00001 { // Indicate the price double price=body[1,0]-0.00001;//Get the price of the pointer bodypips[1,0]=price;// Assign the price to the first box of the array. The array is filled with 0; bodypips[1,1]=bodypips[1,1]+1;// Increase the value of the array + 1; } } if(body[1,3]>0 && body[1,3]<3) { if(body[1,1]==1)// If there is 1 in a binary cell, then indicate the price above + 0.00001 { // Indicate the price double price=body[1,3]+0.00001;//Получаю цену указателя bodypips[1,0]=price;// Assign the price to the first box of the array. The array is filled with 0; bodypips[1,1]=bodypips[1,1]+1;// Increase the value of the array + 1; } if(body[1,1]==0)//Если в бинарной ячейке 1 то указуваем на цену выше – 0,00001 { // Indicate the price double price=body[1,3]-0.00001;//Получаю цену указателя bodypips[1,0]=price;// Assign the price to the first box of the array. The array is filled with 0; bodypips[1,1]=bodypips[1,1]+1;// Increase the value of the array + 1; } } // —– Processing the loop from the second line of the array —– Switch1=0;// Switch between iterations for(iaq=2; iaq<=99998; iaq++)// Iterate through the body array { if(Array_Errors==true) { Print(» Index Array «,iaq,» Array Name Body 1248″); } Switch1=0;// Assign 0 when re-entering the overflow if(body[iaq,0]>0 && body[iaq,0]<3) { // ———- Processing 1 ————– if(body[iaq,1]==1)// If there is 1 in a binary cell, then indicate the price above + 0.00001 { // Indicate the price double price=body[iaq,0]+0.00001;// Get the price of the pointer int findeprice=0;// int Break1=0;//exit from enumeration 1 int Break2=0;//exit from enumeration 1 for(ibq=1; ibq<=99998; ibq++)//Perebor stolbca 1 { if(Array_Errors==true) { Print(» Index Array «,ibq,» Array Name Bodypips 1265″); } //Print(«Price -7 «,price); if(bodypips[ibq,0]==price) { //bodypips[ib,0]=price;//Присваиваю цену в первую ящейку массива.Массив заполнен 0; bodypips[ibq,1]=bodypips[ibq,1]+1; findeprice=1;// Assign 1 since we entered the body Break1=1;// Assign 1 since we entered the body Switch1=1;// Function executed; switch to column 3 is not necessary break; } if(Break1==1) { break; } } // —— If there is no price, then add the price below —— if(findeprice==0)// If the price is not found, then you need to add an entry to the arrayь { for(ibq=1; ibq<=99998; ibq++) { if(Array_Errors==true) { Print(» Index Array «,inx,» 1289″); } if(bodypips[ibq,0]==0) { //Print(«Price -6 «,price); bodypips[ibq,0]=price; bodypips[ibq,1]=bodypips[ibq,1]+1; Break2=1; Switch1=1; break; } if(Break2==1) { break; } } } } // —— Processing 0 —— if(body[iaq,1]==0)// If in binary cell 1, then indicate the price higher – 0.00001 { double price=body[iaq,0]-0.00001;// Get the price of the pointer int findeprice=0; int Break1=0; int Break2=0; Switch1=1; for(ibq=1; ibq<=99998; ibq++) { if(Array_Errors==true) { Print(» Index Array «,ibq,» 1319″); } //Print(«Price -5 «,price); if(bodypips[ibq,0]==price) { //bodypips[ib,0]=price; bodypips[ibq,1]=bodypips[ibq,1]+1; findeprice=1; Break1=1; break; } if(Break1==1) { break; } } // —— If there is no price, then add the price below ——- if(findeprice==0)// If the price is not found, then you need to add an entry to the array { for(ibq=1; ibq<=99998; ibq++) { if(Array_Errors==true) { Print(» Index Array «,ibq,» 1342″); } if(bodypips[ibq,0]==0) { //Print(«Price -4 «,price); bodypips[ibq,0]=price; bodypips[ibq,1]=bodypips[ibq,1]+1; Break2=1; Switch1=1; break; } if(Break2==1) { break; } } } } //— } if(Switch1==0)// If the switch is 1, then iterate over column 3 { // ——- If the price record in the array is in column 3 —— if(body[iaq,3]>0 && body[iaq,3]<3) { if(body[iaq,1]==1)// If there is 1 in a binary cell, then indicate the price above + 0.00001 { double price=body[iaq,3]+0.00001; int findeprice=0; int Break1=0; int Break2=0; for(ibq=1; ibq<=99998; ibq++) { if(Array_Errors==true) { Print(» Index Array «,ibq,» 1377″); } //Print(«Price -3 «,price); if(bodypips[ibq,0]==price) { //bodypips[ib,0]=price; bodypips[ibq,1]=bodypips[ibq,1]+1; findeprice=1; Break1=1; break; } if(Break1==1) { break; } } // ——- If there is no price, then add the price below —— if(findeprice==0)//Если не найдена цена значит нужно добавить в массив запись { for(ibq=1; ibq<=99998; ibq++) { if(Array_Errors==true) { Print(» Index Array «,ibq,» 1400″); } if(bodypips[ibq,0]==0) { //Print(«Price -2 «,price); bodypips[ibq,0]=price; bodypips[ibq,1]=bodypips[ibq,1]+1; Break2=1; break; } if(Break2==1) { break; } } } } // ———- Processing 0 —————- if(body[iaq,1]==0)// If in binary cell 1, then indicate the price higher – 0.00001 { double price=body[iaq,3]-0.00001; int findeprice=0; int Break1=0; int Break2=0; for(ibq=1; ibq<=99998; ibq++) { if(Array_Errors==true) { Print(» Index Array «,ibq,» 1428″); } //Print(«Price -1 «,price); if(bodypips[ibq,0]==price) { //bodypips[ib,0]=price; bodypips[ibq,1]=bodypips[ibq,1]+1; findeprice=1; Break1=1; break; } if(Break1==1) { break; } } // —— If there is no price, then add the price below —— if(findeprice==0) { for(ibq=1; ibq<=99998; ibq++) { if(Array_Errors==true) { Print(» Index Array «,ibq,» 1451″); } if(bodypips[ibq,0]==0) { //Print(«Price «,price); bodypips[ibq,0]=price; bodypips[ibq,1]=bodypips[ibq,1]+1; Break2=1; break; } if(Break2==1) { break; } } } } } } } for(int ic=1; ic<=99998; ic++)//Perebor stolbca 1 { if(Array_Errors==true) { Print(» Index Array «,ic,» 1475″); } comp_bodypips[ic]=bodypips[ic,1]; //Print(«line 1031 «,bodypips[ic,1]); //Print(«line 1032 «,bodypips[ic,0]); if(bodypips[ic,0]==0) { break; } } MaxInd_bodypips=ArrayMaximum(comp_bodypips,WHOLE_ARRAY,0);// Get the index in the array in which the binary code for the price showed the most //+——————————————————————+ //|END Maximum Price Reference | //+——————————————————————+ //+——————————————————————+ //| Counter Summa 1/0 – Maximum , Minimum INDICARTOR | //+——————————————————————+ k=0; ArrayInitialize(MaxMinArr,0); int inf; int ic; for(ic=1; ic<=99998; ic++) { if(Array_Errors==true) { Print(» Index Array «,ic,» 1500″); } if(body[ic,0]==10) { break; } } inf=ic-1; int b1=(int)body[1,1]; if(b1==1) { k=1; }; if(b1==0) { k=0; }; MaxMinArr[1,1]=k; MaxMinArr[1,2]=k; //—————————– int ina; for(ina=2; ina<=inf; ina++) { if(Array_Errors==true) { Print(» Index Array «,ina,» 1525″); } if(body[ina,1]==1) { k++; MaxMinArr[1,1]=k; //Print(» k++ «,k); } if(body[ina,1]==0) { k–; MaxMinArr[1,2]=k; // Print(» k– «,k); } } //Print(» k++ Ar»,MaxMinArr[1,1],» k– Ar»,MaxMinArr[1,2]); //——–Max Min Numbers Maximum=MaxMinArr[1,1];//bool Minimum=MaxMinArr[1,2];//bear //Print(» Maximum «,Maximum,» Minimum «,Minimum); ///—————————– double operandopen=iOpen(Symbol(),PERIOD_M1,1); double operandclose=iClose(Symbol(),PERIOD_M1,1); if(body[zeroindex,0]>0 && body[zeroindex,0]<2) { PriceZero=body[zeroindex,0];//Цена первого 0 } else PriceZero=body[zeroindex,3]; //Print(» PriceZero «,PriceZero); //———-Индикатор сложения бинарного кода с ценой зеро—————– if(Maximum>0)
{
restantemaximum=NormalizeDouble(MaximumPoint,5); resOperandMax=operandopen-restantemaximum; } if(Maximum<0) { Maximum=MathAbs(Maximum); restantemaximum=NormalizeDouble(MaximumPoint,5);
resOperandMax=operandopen-restantemaximum;
}
//Print(» restantemaximum «,restantemaximum,» Maximum «,Maximum,» operandopen «,operandopen,» resOperandMax «,resOperandMax);
if(Minimum>0)
{
restanteminimum=NormalizeDouble(MinimumPoint,5); resOperandMin=operandclose+restanteminimum; } if(Minimum<0) { Minimum=MathAbs(Minimum); restanteminimum=NormalizeDouble(MinimumPoint,5);
resOperandMin=operandclose+restanteminimum;
}
//Print(» restanteminimum «,restanteminimum,» Minimum «,Minimum,» operandclose «,operandclose,» resOperandMin «,resOperandMin);
bool tr=false;
if(resOperandMax==PriceZero || resOperandMin==PriceZero)
{
tr=true;
}
//Print( » tr «,tr);
// — The last digit indicates the type of resistance that formed inside the candle — //
//int LasData=MaxMinArr[inf];// Used for the divergence indicator
//+——————————————————————+
//| END Counter Summa 1/0 – Maximum , Minimum INDICARTOR Vivos Bo Muertos Be |
//+——————————————————————+
//+——————————————————————+
//|Sunflower Seed sides |
//+——————————————————————+
// —– Formula 2 – If the new price is higher than the previous one, then the resulting maximum is translated into pips and summed up to the previous price (price + 1) price
// If the new price is less than the previous one, then the resulting maximum is translated into pips and minus the previous price (price-1) price.
// The obtained result is compared with the current price. If the price has risen and the current price is less than price-1 plus pips, then the price is inside
// If the price has dropped and the price is higher than the price-1 minus pips, then the price is inside I will Condition 0
// If the price has risen and the current price is higher than the price-1 plus pips, then the price is outside
// If the price has dropped and the price is less than price-1 minus pips, then the price is outside and I will Condition 1
double PipsPrice=NormalizeDouble(pips_Menus_onePoint,5); BinInd3BO=10; BinInd3BE=10; //Указатель Мама Папа и Крёсный и Крёсная if(bodypips[MaxInd_bodypips,0]>price_Menus_one) { price_plus=price_Menus_one+PipsPrice;// Summed to the price -1 pips of the maximum -1 if(bodypips[MaxInd_bodypips,0]price_plus) { //Салко Гриша BinInd3=1; BinInd3BO=1; Bo=»Bo_»+IntegerToString(BinInd3); //Подача значений на маховик Bo_1=1;//Подача значений для X z_Bo_1=1;//Подача значений для Z Bo_1_C=1;//Подача значений для Kupol f_Bo_1=1;// Складывание в Лепесток //Обнуление преременных подачи после расчёта по блоку Be_0_C=0; Bo_0_C=0; Be_1_C=0; } } //———————————————— if(bodypips[MaxInd_bodypips,0]price_minus) { //ЛАврова Ольга Сергеевна BinInd3=0; BinInd3BE=0; Be=»Be_»+IntegerToString(BinInd3); //Подача значений на маховик Be_0=1;//Подача значений для X z_Be_0=1;//Подача значений для Z Be_0_C=1;//Подача значений для Kupol f_Be_0=1;// Складывание в Лепесток //Обнуление преременных подачи после расчёта по блоку Bo_0_C=0; Be_1_C=0; Bo_1_C=0; } if(bodypips[MaxInd_bodypips,0]1,Bo_1 (Снисходящий тренд, восходящий тренд) // ——– Binary price field scanner // ——– When the minute arrives, write the price change to the array, assigning the value obtained by the indicator // ————– Phase 1 ————- // Calculation. I get the number of pips traversed by the price for periods 1 and 2. // —-Модуль проверки конверсии перменных в модулях string Var1Wr; if(Var1_Bo_1==0) { Var1Wr=»Bo_1″; } if(Var1_Bo_0==0) { Var1Wr=»Bo_0″; } if(Var1_Be_0==0) { Var1Wr=»Be_0″; } if(Var1_Be_1==0) { Var1Wr=»Be_1″; } Price1=Price0; Price0=bodypips[MaxInd_bodypips,0]; if(Price1!=0 && Price0!=0) { if(Price1mult;//
}
if(Price1>Price0)
{
CurPips=NormalizeDouble((Price1-Price0),5)mult; } // ————– Phase 2 ————- // Divide the received pips by the number of the indicator Onda1=NormalizeDouble(CurPips/bodypips[MaxInd_bodypips,1],5); //Print(» CurPips «,CurPips,» Onda1 «,Onda1); } int indmas;//Index for(indmas=1; indmas<=99998; indmas++) { if(Array_Errors==true) { Print(» Index Array «,indmas,» 1728″); } if(PIPS_COL_Price[indmas,0]==0) { break; } } if(bodypips[MaxInd_bodypips,0]>price_Menus_one) { PIPS_COL_Price[indmas,2]=0;// Boolean type PIPS_COL_Price[indmas,3]=1;// Subtype 0/1 } if(bodypips[MaxInd_bodypips,0]kolvo_zeren_1_chashka_Kofe;//4.995
Kolvo_chashek_kofe_dlya_sbora=Kolvo_sredstv_dlya_sbora/odna_chaska_kofe;//1000
Kolvo_zeren_dlya_Sbora=Kolvo_chashek_kofe_dlya_sborakolvo_zeren_1_chashka_Kofe;//45000 зёрен кофе kolvo_zeren_sessiya=(one_BE+zero_BE)/2;//Для приведения зерна кофе к 4 граням зерна подсолнуха нужно использовать 2 зерна kolvo_zeren=kolvo_zeren+kolvo_zeren_sessiya;//Колличество зёрен при складывании сессий. //Print(«kolvo_zeren «,kolvo_zeren); if(kolvo_zeren>=Kolvo_zeren_dlya_Sbora) { string SM_AV=IntegerToString(kolvo_zeren); SendNotification(SM_AV); //Print(» beans collected from the field Let’s start making coffee – https://send.monobank.ua/jar/2GXP5PQZRz https://m.facebook.com/profile.php/?id=100061828946176 https://m.facebook.com/profile.php/?id=100069337776471 https://youtu.be/9xMScFIFcz4?si=Uqyk0CV-ZLV8zZa-«,kolvo_zeren); kolvo_zeren=0; } RefreshRates(); datetime IreceiveBarTime=iTime(Symbol(),0,1); bartimeresult=IreceiveBarTime; IreceiveLevelresult=one_BE; HIGHT=iHigh(Symbol(),0,1); LOW=iLow(Symbol(),0,1); CLOSE=iClose(Symbol(),0,1); OPEN=iOpen(Symbol(),0,1); normalLevel=IreceiveLevelresultPoint;
center=NormalizeDouble(HIGHT-((HIGHT-LOW)/2),NormalizaDigi);
DoublspredPoint=spredpointsPoint(); LEVELUP=NormalizeDouble((center+normalLevel),NormalizaDigi);//1 LEVELDOWN=NormalizeDouble((center-normalLevel),NormalizaDigi);//1 IpaintFiboLineUP_2=NormalizeDouble((LEVELUP+(normalLevel2)),NormalizaDigi);//2
IpaintFiboLineUP_3=NormalizeDouble((IpaintFiboLineUP_2+(normalLevel3)),NormalizaDigi);//3 IpaintFiboLineUP_5=NormalizeDouble((IpaintFiboLineUP_3+(normalLevel5)),NormalizaDigi);//5
IpaintFiboLineUP_8=NormalizeDouble((IpaintFiboLineUP_5+(normalLevel8)),NormalizaDigi);//8 IpaintFiboLineUP_13=NormalizeDouble((IpaintFiboLineUP_8+(normalLevel13)),NormalizaDigi);//13
IpaintFiboLineUP_21=NormalizeDouble((IpaintFiboLineUP_13+(normalLevel21)),NormalizaDigi);//21 IpaintFiboLineUP_34=NormalizeDouble((IpaintFiboLineUP_21+(normalLevel34)),NormalizaDigi);
IpaintFiboLineUP_55=NormalizeDouble((IpaintFiboLineUP_34+(normalLevel55)),NormalizaDigi); IpaintFiboLineUP_89=NormalizeDouble((IpaintFiboLineUP_55+(normalLevel89)),NormalizaDigi);
IpaintFiboLineUP_144=NormalizeDouble((IpaintFiboLineUP_89+(normalLevel144)),NormalizaDigi); IpaintFiboLineDOWN_2=NormalizeDouble((LEVELDOWN-(normalLevel2)),NormalizaDigi);
IpaintFiboLineDOWN_3=NormalizeDouble((IpaintFiboLineDOWN_2-(normalLevel3)),NormalizaDigi); IpaintFiboLineDOWN_5=NormalizeDouble((IpaintFiboLineDOWN_3-(normalLevel5)),NormalizaDigi);
IpaintFiboLineDOWN_8=NormalizeDouble((IpaintFiboLineDOWN_5-(normalLevel8)),NormalizaDigi); IpaintFiboLineDOWN_13=NormalizeDouble((IpaintFiboLineDOWN_8-(normalLevel13)),NormalizaDigi);
IpaintFiboLineDOWN_21=NormalizeDouble((IpaintFiboLineDOWN_13-(normalLevel21)),NormalizaDigi); IpaintFiboLineDOWN_34=NormalizeDouble((IpaintFiboLineDOWN_21-(normalLevel34)),NormalizaDigi);
IpaintFiboLineDOWN_55=NormalizeDouble((IpaintFiboLineDOWN_34-(normalLevel55)),NormalizaDigi); IpaintFiboLineDOWN_89=NormalizeDouble((IpaintFiboLineDOWN_55-(normalLevel89)),NormalizaDigi);
IpaintFiboLineDOWN_144=NormalizeDouble((IpaintFiboLineDOWN_89-(normalLevel*144)),NormalizaDigi);
//+——————————————————————+
//| END Counter Summa 1/0 – Fibonacci ruler calculation |
//+——————————————————————+
// Исходное положение Свеча компинсации. Переустановка значений
if((resOperandMin==PriceZero || resOperandMax==PriceZero) && one_BE>=15 && one_BE<=60 && one_BE!=0 && (Maximum>0 || Maximum<0 || Maximum==0) && (Minimum>0 || Minimum<0 || Minimum==0) && Rez_BE==0 && Compens==true) { //Array_Errors=true; // Установка позиции маховика на Север sev=1;// обработка события Север zap=0; yug=0; vost=0; // Установка Лица lic=1; izn=0; // Снятие разрешение на установление севера Compens=false; // Установить значения массива на 0 и 1 // Лицо Sev[1,1]=0;//Be_0 Sev[1,2]=0;//Bo_0 Sev[1,3]=0;//Be_1 Sev[1,4]=0;//Bo_1 // Изнанка Sev[1,5]=0;//Be_0 Sev[1,6]=0;//Bo_0 Sev[1,7]=0;//Be_1 Sev[1,8]=0;//Bo_1 Var1_Be_0=0; Var1_Bo_0=2; Var1_Be_1=2; Var1_Bo_1=2; //Print(» Last Pips Sincronization «,iTime(Symbol(),PERIOD_M1,0)); Gx=0; Gy=0; //Установление значений оси ЗЕТ «Z» z_sev=1;// обработка события Север z_zap=0; z_yug=0; z_vost=0; // Установка Лица z_lic=1; z_izn=0; z_Gx=0; z_Gy=0; z_Sev[1,1]=0; z_Sev[1,2]=0; z_Sev[1,3]=0; z_Sev[1,4]=0; // Изнанка z_Sev[1,5]=1; z_Sev[1,6]=1; z_Sev[1,7]=1; z_Sev[1,8]=1; z_Var1_Be_0=0; z_Var1_Bo_0=2; z_Var1_Be_1=2; z_Var1_Bo_1=2; // Массив цветок ArrayInitialize(flower,0); flower_perm=true; int file_handle14=FileOpen(FileName14,FILE_READ|FILE_WRITE,» «); if(file_handle14>0)
{
FileSeek(file_handle14,0,SEEK_END);
FileWrite(file_handle14,Symbol(),» Start Time for flywheel «,iTime(Symbol(),0,1));
FileClose(file_handle14);
}
//Установка в 0 исходных переменных при лице
//Print(» Fly INIT «,Sev[1,1],Sev[1,2],Sev[1,3],Sev[1,4],Sev[1,5],Sev[1,6],Sev[1,7],Sev[1,8]);
//Print(» Step 0 «,» sev «,sev,» zap «,zap,» yug «,yug,» vost «,vost );
}//Fin init
//+——————————————————————+
//|Sunflower 8 bit volume feed side X calculation |
//+——————————————————————+
//Print(«Step2 «,Be_0,» -Be_0 «,Bo_0,» -Bo_0 «,Be_1,» -Be_1 «,Bo_1,» -Bo_1 «);
//Print(«Nueva ronda «,Var1_Be_0,» Var1_Be_0 «,Var1_Bo_0,» Var1_Bo_0 «,Var1_Be_1,» Var1_Be_1 «,Var1_Bo_1,» Var1_Bo «);
//Подача значений
int Var2_Be_0_p,Var2_Bo_0_p,Var2_Be_1_p,Var2_Bo_1_p;
if(Be_0==1)
{
Var2_Be_0=1;
Var2_Bo_0=2;
Var2_Be_1=2;
Var2_Bo_1=2;
Be_0=0;
Bo_0=0;
Be_1=0;
Bo_1=0;
//impresion
Var2_Be_0_p=1;
}
if(Bo_0==1)
{
Var2_Be_0=2;
Var2_Bo_0=1;
Var2_Be_1=2;
Var2_Bo_1=2;
Be_0=0;
Bo_0=0;
Be_1=0;
Bo_1=0;
//impresion
Var2_Bo_0_p=1;
}
if(Be_1==1)
{
Var2_Be_1=1;
Var2_Be_0=2;
Var2_Bo_0=2;
Var2_Bo_1=2;
Be_0=0;
Bo_0=0;
Be_1=0;
Bo_1=0;
//impresion
Var2_Be_1_p=1;
}
if(Bo_1==1)
{
Var2_Bo_1=1;
Var2_Be_0=2;
Var2_Bo_0=2;
Var2_Be_1=2;
Be_0=0;
Bo_0=0;
Be_1=0;
Bo_1=0;
//impresion
Var2_Bo_1_p=1;
}
// Варианты вращение в правильной позиции. Смена строны производится мо методу переварота страницы в книге с лева на право или с права на лево
// Вращение производится базируясь на вторую переменную. После присваивания и расчёта значения из второй переменной перетекают в первую.
//Перед обработкой событий нужно выявить все правила для каждого направления.
//Переприсваивание значения в тойже плоскости и том же лице если выпало тоже самое значение.Пример Be_0 и Be_0

//Asignacion de datos a base de calculos de Claster // Print(«1 – bodypips[MaxInd_bodypips,0] «,bodypips[MaxInd_bodypips,0]); float opa_float=bodypips[MaxInd_bodypips,0]*100000; int opa=opa_float; double opa_double=bodypips[MaxInd_bodypips,0]*100000; // Print(«1- OPA «,opa); // Print(«1- opa_float «,opa_float); // Print(«1- opa_double «,opa_double); //запуск кластерной архитектуры //доступ в массив по индексу int sev_p,zap_p,yug_p,vost_p; if(flower_Price_3[opa,36]==1) { sev=1; zap=0; yug=0; vost=0; sev_p=1; } if(flower_Price_3[opa,36]==2) { sev=0; zap=0; yug=0; vost=1; vost_p=1; } if(flower_Price_3[opa,36]==3) { sev=0; zap=0; yug=1; vost=0; yug_p=1; } if(flower_Price_3[opa,36]==4) { sev=0; zap=1; yug=0; vost=0; zap_p=1; } if(flower_Price_3[opa,35]==1) { Var1_Be_0=0; Var1_Bo_0=1; Var1_Be_1=1; Var1_Bo_1=1; } if(flower_Price_3[opa,35]==2) { Var1_Be_0=1; Var1_Bo_0=0; Var1_Be_1=1; Var1_Bo_1=1; } if(flower_Price_3[opa,35]==3) { Var1_Be_0=1; Var1_Bo_0=1; Var1_Be_1=0; Var1_Bo_1=1; } if(flower_Price_3[opa,35]==4) { Var1_Be_0=1; Var1_Bo_0=1; Var1_Be_1=1; Var1_Bo_1=0; } // Назначение переменной if(Var1_Be_0==0 && Var2_Be_0==1) { Var1_Bo_0=0; Var2_Be_0=1; } if(Var1_Be_0==2 && Var2_Be_0==1) { Var2_Be_0=1; } if(Var1_Bo_0==0 && Var2_Bo_0==1) { Var1_Be_0=0; Var2_Bo_0=1; } if(Var1_Bo_0==2 && Var2_Bo_0==1) { Var2_Bo_0=1; } if(Var1_Be_1==0 && Var2_Be_1==1) { Var1_Bo_1=0; Var2_Be_1=1; } if(Var1_Be_1==2 && Var2_Be_1==1) { Var2_Be_1=1; } if(Var1_Bo_1==0 && Var2_Bo_1==1) { Var1_Be_1=0; Var2_Bo_1=1; } if(Var1_Bo_1==2 && Var2_Bo_1==1) { Var2_Bo_1=1; }//CHeck ok //Print(«Step3 «,Var1_Be_0,» Var1_Be_0 «,Var1_Bo_0,» Var1_Bo_0 «,Var1_Be_1,» Var1_Be_1 «,Var1_Bo_1,» Var1_Bo_1 «); //Print(«Step4 «,Var2_Be_0,» Var2_Be_0 «,Var2_Bo_0,» Var2_Bo_0 «,Var2_Be_1,» Var2_Be_1 «,Var2_Bo_1,» Var2_Bo_1 «); ArrayInitialize(errorprint,0); bool ChekDIr=true;//еременная разрешающая 1 раз в цикл анализиравать блок направлений по компасу string BlockNum=»0″; // Правильная конфигурация Север // 1 // Правильная конфигурация Север // 1 //+——————————————————————+ //| Sunflower 1/0 – Cluster meter | //+——————————————————————+ if(sev==1 && Var1_Be_0==0 && Var2_Bo_0==1 && ChekDIr==true)//Если официант подаёт с северной стороны и предыдущее блюдо на 1-ом месте а подаваемое блюдо Катируется в списке товара на 2-om место то следует подавать с северной стороны блюдо номер 2 { Sev_1=1;// разрешение на обработку события. //Запрет для 3 направлений Zap_1=0; Vost_1=0; Yug_1=0; //Проверка значения направления sev=1; zap=0; yug=0; vost=0; ChekDIr=false; BlockNum=»S 1″; errorprint[1]=1; //официант подаёт блюдо-заказ с правой руки дальнюю позицию } // 2 if(sev==1 && Var1_Bo_0==0 && Var2_Be_0==1 && ChekDIr==true)//Если официант подаёт с северной стороны и предыдущее блюдо на 2-ом месте а подаваемое блюдо Катируется в списке товара на 1-ое место то следует подавать с северной стороны блюдо номер 1 { Sev_1=1;// разрешение на обработку события. //Запрет для 3 направлений Zap_1=0; Vost_1=0; Yug_1=0; //Проверка значения направления sev=1; zap=0; yug=0; vost=0; ChekDIr=false; BlockNum=»S 2″; errorprint[2]=1; //официант подаёт блюдо-заказ с левой руки дальнюю позицию } // 3 if(sev==1 && Var1_Be_1==0 && Var2_Bo_1==1 && ChekDIr==true)//Если официант подаёт с северной стороны и предыдущее блюдо на 3-ем месте а подаваемое блюдо Катируется в списке товара на 4-ое место то следует подавать с северной стороны блюдо номер 4 { Sev_1=1;// разрешение на обработку события. //Запрет для 3 направлений Zap_1=0; Vost_1=0; Yug_1=0; //Проверка значения направления sev=1; zap=0; yug=0; vost=0; ChekDIr=false; BlockNum=»S 3″; errorprint[3]=1; //официант подаёт блюдо-заказ с левой руки ближнюю позицию } // 4 if(sev==1 && Var1_Bo_1==0 && Var2_Be_1==1 && ChekDIr==true)//Если официант подаёт с северной стороны и предыдущее блюдо на 4-ом месте а подаваемое блюдо Катируется в списке товара на 3-е место то следует подавать с северной стороны блюдо номер 3 { Sev_1=1;// разрешение на обработку события. //Запрет для 3 направлений Zap_1=0; Vost_1=0; Yug_1=0; //Проверка значения направления sev=1; zap=0; yug=0; vost=0; ChekDIr=false; BlockNum=»S 4»; errorprint[4]=1; //официант подаёт блюдо-заказ с правой руки ближнюю позицию } // 5 // Не правильная конфигурация //Если официант подаёт с северной стороны и предыдущее блюдо на 1-ом месте а подаваемое блюдо Катируется в списке товара на 4-ом место то следует подавать с Восточьной стороны блюдо номер 4 «Используя подачи с левой руки» if(sev==1 && Var1_Be_0==0 && Var2_Bo_1==1 && ChekDIr==true) //Смещение по регистру с Севера *| на Запад «- { // разрешение на обработку события. Vost_1=1; Sev_1=0; Zap_1=0; Yug_1=0; //Проверка значения направления sev=0; zap=0; yug=0; vost=1; ChekDIr=false; BlockNum=»S 5″; errorprint[5]=1; //Перекласификация после разворота с класса 90 градусов в класс 0 градусов if(Vol_B_Chang_1==true) { Var1_Be_0=2; Var1_Be_1=0; } //Второй варриант подачи абьёма после разворота по компасу if(Vol_B_Chang_1==false) { Var1_Be_0=2;//Исходная переменная обнуляется для корректной работы механизма Var1_Bo_1=0;// Правельная переменная Var2_Be_1=1;//став лицом на восток официант подаёт блюдо-заказ с правой руки ближнюю позицию // После разворота с севера на Восток, подача с Бо 1 Превращается в Бе1 а значит задействуется вторая правельна переменная для регистра обьёма Бо1 } //Ссылка на инструкцию } // 6 //Если официант подаёт с северной стороны и предыдущее блюдо на 4-ом месте а подаваемое блюдо Катируется в списке товара на 1-ое место то следует подавать с Западной стороны блюдо номер 1 «Используя подачи с правой руки» if(sev==1 && Var1_Bo_1==0 && Var2_Be_0==1 && ChekDIr==true) // Смещение по регистру с Севера *| на Запад «- { // разрешение на обработку события. ok Zap_1=1; Sev_1=0; Vost_1=0; Yug_1=0; //Проверка значения направления sev=0; zap=1; yug=0; vost=0; ChekDIr=false; BlockNum=»S 6″; errorprint[6]=1; //Перекласификация после разворота с класса 90 градусов в класс 0 градусов if(Vol_B_Chang_1==true) { Var1_Bo_1=2; Var1_Bo_0=0; } if(Vol_B_Chang_1==false) { Var1_Bo_1=2; Var1_Be_0=0; Var2_Bo_0=1;//став лицом на запад официант подаёт блюдо-заказ с правой руки дальнюю позицию } } // 7 //Если официант подаёт с северной стороны и предыдущее блюдо на 2-ом месте а подаваемое блюдо Катируется в списке товара на 3-е место то следует подавать с Западной стороны блюдо номер 3 «Используя подачи с правой руки» if(sev==1 && Var1_Bo_0==0 && Var2_Be_1==1 && ChekDIr==true) // Смещение по регистру с Севера *| на Восток -» //Если официант подаёт с северной стороны и предыдущее блюдо на 2-ом месте а подаваемое блюдо Катируется в списке товара на 3-е место то следует подавать с Западной стороны блюдо номер 3 «Используя подачи с правой руки» { // разрешение на обработку события. ok Vost_1=0; //Запрет для 3 направлений Zap_1=1; Sev_1=0; Yug_1=0; //Проверка значения направления sev=0; zap=1; yug=0; vost=0; ChekDIr=false; BlockNum=»S 7″; errorprint[7]=1; //Перекласификация после разворота с класса 90 градусов в класс 0 градусов if(Vol_B_Chang_1==true) { Var1_Bo_0=2; Var1_Bo_1=0; } if(Vol_B_Chang_1==false) { Var1_Bo_0=2; Var1_Be_1=0; Var2_Bo_1=1;//став лицом на запад официант подаёт блюдо-заказ с левой руки ближнюю позицию } } // 8 //Если официант подаёт с северной стороны и предыдущее блюдо на 3-м месте а подаваемое блюдо Катируется в списке товара на 2-ое место то следует подавать с Восточьной стороны блюдо номер 2 «Используя подачи с правой руки» if(sev==1 && Var1_Be_1==0 && Var2_Bo_0==1 && ChekDIr==true) // Смещение по регистру с Севера *| на Восток -» { // разрешение на обработку события. ok Vost_1=1; //Запрет для 3 направлений Zap_1=0; Sev_1=0; Yug_1=0; //Проверка значения направления sev=0; zap=0; yug=0; vost=1; ChekDIr=false; BlockNum=»S 8″; errorprint[8]=1; //Перекласификация после разворота с класса 90 градусов в класс 0 градусов if(Vol_B_Chang_1==true) { Var1_Be_1=2; Var1_Be_0=0; } if(Vol_B_Chang_1==false) { Var1_Be_1=2; Var1_Bo_0=0; Var2_Be_0=1;//став лицом на восток официант подаёт блюдо-заказ с левой руки дальнюю позицию } } // 9 //Если официант подаёт с северной стороны и предыдущее блюдо на 2-ом месте а подаваемое блюдо Катируется в списке товара на 4-ое место то следует подавать с Южной стороны блюдо номер 4 «Используя подачи с правой руки» if(sev==1 && Var1_Bo_0==0 && Var2_Bo_1==1 && ChekDIr==true) // Смещение по регистру с Севера *| на Юг .| { Yug_1=1; // разрешение на обработку события.ok Sev_1=0; //Запрет для 3 направлений Zap_1=0; Vost_1=0; //Проверка значения направления sev=0; zap=0; yug=1; vost=0; ChekDIr=false; BlockNum=»S 9″; errorprint[9]=1; //Перекласификация после разворота с класса 180 градусов в класс 0 градусов if(Vol_B_Chang_1==true) { Var1_Bo_0=2; Var1_Be_1=0; } if(Vol_B_Chang_1==false) { Var1_Bo_0=2; Var2_Bo_1=2; Var1_Be_0=0; Var2_Bo_0=1;//став лицом на юг официант подаёт блюдо-заказ с правой руки дальнюю позицию } } // 10 //Если официант подаёт с северной стороны и предыдущее блюдо на 4-ом месте а подаваемое блюдо Катируется в списке товара на 2-ое место то следует подавать с Южной стороны блюдо номер 2 «Используя подачи с правой руки» if(sev==1 && Var1_Bo_1==0 && Var2_Bo_0==1 && ChekDIr==true) // Смещение по регистру с Севера *| на Юг .| { Yug_1=1; // разрешение на обработку события. Sev_1=0; //Запрет для 3 направлений Zap_1=0; Vost_1=0; //Var1_Be_1=0; //Var2_Bo_1=1; //Проверка значения направления sev=0; zap=0; yug=1; vost=0; ChekDIr=false; BlockNum=»S 10″; errorprint[10]=1; //Перекласификация после разворота с класса 180 градусов в класс 0 градусов if(Vol_B_Chang_1==true) { Var1_Bo_1=2; Var1_Be_0=0; } if(Vol_B_Chang_1==false) { Var1_Bo_1=2; Var2_Bo_0=2; Var1_Be_1=0; Var2_Bo_1=1;//став лицом на юг официант подаёт блюдо-заказ с левой руки ближнюю позицию } } // 11 //Если официант подаёт с северной стороны и предыдущее блюдо на 1-ом месте а подаваемое блюдо Катируется в списке товара на 3-е место то следует подавать с Южной стороны блюдо номер 3 «Используя подачи с правой руки» if(sev==1 && Var1_Be_0==0 && Var2_Be_1==1 && ChekDIr==true) // Смещение по регистру с Севера *| на Юг .| { Yug_1=1; // разрешение на обработку события. ok Sev_1=0; //Запрет для 3 направлений Zap_1=0; Vost_1=0; //Проверка значения направления sev=0; zap=0; yug=1; vost=0; ChekDIr=false; BlockNum=»S 11″; errorprint[11]=1; //Перекласификация после разворота с класса 180 градусов в класс 0 градусов if(Vol_B_Chang_1==true) { Var1_Be_0=2; Var1_Bo_1=0; } if(Vol_B_Chang_1==false) { Var1_Be_0=2; Var2_Be_1=2; Var1_Bo_0=0; Var2_Be_0=1;//став лицом на юг официант подаёт блюдо-заказ с левой руки дальнюю позицию } } // 12 //Если официант подаёт с северной стороны и предыдущее блюдо на 3-eм месте а подаваемое блюдо Катируется в списке товара на 1-ое место то следует подавать с Южной стороны блюдо номер 1 «Используя подачи с правой руки» if(sev==1 && Var1_Be_1==0 && Var2_Be_0==1 && ChekDIr==true) // Смещение по регистру с Севера *| на Юг .| { Yug_1=1; // разрешение на обработку события. ok Sev_1=0; //Запрет для 3 направлений Zap_1=0; Vost_1=0; //Проверка значения направления sev=0; zap=0; yug=1; vost=0; ChekDIr=false; BlockNum=»S 12″; errorprint[12]=1; //Перекласификация после разворота с класса 180 градусов в класс 0 градусов if(Vol_B_Chang_1==true) { Var1_Be_1=2; Var1_Bo_0=0; } if(Vol_B_Chang_1==false) { Var1_Be_1=2; Var2_Be_0=2; Var1_Bo_1=0; Var2_Be_1=1;//став лицом на юг официант подаёт блюдо-заказ с правой руки ближнюю позицию } } //__________________________________ // Правильная конфигурация Запад //Если официант подаёт с западной стороны и предыдущее блюдо на 2-ом месте а подаваемое блюдо Катируется в списке товара на 1-ое место то следует подавать с Западной стороны блюдо номер 1 «Используя подачи с правой руки» if(zap==1 && Var1_Be_0==0 && Var2_Bo_0==1 && ChekDIr==true) { Zap_1=1;// разрешение на обработку события. Sev_1=0; Vost_1=0; Yug_1=0; //Проверка значения направления sev=0; zap=1; yug=0; vost=0; ChekDIr=false; BlockNum=»Z 1″; errorprint[13]=1; //став лицом на запад официант подаёт блюдо-заказ с правой руки дальнюю позицию } // 2 //Если официант подаёт с западной стороны и предыдущее блюдо на 1-ом месте а подаваемое блюдо Катируется в списке товара на 2-ое место то следует подавать с Западной стороны блюдо номер 1 «Используя подачи с правой руки» if(zap==1 && Var1_Bo_0==0 && Var2_Be_0==1 && ChekDIr==true) { Zap_1=1;// разрешение на обработку события. Sev_1=0; Vost_1=0; Yug_1=0; //Проверка значения направления sev=0; zap=1; yug=0; vost=0; ChekDIr=false; BlockNum=»Z 2″; errorprint[14]=1; //став лицом на запад официант подаёт блюдо-заказ с левой руки дальнюю позицию } // 3 //Если официант подаёт с западной стороны и предыдущее блюдо на 4-ом месте а подаваемое блюдо Катируется в списке товара на 3-е место то следует подавать с Западной стороны блюдо номер 1 «Используя подачи с правой руки» if(zap==1 && Var1_Be_1==0 && Var2_Bo_1==1 && ChekDIr==true) { Zap_1=1;// разрешение на обработку события. Sev_1=0; Vost_1=0; Yug_1=0; //Проверка значения направления sev=0; zap=1; yug=0; vost=0; ChekDIr=false; BlockNum=»Z 3″; errorprint[5]=1; //став лицом на запад официант подаёт блюдо-заказ с левой руки ближнюю позицию } // 4 //Если официант подаёт с западной стороны и предыдущее блюдо на 3-ем месте а подаваемое блюдо Катируется в списке товара на 4-ое место то следует подавать с Западной стороны блюдо номер 1 «Используя подачи с правой руки» if(zap==1 && Var1_Bo_1==0 && Var2_Be_1==1 && ChekDIr==true) { Zap_1=1;// разрешение на обработку события. Sev_1=0; Vost_1=0; Yug_1=0; //Проверка значения направления sev=0; zap=1; yug=0; vost=0; ChekDIr=false; BlockNum=»Z 4″; errorprint[16]=1; //став лицом на запад официант подаёт блюдо-заказ с правой руки ближнюю позицию } // 5 // Не правильная конфигурация //Если официант подаёт с западной стороны и предыдущее блюдо на 1-ом месте а подаваемое блюдо Катируется в списке товара на 4-ое место то следует подавать с Северной стороны блюдо номер 1 «Используя подачи с правой руки» if(zap==1 && Var1_Be_0==0 && Var2_Bo_1==1 && ChekDIr==true) //Смещение по регистру с Запада «- на Эг |. Смещение против часовой стрелки. { // разрешение на обработку события.ok Yug_1=0; //Запрет для 3 направлений Zap_1=0; Vost_1=0; Sev_1=1; //Проверка значения направления sev=1; zap=0; yug=0; vost=0; ChekDIr=false; BlockNum=»Z 5″; errorprint[17]=1; //Перекласификация после разворота с класса 90 градусов в класс 0 градусов if(Vol_B_Chang_1==true) { Var1_Be_0=2; Var1_Be_1=0; } if(Vol_B_Chang_1==false) { Var1_Be_0=2; Var1_Bo_1=0; Var2_Be_1=1;//став лицом на север официант подаёт блюдо-заказ с правой руки ближнюю позицию } } // 6 //Если официант подаёт с западной стороны и предыдущее блюдо на 4-ом месте а подаваемое блюдо Катируется в списке товара на 1-ое место то следует подавать с Южной стороны блюдо номер 1 «Используя подачи с правой руки» if(zap==1 && Var1_Bo_1==0 && Var2_Be_0==1 && ChekDIr==true) //Смещение по регистру с Запада «- на Эг |. Смещение против часовой стрелки. { // разрешение на обработку события.ok Sev_1=0; //Запрет для 3 направлений Zap_1=0; Vost_1=0; Yug_1=1; //Проверка значения направления sev=0; zap=0; yug=1; vost=0; ChekDIr=false; BlockNum=»Z 6″; errorprint[18]=1; //Перекласификация после разворота с класса 90 градусов в класс 0 градусов if(Vol_B_Chang_1==true) { Var1_Bo_1=2; Var1_Bo_0=0; } if(Vol_B_Chang_1==false) { Var1_Bo_1=2; Var1_Be_0=0; Var2_Bo_0=1;//став лицом на юг официант подаёт блюдо-заказ с левой руки ближнюю позицию } } // 7 //Если официант подаёт с западной стороны и предыдущее блюдо на 2-ом месте а подаваемое блюдо Катируется в списке товара на 3-е место то следует подавать с Южной стороны блюдо номер 1 «Используя подачи с правой руки» if(zap==1 && Var1_Bo_0==0 && Var2_Be_1==1 && ChekDIr==true) //Смещение по регистру с Запада «- на Севера *| Смещение по часовой стрелке { // разрешение на обработку события.ok Sev_1=0; //Запрет для 3 направлений Zap_1=0; Vost_1=0; Yug_1=1; //Проверка значения направления sev=0; zap=0; yug=1; vost=0; ChekDIr=false; BlockNum=»Z 7″; errorprint[19]=1; //Перекласификация после разворота с класса 90 градусов в класс 0 градусов if(Vol_B_Chang_1==true) { Var1_Bo_0=2; Var1_Bo_1=0; } if(Vol_B_Chang_1==false) { Var1_Bo_0=2; Var1_Be_1=0; Var2_Bo_1=1;//став лицом на юг официант подаёт блюдо-заказ с левой руки ближнюю позицию } } // 8 //Если официант подаёт с западной стороны и предыдущее блюдо на 3-ем месте а подаваемое блюдо Катируется в списке товара на 2-ое место то следует подавать с Северной стороны блюдо номер 1 «Используя подачи с правой руки» if(zap==1 && Var1_Be_1==0 && Var2_Bo_0==1 && ChekDIr==true) //Смещение по регистру с Запада «- на Севера *| Смещение по часовой стрелке { // разрешение на обработку события. ok Yug_1=0; //Запрет для 3 направлений Zap_1=0; Vost_1=0; Sev_1=1; //Var2_Be_0=1; //Проверка значения направления sev=1; zap=0; yug=0; vost=0; ChekDIr=false; BlockNum=»Z 8″; errorprint[20]=1; //Перекласификация после разворота с класса 90 градусов в класс 0 градусов if(Vol_B_Chang_1==true) { Var1_Be_1=2; Var1_Be_0=0; } if(Vol_B_Chang_1==false) { Var1_Be_1=2; Var1_Bo_0=0; Var2_Be_0=1;//став лицом на север официант подаёт блюдо-заказ с левой руки дальнюю позицию } } // 9 //Если официант подаёт с западной стороны и предыдущее блюдо на 2-ом месте а подаваемое блюдо Катируется в списке товара на 4-ое место то следует подавать с Восточной стороны блюдо номер 1 «Используя подачи с правой руки» if(zap==1 && Var1_Bo_0==0 && Var2_Bo_1==1 && ChekDIr==true) //Смещение по регистру с Запада «- на ВОсток -» Смещение 180 градусов { Vost_1=1; // разрешение на обработку события.ok Yug_1=0; //Запрет для 3 направлений Sev_1=0; Zap_1=0; //Проверка значения направления sev=0; zap=0; yug=0; vost=1; ChekDIr=false; BlockNum=»Z 9″; errorprint[21]=1; //Перекласификация после разворота с класса 180 градусов в класс 0 градусов if(Vol_B_Chang_1==true) { Var1_Bo_0=2; Var1_Be_1=0; } if(Vol_B_Chang_1==false) { Var1_Bo_0=2; Var2_Bo_1=2; Var1_Be_0=0; Var2_Bo_0=1;//став лицом на восток официант подаёт блюдо-заказ с правой руки дальнюю позицию } } // 10 //Если официант подаёт с западной стороны и предыдущее блюдо на 4-ом месте а подаваемое блюдо Катируется в списке товара на 2-ое место то следует подавать с Восточной стороны блюдо номер 1 «Используя подачи с правой руки» if(zap==1 && Var1_Bo_1==0 && Var2_Bo_0==1 && ChekDIr==true) //Смещение по регистру с Запада «- на ВОсток -» Смещение 180 градусов { Vost_1=1; // разрешение на обработку события. ok Zap_1=0; //Запрет для 3 направлений Sev_1=0; Yug_1=0; //Проверка значения направления sev=0; zap=0; yug=0; vost=1; ChekDIr=false; BlockNum=»Z 10″; errorprint[22]=1; //Перекласификация после разворота с класса 180 градусов в класс 0 градусов if(Vol_B_Chang_1==true) { Var1_Bo_1=2; Var1_Be_0=0; } if(Vol_B_Chang_1==false) { Var1_Bo_1=2; Var2_Bo_0=2; Var1_Be_1=0; Var2_Bo_1=1;//став лицом на восток официант подаёт блюдо-заказ с левой руки ближнюю позицию } } // 11 //Если официант подаёт с западной стороны и предыдущее блюдо на 1-ом месте а подаваемое блюдо Катируется в списке товара на 3-е место то следует подавать с Восточной стороны блюдо номер 1 «Используя подачи с правой руки» . if(zap==1 && Var1_Be_0==0 && Var2_Be_1==1 && ChekDIr==true) //Смещение по регистру с Запада «- на ВОсток -» Смещение 180 градусов { Vost_1=1; // разрешение на обработку события.ok Zap_1=0; //Запрет для 3 направлений Sev_1=0; Yug_1=0; //Проверка значения направления sev=0; zap=0; yug=0; vost=1; ChekDIr=false; BlockNum=»Z 11″; errorprint[23]=1; //Перекласификация после разворота с класса 180 градусов в класс 0 градусов if(Vol_B_Chang_1==true) { Var1_Be_0=2; Var1_Bo_1=0; } if(Vol_B_Chang_1==false) { Var1_Be_0=2; Var2_Be_1=2; Var1_Bo_0=0; Var2_Be_0=1;//став лицом на восток официант подаёт блюдо-заказ с левой руки дальнюю позицию } } // 12 //Если официант подаёт с западной стороны и предыдущее блюдо на 3-ом месте а подаваемое блюдо Катируется в списке товара на 1-ое место то следует подавать с Восточной стороны блюдо номер 1 «Используя подачи с правой руки» . if(zap==1 && Var1_Be_1==0 && Var2_Be_0==1 && ChekDIr==true) //Смещение по регистру с Запада «- на ВОсток -» Смещение 180 градусов { Vost_1=1; // разрешение на обработку события.ok Zap_1=0; //Запрет для 3 направлений Sev_1=0; Yug_1=0; //Проверка значения направления sev=0; zap=0; yug=0; vost=1; ChekDIr=false; BlockNum=»Z 12″; errorprint[24]=1; //Перекласификация после разворота с класса 180 градусов в класс 0 градусов if(Vol_B_Chang_1==true) { Var1_Be_1=2; Var1_Bo_0=0; } if(Vol_B_Chang_1==false) { Var1_Be_1=2; Var2_Be_0=2; Var1_Bo_1=0; Var2_Be_1=1;//став лицом на восток официант подаёт блюдо-заказ с правой руки ближнюю позицию } } //__________________________________ // Правильная конфигурация Восток //Если официант подаёт с Восточной стороны и предыдущее блюдо на 1-ом месте а подаваемое блюдо Катируется в списке товара на 2-ое место то следует подавать с Восточной стороны блюдо номер 1 «Используя подачи с правой руки» . if(vost==1 && Var1_Be_0==0 && Var2_Bo_0==1 && ChekDIr==true) { Vost_1=1;// разрешение на обработку события. //Запрет для 3 направлений Zap_1=0; Sev_1=0; Yug_1=0; //Проверка значения направления sev=0; zap=0; yug=0; vost=1; ChekDIr=false; BlockNum=»V 1″; errorprint[25]=1; //став лицом на восток официант подаёт блюдо-заказ с правой руки дальнюю позицию } // 2 //Если официант подаёт с Восточной стороны и предыдущее блюдо на 2-ом месте а подаваемое блюдо Катируется в списке товара на 1-е место то следует подавать с Восточной стороны блюдо номер 1 «Используя подачи с правой руки» . if(vost==1 && Var1_Bo_0==0 && Var2_Be_0==1 && ChekDIr==true) { Vost_1=1;// разрешение на обработку события. //Запрет для 3 направлений Zap_1=0; Sev_1=0; Yug_1=0; //Проверка значения направления sev=0; zap=0; yug=0; vost=1; ChekDIr=false; BlockNum=»V 2″; errorprint[26]=1; //став лицом на восток официант подаёт блюдо-заказ с левой руки дальнюю позицию } // 3 //Если официант подаёт с Восточной стороны и предыдущее блюдо на 3-ем месте а подаваемое блюдо Катируется в списке товара на 4-е место то следует подавать с Восточной стороны блюдо номер 1 «Используя подачи с правой руки» . if(vost==1 && Var1_Be_1==0 && Var2_Bo_1==1 && ChekDIr==true) { Vost_1=1;// разрешение на обработку события. //Запрет для 3 направлений Zap_1=0; Sev_1=0; Yug_1=0; //Проверка значения направления sev=0; zap=0; yug=0; vost=1; ChekDIr=false; BlockNum=»V 3″; errorprint[27]=1; //став лицом на восток официант подаёт блюдо-заказ с левой руки ближнюю позицию } // 4 //Если официант подаёт с Восточной стороны и предыдущее блюдо на 3-ем месте а подаваемое блюдо Катируется в списке товара на 3-е место то следует подавать с Восточной стороны блюдо номер 1 «Используя подачи с правой руки» . if(vost==1 && Var1_Bo_1==0 && Var2_Be_1==1 && ChekDIr==true) { Vost_1=1;// разрешение на обработку события. //Запрет для 3 направлений Zap_1=0; Sev_1=0; Yug_1=0; //Проверка значения направления sev=0; zap=0; yug=0; vost=1; ChekDIr=false; BlockNum=»V 4″; errorprint[28]=1; //став лицом на восток официант подаёт блюдо-заказ с правой руки ближнюю позицию } // 5 // Не правильная конфигурация //Если официант подаёт с Восточной стороны и предыдущее блюдо на 1-ом месте а подаваемое блюдо Катируется в списке товара на 4-ое место то следует подавать с Южной стороны блюдо номер 1 «Используя подачи с правой руки» . if(vost==1 && Var1_Be_0==0 && Var2_Bo_1==1 && ChekDIr==true) //Смещение по регистру с Востока -» на Север *| . 9 часов { // разрешение на обработку события. Sev_1=0; //Запрет для 3 направлений Zap_1=0; Vost_1=0; Yug_1=1; //Проверка значения направления sev=0; zap=0; yug=1; vost=0; ChekDIr=false; BlockNum=»V 5″; errorprint[29]=1; //Перекласификация после разворота с класса 90 градусов в класс 0 градусов if(Vol_B_Chang_1==true) { Var1_Be_0=2; Var1_Be_1=0; } if(Vol_B_Chang_1==false) { Var1_Be_0=2; Var1_Bo_1=0; Var2_Be_1=1;//став лицом на юг официант подаёт блюдо-заказ с правой руки ближнюю позицию } } // 6 //Если официант подаёт с Восрочной стороны и предыдущее блюдо на 4-ом месте а подаваемое блюдо Катируется в списке товара на 1-ое место то следует подавать с Северной стороны блюдо номер 1 «Используя подачи с правой руки» . if(vost==1 && Var1_Bo_1==0 && Var2_Be_0==1 && ChekDIr==true) //Смещение по регистру с Востока -» на Север *| 9 часов { // разрешение на обработку события.ok Sev_1=1; //Запрет для 3 направлений Zap_1=0; Vost_1=0; Yug_1=0; //Проверка значения направления sev=1; zap=0; yug=0; vost=0; ChekDIr=false; BlockNum=»V 6″; errorprint[30]=1; //Перекласификация после разворота с класса 90 градусов в класс 0 градусов if(Vol_B_Chang_1==true) { Var1_Bo_1=2; Var1_Bo_0=0; } if(Vol_B_Chang_1==false) { Var1_Bo_1=2; Var1_Be_0=0; Var2_Bo_0=1;//став лицом на север официант подаёт блюдо-заказ с правой руки дальнюю позицию } } // 7 //Если официант подаёт с Восточной стороны и предыдущее блюдо на 2-ом месте а подаваемое блюдо Катируется в списке товара на 3-е место то следует подавать с Северной стороны блюдо номер 1 «Используя подачи с правой руки» . if(vost==1 && Var1_Bo_0==0 && Var2_Be_1==1 && ChekDIr==true) // Смещение по регистру с Востока -» на Юг .| 3 часа { // разрешение на обработку события.ok Sev_1=1; //Запрет для 3 направлений Zap_1=0; Vost_1=0; Yug_1=0; //Проверка значения направления sev=1; zap=0; yug=0; vost=0; ChekDIr=false; BlockNum=»V 7″; errorprint[31]=1; if(Vol_B_Chang_1==true) { Var1_Bo_0=2; Var1_Bo_1=0; } if(Vol_B_Chang_1==false) { Var1_Bo_0=2; Var1_Be_1=0; Var2_Bo_1=1;//став лицом на север официант подаёт блюдо-заказ с левой руки ближнюю позицию } } // 8 //Если официант подаёт с Восточной стороны и предыдущее блюдо на 3-ем месте а подаваемое блюдо Катируется в списке товара на 2-е место то следует подавать с Южной стороны блюдо номер 1 «Используя подачи с правой руки» . if(vost==1 && Var1_Be_1==0 && Var2_Bo_0==1 && ChekDIr==true) // Смещение по регистру с Востока -» на Юг .| 3 часа { // разрешение на обработку события.ok Yug_1=1; //Запрет для 3 направлений Zap_1=0; Vost_1=0; Sev_1=0; //Проверка значения направления sev=0; zap=0; yug=1; vost=0; ChekDIr=false; BlockNum=»V 8″; errorprint[32]=1; //Перекласификация после разворота с класса 90 градусов в класс 0 градусов if(Vol_B_Chang_1==true) { Var1_Be_1=2; Var1_Be_0=0; } if(Vol_B_Chang_1==false) { Var1_Be_1=2; Var1_Bo_0=0; Var2_Be_0=1;//став лицом на юг официант подаёт блюдо-заказ с левой руки дальнюю позицию } } // 9 //Если официант подаёт с Восточной стороны и предыдущее блюдо на 2-ом месте а подаваемое блюдо Катируется в списке товара на 4-ое место то следует подавать с Западной стороны блюдо номер 1 «Используя подачи с правой руки» . if(vost==1 && Var1_Bo_0==0 && Var2_Bo_1==1 && ChekDIr==true) // Смещение по регистру с Востока -» на Запад «- 6 часов { Zap_1=1; // разрешение на обработку события.ok Yug_1=0; //Запрет для 3 направлений Sev_1=0; Vost_1=0; //Проверка значения направления sev=0; zap=1; yug=0; vost=0; ChekDIr=false; BlockNum=»V 9″; errorprint[33]=1; //Перекласификация после разворота с класса 180 градусов в класс 0 градусов if(Vol_B_Chang_1==true) { Var1_Bo_0=2; Var1_Be_1=0; } if(Vol_B_Chang_1==false) { Var1_Bo_0=2; Var2_Bo_1=2; Var1_Be_0=0; Var2_Bo_0=1;//став лицом на запад официант подаёт блюдо-заказ с правой руки дальнюю позицию } } // 10 //Если официант подаёт с Восточной стороны и предыдущее блюдо на 4-ом месте а подаваемое блюдо Катируется в списке товара на 2-ое место то следует подавать с Западной стороны блюдо номер 1 «Используя подачи с правой руки» . if(vost==1 && Var1_Bo_1==0 && Var2_Bo_0==1 && ChekDIr==true) // Смещение по регистру с Востока -» на Запад «- 6 часов { Zap_1=1; // разрешение на обработку события.ok Yug_1=0; //Запрет для 3 направлений Sev_1=0; Vost_1=0; //Проверка значения направления sev=0; zap=1; yug=0; vost=0; ChekDIr=false; BlockNum=»V 10″; errorprint[34]=1; //Перекласификация после разворота с класса 180 градусов в класс 0 градусов if(Vol_B_Chang_1==true) { Var1_Bo_1=2; Var1_Be_0=0; } if(Vol_B_Chang_1==false) { Var1_Bo_1=2; Var2_Bo_0=2; Var1_Be_1=0; Var2_Bo_1=1;//став лицом на запад официант подаёт блюдо-заказ с левой руки ближнюю позицию } } // 11 //Если официант подаёт с Восточной стороны и предыдущее блюдо на 1-ом месте а подаваемое блюдо Катируется в списке товара на 3-е место то следует подавать с Западной стороны блюдо номер 1 «Используя подачи с правой руки» . if(vost==1 && Var1_Be_0==0 && Var2_Be_1==1 && ChekDIr==true) // Смещение по регистру с Востока -» на Запад «- 6 часов { Zap_1=1; // разрешение на обработку события.ok Vost_1=0; //Запрет для 3 направлений Sev_1=0; Yug_1=0; //Проверка значения направления sev=0; zap=1; yug=0; vost=0; ChekDIr=false; BlockNum=»V 11″; errorprint[35]=1; //Перекласификация после разворота с класса 180 градусов в класс 0 градусов if(Vol_B_Chang_1==true) { Var1_Be_0=2; Var1_Bo_1=0; } if(Vol_B_Chang_1==false) { Var1_Be_0=2; Var2_Be_1=2; Var1_Bo_0=0; Var2_Be_0=1;//став лицом на запад официант подаёт блюдо-заказ с левой руки дальнюю позицию } } // 12 //Если официант подаёт с Восточной стороны и предыдущее блюдо на 3-ем месте а подаваемое блюдо Катируется в списке товара на 1-ое место то следует подавать с Западной стороны блюдо номер 1 «Используя подачи с правой руки» . if(vost==1 && Var1_Be_1==0 && Var2_Be_0==1 && ChekDIr==true) // Смещение по регистру с Востока -» на Запад «- 6 часов { Zap_1=1; // разрешение на обработку события.ok Vost_1=0; //Запрет для 3 направлений Sev_1=0; Yug_1=0; //Проверка значения направления sev=0; zap=1; yug=0; vost=0; ChekDIr=false; BlockNum=»V 12″; errorprint[36]=1; //Перекласификация после разворота с класса 180 градусов в класс 0 градусов if(Vol_B_Chang_1==true) { Var1_Be_1=2; Var1_Bo_0=0; } if(Vol_B_Chang_1==false) { Var1_Be_1=2; Var2_Be_0=2; Var1_Bo_1=0; Var2_Be_1=1;//став лицом на запад официант подаёт блюдо-заказ с правой руки ближнюю позицию } } //__________________________________ // Правильная конфигурация Юг // 1 //Если официант подаёт с Южной стороны и предыдущее блюдо на 1-ом месте а подаваемое блюдо Катируется в списке товара на 2-ое место то следует подавать с Южной стороны блюдо номер 1 «Используя подачи с правой руки» . if(yug==1 && Var1_Be_0==0 && Var2_Bo_0==1 && ChekDIr==true) { Yug_1=1;// разрешение на обработку события. //Запрет для 3 направлений Zap_1=0; Vost_1=0; Sev_1=0; //Проверка значения направления sev=0; zap=0; yug=1; vost=0; ChekDIr=false; BlockNum=»Y 1″; errorprint[37]=1; //став лицом на юг официант подаёт блюдо-заказ с правой руки дальнюю позицию } // 2 //Если официант подаёт с Южной стороны и предыдущее блюдо на 1-ом месте а подаваемое блюдо Катируется в списке товара на 2-ое место то следует подавать с Южной стороны блюдо номер 1 «Используя подачи с правой руки» . if(yug==1 && Var1_Bo_0==0 && Var2_Be_0==1 && ChekDIr==true) { Yug_1=1;// разрешение на обработку события. //Запрет для 3 направлений Zap_1=0; Vost_1=0; Sev_1=0; //Проверка значения направления sev=0; zap=0; yug=1; vost=0; ChekDIr=false; BlockNum=»Y 2″; errorprint[38]=1; //став лицом на юг официант подаёт блюдо-заказ с левой руки дальнюю позицию } // 3 //Если официант подаёт с Южной стороны и предыдущее блюдо на 3-ем месте а подаваемое блюдо Катируется в списке товара на 4-ое место то следует подавать с Южной стороны блюдо номер 1 «Используя подачи с правой руки» . if(yug==1 && Var1_Be_1==0 && Var2_Bo_1==1 && ChekDIr==true) { Yug_1=1;// разрешение на обработку события. //Запрет для 3 направлений Zap_1=0; Vost_1=0; Sev_1=0; //Проверка значения направления sev=0; zap=0; yug=1; vost=0; ChekDIr=false; BlockNum=»Y 3″; errorprint[39]=1; //став лицом на юг официант подаёт блюдо-заказ с левой руки ближнюю позицию } // 4 //Если официант подаёт с Южной стороны и предыдущее блюдо на 4-ом месте а подаваемое блюдо Катируется в списке товара на 3-е место то следует подавать с Южной стороны блюдо номер 1 «Используя подачи с правой руки» . if(yug==1 && Var1_Bo_1==0 && Var2_Be_1==1 && ChekDIr==true) { Yug_1=1;// разрешение на обработку события. //Запрет для 3 направлений Zap_1=0; Vost_1=0; Sev_1=0; //Проверка значения направления sev=0; zap=0; yug=1; vost=0; ChekDIr=false; BlockNum=»Y 4″; errorprint[40]=1; //став лицом на юг официант подаёт блюдо-заказ с правой руки ближнюю позицию } // 5 // Не правильная конфигурация //Если официант подаёт с Южной стороны и предыдущее блюдо на 1-ом месте а подаваемое блюдо Катируется в списке товара на 4-ое место то следует подавать с Западной стороны блюдо номер 1 «Используя подачи с правой руки» . if(yug==1 && Var1_Be_0==0 && Var2_Bo_1==1 && ChekDIr==true) //Смещение по регистру с Юга на .| на Восток -» 9 часов { // разрешение на обработку события.ok Zap_1=1; //Запрет для 3 направлений Vost_1=0; Sev_1=0; Yug_1=0; //Проверка значения направления sev=0; zap=1; yug=0; vost=0; ChekDIr=false; BlockNum=»Y 5″; errorprint[41]=1; //Перекласификация после разворота с класса 90 градусов в класс 0 градусов if(Vol_B_Chang_1==true) { Var1_Be_0=2; Var1_Be_1=0; } if(Vol_B_Chang_1==false) { Var1_Be_0=2; Var1_Bo_1=0; Var2_Be_1=1;//став лицом на запад официант подаёт блюдо-заказ с правой руки ближнюю позицию } } // 6 //Если официант подаёт с Южной стороны и предыдущее блюдо на 4-ом месте а подаваемое блюдо Катируется в списке товара на 1-ое место то следует подавать с Восточной стороны блюдо номер 1 «Используя подачи с правой руки» . if(yug==1 && Var1_Bo_1==0 && Var2_Be_0==1 && ChekDIr==true) //Смещение по регистру с Юга на .| на Восток -» 9 часов { // разрешение на обработку события.ok Vost_1=1; //Запрет для 3 направлений Zap_1=0; Sev_1=0; Yug_1=0; //Проверка значения направления sev=0; zap=0; yug=0; vost=1; ChekDIr=false; BlockNum=»Y 6″; errorprint[42]=1; //Перекласификация после разворота с класса 90 градусов в класс 0 градусов if(Vol_B_Chang_1==true) { Var1_Bo_1=2; Var1_Bo_0=0; } if(Vol_B_Chang_1==false) { Var1_Bo_1=2; Var1_Be_0=0; Var2_Bo_0=1;//став лицом на восток официант подаёт блюдо-заказ с правой руки дальнюю позицию } } // 7 //Если официант подаёт с Южной стороны и предыдущее блюдо на 2-ом месте а подаваемое блюдо Катируется в списке товара на 3-е место то следует подавать с Восточной стороны блюдо номер 1 «Используя подачи с правой руки» . if(yug==1 && Var1_Bo_0==0 && Var2_Be_1==1 && ChekDIr==true) // Смещение по регистру с Юга на .| на Запад «- 3 часа { // разрешение на обработку события.ok Vost_1=1; //Запрет для 3 нап равлений Sev_1=0; Zap_1=0; Yug_1=0; //Проверка значения направления sev=0; zap=0; yug=0; vost=1; ChekDIr=false; BlockNum=»Y 7″; errorprint[43]=1; //Перекласификация после разворота с класса 90 градусов в класс 0 градусов if(Vol_B_Chang_1==true) { Var1_Bo_0=2; Var1_Bo_1=0; } if(Vol_B_Chang_1==false) { Var1_Bo_0=2; Var1_Be_1=0; Var2_Bo_1=1;//став лицом на восток официант подаёт блюдо-заказ с левой руки ближнюю позицию } } // 8 //Если официант подаёт с Южной стороны и предыдущее блюдо на 3-ем месте а подаваемое блюдо Катируется в списке товара на 2-ое место то следует подавать с Западной стороны блюдо номер 1 «Используя подачи с правой руки» . if(yug==1 && Var1_Be_1==0 && Var2_Bo_0==1 && ChekDIr==true) // Смещение по регистру с Юга на .| на Запад «- 3 часа { // разрешение на обработку события.ok Zap_1=1; //Запрет для 3 направлений Sev_1=0; Vost_1=0; Yug_1=0; //Проверка значения направления sev=0; zap=1; yug=0; vost=0; ChekDIr=false; BlockNum=»Y 8″; errorprint[44]=1; //Перекласификация после разворота с класса 90 градусов в класс 0 градусов if(Vol_B_Chang_1==true) { Var1_Be_1=2; Var1_Be_0=0; } if(Vol_B_Chang_1==false) { Var1_Be_1=2; Var1_Bo_0=0; Var2_Be_0=1;//став лицом на запад официант подаёт блюдо-заказ с левой руки дальнюю позицию } } // 9 //Если официант подаёт с Южной стороны и предыдущее блюдо на 2-ом месте а подаваемое блюдо Катируется в списке товара на 4-ое место то следует подавать с Северной стороны блюдо номер 1 «Используя подачи с правой руки» . if(yug==1 && Var1_Bo_0==0 && Var2_Bo_1==1 && ChekDIr==true) // Смещение по регистру с Юга на .| на Север *| 6 часов { Sev_1=1; // разрешение на обработку события.ok Yug_1=0; //Запрет для 3 направлений Zap_1=0; Vost_1=0; //Проверка значения направления sev=1; zap=0; yug=0; vost=0; ChekDIr=false; BlockNum=»Y 9″; errorprint[45]=1; //Перекласификация после разворота с класса 180 градусов в класс 0 градусов if(Vol_B_Chang_1==true) { Var1_Bo_0=2; Var1_Be_1=0; } if(Vol_B_Chang_1==false) { Var1_Bo_0=2; Var2_Bo_1=2; Var1_Be_0=0; Var2_Bo_0=1;//став лицом на север официант подаёт блюдо-заказ с правой руки дальнюю позицию } } // 10 //Если официант подаёт с Южной стороны и предыдущее блюдо на 4-ом месте а подаваемое блюдо Катируется в списке товара на 2-ое место то следует подавать с Северной стороны блюдо номер 1 «Используя подачи с правой руки» . if(yug==1 && Var1_Bo_1==0 && Var2_Bo_0==1 && ChekDIr==true) // Смещение по регистру с Юга на .| на Север *| 6 часов { Sev_1=1; // разрешение на обработку события.ok Yug_1=0; //Запрет для 3 направлений Zap_1=0; Vost_1=0; //Проверка значения направления sev=1; zap=0; yug=0; vost=0; ChekDIr=false; BlockNum=»Y 10″; errorprint[46]=1; //Перекласификация после разворота с класса 180 градусов в класс 0 градусов if(Vol_B_Chang_1==true) { Var1_Bo_1=2; Var1_Be_0=0; } if(Vol_B_Chang_1==false) { Var1_Bo_1=2; Var2_Bo_0=2; Var1_Be_1=0; Var2_Bo_1=1;//став лицом на север официант подаёт блюдо-заказ с левой руки ближнюю позицию } } // 11 //Если официант подаёт с Южной стороны и предыдущее блюдо на 1-ом месте а подаваемое блюдо Катируется в списке товара на 3-е место то следует подавать с Северной стороны блюдо номер 1 «Используя подачи с правой руки» . if(yug==1 && Var1_Be_0==0 && Var2_Be_1==1 && ChekDIr==true) // Смещение по регистру с Юга на .| на Север *| 6 часов { Sev_1=1; // разрешение на обработку события.ok Yug_1=0; //Запрет для 3 направлений Zap_1=0; Vost_1=0; //Проверка значения направления sev=1; zap=0; yug=0; vost=0; ChekDIr=false; BlockNum=»Y 11″; errorprint[47]=1; //Перекласификация после разворота с класса 180 градусов в класс 0 градусов if(Vol_B_Chang_1==true) { Var1_Be_0=2; Var1_Bo_1=0; } if(Vol_B_Chang_1==false) { Var1_Be_0=2; Var2_Be_1=2; Var1_Bo_0=0; Var2_Be_0=1;//став лицом на север официант подаёт блюдо-заказ с левой руки дальнюю позицию } } // 12 //Если официант подаёт с Южной стороны и предыдущее блюдо на 3-ем месте а подаваемое блюдо Катируется в списке товара на 1-ое место то следует подавать с Северной стороны блюдо номер 1 «Используя подачи с правой руки» . if(yug==1 && Var1_Be_1==0 && Var2_Be_0==1 && ChekDIr==true) // Смещение по регистру с Юга на .| на Север *| 6 часов { // разрешение на обработку события.ok Sev_1=1; //Запрет для 3 направлений Zap_1=0; Vost_1=0; Yug_1=0; //Проверка значения направления sev=1; zap=0; yug=0; vost=0; ChekDIr=false; BlockNum=»Y 12″; errorprint[48]=1; //Перекласификация после разворота с класса 180 градусов в класс 0 градусов if(Vol_B_Chang_1==true) { Var1_Be_1=2; Var1_Bo_0=0; } if(Vol_B_Chang_1==false) { Var1_Be_1=2; Var2_Be_0=2; Var1_Bo_1=0; Var2_Be_1=1;//став лицом на север официант подаёт блюдо-заказ с правой руки ближнюю позицию } } //+——————————————————————+ //| END – Sunflower 1/0 – Cluster meter | //+——————————————————————+ //Слой Системы Коорденат. Расчёт системы коорденат базируется на выведенную архитектуру подсолнечника. Архитектура имеет 2 под архитектуры координат //из которой выводится вся архитектура с использованием центра в каждом из углов и сопряжений 4 переменных. В сути можно представить квадрат с 9 центрами. // 8 переметральных и 1 центральный. // Выведение Групп по коорденатам с использованием полового признака. Be Женский род Bo Мужской род //Grupo1 – исходный квадрат под индексом 1 в котором по средствам координат сведены 4 основные переменные.Человек взят для определения //движение по средствам механики как лицо лицевые и изнаночные движения // Соединение контура иконы Божей Матери «Кропивницкая церковь» //Звёздочек вокруг иконы «Божей матери» Верикаль 2*12 Горизонталь 2*4 Всего 32 // Индекс BM – «Молитва божей матери» //Comment(» Reloj «,Reloj,» Contra Reloj «, Contra_Reloj,» Reloj_1 «,Reloj_1,» Contra Reloj_1 «, Contra_Reloj_1,» Vost_1 «,Vost_1,» Yug_1 «,Yug_1,» Zap_1 «,Zap_1,» Sev_1 «,Sev_1); //Функция купольного вращения 2 //Проверка шаг 3 string napravlenie; if(Sev_1==1) { napravlenie=»Sev_1″; } if(Yug_1==1) { napravlenie=»Yug_1″; } if(Zap_1==1) { napravlenie=»Zap_1″; } if(Vost_1==1) { napravlenie=»Vost_1»; } //Print(napravlenie); // 4 направления в которых вложены 2 стороны и 8 регистров. В сумме 768 регистров // ечать ошибок блока разрешений для индикатора Семечка //for(int gh=1;gh<49;gh++) //{ //Print(«index «,gh); //Print(«errorprint «,errorprint[gh]); ArrayInitialize(errorprint2,0); //} //Поведение северной стороны //Поведение северной стороны if(Sev_1==1) { //Подача значения на Лицо номер 1 //1 Be_0 && Bo_0 if(lic==1 && Var1_Be_0==0 && Var2_Bo_0==1) //Праверка регистра Bo_0 Лица ok { bool BlockPermis=true; // Сравнение состояния 2 регистров лица и изнанки по поданному значению if(Sev[1,2]==0 && Var2_Bo_0==1 && BlockPermis==true) // Смена в регистре на противоположное значение и Смена Лица на Изнанку { Sev[1,2]=1;//Смена в регистре на противоположное значение на лице Sev[1,6]=0;//Смена в регистре на противоположное значение на изнанке lic=0;//Смена Стороны izn=1;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=2; Var1_Bo_0=0; Var1_Be_1=2; Var1_Bo_1=2; Gx++; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[1]=1;//Proverka zapuska bloka kubo_2++; Text_Kubo_2=IntegerToString(kubo_2); ObjectSetString(0,obiekt503,OBJPROP_TEXT,Text_Kubo_2); } if(Sev[1,2]==1 && Var2_Bo_0==1 && BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку ok { Sev[1,6]=0; lic=0;//Смена Стороны izn=1;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=2; Var1_Bo_0=0; Var1_Be_1=2; Var1_Bo_1=2; //———- Gx++; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[2]=1; kubo_2++; Text_Kubo_2=IntegerToString(kubo_2); ObjectSetString(0,obiekt503,OBJPROP_TEXT,Text_Kubo_2); } }// lic==1 фин if(izn==1 && Var1_Be_0==0 && Var2_Bo_0==1) //Праверка регистра Bo_0 Изнанки { //1/1 Be_0 && Bo_0 bool BlockPermis=true; // Сравнение состояния 2 регистров лица и изнанки по поданному значению ok if(Sev[1,6]==0 && Var2_Bo_0==1 && BlockPermis==true) // Смена в регистре на противоположное значение и Смена Лица на Изнанку { Sev[1,6]=1;//Смена в регистре на противоположное значение на лице Sev[1,2]=0;//Смена в регистре на противоположное значение на изнанке lic=1;//Смена Стороны izn=0;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=2; Var1_Bo_0=0; Var1_Be_1=2; Var1_Bo_1=2; //———- Gx++; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[3]=1; kubo_6++; Text_Kubo_6=IntegerToString(kubo_6); ObjectSetString(0,obiekt507,OBJPROP_TEXT,Text_Kubo_6); } if(Sev[1,6]==1 && Var2_Bo_0==1 && BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку ok { Sev[1,2]=0; lic=1;//Смена Стороны izn=0;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=2; Var1_Bo_0=0; Var1_Be_1=2; Var1_Bo_1=2; //———- Gx++; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[4]=1; kubo_6++; Text_Kubo_6=IntegerToString(kubo_6); ObjectSetString(0,obiekt507,OBJPROP_TEXT,Text_Kubo_6); } }// izn==1 фин //Подача значения на Лицо номер 2 //1 Bo_0 && Be_0 if(lic==1 && Var1_Bo_0==0 && Var2_Be_0==1) //Праверка регистра Be_0 Лица { bool BlockPermis=true; // Сравнение состояния 2 регистров лица и изнанки по поданному значению if(Sev[1,1]==0 && Var2_Be_0==1 && BlockPermis==true) // Смена в регистре на противоположное значение и Смена Лица на Изнанку { Sev[1,1]=1;//Смена в регистре на противоположное значение на лице Sev[1,5]=0;//Смена в регистре на противоположное значение на изнанке lic=0;//Смена Стороны izn=1;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=0; Var1_Bo_0=2; Var1_Be_1=2; Var1_Bo_1=2; //———- Gx–; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[5]=1; kubo_1++; Text_Kubo_1=IntegerToString(kubo_1); ObjectSetString(0,obiekt502,OBJPROP_TEXT,Text_Kubo_1); } if(Sev[1,1]==1 && Var2_Be_0==1 && BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку { Sev[1,5]=0; lic=0;//Смена Стороны izn=1;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=0; Var1_Bo_0=2; Var1_Be_1=2; Var1_Bo_1=2; //———- Gx–; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[6]=1; kubo_1++; Text_Kubo_1=IntegerToString(kubo_1); ObjectSetString(0,obiekt502,OBJPROP_TEXT,Text_Kubo_1); } }// lic==1 фин if(izn==1 && Var1_Bo_0==0 && Var2_Be_0==1) //Праверка регистра Be_0 Изнанки OK { //1/1 Bo_0 && Be_0 bool BlockPermis=true; // Сравнение состояния 2 регистров лица и изнанки по поданному значению if(Sev[1,5]==0 && Var2_Be_0==1 && BlockPermis==true)// Смена в регистре на противоположное значение и Смена Лица на Изнанку { Sev[1,5]=1;//Смена в регистре на противоположное значение на лице Sev[1,1]=0;//Смена в регистре на противоположное значение на изнанке lic=1;//Смена Стороны izn=0;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=0; Var1_Bo_0=2; Var1_Be_1=2; Var1_Bo_1=2; //———- Gx–; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[6]=1; kubo_5++; Text_Kubo_5=IntegerToString(kubo_5); ObjectSetString(0,obiekt506,OBJPROP_TEXT,Text_Kubo_5); } if(Sev[1,5]==1 && Var2_Be_0==1 && BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку { Sev[1,1]=0; lic=1;//Смена Стороны izn=0;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=0; Var1_Bo_0=2; Var1_Be_1=2; Var1_Bo_1=2; //———- Gx–; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[7]=1; kubo_5++; Text_Kubo_5=IntegerToString(kubo_5); ObjectSetString(0,obiekt506,OBJPROP_TEXT,Text_Kubo_5); } }// izn==1 фин //Подача значения на Лицо номер 3 //1 Be_1 && Bo_1 if(lic==1 && Var1_Be_1==0 && Var2_Bo_1==1) //Праверка регистра Bo_1 Лица { bool BlockPermis=true; // Сравнение состояния 2 регистров лица и изнанки по поданному значению if(Sev[1,4]==0 && Var2_Bo_1==1 && BlockPermis==true) // Смена в регистре на противоположное значение и Смена Лица на Изнанку { Sev[1,4]=1;//Смена в регистре на противоположное значение на лице Sev[1,8]=0;//Смена в регистре на противоположное значение на изнанке lic=0;//Смена Стороны izn=1;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=2; Var1_Bo_0=2; Var1_Be_1=2; Var1_Bo_1=0; //———- Gx–; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[8]=1; kubo_4++; Text_Kubo_4=IntegerToString(kubo_4); ObjectSetString(0,obiekt505,OBJPROP_TEXT,Text_Kubo_4); } if(Sev[1,4]==1 && Var2_Bo_1==1 && BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку { Sev[1,8]=0; lic=0;//Смена Стороны izn=1;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=2; Var1_Bo_0=2; Var1_Be_1=2; Var1_Bo_1=0; //———- Gx–; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[9]=1; kubo_4++; Text_Kubo_4=IntegerToString(kubo_4); ObjectSetString(0,obiekt505,OBJPROP_TEXT,Text_Kubo_4); } }// lic==1 фин if(izn==1 && Var1_Be_1==0 && Var2_Bo_1==1) //Праверка регистра Bo_1 Изнанки OK { //1/1 Be_1 && Bo_1 bool BlockPermis=true; // Сравнение состояния 2 регистров лица и изнанки по поданному значению if(Sev[1,8]==0 && Var2_Bo_1==1 && BlockPermis==true)// Смена в регистре на противоположное значение и Смена Лица на Изнанку { Sev[1,8]=1;//Смена в регистре на противоположное значение на лице Sev[1,4]=0;//Смена в регистре на противоположное значение на изнанке lic=1;//Смена Стороны izn=0;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=2; Var1_Bo_0=2; Var1_Be_1=2; Var1_Bo_1=0; //———- Gx–; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[10]=1; kubo_8++; Text_Kubo_8=IntegerToString(kubo_8); ObjectSetString(0,obiekt509,OBJPROP_TEXT,Text_Kubo_8); } if(Sev[1,8]==1 && Var2_Bo_1==1 && BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку { Sev[1,4]=0; lic=1;//Смена Стороны izn=0;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=2; Var1_Bo_0=2; Var1_Be_1=2; Var1_Bo_1=0; //———- Gx–; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[11]=1; kubo_8++; Text_Kubo_8=IntegerToString(kubo_8); ObjectSetString(0,obiekt509,OBJPROP_TEXT,Text_Kubo_8); } }// izn==1 фин //Подача значения на Лицо номер 4 //1 Bo_1 && Be_1 if(lic==1 && Var1_Bo_1==0 && Var2_Be_1==1) //Праверка регистра Be_1 Лица { bool BlockPermis=true; // Сравнение состояния 2 регистров лица и изнанки по поданному значению if(Sev[1,3]==0 && Var2_Be_1==1 && BlockPermis==true) // Смена в регистре на противоположное значение и Смена Лица на Изнанку { Sev[1,3]=1;//Смена в регистре на противоположное значение на лице Sev[1,7]=0;//Смена в регистре на противоположное значение на изнанке lic=0;//Смена Стороны izn=1;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=2; Var1_Bo_0=2; Var1_Be_1=0; Var1_Bo_1=2; //———- Gx++; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[12]=1; kubo_3++; Text_Kubo_3=IntegerToString(kubo_3); ObjectSetString(0,obiekt504,OBJPROP_TEXT,Text_Kubo_3); } if(Sev[1,3]==1 && Var2_Be_1==1 && BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку { Sev[1,7]=0; lic=0;//Смена Стороны izn=1;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=2; Var1_Bo_0=2; Var1_Be_1=0; Var1_Bo_1=2; //———- Gx++; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[13]=1; kubo_3++; Text_Kubo_3=IntegerToString(kubo_3); ObjectSetString(0,obiekt504,OBJPROP_TEXT,Text_Kubo_3); } }// lic==1 фин if(izn==1 && Var1_Bo_1==0 && Var2_Be_1==1) //Праверка регистра Be_1 Изнанки { //1/1 Bo_1 && Be_1 bool BlockPermis=true; // Сравнение состояния 2 регистров лица и изнанки по поданному значению if(Sev[1,7]==0 && Var2_Be_1==1 && BlockPermis==true)// Смена в регистре на противоположное значение и Смена Лица на Изнанку { Sev[1,7]=1;//Смена в регистре на противоположное значение на лице Sev[1,3]=0;//Смена в регистре на противоположное значение на изнанке lic=1;//Смена Стороны izn=0;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=2; Var1_Bo_0=2; Var1_Be_1=0; Var1_Bo_1=2; //———- Gx++; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[14]=1; kubo_7++; Text_Kubo_7=IntegerToString(kubo_7); ObjectSetString(0,obiekt508,OBJPROP_TEXT,Text_Kubo_7); } if(Sev[1,7]==1 && Var2_Be_1==1 && BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку { Sev[1,3]=0; lic=1;//Смена Стороны izn=0;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=2; Var1_Bo_0=2; Var1_Be_1=0; Var1_Bo_1=2; //———- Gx++; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[15]=1; kubo_7++; Text_Kubo_7=IntegerToString(kubo_7); ObjectSetString(0,obiekt508,OBJPROP_TEXT,Text_Kubo_7); } }// izn==1 фин }// Sever фин //_____________________________________ // Поведение Юг if(Yug_1==1) { //Подача значения на Лицо номер 1 //1 Be_0 && Bo_0 if(lic==1 && Var1_Be_0==0 && Var2_Bo_0==1) //Праверка регистра Bo_0 Лица { bool BlockPermis=true; // Сравнение состояния 2 регистров лица и изнанки по поданному значению if(Sev[1,4]==0 && Var2_Bo_0==1 && BlockPermis==true) // Смена в регистре на противоположное значение и Смена Лица на Изнанку { Sev[1,4]=1;//Смена в регистре на противоположное значение на лице Sev[1,8]=0;//Смена в регистре на противоположное значение на изнанке lic=0;//Смена Стороны izn=1;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=2; Var1_Bo_0=0; Var1_Be_1=2; Var1_Bo_1=2; //———- Gx–; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[32]=1; kubo_4++; Text_Kubo_4=IntegerToString(kubo_4); ObjectSetString(0,obiekt505,OBJPROP_TEXT,Text_Kubo_4); } if(Sev[1,4]==1 && Var2_Bo_0==1 && BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку { Sev[1,8]=0; lic=0;//Смена Стороны izn=1;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=2; Var1_Bo_0=0; Var1_Be_1=2; Var1_Bo_1=2; //———- Gx–; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[33]=1; kubo_4++; Text_Kubo_4=IntegerToString(kubo_4); ObjectSetString(0,obiekt505,OBJPROP_TEXT,Text_Kubo_4); } }// lic==1 фин if(izn==1 && Var1_Be_0==0 && Var2_Bo_0==1) //Праверка регистра Bo_0 Изнанки { //1/1 Be_0 && Bo_0 bool BlockPermis=true; // Сравнение состояния 2 регистров лица и изнанки по поданному значению if(Sev[1,8]==0 && Var2_Bo_0==1 && BlockPermis==true) // Смена в регистре на противоположное значение и Смена Лица на Изнанку { Sev[1,8]=1;//Смена в регистре на противоположное значение на лице Sev[1,4]=0;//Смена в регистре на противоположное значение на изнанке lic=1;//Смена Стороны izn=0;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=2; Var1_Bo_0=0; Var1_Be_1=2; Var1_Bo_1=2; //———- Gx–; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[34]=1; kubo_8++; Text_Kubo_8=IntegerToString(kubo_8); ObjectSetString(0,obiekt509,OBJPROP_TEXT,Text_Kubo_8); } if(Sev[1,8]==1 && Var2_Bo_0==1 && BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку { Sev[1,4]=0; lic=1;//Смена Стороны izn=0;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=2; Var1_Bo_0=0; Var1_Be_1=2; Var1_Bo_1=2; //———- Gx–; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[35]=1; kubo_8++; Text_Kubo_8=IntegerToString(kubo_8); ObjectSetString(0,obiekt509,OBJPROP_TEXT,Text_Kubo_8); } }// izn==1 фин //Подача значения на Лицо номер 2 //1 Bo_0 && Be_0 if(lic==1 && Var1_Bo_0==0 && Var2_Be_0==1) //Праверка регистра Be_0 Лица ok { bool BlockPermis=true; // Сравнение состояния 2 регистров лица и изнанки по поданному значению if(Sev[1,3]==0 && Var2_Be_0==1 && BlockPermis==true) // Смена в регистре на противоположное значение и Смена Лица на Изнанку { Sev[1,3]=1;//Смена в регистре на противоположное значение на лице Sev[1,7]=0;//Смена в регистре на противоположное значение на изнанке lic=0;//Смена Стороны izn=1;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=0; Var1_Bo_0=2; Var1_Be_1=2; Var1_Bo_1=2; //———- Gx++; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[36]=1; kubo_3++; Text_Kubo_3=IntegerToString(kubo_3); ObjectSetString(0,obiekt504,OBJPROP_TEXT,Text_Kubo_3); } if(Sev[1,3]==1 && Var2_Be_0==1 && BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку { Sev[1,7]=0; lic=0;//Смена Стороны izn=1;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=0; Var1_Bo_0=2; Var1_Be_1=2; Var1_Bo_1=2; //———- Gx++; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[37]=1; kubo_3++; Text_Kubo_3=IntegerToString(kubo_3); ObjectSetString(0,obiekt504,OBJPROP_TEXT,Text_Kubo_3); } }// lic==1 фин if(izn==1 && Var1_Bo_0==0 && Var2_Be_0==1) //Праверка регистра Be_0 Изнанки { //1/1 Bo_0 && Be_0 bool BlockPermis=true; // Сравнение состояния 2 регистров лица и изнанки по поданному значению if(Sev[1,7]==0 && Var2_Be_0==1 && BlockPermis==true)// Смена в регистре на противоположное значение и Смена Лица на Изнанку { Sev[1,7]=1;//Смена в регистре на противоположное значение на лице Sev[1,3]=0;//Смена в регистре на противоположное значение на изнанке lic=1;//Смена Стороны izn=0;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=0; Var1_Bo_0=2; Var1_Be_1=2; Var1_Bo_1=2; //———- Gx++; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[38]=1; kubo_7++; Text_Kubo_7=IntegerToString(kubo_7); ObjectSetString(0,obiekt508,OBJPROP_TEXT,Text_Kubo_7); } if(Sev[1,7]==1 && Var2_Be_0==1 && BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку { Sev[1,3]=0; lic=1;//Смена Стороны izn=0;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=0; Var1_Bo_0=2; Var1_Be_1=2; Var1_Bo_1=2; //———- Gx++; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[39]=1; kubo_7++; Text_Kubo_7=IntegerToString(kubo_7); ObjectSetString(0,obiekt508,OBJPROP_TEXT,Text_Kubo_7); } }// izn==1 фин //Подача значения на Лицо номер 3 //1 Be_1 && Bo_1 if(lic==1 && Var1_Be_1==0 && Var2_Bo_1==1) //Праверка регистра Bo_1 Лица { bool BlockPermis=true; // Сравнение состояния 2 регистров лица и изнанки по поданному значению if(Sev[1,2]==0 && Var2_Bo_1==1 && BlockPermis==true) // Смена в регистре на противоположное значение и Смена Лица на Изнанку { Sev[1,2]=1;//Смена в регистре на противоположное значение на лице Sev[1,6]=0;//Смена в регистре на противоположное значение на изнанке lic=0;//Смена Стороны izn=1;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=2; Var1_Bo_0=2; Var1_Be_1=2; Var1_Bo_1=0; //———- Gx++; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[40]=1; kubo_2++; Text_Kubo_2=IntegerToString(kubo_2); ObjectSetString(0,obiekt503,OBJPROP_TEXT,Text_Kubo_2); } if(Sev[1,2]==1 && Var2_Bo_1==1 && BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку { Sev[1,6]=0; lic=0;//Смена Стороны izn=1;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=2; Var1_Bo_0=2; Var1_Be_1=2; Var1_Bo_1=0; //———- Gx++; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[41]=1; kubo_2++; Text_Kubo_2=IntegerToString(kubo_2); ObjectSetString(0,obiekt503,OBJPROP_TEXT,Text_Kubo_2); } }// lic==1 фин if(izn==1 && Var1_Be_1==0 && Var2_Bo_1==1) //Праверка регистра Bo_1 Изнанки { //1/1 Be_1 && Bo_1 bool BlockPermis=true; // Сравнение состояния 2 регистров лица и изнанки по поданному значению if(Sev[1,6]==0 && Var2_Bo_1==1 && BlockPermis==true)// Смена в регистре на противоположное значение и Смена Лица на Изнанку { Sev[1,6]=1;//Смена в регистре на противоположное значение на лице Sev[1,2]=0;//Смена в регистре на противоположное значение на изнанке lic=1;//Смена Стороны izn=0;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=2; Var1_Bo_0=2; Var1_Be_1=2; Var1_Bo_1=0; //———- Gx++; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[42]=1; kubo_6++; Text_Kubo_6=IntegerToString(kubo_6); ObjectSetString(0,obiekt507,OBJPROP_TEXT,Text_Kubo_6); } if(Sev[1,6]==1 && Var2_Bo_1==1 && BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку { Sev[1,2]=0; lic=1;//Смена Стороны izn=0;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=2; Var1_Bo_0=2; Var1_Be_1=2; Var1_Bo_1=0; //———- Gx++; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[43]=1; kubo_6++; Text_Kubo_6=IntegerToString(kubo_6); ObjectSetString(0,obiekt507,OBJPROP_TEXT,Text_Kubo_6); } }// izn==1 фин //Подача значения на Лицо номер 4 //1 Bo_1 && Be_1 if(lic==1 && Var1_Bo_1==0 && Var2_Be_1==1) //Праверка регистра Be_1 Лица { bool BlockPermis=true; // Сравнение состояния 2 регистров лица и изнанки по поданному значению if(Sev[1,1]==0 && Var2_Be_1==1 && BlockPermis==true) // Смена в регистре на противоположное значение и Смена Лица на Изнанку { Sev[1,1]=1;//Смена в регистре на противоположное значение на лице Sev[1,5]=0;//Смена в регистре на противоположное значение на изнанке lic=0;//Смена Стороны izn=1;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=2; Var1_Bo_0=2; Var1_Be_1=0; Var1_Bo_1=2; //———- Gx–; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[44]=1; kubo_1++; Text_Kubo_1=IntegerToString(kubo_1); ObjectSetString(0,obiekt502,OBJPROP_TEXT,Text_Kubo_1); } if(Sev[1,1]==1 && Var2_Be_1==1 && BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку { Sev[1,5]=0; lic=0;//Смена Стороны izn=1;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=2; Var1_Bo_0=2; Var1_Be_1=0; Var1_Bo_1=2; //———- Gx–; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[45]=1; kubo_1++; Text_Kubo_1=IntegerToString(kubo_1); ObjectSetString(0,obiekt502,OBJPROP_TEXT,Text_Kubo_1); } }// lic==1 фин if(izn==1 && Var1_Bo_1==0 && Var2_Be_1==1) //Праверка регистра Be_1 Изнанки { //1/1 Bo_1 && Be_1 bool BlockPermis=true; // Сравнение состояния 2 регистров лица и изнанки по поданному значению if(Sev[1,5]==0 && Var2_Be_1==1 && BlockPermis==true)// Смена в регистре на противоположное значение и Смена Лица на Изнанку { Sev[1,5]=1;//Смена в регистре на противоположное значение на лице Sev[1,1]=0;//Смена в регистре на противоположное значение на изнанке lic=1;//Смена Стороны izn=0;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=2; Var1_Bo_0=2; Var1_Be_1=0; Var1_Bo_1=2; //———- Gx–; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[46]=1; kubo_5++; Text_Kubo_5=IntegerToString(kubo_5); ObjectSetString(0,obiekt506,OBJPROP_TEXT,Text_Kubo_5); } if(Sev[1,5]==1 && Var2_Be_1==1 && BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку { Sev[1,1]=0; lic=1;//Смена Стороны izn=0;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=2; Var1_Bo_0=2; Var1_Be_1=0; Var1_Bo_1=2; //———- Gx–; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[47]=1; kubo_5++; Text_Kubo_5=IntegerToString(kubo_5); ObjectSetString(0,obiekt506,OBJPROP_TEXT,Text_Kubo_5); } }// izn==1 фин }// Yug фин //___________________________________ // Поведение Запад if(Zap_1==1) { //Подача значения на Лицо номер 1 //1 Be_0 && Bo_0 if(lic==1 && Var1_Be_0==0 && Var2_Bo_0==1) //Праверка регистра Bo_0 Лица { bool BlockPermis=true; // Сравнение состояния 2 регистров лица и изнанки по поданному значению if(Sev[1,1]==0 && Var2_Bo_0==1 && BlockPermis==true) // Смена в регистре на противоположное значение и Смена Лица на Изнанку { Sev[1,1]=1;//Смена в регистре на противоположное значение на лице Sev[1,5]=0;//Смена в регистре на противоположное значение на изнанке lic=0;//Смена Стороны izn=1;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=2; Var1_Bo_0=0; Var1_Be_1=2; Var1_Bo_1=2; //———- Gy++; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[64]=1; kubo_3++; Text_Kubo_3=IntegerToString(kubo_3); ObjectSetString(0,obiekt504,OBJPROP_TEXT,Text_Kubo_3); } if(Sev[1,1]==1 && Var2_Bo_0==1 && BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку { Sev[1,5]=0; lic=0;//Смена Стороны izn=1;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=2; Var1_Bo_0=0; Var1_Be_1=2; Var1_Bo_1=2; //———- Gy++; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[65]=1; kubo_3++; Text_Kubo_3=IntegerToString(kubo_3); ObjectSetString(0,obiekt504,OBJPROP_TEXT,Text_Kubo_3); } }// lic==1 фин if(izn==1 && Var1_Be_0==0 && Var2_Bo_0==1) //Праверка регистра Bo_0 Изнанки { //1/1 Be_0 && Bo_0 bool BlockPermis=true; // Сравнение состояния 2 регистров лица и изнанки по поданному значению if(Sev[1,5]==0 && Var2_Bo_0==1 && BlockPermis==true) // Смена в регистре на противоположное значение и Смена Лица на Изнанку { Sev[1,5]=1;//Смена в регистре на противоположное значение на лице Sev[1,1]=0;//Смена в регистре на противоположное значение на изнанке lic=1;//Смена Стороны izn=0;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=2; Var1_Bo_0=0; Var1_Be_1=2; Var1_Bo_1=2; //———- Gy++; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[66]=1; kubo_5++; Text_Kubo_5=IntegerToString(kubo_5); ObjectSetString(0,obiekt506,OBJPROP_TEXT,Text_Kubo_5); } if(Sev[1,5]==1 && Var2_Bo_0==1 && BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку { Sev[1,1]=0; lic=1;//Смена Стороны izn=0;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=2; Var1_Bo_0=0; Var1_Be_1=2; Var1_Bo_1=2; //———- Gy++; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[67]=1; kubo_5++; Text_Kubo_5=IntegerToString(kubo_5); ObjectSetString(0,obiekt506,OBJPROP_TEXT,Text_Kubo_5); } }// izn==1 фин //Подача значения на Лицо номер 2 //1 Bo_0 && Be_0 if(lic==1 && Var1_Bo_0==0 && Var2_Be_0==1) //Праверка регистра Be_0 Лица { bool BlockPermis=true; // Сравнение состояния 2 регистров лица и изнанки по поданному значению if(Sev[1,4]==0 && Var2_Be_0==1 && BlockPermis==true) // Смена в регистре на противоположное значение и Смена Лица на Изнанку { Sev[1,4]=1;//Смена в регистре на противоположное значение на лице Sev[1,8]=0;//Смена в регистре на противоположное значение на изнанке lic=0;//Смена Стороны izn=1;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=0; Var1_Bo_0=2; Var1_Be_1=2; Var1_Bo_1=2; //———- Gy–; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[68]=1; kubo_2++; Text_Kubo_2=IntegerToString(kubo_2); ObjectSetString(0,obiekt503,OBJPROP_TEXT,Text_Kubo_2); } if(Sev[1,4]==1 && Var2_Be_0==1 && BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку { Sev[1,8]=0; lic=0;//Смена Стороны izn=1;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=0; Var1_Bo_0=2; Var1_Be_1=2; Var1_Bo_1=2; //———- Gy–; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[69]=1; kubo_2++; Text_Kubo_2=IntegerToString(kubo_2); ObjectSetString(0,obiekt503,OBJPROP_TEXT,Text_Kubo_2); } }// lic==1 фин if(izn==1 && Var1_Bo_0==0 && Var2_Be_0==1) //Праверка регистра Be_0 Изнанки { //1/1 Bo_0 && Be_0 bool BlockPermis=true; // Сравнение состояния 2 регистров лица и изнанки по поданному значению if(Sev[1,8]==0 && Var2_Be_0==1 && BlockPermis==true)// Смена в регистре на противоположное значение и Смена Лица на Изнанку { Sev[1,8]=1;//Смена в регистре на противоположное значение на лице Sev[1,4]=0;//Смена в регистре на противоположное значение на изнанке lic=1;//Смена Стороны izn=0;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=0; Var1_Bo_0=2; Var1_Be_1=2; Var1_Bo_1=2; //———- Gy–; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[70]=1; kubo_8++; Text_Kubo_8=IntegerToString(kubo_8); ObjectSetString(0,obiekt509,OBJPROP_TEXT,Text_Kubo_8); } if(Sev[1,8]==1 && Var2_Be_0==1 && BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку { Sev[1,4]=0; lic=1;//Смена Стороны izn=0;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=0; Var1_Bo_0=2; Var1_Be_1=2; Var1_Bo_1=2; //———- Gy–; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[71]=1; kubo_8++; Text_Kubo_8=IntegerToString(kubo_8); ObjectSetString(0,obiekt509,OBJPROP_TEXT,Text_Kubo_8); } }// izn==1 фин //Подача значения на Лицо номер 3 //1 Be_1 && Bo_1 if(lic==1 && Var1_Be_1==0 && Var2_Bo_1==1) //Праверка регистра Bo_1 Лица { bool BlockPermis=true; // Сравнение состояния 2 регистров лица и изнанки по поданному значению if(Sev[1,3]==0 && Var2_Bo_1==1 && BlockPermis==true) // Смена в регистре на противоположное значение и Смена Лица на Изнанку { Sev[1,3]=1;//Смена в регистре на противоположное значение на лице Sev[1,7]=0;//Смена в регистре на противоположное значение на изнанке lic=0;//Смена Стороны izn=1;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=2; Var1_Bo_0=2; Var1_Be_1=2; Var1_Bo_1=0; //———- Gy–; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[72]=1; kubo_1++; Text_Kubo_1=IntegerToString(kubo_1); ObjectSetString(0,obiekt502,OBJPROP_TEXT,Text_Kubo_1); } if(Sev[1,3]==1 && Var2_Bo_1==1 && BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку { Sev[1,7]=0; lic=0;//Смена Стороны izn=1;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=2; Var1_Bo_0=2; Var1_Be_1=2; Var1_Bo_1=0; //———- Gy–; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[73]=1; kubo_1++; Text_Kubo_1=IntegerToString(kubo_1); ObjectSetString(0,obiekt502,OBJPROP_TEXT,Text_Kubo_1); } }// lic==1 фин if(izn==1 && Var1_Be_1==0 && Var2_Bo_1==1) //Праверка регистра Bo_1 Изнанки { //1/1 Be_1 && Bo_1 bool BlockPermis=true; // Сравнение состояния 2 регистров лица и изнанки по поданному значению if(Sev[1,7]==0 && Var2_Bo_1==1 && BlockPermis==true)// Смена в регистре на противоположное значение и Смена Лица на Изнанку { Sev[1,7]=1;//Смена в регистре на противоположное значение на лице Sev[1,3]=0;//Смена в регистре на противоположное значение на изнанке lic=1;//Смена Стороны izn=0;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=2; Var1_Bo_0=2; Var1_Be_1=2; Var1_Bo_1=0; //———- Gy–; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[74]=1; kubo_7++; Text_Kubo_7=IntegerToString(kubo_7); ObjectSetString(0,obiekt508,OBJPROP_TEXT,Text_Kubo_7); } if(Sev[1,7]==1 && Var2_Bo_1==1 && BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку { Sev[1,3]=0; lic=1;//Смена Стороны izn=0;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=2; Var1_Bo_0=2; Var1_Be_1=2; Var1_Bo_1=0; //———- Gy–; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[75]=1; kubo_7++; Text_Kubo_7=IntegerToString(kubo_7); ObjectSetString(0,obiekt508,OBJPROP_TEXT,Text_Kubo_7); } }// izn==1 фин //Подача значения на Лицо номер 4 //1 Bo_1 && Be_1 if(lic==1 && Var1_Bo_1==0 && Var2_Be_1==1) //Праверка регистра Be_1 Лица { bool BlockPermis=true; // Сравнение состояния 2 регистров лица и изнанки по поданному значению if(Sev[1,2]==0 && Var2_Be_1==1 && BlockPermis==true) // Смена в регистре на противоположное значение и Смена Лица на Изнанку { Sev[1,2]=1;//ПРОВЕРИТъ Должно быть 1,4 Смена в регистре на противоположное значение на лице Sev[1,6]=0;//Смена в регистре на противоположное значение на изнанке lic=0;//Смена Стороны izn=1;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=2; Var1_Bo_0=2; Var1_Be_1=0; Var1_Bo_1=2; //———- Gy++; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[76]=1; kubo_4++; Text_Kubo_4=IntegerToString(kubo_4); ObjectSetString(0,obiekt505,OBJPROP_TEXT,Text_Kubo_4); } if(Sev[1,2]==1 && Var2_Be_1==1 && BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку { Sev[1,6]=0; lic=0;//Смена Стороны izn=1;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=2; Var1_Bo_0=2; Var1_Be_1=0; Var1_Bo_1=2; //———- Gy++; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[77]=1; kubo_4++; Text_Kubo_4=IntegerToString(kubo_4); ObjectSetString(0,obiekt505,OBJPROP_TEXT,Text_Kubo_4); } }// lic==1 фин if(izn==1 && Var1_Bo_1==0 && Var2_Be_1==1) //Праверка регистра Be_1 Изнанки { //1/1 Bo_1 && Be_1 bool BlockPermis=true; // Сравнение состояния 2 регистров лица и изнанки по поданному значению if(Sev[1,6]==0 && Var2_Be_1==1 && BlockPermis==true)// Смена в регистре на противоположное значение и Смена Лица на Изнанку { Sev[1,6]=1;//Проверить 1,7 Смена в регистре на противоположное значение на лице Sev[1,2]=0;//Смена в регистре на противоположное значение на изнанке lic=1;//Смена Стороны izn=0;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=2; Var1_Bo_0=2; Var1_Be_1=0; Var1_Bo_1=2; //———- Gy++; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[78]=1; kubo_6++; Text_Kubo_6=IntegerToString(kubo_6); ObjectSetString(0,obiekt507,OBJPROP_TEXT,Text_Kubo_6); } if(Sev[1,6]==1 && Var2_Be_1==1 && BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку { Sev[1,2]=0; lic=1;//Смена Стороны izn=0;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=2; Var1_Bo_0=2; Var1_Be_1=0; Var1_Bo_1=2; //———- Gy++; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[79]=1; kubo_6++; Text_Kubo_6=IntegerToString(kubo_6); ObjectSetString(0,obiekt507,OBJPROP_TEXT,Text_Kubo_6); } }// izn==1 фин }// Zapad фин //___________________________________ // Поведение Восток if(Vost_1==1) { //Подача значения на Лицо номер 1 //1 Be_0 && Bo_0 if(lic==1 && Var1_Be_0==0 && Var2_Bo_0==1) //Праверка регистра Bo_0 Лица { bool BlockPermis=true; // Сравнение состояния 2 регистров лица и изнанки по поданному значению if(Sev[1,3]==0 && Var2_Bo_0==1 && BlockPermis==true) // Смена в регистре на противоположное значение и Смена Лица на Изнанку { Sev[1,3]=1;//Смена в регистре на противоположное значение на лице Sev[1,7]=0;//Смена в регистре на противоположное значение на изнанке lic=0;//Смена Стороны izn=1;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=2; Var1_Bo_0=0; Var1_Be_1=2; Var1_Bo_1=2; //———- Gy–; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[96]=1; kubo_1++; Text_Kubo_1=IntegerToString(kubo_1); ObjectSetString(0,obiekt502,OBJPROP_TEXT,Text_Kubo_1); } if(Sev[1,3]==1 && Var2_Bo_0==1 && BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку { Sev[1,7]=0; lic=0;//Смена Стороны izn=1;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=2; Var1_Bo_0=0; Var1_Be_1=2; Var1_Bo_1=2; //———- Gy–; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[97]=1; kubo_1++; Text_Kubo_1=IntegerToString(kubo_1); ObjectSetString(0,obiekt502,OBJPROP_TEXT,Text_Kubo_1); } }// lic==1 фин if(izn==1 && Var1_Be_0==0 && Var2_Bo_0==1) //Праверка регистра Bo_0 Изнанки { //1/1 Be_0 && Bo_0 bool BlockPermis=true; // Сравнение состояния 2 регистров лица и изнанки по поданному значению if(Sev[1,7]==0 && Var2_Bo_0==1 && BlockPermis==true) // Смена в регистре на противоположное значение и Смена Лица на Изнанку { Sev[1,7]=1;//Смена в регистре на противоположное значение на лице Sev[1,3]=0;//Смена в регистре на противоположное значение на изнанке lic=1;//Смена Стороны izn=0;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=2; Var1_Bo_0=0; Var1_Be_1=2; Var1_Bo_1=2; //———- Gy–; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[98]=1; kubo_7++; Text_Kubo_7=IntegerToString(kubo_7); ObjectSetString(0,obiekt508,OBJPROP_TEXT,Text_Kubo_7); } if(Sev[1,7]==1 && Var2_Bo_0==1 && BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку { Sev[1,3]=0; lic=1;//Смена Стороны izn=0;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=2; Var1_Bo_0=0; Var1_Be_1=2; Var1_Bo_1=2; //———- Gy–; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[99]=1; kubo_7++; Text_Kubo_7=IntegerToString(kubo_7); ObjectSetString(0,obiekt508,OBJPROP_TEXT,Text_Kubo_7); } }// izn==1 фин //Подача значения на Лицо номер 2 //1 Bo_0 && Be_0 if(lic==1 && Var1_Bo_0==0 && Var2_Be_0==1) //Праверка регистра Be_0 Лица { bool BlockPermis=true; // Сравнение состояния 2 регистров лица и изнанки по поданному значению if(Sev[1,2]==0 && Var2_Be_0==1 && BlockPermis==true) // Смена в регистре на противоположное значение и Смена Лица на Изнанку { Sev[1,2]=1;//Смена в регистре на противоположное значение на лице Sev[1,6]=0;//Смена в регистре на противоположное значение на изнанке lic=0;//Смена Стороны izn=1;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=0; Var1_Bo_0=2; Var1_Be_1=2; Var1_Bo_1=2; //———- Gy++; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[100]=1; kubo_4++; Text_Kubo_4=IntegerToString(kubo_4); ObjectSetString(0,obiekt505,OBJPROP_TEXT,Text_Kubo_4); } if(Sev[1,2]==1 && Var2_Be_0==1 && BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку { Sev[1,6]=0; lic=0;//Смена Стороны izn=1;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=0; Var1_Bo_0=2; Var1_Be_1=2; Var1_Bo_1=2; //———- Gy++; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[101]=1; kubo_4++; Text_Kubo_4=IntegerToString(kubo_4); ObjectSetString(0,obiekt505,OBJPROP_TEXT,Text_Kubo_4); } }// lic==1 фин if(izn==1 && Var1_Bo_0==0 && Var2_Be_0==1) //Праверка регистра Be_0 Изнанки { //1/1 Bo_0 && Be_0 bool BlockPermis=true; // Сравнение состояния 2 регистров лица и изнанки по поданному значению if(Sev[1,6]==0 && Var2_Be_0==1 && BlockPermis==true)// Смена в регистре на противоположное значение и Смена Лица на Изнанку { Sev[1,6]=1;//Смена в регистре на противоположное значение на лице Sev[1,2]=0;//Смена в регистре на противоположное значение на изнанке lic=1;//Смена Стороны izn=0;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=0; Var1_Bo_0=2; Var1_Be_1=2; Var1_Bo_1=2; //———- Gy++; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[102]=1; kubo_6++; Text_Kubo_6=IntegerToString(kubo_6); ObjectSetString(0,obiekt507,OBJPROP_TEXT,Text_Kubo_6); } if(Sev[1,6]==1 && Var2_Be_0==1 && BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку { Sev[1,2]=0; lic=1;//Смена Стороны izn=0;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=0; Var1_Bo_0=2; Var1_Be_1=2; Var1_Bo_1=2; //———- Gy++; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[103]=1; kubo_6++; Text_Kubo_6=IntegerToString(kubo_6); ObjectSetString(0,obiekt507,OBJPROP_TEXT,Text_Kubo_6); } }// izn==1 фин //Подача значения на Лицо номер 3 //1 Be_1 && Bo_1 if(lic==1 && Var1_Be_1==0 && Var2_Bo_1==1) //Праверка регистра Bo_1 Лица { bool BlockPermis=true; // Сравнение состояния 2 регистров лица и изнанки по поданному значению if(Sev[1,1]==0 && Var2_Bo_1==1 && BlockPermis==true) // Смена в регистре на противоположное значение и Смена Лица на Изнанку { Sev[1,1]=1;//Смена в регистре на противоположное значение на лице Sev[1,5]=0;//Смена в регистре на противоположное значение на изнанке lic=0;//Смена Стороны izn=1;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=2; Var1_Bo_0=2; Var1_Be_1=2; Var1_Bo_1=0; //———- Gy++; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[104]=1; kubo_3++; Text_Kubo_3=IntegerToString(kubo_3); ObjectSetString(0,obiekt504,OBJPROP_TEXT,Text_Kubo_3); } if(Sev[1,1]==1 && Var2_Bo_1==1 && BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку { Sev[1,5]=0; lic=0;//Смена Стороны izn=1;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=2; Var1_Bo_0=2; Var1_Be_1=2; Var1_Bo_1=0; //———- Gy++; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[105]=1; kubo_3++; Text_Kubo_3=IntegerToString(kubo_3); ObjectSetString(0,obiekt504,OBJPROP_TEXT,Text_Kubo_3); } }// lic==1 фин if(izn==1 && Var1_Be_1==0 && Var2_Bo_1==1) //Праверка регистра Bo_1 Изнанки { //1/1 Be_1 && Bo_1 bool BlockPermis=true; // Сравнение состояния 2 регистров лица и изнанки по поданному значению if(Sev[1,5]==0 && Var2_Bo_1==1 && BlockPermis==true)// Смена в регистре на противоположное значение и Смена Лица на Изнанку { Sev[1,5]=1;//Смена в регистре на противоположное значение на лице Sev[1,1]=0;//Смена в регистре на противоположное значение на изнанке lic=1;//Смена Стороны izn=0;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=2; Var1_Bo_0=2; Var1_Be_1=2; Var1_Bo_1=0; //———- Gy++; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[106]=1; kubo_5++; Text_Kubo_5=IntegerToString(kubo_5); ObjectSetString(0,obiekt506,OBJPROP_TEXT,Text_Kubo_5); } if(Sev[1,5]==1 && Var2_Bo_1==1 && BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку { Sev[1,1]=0; lic=1;//Смена Стороны izn=0;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=2; Var1_Bo_0=2; Var1_Be_1=2; Var1_Bo_1=0; //———- Gy++; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[107]=1; kubo_5++; Text_Kubo_5=IntegerToString(kubo_5); ObjectSetString(0,obiekt506,OBJPROP_TEXT,Text_Kubo_5); } }// izn==1 фин //Подача значения на Лицо номер 4 //1 Bo_1 && Be_1 if(lic==1 && Var1_Bo_1==0 && Var2_Be_1==1) //Праверка регистра Be_1 Лица { bool BlockPermis=true; // Сравнение состояния 2 регистров лица и изнанки по поданному значению if(Sev[1,4]==0 && Var2_Be_1==1 && BlockPermis==true) // Смена в регистре на противоположное значение и Смена Лица на Изнанку { Sev[1,4]=1;//Смена в регистре на противоположное значение на лице Sev[1,8]=0;//Смена в регистре на противоположное значение на изнанке lic=0;//Смена Стороны izn=1;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=2; Var1_Bo_0=2; Var1_Be_1=0; Var1_Bo_1=2; //———- Gy–; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[108]=1; kubo_2++; Text_Kubo_2=IntegerToString(kubo_2); ObjectSetString(0,obiekt503,OBJPROP_TEXT,Text_Kubo_2); } if(Sev[1,4]==1 && Var2_Be_1==1 && BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку { Sev[1,8]=0; lic=0;//Смена Стороны izn=1;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=2; Var1_Bo_0=2; Var1_Be_1=0; Var1_Bo_1=2; //———- Gy–; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[109]=1; kubo_2++; Text_Kubo_2=IntegerToString(kubo_2); ObjectSetString(0,obiekt503,OBJPROP_TEXT,Text_Kubo_2); } }// lic==1 фин if(izn==1 && Var1_Bo_1==0 && Var2_Be_1==1) //Праверка регистра Be_1 Изнанки { //1/1 Bo_1 && Be_1 bool BlockPermis=true; // Сравнение состояния 2 регистров лица и изнанки по поданному значению if(Sev[1,4]==0 && Var2_Be_1==1 && BlockPermis==true)// Смена в регистре на противоположное значение и Смена Лица на Изнанку { Sev[1,4]=1;//Смена в регистре на противоположное значение на лице Sev[1,8]=0;//Смена в регистре на противоположное значение на изнанке lic=1;//Смена Стороны izn=0;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=2; Var1_Bo_0=2; Var1_Be_1=0; Var1_Bo_1=2; //———- Gy–; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[110]=1; kubo_8++; Text_Kubo_8=IntegerToString(kubo_8); ObjectSetString(0,obiekt509,OBJPROP_TEXT,Text_Kubo_8); } if(Sev[1,4]==1 && Var2_Be_1==1 && BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку { Sev[1,8]=0; lic=1;//Смена Стороны izn=0;//Смена Стороны //Перераспределение разрешений переменных Var1_Be_0=2; Var1_Bo_0=2; Var1_Be_1=0; Var1_Bo_1=2; //———- Gy–; Var2_Be_0=2; Var2_Bo_0=2; Var2_Be_1=2; Var2_Bo_1=2; BlockPermis=false; errorprint2[111]=1; kubo_8++; Text_Kubo_8=IntegerToString(kubo_8); ObjectSetString(0,obiekt509,OBJPROP_TEXT,Text_Kubo_8); } }// izn==1 фин }// Vostok фин //Праверка шаг 4 string face; if(lic==1) { face=»lic»; } if(izn==1) { face=»izn»; } //—– //–Проверка на колличество входов в блоки int err2=0; for(int yk=0; yk<=149; yk++) { if(Array_Errors==true) { Print(» Index Array «,yk,» 5211″); } if(errorprint2[yk]==1) { err2++; } } string Sterr2; Sterr2=IntegerToString(err2); //+——————————————————————+ //|END Sunflower 8 bit volume feed side X calculation | //+——————————————————————+ //+——————————————————————+ //|Sunflower 8 bit volume feed side Z calculation | //+——————————————————————+ //–Вращение Оси Z if(z_Be_0==1) { z_Var2_Be_0=1; z_Var2_Bo_0=2; z_Var2_Be_1=2; z_Var2_Bo_1=2; z_Be_0=0; z_Bo_0=0; z_Be_1=0; z_Bo_1=0; } if(z_Bo_0==1) { z_Var2_Be_0=2; z_Var2_Bo_0=1; z_Var2_Be_1=2; z_Var2_Bo_1=2; z_Be_0=0; z_Bo_0=0; z_Be_1=0; z_Bo_1=0; } if(z_Be_1==1) { z_Var2_Be_1=1; z_Var2_Be_0=2; z_Var2_Bo_0=2; z_Var2_Bo_1=2; z_Be_0=0; z_Bo_0=0; z_Be_1=0; z_Bo_1=0; } if(z_Bo_1==1) { z_Var2_Bo_1=1; z_Var2_Be_0=2; z_Var2_Bo_0=2; z_Var2_Be_1=2; z_Be_0=0; z_Bo_0=0; z_Be_1=0; z_Bo_1=0; } // Варианты вращение в правильной позиции. Смена строны производится мо методу переварота страницы в книге с лева на право или с права на лево // Вращение производится базируясь на вторую переменную. После присваивания и расчёта значения из второй переменной перетекают в первую. //Перед обработкой событий нужно выявить все правила для каждого направления. //Переприсваивание значения в тойже плоскости и том же лице если выпало тоже самое значение.Пример Be_0 и Be_0 // Назначение переменной if(z_Var1_Be_0==0 && z_Var2_Be_0==1) { z_Var1_Bo_0=0; z_Var2_Be_0=1; } if(z_Var1_Be_0==2 && z_Var2_Be_0==1) { z_Var2_Be_0=1; } if(z_Var1_Bo_0==0 && z_Var2_Bo_0==1) { z_Var1_Be_0=0; z_Var2_Bo_0=1; } if(z_Var1_Bo_0==2 && z_Var2_Bo_0==1) { z_Var2_Bo_0=1; } if(z_Var1_Be_1==0 && z_Var2_Be_1==1) { z_Var1_Bo_1=0; z_Var2_Be_1=1; } if(z_Var1_Be_1==2 && z_Var2_Be_1==1) { z_Var2_Be_1=1; } if(z_Var1_Bo_1==0 && z_Var2_Bo_1==1) { z_Var1_Be_1=0; z_Var2_Bo_1=1; } if(z_Var1_Bo_1==2 && z_Var2_Bo_1==1) { z_Var2_Bo_1=1; }//CHeck ok //Print(«Step3 «,Var1_Be_0,» Var1_Be_0 «,Var1_Bo_0,» Var1_Bo_0 «,Var1_Be_1,» Var1_Be_1 «,Var1_Bo_1,» Var1_Bo_1 «); //Print(«Step4 «,Varz_Be_0,» Varz_Be_0 «,Varz_Bo_0,» Varz_Bo_0 «,Varz_Be_1,» Varz_Be_1 «,Varz_Bo_1,» Varz_Bo_1 «);ArrayInitialize(z_errorprint,0);
bool z_ChekDIr=true;//еременная разрешающая 1 раз в цикл анализиравать блок направлений по компасу
z_BlockNum=»0″;
// Правильная конфигурация Север
// 1
// Правильная конфигурация Север
// 1
if(z_sev==1 && z_Var1_Be_0==0 && z_Var2_Bo_0==1 && z_ChekDIr==true)
{
z_Sev_1=1;// разрешение на обработку события.
//Запрет для 3 направлений
z_Zap_1=0;
z_Vost_1=0;
z_Yug_1=0;
//Проверка значения направления
z_sev=1;
z_zap=0;
z_yug=0;
z_vost=0;
z_ChekDIr=false;
z_BlockNum=»S 1″;
z_errorprint[1]=1;
}
// 2
if(z_sev==1 && z_Var1_Bo_0==0 && z_Var2_Be_0==1 && z_ChekDIr==true)
{
z_Sev_1=1;// разрешение на обработку события.
//Запрет для 3 направлений
z_Zap_1=0;
z_Vost_1=0;
z_Yug_1=0;
//Проверка значения направления
z_sev=1;
z_zap=0;
z_yug=0;
z_vost=0;
z_ChekDIr=false;
z_BlockNum=»S 2″;
z_errorprint[2]=1;
}
// 3
if(z_sev==1 && z_Var1_Be_1==0 && z_Var2_Bo_1==1 && z_ChekDIr==true)
{
z_Sev_1=1;// разрешение на обработку события.
//Запрет для 3 направлений
z_Zap_1=0;
z_Vost_1=0;
z_Yug_1=0;
//Проверка значения направления
z_sev=1;
z_zap=0;
z_yug=0;
z_vost=0;
z_ChekDIr=false;
z_BlockNum=»S 3″;
z_errorprint[3]=1;
}
// 4
if(z_sev==1 && z_Var1_Bo_1==0 && z_Var2_Be_1==1 && z_ChekDIr==true)
{
z_Sev_1=1;// разрешение на обработку события.
//Запрет для 3 направлений
z_Zap_1=0;
z_Vost_1=0;
z_Yug_1=0;
//Проверка значения направления
z_sev=1;
z_zap=0;
z_yug=0;
z_vost=0;
z_ChekDIr=false;
z_BlockNum=»S 4″;
z_errorprint[4]=1;
}
// 5
// Не правильная конфигурация
if(z_sev==1 && z_Var1_Be_0==0 && z_Var2_Bo_1==1 && z_ChekDIr==true) //Смещение по регистру с Севера *| на Запад «-
{
// разрешение на обработку события.
z_Vost_1=0;
z_Sev_1=0;
z_Zap_1=0;
z_Yug_1=1;
//Проверка значения направления
z_sev=0;
z_zap=0;
z_yug=1;
z_vost=0;
z_ChekDIr=false;
z_BlockNum=»S 5″;
z_errorprint[5]=1;
z_Var1_Be_0=2;
z_Var1_Be_1=0;
//Смена Оси для правил Z
z_CheFe=1;
if(z_CheFe==1 && z_lic==1)
{
z_izn=1;
z_lic=0;
z_CheFe=0;
}
if(z_CheFe==1 && z_izn==1)
{
z_izn=0;
z_lic=1;
z_CheFe=0;
}
}
// 6
if(z_sev==1 && z_Var1_Bo_1==0 && z_Var2_Be_0==1 && z_ChekDIr==true) // Смещение по регистру с Севера *| на Запад «-
{
// разрешение на обработку события.
z_Zap_1=0;
z_Sev_1=0;
z_Vost_1=0;
z_Yug_1=1;
//Проверка значения направления
z_sev=0;
z_zap=0;
z_yug=1;
z_vost=0;
z_ChekDIr=false;
z_BlockNum=»S 6″;
z_errorprint[6]=1;
z_Var1_Bo_1=2;
z_Var1_Bo_0=0;
//Смена Оси для правил Z
z_CheFe=1;
if(z_CheFe==1 && z_lic==1)
{
z_izn=1;
z_lic=0;
z_CheFe=0;
}
if(z_CheFe==1 && z_izn==1)
{
z_izn=0;
z_lic=1;
z_CheFe=0;
}
}
// 7
if(z_sev==1 && z_Var1_Bo_0==0 && z_Var2_Be_1==1 && z_ChekDIr==true) // Смещение по регистру с Севера *| на Восток -»
{
// разрешение на обработку события.
z_Vost_1=0;
//Запрет для 3 направлений
z_Zap_1=0;
z_Sev_1=0;
z_Yug_1=1;
//Проверка значения направления
z_sev=0;
z_zap=0;
z_yug=1;
z_vost=0;
z_ChekDIr=false;
z_BlockNum=»S 7″;
z_errorprint[7]=1;
z_Var1_Bo_0=2;
z_Var1_Bo_1=0;
//Смена Оси для правил Z
z_CheFe=1;
if(z_CheFe==1 && z_lic==1)
{
z_izn=1;
z_lic=0;
z_CheFe=0;
}
if(z_CheFe==1 && z_izn==1)
{
z_izn=0;
z_lic=1;
z_CheFe=0;
}
}
// 8
if(z_sev==1 && z_Var1_Be_1==0 && z_Var2_Bo_0==1 && z_ChekDIr==true) // Смещение по регистру с Севера *| на Восток -»
{
// разрешение на обработку события.
z_Vost_1=0;
//Запрет для 3 направлений
z_Zap_1=0;
z_Sev_1=0;
z_Yug_1=1;
//Проверка значения направления
z_sev=0;
z_zap=0;
z_yug=1;
z_vost=0;
z_ChekDIr=false;
z_BlockNum=»S 8″;
z_errorprint[8]=1;
z_Var1_Be_1=2;
z_Var1_Be_0=0;
//Смена Оси для правил Z
z_CheFe=1;
if(z_CheFe==1 && z_lic==1)
{
z_izn=1;
z_lic=0;
z_CheFe=0;
}
if(z_CheFe==1 && z_izn==1)
{
z_izn=0;
z_lic=1;
z_CheFe=0;
}
}
// 9
if(z_sev==1 && z_Var1_Bo_0==0 && z_Var2_Bo_1==1 && z_ChekDIr==true) // Смещение по регистру с Севера *| на Юг .|
{
z_Yug_1=0;
// разрешение на обработку события.
z_Sev_1=0;
//Запрет для 3 направлений
z_Zap_1=1;
z_Vost_1=0;
//Проверка значения направления
z_sev=0;
z_zap=1;
z_yug=0;
z_vost=0;
z_ChekDIr=false;
z_BlockNum=»S 9″;
z_errorprint[9]=1;
//Смена Оси для правил Z
z_CheFe=1;
if(z_CheFe==1 && z_lic==1)
{
z_izn=1;
z_lic=0;
z_CheFe=0;
}
if(z_CheFe==1 && z_izn==1)
{
z_izn=0;
z_lic=1;
z_CheFe=0;
}
}
// 10
if(z_sev==1 && z_Var1_Bo_1==0 && z_Var2_Bo_0==1 && z_ChekDIr==true) // Смещение по регистру с Севера *| на Юг .|
{
z_Yug_1=0;
// разрешение на обработку события.
z_Sev_1=0;
//Запрет для 3 направлений
z_Zap_1=1;
z_Vost_1=0;
//Var1_Be_1=0;
//Varz_Bo_1=1;
//Проверка значения направления
z_sev=0;
z_zap=1;
z_yug=0;
z_vost=0;
z_ChekDIr=false;
z_BlockNum=»S 10″;
z_errorprint[10]=1;
z_Var1_Bo_1=2;
z_Var1_Be_0=0;
//Смена Оси для правил Z
z_CheFe=1;
if(z_CheFe==1 && z_lic==1)
{
z_izn=1;
z_lic=0;
z_CheFe=0;
}
if(z_CheFe==1 && z_izn==1)
{
z_izn=0;
z_lic=1;
z_CheFe=0;
}
}
// 11
if(z_sev==1 && z_Var1_Be_0==0 && z_Var2_Be_1==1 && z_ChekDIr==true) // Смещение по регистру с Севера *| на Юг .|
{
z_Yug_1=0;
// разрешение на обработку события.
z_Sev_1=0;
//Запрет для 3 направлений
z_Zap_1=0;
z_Vost_1=1;
//Проверка значения направления
z_sev=0;
z_zap=0;
z_yug=0;
z_vost=1;
z_ChekDIr=false;
z_BlockNum=»S 11″;
z_errorprint[11]=1;
z_Var1_Be_0=2;
z_Var1_Bo_1=0;
//Смена Оси для правил Z
z_CheFe=1;
if(z_CheFe==1 && z_lic==1)
{
z_izn=1;
z_lic=0;
z_CheFe=0;
}
if(z_CheFe==1 && z_izn==1)
{
z_izn=0;
z_lic=1;
z_CheFe=0;
}
}
// 12
if(z_sev==1 && z_Var1_Be_1==0 && z_Var2_Be_0==1 && z_ChekDIr==true) // Смещение по регистру с Севера *| на Юг .|
{
z_Yug_1=0;
// разрешение на обработку события.
z_Sev_1=0;
//Запрет для 3 направлений
z_Zap_1=0;
z_Vost_1=1;
//Проверка значения направления
z_sev=0;
z_zap=0;
z_yug=0;
z_vost=1;
z_ChekDIr=false;
z_BlockNum=»S 12″;
z_errorprint[12]=1;
z_Var1_Be_1=2;
z_Var1_Bo_0=0;
//Смена Оси для правил Z
z_CheFe=1;
if(z_CheFe==1 && z_lic==1)
{
z_izn=1;
z_lic=0;
z_CheFe=0;
}
if(z_CheFe==1 && z_izn==1)
{
z_izn=0;
z_lic=1;
z_CheFe=0;
}
}
//______________________
// Правильная конфигурация Запад
if(z_zap==1 && z_Var1_Be_0==0 && z_Var2_Bo_0==1 && z_ChekDIr==true)
{
z_Zap_1=1;// разрешение на обработку события.
z_Sev_1=0;
z_Vost_1=0;
z_Yug_1=0;
//Проверка значения направления
z_sev=0;
z_zap=1;
z_yug=0;
z_vost=0;
z_ChekDIr=false;
z_BlockNum=»Z 1″;
z_errorprint[13]=1;
}
// 2
if(z_zap==1 && z_Var1_Bo_0==0 && z_Var2_Be_0==1 && z_ChekDIr==true)
{
z_Zap_1=1;// разрешение на обработку события.
z_Sev_1=0;
z_Vost_1=0;
z_Yug_1=0;
//Проверка значения направления
z_sev=0;
z_zap=1;
z_yug=0;
z_vost=0;
z_ChekDIr=false;
z_BlockNum=»Z 2″;
z_errorprint[14]=1;
}
// 3
if(z_zap==1 && z_Var1_Be_1==0 && z_Var2_Bo_1==1 && z_ChekDIr==true)
{
z_Zap_1=1;// разрешение на обработку события.
z_Sev_1=0;
z_Vost_1=0;
z_Yug_1=0;
//Проверка значения направления
z_sev=0;
z_zap=1;
z_yug=0;
z_vost=0;
z_ChekDIr=false;
z_BlockNum=»Z 3″;
z_errorprint[5]=1;
}
// 4
if(z_zap==1 && z_Var1_Bo_1==0 && z_Var2_Be_1==1 && z_ChekDIr==true)
{
z_Zap_1=1;// разрешение на обработку события.
z_Sev_1=0;
z_Vost_1=0;
z_Yug_1=0;
//Проверка значения направления
z_sev=0;
z_zap=1;
z_yug=0;
z_vost=0;
z_ChekDIr=false;
z_BlockNum=»Z 4″;
z_errorprint[16]=1;
}
// 5
// Не правильная конфигурация
if(z_zap==1 && z_Var1_Be_0==0 && z_Var2_Bo_1==1 && z_ChekDIr==true) //Смещение по регистру с Запада «- на Эг |. Смещение против часовой стрелки.
{
// разрешение на обработку события.
z_Yug_1=0;
//Запрет для 3 направлений
z_Zap_1=0;
z_Vost_1=1;
z_Sev_1=0;
//Проверка значения направления
z_sev=0;
z_zap=0;
z_yug=0;
z_vost=1;
z_ChekDIr=false;
z_BlockNum=»Z 5″;
z_errorprint[17]=1;
z_Var1_Be_0=2;
z_Var1_Be_1=0;
//Смена Оси для правил Z
z_CheFe=1;
if(z_CheFe==1 && z_lic==1)
{
z_izn=1;
z_lic=0;
z_CheFe=0;
}
if(z_CheFe==1 && z_izn==1)
{
z_izn=0;
z_lic=1;
z_CheFe=0;
}
}
// 6
if(z_zap==1 && z_Var1_Bo_1==0 && z_Var2_Be_0==1 && z_ChekDIr==true) //Смещение по регистру с Запада «- на Эг |. Смещение против часовой стрелки.
{
// разрешение на обработку события.
z_Sev_1=0;
//Запрет для 3 направлений
z_Zap_1=0;
z_Vost_1=1;
z_Yug_1=0;
//Проверка значения направления
z_sev=0;
z_zap=0;
z_yug=0;
z_vost=1;
z_ChekDIr=false;
z_BlockNum=»Z 6″;
z_errorprint[18]=1;
z_Var1_Bo_1=2;
z_Var1_Bo_0=0;
//Смена Оси для правил Z
z_CheFe=1;
if(z_CheFe==1 && z_lic==1)
{
z_izn=1;
z_lic=0;
z_CheFe=0;
}
if(z_CheFe==1 && z_izn==1)
{
z_izn=0;
z_lic=1;
z_CheFe=0;
}
}
// 7
if(z_zap==1 && z_Var1_Bo_0==0 && z_Var2_Be_1==1 && z_ChekDIr==true) //Смещение по регистру с Запада «- на Севера *| Смещение по часовой стрелке
{
// разрешение на обработку события.
z_Sev_1=0;
//Запрет для 3 направлений
z_Zap_1=0;
z_Vost_1=1;
z_Yug_1=0;
//Проверка значения направления
z_sev=0;
z_zap=0;
z_yug=0;
z_vost=1;
z_ChekDIr=false;
z_BlockNum=»Z 7″;
z_errorprint[19]=1;
z_Var1_Bo_0=2;
z_Var1_Bo_1=0;
//Смена Оси для правил Z
z_CheFe=1;
if(z_CheFe==1 && z_lic==1)
{
z_izn=1;
z_lic=0;
z_CheFe=0;
}
if(z_CheFe==1 && z_izn==1)
{
z_izn=0;
z_lic=1;
z_CheFe=0;
}
}
// 8
if(z_zap==1 && z_Var1_Be_1==0 && z_Var2_Bo_0==1 && z_ChekDIr==true) //Смещение по регистру с Запада «- на Севера *| Смещение по часовой стрелке
{
// разрешение на обработку события.
z_Yug_1=0;
//Запрет для 3 направлений
z_Zap_1=0;
z_Vost_1=1;
z_Sev_1=0;
//Varz_Be_0=1;
//Проверка значения направления
z_sev=0;
z_zap=0;
z_yug=0;
z_vost=1;
z_ChekDIr=false;
z_BlockNum=»Z 8″;
z_errorprint[20]=1;
z_Var1_Be_1=2;
z_Var1_Be_0=0;
//Смена Оси для правил Z
z_CheFe=1;
if(z_CheFe==1 && z_lic==1)
{
z_izn=1;
z_lic=0;
z_CheFe=0;
}
if(z_CheFe==1 && z_izn==1)
{
z_izn=0;
z_lic=1;
z_CheFe=0;
}
}
// 9
if(z_zap==1 && z_Var1_Bo_0==0 && z_Var2_Bo_1==1 && z_ChekDIr==true) //Смещение по регистру с Запада «- на ВОсток -» Смещение 180 градусов
{
z_Vost_1=0;
// разрешение на обработку события.
z_Yug_1=0;
//Запрет для 3 направлений
z_Sev_1=1;
z_Zap_1=0;
//Проверка значения направления
z_sev=1;
z_zap=0;
z_yug=0;
z_vost=0;
z_ChekDIr=false;
z_BlockNum=»Z 9″;
z_errorprint[21]=1;
z_Var1_Bo_0=2;
z_Var1_Be_1=0;
//Смена Оси для правил Z
z_CheFe=1;
if(z_CheFe==1 && z_lic==1)
{
z_izn=1;
z_lic=0;
z_CheFe=0;
}
if(z_CheFe==1 && z_izn==1)
{
z_izn=0;
z_lic=1;
z_CheFe=0;
}
}
// 10
if(z_zap==1 && z_Var1_Bo_1==0 && z_Var2_Bo_0==1 && z_ChekDIr==true) //Смещение по регистру с Запада «- на ВОсток -» Смещение 180 градусов
{
z_Vost_1=0;
// разрешение на обработку события.
z_Zap_1=0;
//Запрет для 3 направлений
z_Sev_1=1;
z_Yug_1=0;
//Проверка значения направления
z_sev=1;
z_zap=0;
z_yug=0;
z_vost=0;
z_ChekDIr=false;
z_BlockNum=»Z 10″;
z_errorprint[22]=1;
z_Var1_Bo_1=2;
z_Var1_Be_0=0;
//Смена Оси для правил Z
z_CheFe=1;
if(z_CheFe==1 && z_lic==1)
{
z_izn=1;
z_lic=0;
z_CheFe=0;
}
if(z_CheFe==1 && z_izn==1)
{
z_izn=0;
z_lic=1;
z_CheFe=0;
}
}
// 11
if(z_zap==1 && z_Var1_Be_0==0 && z_Var2_Be_1==1 && z_ChekDIr==true) //Смещение по регистру с Запада «- на ВОсток -» Смещение 180 градусов
{
z_Vost_1=0;
// разрешение на обработку события.
z_Zap_1=0;
//Запрет для 3 направлений
z_Sev_1=0;
z_Yug_1=1;
//Проверка значения направления
z_sev=0;
z_zap=0;
z_yug=1;
z_vost=0;
z_ChekDIr=false;
z_BlockNum=»Z 11″;
z_errorprint[23]=1;
z_Var1_Be_0=2;
z_Var1_Bo_1=0;
//Смена Оси для правил Z
z_CheFe=1;
if(z_CheFe==1 && z_lic==1)
{
z_izn=1;
z_lic=0;
z_CheFe=0;
}
if(z_CheFe==1 && z_izn==1)
{
z_izn=0;
z_lic=1;
z_CheFe=0;
}
}
// 12
if(z_zap==1 && z_Var1_Be_1==0 && z_Var2_Be_0==1 && z_ChekDIr==true) //Смещение по регистру с Запада «- на ВОсток -» Смещение 180 градусов
{
z_Vost_1=0;
// разрешение на обработку события.
z_Zap_1=0;
//Запрет для 3 направлений
z_Sev_1=0;
z_Yug_1=1;
//Проверка значения направления
z_sev=0;
z_zap=0;
z_yug=1;
z_vost=0;
z_ChekDIr=false;
z_BlockNum=»Z 12″;
z_errorprint[24]=1;
z_Var1_Be_1=2;
z_Var1_Bo_0=0;
//Смена Оси для правил Z
z_CheFe=1;
if(z_CheFe==1 && z_lic==1)
{
z_izn=1;
z_lic=0;
z_CheFe=0;
}
if(z_CheFe==1 && z_izn==1)
{
z_izn=0;
z_lic=1;
z_CheFe=0;
}
}
//______________________
// Правильная конфигурация Восток
if(z_vost==1 && z_Var1_Be_0==0 && z_Var2_Bo_0==1 && z_ChekDIr==true)
{
z_Vost_1=1;// разрешение на обработку события.
//Запрет для 3 направлений
z_Zap_1=0;
z_Sev_1=0;
z_Yug_1=0;
//Проверка значения направления
z_sev=0;
z_zap=0;
z_yug=0;
z_vost=1;
z_ChekDIr=false;
z_BlockNum=»V 1″;
z_errorprint[25]=1;
}
// 2
if(z_vost==1 && z_Var1_Bo_0==0 && z_Var2_Be_0==1 && z_ChekDIr==true)
{
z_Vost_1=1;// разрешение на обработку события.
//Запрет для 3 направлений
z_Zap_1=0;
z_Sev_1=0;
z_Yug_1=0;
//Проверка значения направления
z_sev=0;
z_zap=0;
z_yug=0;
z_vost=1;
z_ChekDIr=false;
z_BlockNum=»V 2″;
z_errorprint[26]=1;
}
// 3
if(z_vost==1 && z_Var1_Be_1==0 && z_Var2_Bo_1==1 && z_ChekDIr==true)
{
z_Vost_1=1;// разрешение на обработку события.
//Запрет для 3 направлений
z_Zap_1=0;
z_Sev_1=0;
z_Yug_1=0;
//Проверка значения направления
z_sev=0;
z_zap=0;
z_yug=0;
z_vost=1;
z_ChekDIr=false;
z_BlockNum=»V 3″;
z_errorprint[27]=1;
}
// 4
if(z_vost==1 && z_Var1_Bo_1==0 && z_Var2_Be_1==1 && z_ChekDIr==true)
{
z_Vost_1=1;// разрешение на обработку события.
//Запрет для 3 направлений
z_Zap_1=0;
z_Sev_1=0;
z_Yug_1=0;
//Проверка значения направления
z_sev=0;
z_zap=0;
z_yug=0;
z_vost=1;
z_ChekDIr=false;
z_BlockNum=»V 4″;
z_errorprint[28]=1;
}
// 5
// Не правильная конфигурация
if(z_vost==1 && z_Var1_Be_0==0 && z_Var2_Bo_1==1 && z_ChekDIr==true) //Смещение по регистру с Востока -» на Север *| . 9 часов
{
// разрешение на обработку события.
z_Sev_1=0;
//Запрет для 3 направлений
z_Zap_1=1;
z_Vost_1=0;
z_Yug_1=0;
//Проверка значения направления
z_sev=0;
z_zap=1;
z_yug=0;
z_vost=0;
z_ChekDIr=false;
z_BlockNum=»V 5″;
z_errorprint[29]=1;
z_Var1_Be_0=2;
z_Var1_Be_1=0;
//Смена Оси для правил Z
z_CheFe=1;
if(z_CheFe==1 && z_lic==1)
{
z_izn=1;
z_lic=0;
z_CheFe=0;
}
if(z_CheFe==1 && z_izn==1)
{
z_izn=0;
z_lic=1;
z_CheFe=0;
}
}
// 6
if(z_vost==1 && z_Var1_Bo_1==0 && z_Var2_Be_0==1 && z_ChekDIr==true) //Смещение по регистру с Востока -» на Север *| 9 часов
{
// разрешение на обработку события.
z_Sev_1=0;
//Запрет для 3 направлений
z_Zap_1=1;
z_Vost_1=0;
z_Yug_1=0;
//Проверка значения направления
z_sev=0;
z_zap=1;
z_yug=0;
z_vost=0;
z_ChekDIr=false;
z_BlockNum=»V 6″;
z_errorprint[30]=1;
z_Var1_Bo_1=2;
z_Var1_Bo_0=0;
//Смена Оси для правил Z
z_CheFe=1;
if(z_CheFe==1 && z_lic==1)
{
z_izn=1;
z_lic=0;
z_CheFe=0;
}
if(z_CheFe==1 && z_izn==1)
{
z_izn=0;
z_lic=1;
z_CheFe=0;
}
}
// 7
if(z_vost==1 && z_Var1_Bo_0==0 && z_Var2_Be_1==1 && z_ChekDIr==true) // Смещение по регистру с Востока -» на Юг .| 3 часа
{
// разрешение на обработку события.
z_Sev_1=0;
//Запрет для 3 направлений
z_Zap_1=1;
z_Vost_1=0;
z_Yug_1=0;
//Проверка значения направления
z_sev=0;
z_zap=1;
z_yug=0;
z_vost=0;
z_ChekDIr=false;
z_BlockNum=»V 7″;
z_errorprint[31]=1;
z_Var1_Bo_0=2;
z_Var1_Bo_1=0;
//Смена Оси для правил Z
z_CheFe=1;
if(z_CheFe==1 && z_lic==1)
{
z_izn=1;
z_lic=0;
z_CheFe=0;
}
if(z_CheFe==1 && z_izn==1)
{
z_izn=0;
z_lic=1;
z_CheFe=0;
}
}
// 8
if(z_vost==1 && z_Var1_Be_1==0 && z_Var2_Bo_0==1 && z_ChekDIr==true) // Смещение по регистру с Востока -» на Юг .| 3 часа
{
// разрешение на обработку события.
z_Yug_1=0;
//Запрет для 3 направлений
z_Zap_1=1;
z_Vost_1=0;
z_Sev_1=0;
//Проверка значения направления
z_sev=0;
z_zap=1;
z_yug=0;
z_vost=0;
z_ChekDIr=false;
z_BlockNum=»V 8″;
z_errorprint[32]=1;
z_Var1_Be_1=2;
z_Var1_Be_0=0;
//Смена Оси для правил Z
z_CheFe=1;
if(z_CheFe==1 && z_lic==1)
{
z_izn=1;
z_lic=0;
z_CheFe=0;
}
if(z_CheFe==1 && z_izn==1)
{
z_izn=0;
z_lic=1;
z_CheFe=0;
}
}
// 9
if(z_vost==1 && z_Var1_Bo_0==0 && z_Var2_Bo_1==1 && z_ChekDIr==true) // Смещение по регистру с Востока -» на Запад «- 6 часов
{
z_Zap_1=0;
// разрешение на обработку события.
z_Yug_1=0;
//Запрет для 3 направлений
z_Sev_1=1;
z_Vost_1=0;
//Проверка значения направления
z_sev=1;
z_zap=0;
z_yug=0;
z_vost=0;
z_ChekDIr=false;
z_BlockNum=»V 9″;
z_errorprint[33]=1;
z_Var1_Bo_0=2;
z_Var1_Be_1=0;
//Смена Оси для правил Z
z_CheFe=1;
if(z_CheFe==1 && z_lic==1)
{
z_izn=1;
z_lic=0;
z_CheFe=0;
}
if(z_CheFe==1 && z_izn==1)
{
z_izn=0;
z_lic=1;
z_CheFe=0;
}
}
// 10
if(z_vost==1 && z_Var1_Bo_1==0 && z_Var2_Bo_0==1 && z_ChekDIr==true) // Смещение по регистру с Востока -» на Запад «- 6 часов
{
z_Zap_1=0;
// разрешение на обработку события.
z_Yug_1=0;
//Запрет для 3 направлений
z_Sev_1=1;
z_Vost_1=0;
//Проверка значения направления
z_sev=1;
z_zap=0;
z_yug=0;
z_vost=0;
z_ChekDIr=false;
z_BlockNum=»V 10″;
z_errorprint[34]=1;
z_Var1_Bo_1=2;
z_Var1_Be_0=0;
//Смена Оси для правил Z
z_CheFe=1;
if(z_CheFe==1 && z_lic==1)
{
z_izn=1;
z_lic=0;
z_CheFe=0;
}
if(z_CheFe==1 && z_izn==1)
{
z_izn=0;
z_lic=1;
z_CheFe=0;
}
}
// 11
if(z_vost==1 && z_Var1_Be_0==0 && z_Var2_Be_1==1 && z_ChekDIr==true) // Смещение по регистру с Востока -» на Запад «- 6 часов
{
z_Zap_1=0;
// разрешение на обработку события.
z_Vost_1=0;
//Запрет для 3 направлений
z_Sev_1=0;
z_Yug_1=1;
//Проверка значения направления
z_sev=0;
z_zap=0;
z_yug=1;
z_vost=0;
z_ChekDIr=false;
z_BlockNum=»V 11″;
z_errorprint[35]=1;
z_Var1_Be_0=2;
z_Var1_Bo_1=0;
//Смена Оси для правил Z
z_CheFe=1;
if(z_CheFe==1 && z_lic==1)
{
z_izn=1;
z_lic=0;
z_CheFe=0;
}
if(z_CheFe==1 && z_izn==1)
{
z_izn=0;
z_lic=1;
z_CheFe=0;
}
}
// 12
if(z_vost==1 && z_Var1_Be_1==0 && z_Var2_Be_0==1 && z_ChekDIr==true) // Смещение по регистру с Востока -» на Запад «- 6 часов
{
z_Zap_1=0;
// разрешение на обработку события.
z_Vost_1=0;
//Запрет для 3 направлений
z_Sev_1=0;
z_Yug_1=1;
//Проверка значения направления
z_sev=0;
z_zap=0;
z_yug=1;
z_vost=0;
z_ChekDIr=false;
z_BlockNum=»V 12″;
z_errorprint[36]=1;
z_Var1_Be_1=2;
z_Var1_Bo_0=0;
//Смена Оси для правил Z
z_CheFe=1;
if(z_CheFe==1 && z_lic==1)
{
z_izn=1;
z_lic=0;
z_CheFe=0;
}
if(z_CheFe==1 && z_izn==1)
{
z_izn=0;
z_lic=1;
z_CheFe=0;
}
}
//______________________
// Правильная конфигурация Юг
// 1
if(z_yug==1 && z_Var1_Be_0==0 && z_Var2_Bo_0==1 && z_ChekDIr==true)
{
z_Yug_1=1;// разрешение на обработку события.
//Запрет для 3 направлений
z_Zap_1=0;
z_Vost_1=0;
z_Sev_1=0;
//Проверка значения направления
z_sev=0;
z_zap=0;
z_yug=1;
z_vost=0;
z_ChekDIr=false;
z_BlockNum=»Y 1″;
z_errorprint[37]=1;
}
// 2
if(z_yug==1 && z_Var1_Bo_0==0 && z_Var2_Be_0==1 && z_ChekDIr==true)
{
z_Yug_1=1;// разрешение на обработку события.
//Запрет для 3 направлений
z_Zap_1=0;
z_Vost_1=0;
z_Sev_1=0;
//Проверка значения направления
z_sev=0;
z_zap=0;
z_yug=1;
z_vost=0;
z_ChekDIr=false;
z_BlockNum=»Y 2″;
z_errorprint[38]=1;
}
// 3
if(z_yug==1 && z_Var1_Be_1==0 && z_Var2_Bo_1==1 && z_ChekDIr==true)
{
z_Yug_1=1;// разрешение на обработку события.
//Запрет для 3 направлений
z_Zap_1=0;
z_Vost_1=0;
z_Sev_1=0;
//Проверка значения направления
z_sev=0;
z_zap=0;
z_yug=1;
z_vost=0;
z_ChekDIr=false;
z_BlockNum=»Y 3″;
z_errorprint[39]=1;
}
// 4
if(z_yug==1 && z_Var1_Bo_1==0 && z_Var2_Be_1==1 && z_ChekDIr==true)
{
z_Yug_1=1;// разрешение на обработку события.
//Запрет для 3 направлений
z_Zap_1=0;
z_Vost_1=0;
z_Sev_1=0;
//Проверка значения направления
z_sev=0;
z_zap=0;
z_yug=1;
z_vost=0;
z_ChekDIr=false;
z_BlockNum=»Y 4″;
z_errorprint[40]=1;
}
// 5
// Не правильная конфигурация
if(z_yug==1 && z_Var1_Be_0==0 && z_Var2_Bo_1==1 && z_ChekDIr==true) //Смещение по регистру с Юга на .| на Восток -» 9 часов
{
// разрешение на обработку события.
z_Zap_1=0;
//Запрет для 3 направлений
z_Vost_1=0;
z_Sev_1=1;
z_Yug_1=0;
//Проверка значения направления
z_sev=1;
z_zap=0;
z_yug=0;
z_vost=0;
z_ChekDIr=false;
z_BlockNum=»Y 5″;
z_errorprint[41]=1;
z_Var1_Be_0=2;
z_Var1_Be_1=0;
z_CheFe=1;
if(z_CheFe==1 && z_lic==1)
{
z_izn=1;
z_lic=0;
z_CheFe=0;
}
if(z_CheFe==1 && z_izn==1)
{
z_izn=0;
z_lic=1;
z_CheFe=0;
}
}
// 6
if(z_yug==1 && z_Var1_Bo_1==0 && z_Var2_Be_0==1 && z_ChekDIr==true) //Смещение по регистру с Юга на .| на Восток -» 9 часов
{
// разрешение на обработку события.
z_Vost_1=0;
//Запрет для 3 направлений
z_Zap_1=0;
z_Sev_1=1;
z_Yug_1=0;
//Проверка значения направления
z_sev=1;
z_zap=0;
z_yug=0;
z_vost=0;
z_ChekDIr=false;
z_BlockNum=»Y 6″;
z_errorprint[42]=1;
z_Var1_Bo_1=2;
z_Var1_Bo_0=0;
z_CheFe=1;
if(z_CheFe==1 && z_lic==1)
{
z_izn=1;
z_lic=0;
z_CheFe=0;
}
if(z_CheFe==1 && z_izn==1)
{
z_izn=0;
z_lic=1;
z_CheFe=0;
}
}
// 7
if(z_yug==1 && z_Var1_Bo_0==0 && z_Var2_Be_1==1 && z_ChekDIr==true) // Смещение по регистру с Юга на .| на Запад «- 3 часа
{
// разрешение на обработку события.
z_Vost_1=0;
//Запрет для 3 нап равлений
z_Sev_1=1;
z_Zap_1=0;
z_Yug_1=0;
//Проверка значения направления
z_sev=1;
z_zap=0;
z_yug=0;
z_vost=0;
z_ChekDIr=false;
z_BlockNum=»Y 7″;
z_errorprint[43]=1;
z_Var1_Bo_0=2;
z_Var1_Bo_1=0;
z_CheFe=1;
if(z_CheFe==1 && z_lic==1)
{
z_izn=1;
z_lic=0;
z_CheFe=0;
}
if(z_CheFe==1 && z_izn==1)
{
z_izn=0;
z_lic=1;
z_CheFe=0;
}
}
// 8
if(z_yug==1 && z_Var1_Be_1==0 && z_Var2_Bo_0==1 && z_ChekDIr==true) // Смещение по регистру с Юга на .| на Запад «- 3 часа
{
// разрешение на обработку события.
z_Zap_1=0;
//Запрет для 3 направлений
z_Sev_1=1;
z_Vost_1=0;
z_Yug_1=0;
//Проверка значения направления
z_sev=1;
z_zap=0;
z_yug=0;
z_vost=0;
z_ChekDIr=false;
z_BlockNum=»Y 8″;
z_errorprint[44]=1;
z_Var1_Be_1=2;
z_Var1_Be_0=0;
z_CheFe=1;
if(z_CheFe==1 && z_lic==1)
{
z_izn=1;
z_lic=0;
z_CheFe=0;
}
if(z_CheFe==1 && z_izn==1)
{
z_izn=0;
z_lic=1;
z_CheFe=0;
}
}
// 9
if(z_yug==1 && z_Var1_Bo_0==0 && z_Var2_Bo_1==1 && z_ChekDIr==true) // Смещение по регистру с Юга на .| на Север *| 6 часов
{
z_Sev_1=0;
// разрешение на обработку события.
z_Yug_1=0;
//Запрет для 3 направлений
z_Zap_1=0;
z_Vost_1=1;
//Проверка значения направления
z_sev=0;
z_zap=0;
z_yug=0;
z_vost=1;
z_ChekDIr=false;
z_BlockNum=»Y 9″;
z_errorprint[45]=1;
z_Var1_Bo_0=2;
z_Var1_Be_1=0;
z_CheFe=1;
if(z_CheFe==1 && z_lic==1)
{
z_izn=1;
z_lic=0;
z_CheFe=0;
}
if(z_CheFe==1 && z_izn==1)
{
z_izn=0;
z_lic=1;
z_CheFe=0;
}
}
// 10
if(z_yug==1 && z_Var1_Bo_1==0 && z_Var2_Bo_0==1 && z_ChekDIr==true) // Смещение по регистру с Юга на .| на Север *| 6 часов
{
z_Sev_1=0;
// разрешение на обработку события.
z_Yug_1=0;
//Запрет для 3 направлений
z_Zap_1=0;
z_Vost_1=1;
//Проверка значения направления
z_sev=0;
z_zap=0;
z_yug=0;
z_vost=1;
z_ChekDIr=false;
z_BlockNum=»Y 10″;
z_errorprint[46]=1;
z_Var1_Bo_1=2;
z_Var1_Be_0=0;
z_CheFe=1;
if(z_CheFe==1 && z_lic==1)
{
z_izn=1;
z_lic=0;
z_CheFe=0;
}
if(z_CheFe==1 && z_izn==1)
{
z_izn=0;
z_lic=1;
z_CheFe=0;
}
}
// 11
if(z_yug==1 && z_Var1_Be_0==0 && z_Var2_Be_1==1 && z_ChekDIr==true) // Смещение по регистру с Юга на .| на Север *| 6 часов
{
z_Sev_1=0;
// разрешение на обработку события.
z_Yug_1=0;
//Запрет для 3 направлений
z_Zap_1=1;
z_Vost_1=0;
//Проверка значения направления
z_sev=0;
z_zap=1;
z_yug=0;
z_vost=0;
z_ChekDIr=false;
z_BlockNum=»Y 11″;
z_errorprint[47]=1;
z_Var1_Be_0=2;
z_Var1_Bo_1=0;
z_CheFe=1;
if(z_CheFe==1 && z_lic==1)
{
z_izn=1;
z_lic=0;
z_CheFe=0;
}
if(z_CheFe==1 && z_izn==1)
{
z_izn=0;
z_lic=1;
z_CheFe=0;
}
}
// 12
if(z_yug==1 && z_Var1_Be_1==0 && z_Var2_Be_0==1 && z_ChekDIr==true) // Смещение по регистру с Юга на .| на Север *| 6 часов
{
// разрешение на обработку события.
z_Sev_1=0;
//Запрет для 3 направлений
z_Zap_1=1;
z_Vost_1=0;
z_Yug_1=0;
//Проверка значения направления
z_sev=0;
z_zap=1;
z_yug=0;
z_vost=0;
z_ChekDIr=false;
z_BlockNum=»Y 12″;
z_errorprint[48]=1;
z_Var1_Be_1=2;
z_Var1_Bo_0=0;
z_CheFe=1;
if(z_CheFe==1 && z_lic==1)
{
z_izn=1;
z_lic=0;
z_CheFe=0;
}
if(z_CheFe==1 && z_izn==1)
{
z_izn=0;
z_lic=1;
z_CheFe=0;
}
}
//Проверка шаг 3
string z_napravlenie;
if(z_Sev_1==1)
{
z_napravlenie=»z_Sev_1″;
}
if(z_Yug_1==1)
{
z_napravlenie=»z_Yug_1″;
}
if(z_Zap_1==1)
{
z_napravlenie=»z_Zap_1″;
}
if(z_Vost_1==1)
{
z_napravlenie=»z_Vost_1″;
}
//Print(napravlenie);
// 4 направления в которых вложены 2 стороны и 8 регистров. В сумме 768 регистров
// ечать ошибок блока разрешений для индикатора Семечка
//for(int gh=1;gh<49;gh++) //{ //Print(«index «,gh); //Print(«errorprint «,errorprint[gh]); ArrayInitialize(z_errorprint2,0); //} //Поведение северной стороны if(z_Sev_1==1) { //Подача значения на Лицо номер 1 //1 Be_0 && Bo_0 if(z_lic==1 && z_Var1_Be_0==0 && z_Var2_Bo_0==1) //Праверка регистра Bo_0 Лица { bool z_BlockPermis=true; // Сравнение состояния 2 регистров лица и изнанки по поданному значению if(z_Sev[1,2]==0 && z_Var2_Bo_0==1 && z_BlockPermis==true) // Смена в регистре на противоположное значение и Смена Лица на Изнанку { z_Sev[1,2]=1;//Смена в регистре на противоположное значение на лице z_Sev[1,6]=0;//Смена в регистре на противоположное значение на изнанке z_lic=0;//Смена Стороны z_izn=1;//Смена Стороны //Перераспределение разрешений переменных z_Var1_Be_0=2; z_Var1_Bo_0=0; z_Var1_Be_1=2; z_Var1_Bo_1=2; z_Gx++; z_Var2_Be_0=2; z_Var2_Bo_0=2; z_Var2_Be_1=2; z_Var2_Bo_1=2; z_BlockPermis=false; z_errorprint2[1]=1;//Proverka zapuska bloka kubo_5++; Text_Kubo_5=IntegerToString(kubo_5); ObjectSetString(0,obiekt506,OBJPROP_TEXT,Text_Kubo_5); } if(z_Sev[1,2]==1 && z_Var2_Bo_0==1 && z_BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку { z_Sev[1,6]=0; z_lic=0;//Смена Стороны z_izn=1;//Смена Стороны //Перераспределение разрешений переменных z_Var1_Be_0=2; z_Var1_Bo_0=0; z_Var1_Be_1=2; z_Var1_Bo_1=2; //———- z_Gx++; z_Var2_Be_0=2; z_Var2_Bo_0=2; z_Var2_Be_1=2; z_Var2_Bo_1=2; z_BlockPermis=false; z_errorprint2[2]=1; kubo_5++; Text_Kubo_5=IntegerToString(kubo_5); ObjectSetString(0,obiekt506,OBJPROP_TEXT,Text_Kubo_5); } }// lic==1 фин if(z_izn==1 && z_Var1_Be_0==0 && z_Var2_Bo_0==1) //Праверка регистра Bo_0 Изнанки { //1/1 Be_0 && Bo_0 bool z_BlockPermis=true; // Сравнение состояния 2 регистров лица и изнанки по поданному значению if(z_Sev[1,5]==0 && z_Var2_Bo_0==1 && z_BlockPermis==true) // Смена в регистре на противоположное значение и Смена Лица на Изнанку { z_Sev[1,5]=1;//Смена в регистре на противоположное значение на лице z_Sev[1,1]=0;//Смена в регистре на противоположное значение на изнанке z_lic=1;//Смена Стороны z_izn=0;//Смена Стороны //Перераспределение разрешений переменных z_Var1_Be_0=2; z_Var1_Bo_0=0; z_Var1_Be_1=2; z_Var1_Bo_1=2; //———- z_Gx++; z_Var2_Be_0=2; z_Var2_Bo_0=2; z_Var2_Be_1=2; z_Var2_Bo_1=2; z_BlockPermis=false; z_errorprint2[3]=1; kubo_1++; Text_Kubo_1=IntegerToString(kubo_1); ObjectSetString(0,obiekt502,OBJPROP_TEXT,Text_Kubo_1); } if(z_Sev[1,5]==1 && z_Var2_Bo_0==1 && z_BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку { z_Sev[1,1]=0; z_lic=1;//Смена Стороны z_izn=0;//Смена Стороны //Перераспределение разрешений переменных z_Var1_Be_0=2; z_Var1_Bo_0=0; z_Var1_Be_1=2; z_Var1_Bo_1=2; //———- z_Gx++; z_Var2_Be_0=2; z_Var2_Bo_0=2; z_Var2_Be_1=2; z_Var2_Bo_1=2; z_BlockPermis=false; z_errorprint2[4]=1; kubo_1++; Text_Kubo_1=IntegerToString(kubo_1); ObjectSetString(0,obiekt502,OBJPROP_TEXT,Text_Kubo_1); } }// izn==1 фин //Подача значения на Лицо номер 2 //1 Bo_0 && Be_0 if(z_lic==1 && z_Var1_Bo_0==0 && z_Var2_Be_0==1) //Праверка регистра Be_0 Лица { bool z_BlockPermis=true; // Сравнение состояния 2 регистров лица и изнанки по поданному значению if(z_Sev[1,1]==0 && z_Var2_Be_0==1 && z_BlockPermis==true) // Смена в регистре на противоположное значение и Смена Лица на Изнанку { z_Sev[1,1]=1;//Смена в регистре на противоположное значение на лице z_Sev[1,5]=0;//Смена в регистре на противоположное значение на изнанке z_lic=0;//Смена Стороны z_izn=1;//Смена Стороны //Перераспределение разрешений переменных z_Var1_Be_0=0; z_Var1_Bo_0=2; z_Var1_Be_1=2; z_Var1_Bo_1=2; //———- z_Gx–; z_Var2_Be_0=2; z_Var2_Bo_0=2; z_Var2_Be_1=2; z_Var2_Bo_1=2; z_BlockPermis=false; z_errorprint2[5]=1; kubo_2++; Text_Kubo_2=IntegerToString(kubo_2); ObjectSetString(0,obiekt503,OBJPROP_TEXT,Text_Kubo_2); } if(z_Sev[1,1]==1 && z_Var2_Be_0==1 && z_BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку { z_Sev[1,5]=0; z_lic=0;//Смена Стороны z_izn=1;//Смена Стороны //Перераспределение разрешений переменных z_Var1_Be_0=0; z_Var1_Bo_0=2; z_Var1_Be_1=2; z_Var1_Bo_1=2; //———- z_Gx–; z_Var2_Be_0=2; z_Var2_Bo_0=2; z_Var2_Be_1=2; z_Var2_Bo_1=2; z_BlockPermis=false; z_errorprint2[6]=1; kubo_2++; Text_Kubo_2=IntegerToString(kubo_2); ObjectSetString(0,obiekt503,OBJPROP_TEXT,Text_Kubo_2); } }// lic==1 фин if(z_izn==1 && z_Var1_Bo_0==0 && z_Var2_Be_0==1) //Праверка регистра Be_0 Изнанки { //1/1 Bo_0 && Be_0 bool z_BlockPermis=true; // Сравнение состояния 2 регистров лица и изнанки по поданному значению if(z_Sev[1,6]==0 && z_Var2_Be_0==1 && z_BlockPermis==true)// Смена в регистре на противоположное значение и Смена Лица на Изнанку { z_Sev[1,6]=1;//Смена в регистре на противоположное значение на лице z_Sev[1,2]=0;//Смена в регистре на противоположное значение на изнанке z_lic=1;//Смена Стороны z_izn=0;//Смена Стороны //Перераспределение разрешений переменных z_Var1_Be_0=0; z_Var1_Bo_0=2; z_Var1_Be_1=2; z_Var1_Bo_1=2; //———- z_Gx–; z_Var2_Be_0=2; z_Var2_Bo_0=2; z_Var2_Be_1=2; z_Var2_Bo_1=2; z_BlockPermis=false; z_errorprint2[6]=1; kubo_6++; Text_Kubo_6=IntegerToString(kubo_6); ObjectSetString(0,obiekt507,OBJPROP_TEXT,Text_Kubo_6); } if(z_Sev[1,6]==1 && z_Var2_Be_0==1 && z_BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку { z_Sev[1,2]=0; z_lic=1;//Смена Стороны z_izn=0;//Смена Стороны //Перераспределение разрешений переменных z_Var1_Be_0=0; z_Var1_Bo_0=2; z_Var1_Be_1=2; z_Var1_Bo_1=2; //———- z_Gx–; z_Var2_Be_0=2; z_Var2_Bo_0=2; z_Var2_Be_1=2; z_Var2_Bo_1=2; z_BlockPermis=false; z_errorprint2[7]=1; kubo_6++; Text_Kubo_6=IntegerToString(kubo_6); ObjectSetString(0,obiekt507,OBJPROP_TEXT,Text_Kubo_6); } }// izn==1 фин //Подача значения на Лицо номер 3 //1 Be_1 && Bo_1 if(z_lic==1 && z_Var1_Be_1==0 && z_Var2_Bo_1==1) //Праверка регистра Bo_1 Лица { bool z_BlockPermis=true; // Сравнение состояния 2 регистров лица и изнанки по поданному значению if(z_Sev[1,4]==0 && z_Var2_Bo_1==1 && z_BlockPermis==true) // Смена в регистре на противоположное значение и Смена Лица на Изнанку { z_Sev[1,4]=1;//Смена в регистре на противоположное значение на лице z_Sev[1,8]=0;//Смена в регистре на противоположное значение на изнанке z_lic=0;//Смена Стороны z_izn=1;//Смена Стороны //Перераспределение разрешений переменных z_Var1_Be_0=2; z_Var1_Bo_0=2; z_Var1_Be_1=2; z_Var1_Bo_1=0; //———- z_Gx–; z_Var2_Be_0=2; z_Var2_Bo_0=2; z_Var2_Be_1=2; z_Var2_Bo_1=2; z_BlockPermis=false; z_errorprint2[8]=1; kubo_3++; Text_Kubo_3=IntegerToString(kubo_3); ObjectSetString(0,obiekt504,OBJPROP_TEXT,Text_Kubo_3); } if(z_Sev[1,4]==1 && z_Var2_Bo_1==1 && z_BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку { z_Sev[1,8]=0; z_lic=0;//Смена Стороны z_izn=1;//Смена Стороны //Перераспределение разрешений переменных z_Var1_Be_0=2; z_Var1_Bo_0=2; z_Var1_Be_1=2; z_Var1_Bo_1=0; //———- z_Gx–; z_Var2_Be_0=2; z_Var2_Bo_0=2; z_Var2_Be_1=2; z_Var2_Bo_1=2; z_BlockPermis=false; z_errorprint2[9]=1; kubo_3++; Text_Kubo_3=IntegerToString(kubo_3); ObjectSetString(0,obiekt504,OBJPROP_TEXT,Text_Kubo_3); } }// lic==1 фин if(z_izn==1 && z_Var1_Be_1==0 && z_Var2_Bo_1==1) //Праверка регистра Bo_1 Изнанки { //1/1 Be_1 && Bo_1 bool z_BlockPermis=true; // Сравнение состояния 2 регистров лица и изнанки по поданному значению if(z_Sev[1,7]==0 && z_Var2_Bo_1==1 && z_BlockPermis==true)// Смена в регистре на противоположное значение и Смена Лица на Изнанку { z_Sev[1,7]=1;//Смена в регистре на противоположное значение на лице z_Sev[1,3]=0;//Смена в регистре на противоположное значение на изнанке z_lic=1;//Смена Стороны z_izn=0;//Смена Стороны //Перераспределение разрешений переменных z_Var1_Be_0=2; z_Var1_Bo_0=2; z_Var1_Be_1=2; z_Var1_Bo_1=0; //———- z_Gx–; z_Var2_Be_0=2; z_Var2_Bo_0=2; z_Var2_Be_1=2; z_Var2_Bo_1=2; z_BlockPermis=false; z_errorprint2[10]=1; kubo_7++; Text_Kubo_7=IntegerToString(kubo_7); ObjectSetString(0,obiekt508,OBJPROP_TEXT,Text_Kubo_7); } if(z_Sev[1,7]==1 && z_Var2_Bo_1==1 && z_BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку { z_Sev[1,3]=0; z_lic=1;//Смена Стороны z_izn=0;//Смена Стороны //Перераспределение разрешений переменных z_Var1_Be_0=2; z_Var1_Bo_0=2; z_Var1_Be_1=2; z_Var1_Bo_1=0; //———- z_Gx–; z_Var2_Be_0=2; z_Var2_Bo_0=2; z_Var2_Be_1=2; z_Var2_Bo_1=2; z_BlockPermis=false; z_errorprint2[11]=1; kubo_7++; Text_Kubo_7=IntegerToString(kubo_7); ObjectSetString(0,obiekt508,OBJPROP_TEXT,Text_Kubo_7); } }// izn==1 фин //Подача значения на Лицо номер 4 //1 Bo_1 && Be_1 if(z_lic==1 && z_Var1_Bo_1==0 && z_Var2_Be_1==1) //Праверка регистра Be_1 Лица { bool z_BlockPermis=true; // Сравнение состояния 2 регистров лица и изнанки по поданному значению if(z_Sev[1,3]==0 && z_Var2_Be_1==1 && z_BlockPermis==true) // Смена в регистре на противоположное значение и Смена Лица на Изнанку { z_Sev[1,3]=1;//Смена в регистре на противоположное значение на лице z_Sev[1,7]=0;//Смена в регистре на противоположное значение на изнанке z_lic=0;//Смена Стороны z_izn=1;//Смена Стороны //Перераспределение разрешений переменных z_Var1_Be_0=2; z_Var1_Bo_0=2; z_Var1_Be_1=0; z_Var1_Bo_1=2; //———- z_Gx++; z_Var2_Be_0=2; z_Var2_Bo_0=2; z_Var2_Be_1=2; z_Var2_Bo_1=2; z_BlockPermis=false; z_errorprint2[12]=1; kubo_8++; Text_Kubo_8=IntegerToString(kubo_8); ObjectSetString(0,obiekt509,OBJPROP_TEXT,Text_Kubo_8); } if(z_Sev[1,3]==1 && z_Var2_Be_1==1 && z_BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку { z_Sev[1,7]=0; z_lic=0;//Смена Стороны z_izn=1;//Смена Стороны //Перераспределение разрешений переменных z_Var1_Be_0=2; z_Var1_Bo_0=2; z_Var1_Be_1=0; z_Var1_Bo_1=2; //———- z_Gx++; z_Var2_Be_0=2; z_Var2_Bo_0=2; z_Var2_Be_1=2; z_Var2_Bo_1=2; z_BlockPermis=false; z_errorprint2[13]=1; kubo_8++; Text_Kubo_8=IntegerToString(kubo_8); ObjectSetString(0,obiekt509,OBJPROP_TEXT,Text_Kubo_8); } }// lic==1 фин if(z_izn==1 && z_Var1_Bo_1==0 && z_Var2_Be_1==1) //Праверка регистра Be_1 Изнанки { //1/1 Bo_1 && Be_1 bool z_BlockPermis=true; // Сравнение состояния 2 регистров лица и изнанки по поданному значению if(z_Sev[1,8]==0 && z_Var2_Be_1==1 && z_BlockPermis==true)// Смена в регистре на противоположное значение и Смена Лица на Изнанку { z_Sev[1,8]=1;//Смена в регистре на противоположное значение на лице z_Sev[1,4]=0;//Смена в регистре на противоположное значение на изнанке z_lic=1;//Смена Стороны z_izn=0;//Смена Стороны //Перераспределение разрешений переменных z_Var1_Be_0=2; z_Var1_Bo_0=2; z_Var1_Be_1=0; z_Var1_Bo_1=2; //———- z_Gx++; z_Var2_Be_0=2; z_Var2_Bo_0=2; z_Var2_Be_1=2; z_Var2_Bo_1=2; z_BlockPermis=false; z_errorprint2[14]=1; kubo_4++; Text_Kubo_4=IntegerToString(kubo_4); ObjectSetString(0,obiekt505,OBJPROP_TEXT,Text_Kubo_4); } if(z_Sev[1,8]==1 && z_Var2_Be_1==1 && z_BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку { z_Sev[1,4]=0; z_lic=1;//Смена Стороны z_izn=0;//Смена Стороны //Перераспределение разрешений переменных z_Var1_Be_0=2; z_Var1_Bo_0=2; z_Var1_Be_1=0; z_Var1_Bo_1=2; //———- z_Gx++; z_Var2_Be_0=2; z_Var2_Bo_0=2; z_Var2_Be_1=2; z_Var2_Bo_1=2; z_BlockPermis=false; z_errorprint2[15]=1; kubo_4++; Text_Kubo_4=IntegerToString(kubo_4); ObjectSetString(0,obiekt505,OBJPROP_TEXT,Text_Kubo_4); } }// izn==1 фин }// Sever фин //_________________________
// Поведение Юг
if(z_Yug_1==1)
{
//Подача значения на Лицо номер 1
//1 Be_0 && Bo_0
if(z_lic==1 && z_Var1_Be_0==0 && z_Var2_Bo_0==1) //Праверка регистра Bo_0 Лица
{
bool z_BlockPermis=true;
// Сравнение состояния 2 регистров лица и изнанки по поданному значению
if(z_Sev[1,4]==0 && z_Var2_Bo_0==1 && z_BlockPermis==true) // Смена в регистре на противоположное значение и Смена Лица на Изнанку
{
z_Sev[1,4]=1;//Смена в регистре на противоположное значение на лице
z_Sev[1,8]=0;//Смена в регистре на противоположное значение на изнанке
z_lic=0;//Смена Стороны
z_izn=1;//Смена Стороны
//Перераспределение разрешений переменных
z_Var1_Be_0=2;
z_Var1_Bo_0=0;
z_Var1_Be_1=2;
z_Var1_Bo_1=2;
//———-
z_Gx–;
z_Var2_Be_0=2;
z_Var2_Bo_0=2;
z_Var2_Be_1=2;
z_Var2_Bo_1=2;
z_BlockPermis=false;
z_errorprint2[32]=1;
kubo_3++;
Text_Kubo_3=IntegerToString(kubo_3);
ObjectSetString(0,obiekt504,OBJPROP_TEXT,Text_Kubo_3);
}
if(z_Sev[1,4]==1 && z_Var2_Bo_0==1 && z_BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку
{
z_Sev[1,8]=0;
z_lic=0;//Смена Стороны
z_izn=1;//Смена Стороны
//Перераспределение разрешений переменных
z_Var1_Be_0=2;
z_Var1_Bo_0=0;
z_Var1_Be_1=2;
z_Var1_Bo_1=2;
//———-
z_Gx–;
z_Var2_Be_0=2;
z_Var2_Bo_0=2;
z_Var2_Be_1=2;
z_Var2_Bo_1=2;
z_BlockPermis=false;
z_errorprint2[33]=1;
kubo_3++;
Text_Kubo_3=IntegerToString(kubo_3);
ObjectSetString(0,obiekt504,OBJPROP_TEXT,Text_Kubo_3);
}
}// lic==1 фин
if(z_izn==1 && z_Var1_Be_0==0 && z_Var2_Bo_0==1) //Праверка регистра Bo_0 Изнанки
{
//1/1 Be_0 && Bo_0
bool z_BlockPermis=true;
// Сравнение состояния 2 регистров лица и изнанки по поданному значению
if(z_Sev[1,7]==0 && z_Var2_Bo_0==1 && z_BlockPermis==true) // Смена в регистре на противоположное значение и Смена Лица на Изнанку
{
z_Sev[1,7]=1;//Смена в регистре на противоположное значение на лице
z_Sev[1,3]=0;//Смена в регистре на противоположное значение на изнанке
z_lic=1;//Смена Стороны
z_izn=0;//Смена Стороны
//Перераспределение разрешений переменных
z_Var1_Be_0=2;
z_Var1_Bo_0=0;
z_Var1_Be_1=2;
z_Var1_Bo_1=2;
//———-
z_Gx–;
z_Var2_Be_0=2;
z_Var2_Bo_0=2;
z_Var2_Be_1=2;
z_Var2_Bo_1=2;
z_BlockPermis=false;
z_errorprint2[34]=1;
kubo_7++;
Text_Kubo_7=IntegerToString(kubo_7);
ObjectSetString(0,obiekt508,OBJPROP_TEXT,Text_Kubo_7);
}
if(z_Sev[1,7]==1 && z_Var2_Bo_0==1 && z_BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку
{
z_Sev[1,3]=0;
z_lic=1;//Смена Стороны
z_izn=0;//Смена Стороны
//Перераспределение разрешений переменных
z_Var1_Be_0=2;
z_Var1_Bo_0=0;
z_Var1_Be_1=2;
z_Var1_Bo_1=2;
//———-
z_Gx–;
z_Var2_Be_0=2;
z_Var2_Bo_0=2;
z_Var2_Be_1=2;
z_Var2_Bo_1=2;
z_BlockPermis=false;
z_errorprint2[35]=1;
kubo_7++;
Text_Kubo_7=IntegerToString(kubo_7);
ObjectSetString(0,obiekt508,OBJPROP_TEXT,Text_Kubo_7);
}
}// izn==1 фин
//Подача значения на Лицо номер 2
//1 Bo_0 && Be_0
if(z_lic==1 && z_Var1_Bo_0==0 && z_Var2_Be_0==1) //Праверка регистра Be_0 Лица
{
bool z_BlockPermis=true;
// Сравнение состояния 2 регистров лица и изнанки по поданному значению
if(z_Sev[1,3]==0 && z_Var2_Be_0==1 && z_BlockPermis==true) // Смена в регистре на противоположное значение и Смена Лица на Изнанку
{
z_Sev[1,3]=1;//Смена в регистре на противоположное значение на лице
z_Sev[1,7]=0;//Смена в регистре на противоположное значение на изнанке
z_lic=0;//Смена Стороны
z_izn=1;//Смена Стороны
//Перераспределение разрешений переменных
z_Var1_Be_0=0;
z_Var1_Bo_0=2;
z_Var1_Be_1=2;
z_Var1_Bo_1=2;
//———-
z_Gx++;
z_Var2_Be_0=2;
z_Var2_Bo_0=2;
z_Var2_Be_1=2;
z_Var2_Bo_1=2;
z_BlockPermis=false;
z_errorprint2[36]=1;
kubo_8++;
Text_Kubo_8=IntegerToString(kubo_8);
ObjectSetString(0,obiekt509,OBJPROP_TEXT,Text_Kubo_8);
}
if(z_Sev[1,3]==1 && z_Var2_Be_0==1 && z_BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку
{
z_Sev[1,7]=0;
z_lic=0;//Смена Стороны
z_izn=1;//Смена Стороны
//Перераспределение разрешений переменных
z_Var1_Be_0=0;
z_Var1_Bo_0=2;
z_Var1_Be_1=2;
z_Var1_Bo_1=2;
//———-
z_Gx++;
z_Var2_Be_0=2;
z_Var2_Bo_0=2;
z_Var2_Be_1=2;
z_Var2_Bo_1=2;
z_BlockPermis=false;
z_errorprint2[37]=1;
kubo_8++;
Text_Kubo_8=IntegerToString(kubo_8);
ObjectSetString(0,obiekt509,OBJPROP_TEXT,Text_Kubo_8);
}
}// lic==1 фин
if(z_izn==1 && z_Var1_Bo_0==0 && z_Var2_Be_0==1) //Праверка регистра Be_0 Изнанки
{
//1/1 Bo_0 && Be_0
bool z_BlockPermis=true;
// Сравнение состояния 2 регистров лица и изнанки по поданному значению
if(z_Sev[1,8]==0 && z_Var2_Be_0==1 && z_BlockPermis==true)// Смена в регистре на противоположное значение и Смена Лица на Изнанку
{
z_Sev[1,8]=1;//Смена в регистре на противоположное значение на лице
z_Sev[1,4]=0;//Смена в регистре на противоположное значение на изнанке
z_lic=1;//Смена Стороны
z_izn=0;//Смена Стороны
//Перераспределение разрешений переменных
z_Var1_Be_0=0;
z_Var1_Bo_0=2;
z_Var1_Be_1=2;
z_Var1_Bo_1=2;
//———-
z_Gx++;
z_Var2_Be_0=2;
z_Var2_Bo_0=2;
z_Var2_Be_1=2;
z_Var2_Bo_1=2;
z_BlockPermis=false;
z_errorprint2[38]=1;
Text_Kubo_4=IntegerToString(kubo_4);
ObjectSetString(0,obiekt505,OBJPROP_TEXT,Text_Kubo_4);
}
if(z_Sev[1,8]==1 && z_Var2_Be_0==1 && z_BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку
{
z_Sev[1,4]=0;
z_lic=1;//Смена Стороны
z_izn=0;//Смена Стороны
//Перераспределение разрешений переменных
z_Var1_Be_0=0;
z_Var1_Bo_0=2;
z_Var1_Be_1=2;
z_Var1_Bo_1=2;
//———-
z_Gx++;
z_Var2_Be_0=2;
z_Var2_Bo_0=2;
z_Var2_Be_1=2;
z_Var2_Bo_1=2;
z_BlockPermis=false;
z_errorprint2[39]=1;
Text_Kubo_4=IntegerToString(kubo_4);
ObjectSetString(0,obiekt505,OBJPROP_TEXT,Text_Kubo_4);
}
}// izn==1 фин
//Подача значения на Лицо номер 3
//1 Be_1 && Bo_1
if(z_lic==1 && z_Var1_Be_1==0 && z_Var2_Bo_1==1) //Праверка регистра Bo_1 Лица
{
bool z_BlockPermis=true;
// Сравнение состояния 2 регистров лица и изнанки по поданному значению
if(z_Sev[1,2]==0 && z_Var2_Bo_1==1 && z_BlockPermis==true) // Смена в регистре на противоположное значение и Смена Лица на Изнанку
{
z_Sev[1,2]=1;//Смена в регистре на противоположное значение на лице
z_Sev[1,6]=0;//Смена в регистре на противоположное значение на изнанке
z_lic=0;//Смена Стороны
z_izn=1;//Смена Стороны
//Перераспределение разрешений переменных
z_Var1_Be_0=2;
z_Var1_Bo_0=2;
z_Var1_Be_1=2;
z_Var1_Bo_1=0;
//———-
z_Gx++;
z_Var2_Be_0=2;
z_Var2_Bo_0=2;
z_Var2_Be_1=2;
z_Var2_Bo_1=2;
z_BlockPermis=false;
z_errorprint2[40]=1;
kubo_5++;
Text_Kubo_5=IntegerToString(kubo_5);
ObjectSetString(0,obiekt506,OBJPROP_TEXT,Text_Kubo_5);
}
if(z_Sev[1,2]==1 && z_Var2_Bo_1==1 && z_BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку
{
z_Sev[1,6]=0;
z_lic=0;//Смена Стороны
z_izn=1;//Смена Стороны
//Перераспределение разрешений переменных
z_Var1_Be_0=2;
z_Var1_Bo_0=2;
z_Var1_Be_1=2;
z_Var1_Bo_1=0;
//———-
z_Gx++;
z_Var2_Be_0=2;
z_Var2_Bo_0=2;
z_Var2_Be_1=2;
z_Var2_Bo_1=2;
z_BlockPermis=false;
z_errorprint2[41]=1;
kubo_5++;
Text_Kubo_5=IntegerToString(kubo_5);
ObjectSetString(0,obiekt506,OBJPROP_TEXT,Text_Kubo_5);
}
}// lic==1 фин
if(z_izn==1 && z_Var1_Be_1==0 && z_Var2_Bo_1==1) //Праверка регистра Bo_1 Изнанки
{
//1/1 Be_1 && Bo_1
bool z_BlockPermis=true;
// Сравнение состояния 2 регистров лица и изнанки по поданному значению
if(z_Sev[1,5]==0 && z_Var2_Bo_1==1 && z_BlockPermis==true)// Смена в регистре на противоположное значение и Смена Лица на Изнанку
{
z_Sev[1,5]=1;//Смена в регистре на противоположное значение на лице
z_Sev[1,1]=0;//Смена в регистре на противоположное значение на изнанке
z_lic=1;//Смена Стороны
z_izn=0;//Смена Стороны
//Перераспределение разрешений переменных
z_Var1_Be_0=2;
z_Var1_Bo_0=2;
z_Var1_Be_1=2;
z_Var1_Bo_1=0;
//———-
z_Gx++;
z_Var2_Be_0=2;
z_Var2_Bo_0=2;
z_Var2_Be_1=2;
z_Var2_Bo_1=2;
z_BlockPermis=false;
z_errorprint2[42]=1;
kubo_1++;
Text_Kubo_1=IntegerToString(kubo_1);
ObjectSetString(0,obiekt502,OBJPROP_TEXT,Text_Kubo_1);
}
if(z_Sev[1,5]==1 && z_Var2_Bo_1==1 && z_BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку
{
z_Sev[1,1]=0;
z_lic=1;//Смена Стороны
z_izn=0;//Смена Стороны
//Перераспределение разрешений переменных
z_Var1_Be_0=2;
z_Var1_Bo_0=2;
z_Var1_Be_1=2;
z_Var1_Bo_1=0;
//———-
z_Gx++;
z_Var2_Be_0=2;
z_Var2_Bo_0=2;
z_Var2_Be_1=2;
z_Var2_Bo_1=2;
z_BlockPermis=false;
z_errorprint2[43]=1;
kubo_1++;
Text_Kubo_1=IntegerToString(kubo_1);
ObjectSetString(0,obiekt502,OBJPROP_TEXT,Text_Kubo_1);
}
}// izn==1 фин
//Подача значения на Лицо номер 4
//1 Bo_1 && Be_1
if(z_lic==1 && z_Var1_Bo_1==0 && z_Var2_Be_1==1) //Праверка регистра Be_1 Лица
{
bool z_BlockPermis=true;
// Сравнение состояния 2 регистров лица и изнанки по поданному значению
if(z_Sev[1,1]==0 && z_Var2_Be_1==1 && z_BlockPermis==true) // Смена в регистре на противоположное значение и Смена Лица на Изнанку
{
z_Sev[1,1]=1;//Смена в регистре на противоположное значение на лице
z_Sev[1,5]=0;//Смена в регистре на противоположное значение на изнанке
z_lic=0;//Смена Стороны
z_izn=1;//Смена Стороны
//Перераспределение разрешений переменных
z_Var1_Be_0=2;
z_Var1_Bo_0=2;
z_Var1_Be_1=0;
z_Var1_Bo_1=2;
//———-
z_Gx–;
z_Var2_Be_0=2;
z_Var2_Bo_0=2;
z_Var2_Be_1=2;
z_Var2_Bo_1=2;
z_BlockPermis=false;
z_errorprint2[44]=1;
kubo_2++;
Text_Kubo_2=IntegerToString(kubo_2);
ObjectSetString(0,obiekt503,OBJPROP_TEXT,Text_Kubo_2);
}
if(z_Sev[1,1]==1 && z_Var2_Be_1==1 && z_BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку
{
z_Sev[1,5]=0;
z_lic=0;//Смена Стороны
z_izn=1;//Смена Стороны
//Перераспределение разрешений переменных
z_Var1_Be_0=2;
z_Var1_Bo_0=2;
z_Var1_Be_1=0;
z_Var1_Bo_1=2;
//———-
z_Gx–;
z_Var2_Be_0=2;
z_Var2_Bo_0=2;
z_Var2_Be_1=2;
z_Var2_Bo_1=2;
z_BlockPermis=false;
z_errorprint2[45]=1;
kubo_2++;
Text_Kubo_2=IntegerToString(kubo_2);
ObjectSetString(0,obiekt503,OBJPROP_TEXT,Text_Kubo_2);
}
}// lic==1 фин
if(z_izn==1 && z_Var1_Bo_1==0 && z_Var2_Be_1==1) //Праверка регистра Be_1 Изнанки
{
//1/1 Bo_1 && Be_1
bool z_BlockPermis=true;
// Сравнение состояния 2 регистров лица и изнанки по поданному значению
if(z_Sev[1,6]==0 && z_Var2_Be_1==1 && z_BlockPermis==true)// Смена в регистре на противоположное значение и Смена Лица на Изнанку
{
z_Sev[1,6]=1;//Смена в регистре на противоположное значение на лице
z_Sev[1,2]=0;//Смена в регистре на противоположное значение на изнанке
z_lic=1;//Смена Стороны
z_izn=0;//Смена Стороны
//Перераспределение разрешений переменных
z_Var1_Be_0=2;
z_Var1_Bo_0=2;
z_Var1_Be_1=0;
z_Var1_Bo_1=2;
//———-
z_Gx–;
z_Var2_Be_0=2;
z_Var2_Bo_0=2;
z_Var2_Be_1=2;
z_Var2_Bo_1=2;
z_BlockPermis=false;
z_errorprint2[46]=1;
kubo_6++;
Text_Kubo_6=IntegerToString(kubo_6);
ObjectSetString(0,obiekt507,OBJPROP_TEXT,Text_Kubo_6);
}
if(z_Sev[1,6]==1 && z_Var2_Be_1==1 && z_BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку
{
z_Sev[1,2]=0;
z_lic=1;//Смена Стороны
z_izn=0;//Смена Стороны
//Перераспределение разрешений переменных
z_Var1_Be_0=2;
z_Var1_Bo_0=2;
z_Var1_Be_1=0;
z_Var1_Bo_1=2;
//———-
z_Gx–;
z_Var2_Be_0=2;
z_Var2_Bo_0=2;
z_Var2_Be_1=2;
z_Var2_Bo_1=2;
z_BlockPermis=false;
z_errorprint2[47]=1;
kubo_6++;
Text_Kubo_6=IntegerToString(kubo_6);
ObjectSetString(0,obiekt507,OBJPROP_TEXT,Text_Kubo_6);
}
}// izn==1 фин
}// Yug фин
//_______________________
// Поведение Запад
if(z_Zap_1==1)
{
//Подача значения на Лицо номер 1
//1 Be_0 && Bo_0
if(z_lic==1 && z_Var1_Be_0==0 && z_Var2_Bo_0==1) //Праверка регистра Bo_0 Лица
{
bool z_BlockPermis=true;
// Сравнение состояния 2 регистров лица и изнанки по поданному значению
if(z_Sev[1,1]==0 && z_Var2_Bo_0==1 && z_BlockPermis==true) // Смена в регистре на противоположное значение и Смена Лица на Изнанку
{
z_Sev[1,1]=1;//Смена в регистре на противоположное значение на лице
z_Sev[1,5]=0;//Смена в регистре на противоположное значение на изнанке
z_lic=0;//Смена Стороны
z_izn=1;//Смена Стороны
//Перераспределение разрешений переменных
z_Var1_Be_0=2;
z_Var1_Bo_0=0;
z_Var1_Be_1=2;
z_Var1_Bo_1=2;
//———-
z_Gy++;
z_Var2_Be_0=2;
z_Var2_Bo_0=2;
z_Var2_Be_1=2;
z_Var2_Bo_1=2;
z_BlockPermis=false;
z_errorprint2[64]=1;
kubo_2++;
Text_Kubo_2=IntegerToString(kubo_2);
ObjectSetString(0,obiekt503,OBJPROP_TEXT,Text_Kubo_2);
}
if(z_Sev[1,1]==1 && z_Var2_Bo_0==1 && z_BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку
{
z_Sev[1,5]=0;
z_lic=0;//Смена Стороны
z_izn=1;//Смена Стороны
//Перераспределение разрешений переменных
z_Var1_Be_0=2;
z_Var1_Bo_0=0;
z_Var1_Be_1=2;
z_Var1_Bo_1=2;
//———-
z_Gy++;
z_Var2_Be_0=2;
z_Var2_Bo_0=2;
z_Var2_Be_1=2;
z_Var2_Bo_1=2;
z_BlockPermis=false;
z_errorprint2[65]=1;
kubo_2++;
Text_Kubo_2=IntegerToString(kubo_2);
ObjectSetString(0,obiekt503,OBJPROP_TEXT,Text_Kubo_2);
}
}// lic==1 фин
if(z_izn==1 && z_Var1_Be_0==0 && z_Var2_Bo_0==1) //Праверка регистра Bo_0 Изнанки
{
//1/1 Be_0 && Bo_0
bool z_BlockPermis=true;
// Сравнение состояния 2 регистров лица и изнанки по поданному значению
if(z_Sev[1,7]==0 && z_Var2_Bo_0==1 && z_BlockPermis==true) // Смена в регистре на противоположное значение и Смена Лица на Изнанку
{
z_Sev[1,7]=1;//Смена в регистре на противоположное значение на лице
z_Sev[1,3]=0;//Смена в регистре на противоположное значение на изнанке
z_lic=1;//Смена Стороны
z_izn=0;//Смена Стороны
//Перераспределение разрешений переменных
z_Var1_Be_0=2;
z_Var1_Bo_0=0;
z_Var1_Be_1=2;
z_Var1_Bo_1=2;
//———-
z_Gy++;
z_Var2_Be_0=2;
z_Var2_Bo_0=2;
z_Var2_Be_1=2;
z_Var2_Bo_1=2;
z_BlockPermis=false;
z_errorprint2[66]=1;
kubo_4++;
Text_Kubo_4=IntegerToString(kubo_4);
ObjectSetString(0,obiekt505,OBJPROP_TEXT,Text_Kubo_4);
}
if(z_Sev[1,7]==1 && z_Var2_Bo_0==1 && z_BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку
{
z_Sev[1,3]=0;
z_lic=1;//Смена Стороны
z_izn=0;//Смена Стороны
//Перераспределение разрешений переменных
z_Var1_Be_0=2;
z_Var1_Bo_0=0;
z_Var1_Be_1=2;
z_Var1_Bo_1=2;
//———-
z_Gy++;
z_Var2_Be_0=2;
z_Var2_Bo_0=2;
z_Var2_Be_1=2;
z_Var2_Bo_1=2;
z_BlockPermis=false;
z_errorprint2[67]=1;
kubo_4++;
Text_Kubo_4=IntegerToString(kubo_4);
ObjectSetString(0,obiekt505,OBJPROP_TEXT,Text_Kubo_4);
}
}// izn==1 фин
//Подача значения на Лицо номер 2
//1 Bo_0 && Be_0
if(z_lic==1 && z_Var1_Bo_0==0 && z_Var2_Be_0==1) //Праверка регистра Be_0 Лица
{
bool z_BlockPermis=true;
// Сравнение состояния 2 регистров лица и изнанки по поданному значению
if(z_Sev[1,4]==0 && z_Var2_Be_0==1 && z_BlockPermis==true) // Смена в регистре на противоположное значение и Смена Лица на Изнанку
{
z_Sev[1,4]=1;//Смена в регистре на противоположное значение на лице
z_Sev[1,8]=0;//Смена в регистре на противоположное значение на изнанке
z_lic=0;//Смена Стороны
z_izn=1;//Смена Стороны
//Перераспределение разрешений переменных
z_Var1_Be_0=0;
z_Var1_Bo_0=2;
z_Var1_Be_1=2;
z_Var1_Bo_1=2;
//———-
z_Gy–;
z_Var2_Be_0=2;
z_Var2_Bo_0=2;
z_Var2_Be_1=2;
z_Var2_Bo_1=2;
z_BlockPermis=false;
z_errorprint2[68]=1;
kubo_3++;
Text_Kubo_3=IntegerToString(kubo_3);
ObjectSetString(0,obiekt504,OBJPROP_TEXT,Text_Kubo_3);
}
if(z_Sev[1,4]==1 && z_Var2_Be_0==1 && z_BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку
{
z_Sev[1,8]=0;
z_lic=0;//Смена Стороны
z_izn=1;//Смена Стороны
//Перераспределение разрешений переменных
z_Var1_Be_0=0;
z_Var1_Bo_0=2;
z_Var1_Be_1=2;
z_Var1_Bo_1=2;
//———-
z_Gy–;
z_Var2_Be_0=2;
z_Var2_Bo_0=2;
z_Var2_Be_1=2;
z_Var2_Bo_1=2;
z_BlockPermis=false;
z_errorprint2[69]=1;
kubo_3++;
Text_Kubo_3=IntegerToString(kubo_3);
ObjectSetString(0,obiekt504,OBJPROP_TEXT,Text_Kubo_3);
}
}// lic==1 фин
if(z_izn==1 && z_Var1_Bo_0==0 && z_Var2_Be_0==1) //Праверка регистра Be_0 Изнанки
{
//1/1 Bo_0 && Be_0
bool z_BlockPermis=true;
// Сравнение состояния 2 регистров лица и изнанки по поданному значению
if(z_Sev[1,6]==0 && z_Var2_Be_0==1 && z_BlockPermis==true)// Смена в регистре на противоположное значение и Смена Лица на Изнанку
{
z_Sev[1,6]=1;//Смена в регистре на противоположное значение на лице
z_Sev[1,2]=0;//Смена в регистре на противоположное значение на изнанке
z_lic=1;//Смена Стороны
z_izn=0;//Смена Стороны
//Перераспределение разрешений переменных
z_Var1_Be_0=0;
z_Var1_Bo_0=2;
z_Var1_Be_1=2;
z_Var1_Bo_1=2;
//———-
z_Gy–;
z_Var2_Be_0=2;
z_Var2_Bo_0=2;
z_Var2_Be_1=2;
z_Var2_Bo_1=2;
z_BlockPermis=false;
z_errorprint2[70]=1;
kubo_1++;
Text_Kubo_1=IntegerToString(kubo_1);
ObjectSetString(0,obiekt502,OBJPROP_TEXT,Text_Kubo_1);
}
if(z_Sev[1,6]==1 && z_Var2_Be_0==1 && z_BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку
{
z_Sev[1,2]=0;
z_lic=1;//Смена Стороны
z_izn=0;//Смена Стороны
//Перераспределение разрешений переменных
z_Var1_Be_0=0;
z_Var1_Bo_0=2;
z_Var1_Be_1=2;
z_Var1_Bo_1=2;
//———-
z_Gy–;
z_Var2_Be_0=2;
z_Var2_Bo_0=2;
z_Var2_Be_1=2;
z_Var2_Bo_1=2;
z_BlockPermis=false;
z_errorprint2[71]=1;
kubo_1++;
Text_Kubo_1=IntegerToString(kubo_1);
ObjectSetString(0,obiekt502,OBJPROP_TEXT,Text_Kubo_1);
}
}// izn==1 фин
//Подача значения на Лицо номер 3
//1 Be_1 && Bo_1
if(z_lic==1 && z_Var1_Be_1==0 && z_Var2_Bo_1==1) //Праверка регистра Bo_1 Лица
{
bool z_BlockPermis=true;
// Сравнение состояния 2 регистров лица и изнанки по поданному значению
if(z_Sev[1,3]==0 && z_Var2_Bo_1==1 && z_BlockPermis==true) // Смена в регистре на противоположное значение и Смена Лица на Изнанку
{
z_Sev[1,3]=1;//Смена в регистре на противоположное значение на лице
z_Sev[1,7]=0;//Смена в регистре на противоположное значение на изнанке
z_lic=0;//Смена Стороны
z_izn=1;//Смена Стороны
//Перераспределение разрешений переменных
z_Var1_Be_0=2;
z_Var1_Bo_0=2;
z_Var1_Be_1=2;
z_Var1_Bo_1=0;
//———-
z_Gy–;
z_Var2_Be_0=2;
z_Var2_Bo_0=2;
z_Var2_Be_1=2;
z_Var2_Bo_1=2;
z_BlockPermis=false;
z_errorprint2[72]=1;
kubo_8++;
Text_Kubo_8=IntegerToString(kubo_8);
ObjectSetString(0,obiekt509,OBJPROP_TEXT,Text_Kubo_8);
}
if(z_Sev[1,3]==1 && z_Var2_Bo_1==1 && z_BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку
{
z_Sev[1,7]=0;
z_lic=0;//Смена Стороны
z_izn=1;//Смена Стороны
//Перераспределение разрешений переменных
z_Var1_Be_0=2;
z_Var1_Bo_0=2;
z_Var1_Be_1=2;
z_Var1_Bo_1=0;
//———-
z_Gy–;
z_Var2_Be_0=2;
z_Var2_Bo_0=2;
z_Var2_Be_1=2;
z_Var2_Bo_1=2;
z_BlockPermis=false;
z_errorprint2[73]=1;
kubo_8++;
Text_Kubo_8=IntegerToString(kubo_8);
ObjectSetString(0,obiekt509,OBJPROP_TEXT,Text_Kubo_8);
}
}// lic==1 фин
if(z_izn==1 && z_Var1_Be_1==0 && z_Var2_Bo_1==1) //Праверка регистра Bo_1 Изнанки
{
//1/1 Be_1 && Bo_1
bool z_BlockPermis=true;
// Сравнение состояния 2 регистров лица и изнанки по поданному значению
if(z_Sev[1,8]==0 && z_Var2_Bo_1==1 && z_BlockPermis==true)// Смена в регистре на противоположное значение и Смена Лица на Изнанку
{
z_Sev[1,8]=1;//Смена в регистре на противоположное значение на лице
z_Sev[1,4]=0;//Смена в регистре на противоположное значение на изнанке
z_lic=1;//Смена Стороны
z_izn=0;//Смена Стороны
//Перераспределение разрешений переменных
z_Var1_Be_0=2;
z_Var1_Bo_0=2;
z_Var1_Be_1=2;
z_Var1_Bo_1=0;
//———-
z_Gy–;
z_Var2_Be_0=2;
z_Var2_Bo_0=2;
z_Var2_Be_1=2;
z_Var2_Bo_1=2;
z_BlockPermis=false;
z_errorprint2[74]=1;
kubo_6++;
Text_Kubo_6=IntegerToString(kubo_6);
ObjectSetString(0,obiekt507,OBJPROP_TEXT,Text_Kubo_6);
}
if(z_Sev[1,8]==1 && z_Var2_Bo_1==1 && z_BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку
{
z_Sev[1,4]=0;
z_lic=1;//Смена Стороны
z_izn=0;//Смена Стороны
//Перераспределение разрешений переменных
z_Var1_Be_0=2;
z_Var1_Bo_0=2;
z_Var1_Be_1=2;
z_Var1_Bo_1=0;
//———-
z_Gy–;
z_Var2_Be_0=2;
z_Var2_Bo_0=2;
z_Var2_Be_1=2;
z_Var2_Bo_1=2;
z_BlockPermis=false;
z_errorprint2[75]=1;
kubo_6++;
Text_Kubo_6=IntegerToString(kubo_6);
ObjectSetString(0,obiekt507,OBJPROP_TEXT,Text_Kubo_6);
}
}// izn==1 фин
//Подача значения на Лицо номер 4
//1 Bo_1 && Be_1
if(z_lic==1 && z_Var1_Bo_1==0 && z_Var2_Be_1==1) //Праверка регистра Be_1 Лица
{
bool z_BlockPermis=true;
// Сравнение состояния 2 регистров лица и изнанки по поданному значению
if(z_Sev[1,2]==0 && z_Var2_Be_1==1 && z_BlockPermis==true) // Смена в регистре на противоположное значение и Смена Лица на Изнанку
{
z_Sev[1,2]=1;//ПРОВЕРИТъ Должно быть 1,4 Смена в регистре на противоположное значение на лице
z_Sev[1,6]=0;//Смена в регистре на противоположное значение на изнанке
z_lic=0;//Смена Стороны
z_izn=1;//Смена Стороны
//Перераспределение разрешений переменных
z_Var1_Be_0=2;
z_Var1_Bo_0=2;
z_Var1_Be_1=0;
z_Var1_Bo_1=2;
//———-
z_Gy++;
z_Var2_Be_0=2;
z_Var2_Bo_0=2;
z_Var2_Be_1=2;
z_Var2_Bo_1=2;
z_BlockPermis=false;
z_errorprint2[76]=1;
kubo_5++;
Text_Kubo_5=IntegerToString(kubo_5);
ObjectSetString(0,obiekt506,OBJPROP_TEXT,Text_Kubo_5);
}
if(z_Sev[1,2]==1 && z_Var2_Be_1==1 && z_BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку
{
z_Sev[1,6]=0;
z_lic=0;//Смена Стороны
z_izn=1;//Смена Стороны
//Перераспределение разрешений переменных
z_Var1_Be_0=2;
z_Var1_Bo_0=2;
z_Var1_Be_1=0;
z_Var1_Bo_1=2;
//———-
z_Gy++;
z_Var2_Be_0=2;
z_Var2_Bo_0=2;
z_Var2_Be_1=2;
z_Var2_Bo_1=2;
z_BlockPermis=false;
z_errorprint2[77]=1;
kubo_5++;
Text_Kubo_5=IntegerToString(kubo_5);
ObjectSetString(0,obiekt506,OBJPROP_TEXT,Text_Kubo_5);
}
}// lic==1 фин
if(z_izn==1 && z_Var1_Bo_1==0 && z_Var2_Be_1==1) //Праверка регистра Be_1 Изнанки
{
//1/1 Bo_1 && Be_1
bool z_BlockPermis=true;
// Сравнение состояния 2 регистров лица и изнанки по поданному значению
if(z_Sev[1,5]==0 && z_Var2_Be_1==1 && z_BlockPermis==true)// Смена в регистре на противоположное значение и Смена Лица на Изнанку
{
z_Sev[1,5]=1;//Проверить 1,7 Смена в регистре на противоположное значение на лице
z_Sev[1,1]=0;//Смена в регистре на противоположное значение на изнанке
z_lic=1;//Смена Стороны
z_izn=0;//Смена Стороны
//Перераспределение разрешений переменных
z_Var1_Be_0=2;
z_Var1_Bo_0=2;
z_Var1_Be_1=0;
z_Var1_Bo_1=2;
//———-
z_Gy++;
z_Var2_Be_0=2;
z_Var2_Bo_0=2;
z_Var2_Be_1=2;
z_Var2_Bo_1=2;
z_BlockPermis=false;
z_errorprint2[78]=1;
kubo_7++;
Text_Kubo_7=IntegerToString(kubo_7);
ObjectSetString(0,obiekt508,OBJPROP_TEXT,Text_Kubo_7);
}
if(z_Sev[1,5]==1 && z_Var2_Be_1==1 && z_BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку
{
z_Sev[1,1]=0;
z_lic=1;//Смена Стороны
z_izn=0;//Смена Стороны
//Перераспределение разрешений переменных
z_Var1_Be_0=2;
z_Var1_Bo_0=2;
z_Var1_Be_1=0;
z_Var1_Bo_1=2;
//———-
z_Gy++;
z_Var2_Be_0=2;
z_Var2_Bo_0=2;
z_Var2_Be_1=2;
z_Var2_Bo_1=2;
z_BlockPermis=false;
z_errorprint2[79]=1;
kubo_7++;
Text_Kubo_7=IntegerToString(kubo_7);
ObjectSetString(0,obiekt508,OBJPROP_TEXT,Text_Kubo_7);
}
}// izn==1 фин
}// Zapad фин
//_______________________
// Поведение Восток
if(z_Vost_1==1)
{
//Подача значения на Лицо номер 1
//1 Be_0 && Bo_0
if(z_lic==1 && z_Var1_Be_0==0 && z_Var2_Bo_0==1) //Праверка регистра Bo_0 Лица
{
bool z_BlockPermis=true;
// Сравнение состояния 2 регистров лица и изнанки по поданному значению
if(z_Sev[1,3]==0 && z_Var2_Bo_0==1 && z_BlockPermis==true) // Смена в регистре на противоположное значение и Смена Лица на Изнанку
{
z_Sev[1,3]=1;//Смена в регистре на противоположное значение на лице
z_Sev[1,7]=0;//Смена в регистре на противоположное значение на изнанке
z_lic=0;//Смена Стороны
z_izn=1;//Смена Стороны
//Перераспределение разрешений переменных
z_Var1_Be_0=2;
z_Var1_Bo_0=0;
z_Var1_Be_1=2;
z_Var1_Bo_1=2;
//———-
z_Gy–;
z_Var2_Be_0=2;
z_Var2_Bo_0=2;
z_Var2_Be_1=2;
z_Var2_Bo_1=2;
z_BlockPermis=false;
z_errorprint2[96]=1;
kubo_8++;
Text_Kubo_8=IntegerToString(kubo_8);
ObjectSetString(0,obiekt509,OBJPROP_TEXT,Text_Kubo_8);
}
if(z_Sev[1,3]==1 && z_Var2_Bo_0==1 && z_BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку
{
z_Sev[1,7]=0;
z_lic=0;//Смена Стороны
z_izn=1;//Смена Стороны
//Перераспределение разрешений переменных
z_Var1_Be_0=2;
z_Var1_Bo_0=0;
z_Var1_Be_1=2;
z_Var1_Bo_1=2;
//———-
z_Gy–;
z_Var2_Be_0=2;
z_Var2_Bo_0=2;
z_Var2_Be_1=2;
z_Var2_Bo_1=2;
z_BlockPermis=false;
z_errorprint2[97]=1;
kubo_8++;
Text_Kubo_8=IntegerToString(kubo_8);
ObjectSetString(0,obiekt509,OBJPROP_TEXT,Text_Kubo_8);
}
}// lic==1 фин
if(z_izn==1 && z_Var1_Be_0==0 && z_Var2_Bo_0==1) //Праверка регистра Bo_0 Изнанки
{
//1/1 Be_0 && Bo_0
bool z_BlockPermis=true;
// Сравнение состояния 2 регистров лица и изнанки по поданному значению
if(z_Sev[1,8]==0 && z_Var2_Bo_0==1 && z_BlockPermis==true) // Смена в регистре на противоположное значение и Смена Лица на Изнанку
{
z_Sev[1,8]=1;//Смена в регистре на противоположное значение на лице
z_Sev[1,4]=0;//Смена в регистре на противоположное значение на изнанке
z_lic=1;//Смена Стороны
z_izn=0;//Смена Стороны
//Перераспределение разрешений переменных
z_Var1_Be_0=2;
z_Var1_Bo_0=0;
z_Var1_Be_1=2;
z_Var1_Bo_1=2;
//———-
z_Gy–;
z_Var2_Be_0=2;
z_Var2_Bo_0=2;
z_Var2_Be_1=2;
z_Var2_Bo_1=2;
z_BlockPermis=false;
z_errorprint2[98]=1;
kubo_6++;
Text_Kubo_6=IntegerToString(kubo_6);
ObjectSetString(0,obiekt507,OBJPROP_TEXT,Text_Kubo_6);
}
if(z_Sev[1,8]==1 && z_Var2_Bo_0==1 && z_BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку
{
z_Sev[1,4]=0;
z_lic=1;//Смена Стороны
z_izn=0;//Смена Стороны
//Перераспределение разрешений переменных
z_Var1_Be_0=2;
z_Var1_Bo_0=0;
z_Var1_Be_1=2;
z_Var1_Bo_1=2;
//———-
z_Gy–;
z_Var2_Be_0=2;
z_Var2_Bo_0=2;
z_Var2_Be_1=2;
z_Var2_Bo_1=2;
z_BlockPermis=false;
z_errorprint2[99]=1;
kubo_6++;
Text_Kubo_6=IntegerToString(kubo_6);
ObjectSetString(0,obiekt507,OBJPROP_TEXT,Text_Kubo_6);
}
}// izn==1 фин
//Подача значения на Лицо номер 2
//1 Bo_0 && Be_0
if(z_lic==1 && z_Var1_Bo_0==0 && z_Var2_Be_0==1) //Праверка регистра Be_0 Лица
{
bool z_BlockPermis=true;
// Сравнение состояния 2 регистров лица и изнанки по поданному значению
if(z_Sev[1,2]==0 && z_Var2_Be_0==1 && z_BlockPermis==true) // Смена в регистре на противоположное значение и Смена Лица на Изнанку
{
z_Sev[1,2]=1;//Смена в регистре на противоположное значение на лице
z_Sev[1,6]=0;//Смена в регистре на противоположное значение на изнанке
z_lic=0;//Смена Стороны
z_izn=1;//Смена Стороны
//Перераспределение разрешений переменных
z_Var1_Be_0=0;
z_Var1_Bo_0=2;
z_Var1_Be_1=2;
z_Var1_Bo_1=2;
//———-
z_Gy++;
z_Var2_Be_0=2;
z_Var2_Bo_0=2;
z_Var2_Be_1=2;
z_Var2_Bo_1=2;
z_BlockPermis=false;
z_errorprint2[100]=1;
kubo_5++;
Text_Kubo_5=IntegerToString(kubo_5);
ObjectSetString(0,obiekt506,OBJPROP_TEXT,Text_Kubo_5);
}
if(z_Sev[1,2]==1 && z_Var2_Be_0==1 && z_BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку
{
z_Sev[1,6]=0;
z_lic=0;//Смена Стороны
z_izn=1;//Смена Стороны
//Перераспределение разрешений переменных
z_Var1_Be_0=0;
z_Var1_Bo_0=2;
z_Var1_Be_1=2;
z_Var1_Bo_1=2;
//———-
z_Gy++;
z_Var2_Be_0=2;
z_Var2_Bo_0=2;
z_Var2_Be_1=2;
z_Var2_Bo_1=2;
z_BlockPermis=false;
z_errorprint2[101]=1;
kubo_5++;
Text_Kubo_5=IntegerToString(kubo_5);
ObjectSetString(0,obiekt506,OBJPROP_TEXT,Text_Kubo_5);
}
}// lic==1 фин
if(z_izn==1 && z_Var1_Bo_0==0 && z_Var2_Be_0==1) //Праверка регистра Be_0 Изнанки
{
//1/1 Bo_0 && Be_0
bool z_BlockPermis=true;
// Сравнение состояния 2 регистров лица и изнанки по поданному значению
if(z_Sev[1,5]==0 && z_Var2_Be_0==1 && z_BlockPermis==true)// Смена в регистре на противоположное значение и Смена Лица на Изнанку
{
z_Sev[1,5]=1;//Смена в регистре на противоположное значение на лице
z_Sev[1,1]=0;//Смена в регистре на противоположное значение на изнанке
z_lic=1;//Смена Стороны
z_izn=0;//Смена Стороны
//Перераспределение разрешений переменных
z_Var1_Be_0=0;
z_Var1_Bo_0=2;
z_Var1_Be_1=2;
z_Var1_Bo_1=2;
//———-
z_Gy++;
z_Var2_Be_0=2;
z_Var2_Bo_0=2;
z_Var2_Be_1=2;
z_Var2_Bo_1=2;
z_BlockPermis=false;
z_errorprint2[102]=1;
kubo_7++;
Text_Kubo_7=IntegerToString(kubo_7);
ObjectSetString(0,obiekt508,OBJPROP_TEXT,Text_Kubo_7);
}
if(z_Sev[1,5]==1 && z_Var2_Be_0==1 && z_BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку
{
z_Sev[1,1]=0;
z_lic=1;//Смена Стороны
z_izn=0;//Смена Стороны
//Перераспределение разрешений переменных
z_Var1_Be_0=0;
z_Var1_Bo_0=2;
z_Var1_Be_1=2;
z_Var1_Bo_1=2;
//———-
z_Gy++;
z_Var2_Be_0=2;
z_Var2_Bo_0=2;
z_Var2_Be_1=2;
z_Var2_Bo_1=2;
z_BlockPermis=false;
z_errorprint2[103]=1;
kubo_7++;
Text_Kubo_7=IntegerToString(kubo_7);
ObjectSetString(0,obiekt508,OBJPROP_TEXT,Text_Kubo_7);
}
}// izn==1 фин
//Подача значения на Лицо номер 3
//1 Be_1 && Bo_1
if(z_lic==1 && z_Var1_Be_1==0 && z_Var2_Bo_1==1) //Праверка регистра Bo_1 Лица
{
bool z_BlockPermis=true;
// Сравнение состояния 2 регистров лица и изнанки по поданному значению
if(z_Sev[1,1]==0 && z_Var2_Bo_1==1 && z_BlockPermis==true) // Смена в регистре на противоположное значение и Смена Лица на Изнанку
{
z_Sev[1,1]=1;//Смена в регистре на противоположное значение на лице
z_Sev[1,5]=0;//Смена в регистре на противоположное значение на изнанке
z_lic=0;//Смена Стороны
z_izn=1;//Смена Стороны
//Перераспределение разрешений переменных
z_Var1_Be_0=2;
z_Var1_Bo_0=2;
z_Var1_Be_1=2;
z_Var1_Bo_1=0;
//———-
z_Gy++;
z_Var2_Be_0=2;
z_Var2_Bo_0=2;
z_Var2_Be_1=2;
z_Var2_Bo_1=2;
z_BlockPermis=false;
z_errorprint2[104]=1;
kubo_2++;
Text_Kubo_2=IntegerToString(kubo_2);
ObjectSetString(0,obiekt503,OBJPROP_TEXT,Text_Kubo_2);
}
if(z_Sev[1,1]==1 && z_Var2_Bo_1==1 && z_BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку
{
z_Sev[1,5]=0;
z_lic=0;//Смена Стороны
z_izn=1;//Смена Стороны
//Перераспределение разрешений переменных
z_Var1_Be_0=2;
z_Var1_Bo_0=2;
z_Var1_Be_1=2;
z_Var1_Bo_1=0;
//———-
z_Gy++;
z_Var2_Be_0=2;
z_Var2_Bo_0=2;
z_Var2_Be_1=2;
z_Var2_Bo_1=2;
z_BlockPermis=false;
z_errorprint2[105]=1;
kubo_2++;
Text_Kubo_2=IntegerToString(kubo_2);
ObjectSetString(0,obiekt503,OBJPROP_TEXT,Text_Kubo_2);
}
}// lic==1 фин
if(z_izn==1 && z_Var1_Be_1==0 && z_Var2_Bo_1==1) //Праверка регистра Bo_1 Изнанки
{
//1/1 Be_1 && Bo_1
bool z_BlockPermis=true;
// Сравнение состояния 2 регистров лица и изнанки по поданному значению
if(z_Sev[1,6]==0 && z_Var2_Bo_1==1 && z_BlockPermis==true)// Смена в регистре на противоположное значение и Смена Лица на Изнанку
{
z_Sev[1,6]=1;//Смена в регистре на противоположное значение на лице
z_Sev[1,2]=0;//Смена в регистре на противоположное значение на изнанке
z_lic=1;//Смена Стороны
z_izn=0;//Смена Стороны
//Перераспределение разрешений переменных
z_Var1_Be_0=2;
z_Var1_Bo_0=2;
z_Var1_Be_1=2;
z_Var1_Bo_1=0;
//———-
z_Gy++;
z_Var2_Be_0=2;
z_Var2_Bo_0=2;
z_Var2_Be_1=2;
z_Var2_Bo_1=2;
z_BlockPermis=false;
z_errorprint2[106]=1;
kubo_4++;
Text_Kubo_4=IntegerToString(kubo_4);
ObjectSetString(0,obiekt505,OBJPROP_TEXT,Text_Kubo_4);
}
if(z_Sev[1,6]==1 && z_Var2_Bo_1==1 && z_BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку
{
z_Sev[1,2]=0;
z_lic=1;//Смена Стороны
z_izn=0;//Смена Стороны
//Перераспределение разрешений переменных
z_Var1_Be_0=2;
z_Var1_Bo_0=2;
z_Var1_Be_1=2;
z_Var1_Bo_1=0;
//———-
z_Gy++;
z_Var2_Be_0=2;
z_Var2_Bo_0=2;
z_Var2_Be_1=2;
z_Var2_Bo_1=2;
z_BlockPermis=false;
z_errorprint2[107]=1;
kubo_4++;
Text_Kubo_4=IntegerToString(kubo_4);
ObjectSetString(0,obiekt505,OBJPROP_TEXT,Text_Kubo_4);
}
}// izn==1 фин
//Подача значения на Лицо номер 4
//1 Bo_1 && Be_1
if(z_lic==1 && z_Var1_Bo_1==0 && z_Var2_Be_1==1) //Праверка регистра Be_1 Лица
{
bool z_BlockPermis=true;
// Сравнение состояния 2 регистров лица и изнанки по поданному значению
if(z_Sev[1,4]==0 && z_Var2_Be_1==1 && z_BlockPermis==true) // Смена в регистре на противоположное значение и Смена Лица на Изнанку
{
z_Sev[1,4]=1;//Смена в регистре на противоположное значение на лице
z_Sev[1,8]=0;//Смена в регистре на противоположное значение на изнанке
z_lic=0;//Смена Стороны
z_izn=1;//Смена Стороны
//Перераспределение разрешений переменных
z_Var1_Be_0=2;
z_Var1_Bo_0=2;
z_Var1_Be_1=0;
z_Var1_Bo_1=2;
//———-
z_Gy–;
z_Var2_Be_0=2;
z_Var2_Bo_0=2;
z_Var2_Be_1=2;
z_Var2_Bo_1=2;
z_BlockPermis=false;
z_errorprint2[108]=1;
kubo_3++;
Text_Kubo_3=IntegerToString(kubo_3);
ObjectSetString(0,obiekt504,OBJPROP_TEXT,Text_Kubo_3);
}
if(z_Sev[1,4]==1 && z_Var2_Be_1==1 && z_BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку
{
z_Sev[1,8]=0;
z_lic=0;//Смена Стороны
z_izn=1;//Смена Стороны
//Перераспределение разрешений переменных
z_Var1_Be_0=2;
z_Var1_Bo_0=2;
z_Var1_Be_1=0;
z_Var1_Bo_1=2;
//———-
z_Gy–;
z_Var2_Be_0=2;
z_Var2_Bo_0=2;
z_Var2_Be_1=2;
z_Var2_Bo_1=2;
z_BlockPermis=false;
z_errorprint2[109]=1;
kubo_3++;
Text_Kubo_3=IntegerToString(kubo_3);
ObjectSetString(0,obiekt504,OBJPROP_TEXT,Text_Kubo_3);
}
}// lic==1 фин
if(z_izn==1 && z_Var1_Bo_1==0 && z_Var2_Be_1==1) //Праверка регистра Be_1 Изнанки
{
//1/1 Bo_1 && Be_1
bool z_BlockPermis=true;
// Сравнение состояния 2 регистров лица и изнанки по поданному значению
if(z_Sev[1,7]==0 && z_Var2_Be_1==1 && z_BlockPermis==true)// Смена в регистре на противоположное значение и Смена Лица на Изнанку
{
z_Sev[1,7]=1;//Смена в регистре на противоположное значение на лице
z_Sev[1,3]=0;//Смена в регистре на противоположное значение на изнанке
z_lic=1;//Смена Стороны
z_izn=0;//Смена Стороны
//Перераспределение разрешений переменных
z_Var1_Be_0=2;
z_Var1_Bo_0=2;
z_Var1_Be_1=0;
z_Var1_Bo_1=2;
//———-
z_Gy–;
z_Var2_Be_0=2;
z_Var2_Bo_0=2;
z_Var2_Be_1=2;
z_Var2_Bo_1=2;
z_BlockPermis=false;
z_errorprint2[110]=1;
kubo_1++;
Text_Kubo_1=IntegerToString(kubo_1);
ObjectSetString(0,obiekt502,OBJPROP_TEXT,Text_Kubo_1);
}
if(z_Sev[1,7]==1 && z_Var2_Be_1==1 && z_BlockPermis==true) // Смена в регистре не производитсяи Смена Лица на Изнанку
{
z_Sev[1,3]=0;
z_lic=1;//Смена Стороны
z_izn=0;//Смена Стороны
//Перераспределение разрешений переменных
z_Var1_Be_0=2;
z_Var1_Bo_0=2;
z_Var1_Be_1=0;
z_Var1_Bo_1=2;
//———-
z_Gy–;
z_Var2_Be_0=2;
z_Var2_Bo_0=2;
z_Var2_Be_1=2;
z_Var2_Bo_1=2;
z_BlockPermis=false;
z_errorprint2[111]=1;
kubo_1++;
Text_Kubo_1=IntegerToString(kubo_1);
ObjectSetString(0,obiekt502,OBJPROP_TEXT,Text_Kubo_1);
}
}// izn==1 фин
}// Vostok фин
//+——————————————————————+
//|END Sunflower 8 bit volume feed side Z calculation |
//+——————————————————————+
//—–I write the received data into a Binary File for drawing data using the Histogram method
//—–int file_handle15=FileOpen(FileName15,FILE_READ|FILE_WRITE|FILE_BIN);
//—–if(file_handle15>0)
//—– {
//—– FileSeek(file_handle15,0,SEEK_CUR);
//—– FileWriteArray(file_handle15,PIPS_COL_DT,0,WHOLE_ARRAY);
//—– FileClose(file_handle15);
//—– }
//—–int file_handle16=FileOpen(FileName16,FILE_READ|FILE_WRITE|FILE_BIN);
//—–if(file_handle16>0)
//—– {
//—– FileSeek(file_handle16,0,SEEK_CUR);
//—– FileWriteArray(file_handle16,PIPS_COL_Price,0,WHOLE_ARRAY);
//—– FileClose(file_handle16);
//—– }
//+——————————————————————+
//|Sunflower – 5 cells of the church dome |
//+——————————————————————+
//-Купол – Расчёт базируется на 5 семечках и 4 архитектурах. Используется ценавая привязка к 20 центрам в 5 семечках
//-Формула расчёта привязки семечки
//Модуль позиционирования цены в купол
//Print(» 2 – bodypips[MaxInd_bodypips,0] «,bodypips[MaxInd_bodypips,0]);

Price=bodypips[MaxInd_bodypips,0];
Print(» Price – «, Price);
//Print (» Price «,Price);
PriceConv1=(Price*cienm)/Veinte;
PriceConv2=PriceConv1;
PriceConv4=PriceConv2;
PriceConv3=NormalizeDouble((PriceConv1-PriceConv4),2)*cien;
N_Centro=PriceConv3/5;//Приведение цены к купольному центру
N_Gr20=PriceConv2+1;
if(N_Centro==0)
{
N_Centro=20;
N_Gr20++;
}
//+——————————————————————+
//|Sunflower – cluster 16 variables of the church dome |
//+——————————————————————+
int Arch_Inf;
string Var_Inf;
int Cluster16_inf;
int AgujaReloj_inf;
//Print(» + ——————————————-+»);
double Price_A=(bodypips[MaxInd_bodypips,0])*cienm;
//Print(» Price_A] «,Price_A);
//double CLuster_Ne=Price_A/16;
//Print(«CLuster_Ne «,CLuster_Ne);
double CLuster_N=NormalizeDouble(Price_A/16,4);
//Print(«CLuster_N «,CLuster_N);
int CLuster_N1=CLuster_N;
//Print(«CLuster_N1 «,CLuster_N1);
double Cluster_Res=(CLuster_N-CLuster_N1)*100;
//Print(«Cluster_Res «,Cluster_Res);
double Var_I=Cluster_Res/6.25;
//Print(» + ——————————————-+»);
if(Var_I==0)
{
Var_I=16;
}
//Print(«Var_I «,Var_I);
//Comment(» Numero de Variedad «,Var_I);
if(Var_I==1)
{
// Print(«+——————————————————————+»);
Arch_Inf=1;
//Print(» Arch_Inf «,Arch_Inf);
Var_Inf=»Be_1_Sev»;
//Print(» Var_Inf «,Var_Inf);
//Print(» N_Centro_20 «,N_Centro);
//Print(» N_Gr200 «,N_Gr20);
Cluster16_inf=CLuster_N1+1;
//Print(» Cluster16_inf «,Cluster16_inf);
AgujaReloj_inf=-1;
//Print(» AgujaReloj_inf «,AgujaReloj_inf);
}
if(Var_I==2)
{
//Print(«+——————————————————————+»);
Arch_Inf=2;
//Print(» Arch_Inf «,Arch_Inf);
Var_Inf=»Bo_0_Sev»;
//Print(» Var_Inf «,Var_Inf);
//Print(» N_Centro_20 «,N_Centro);
//Print(» N_Gr200 «,N_Gr20);
Cluster16_inf=CLuster_N1+1;
//Print(» Cluster16_inf «,Cluster16_inf);
AgujaReloj_inf=-1;
//Print(» AgujaReloj_inf «,AgujaReloj_inf);
}
if(Var_I==3)
{
//Print(«+——————————————————————+»);
Arch_Inf=3;
//Print(» Arch_Inf «,Arch_Inf);
Var_Inf=»Be_0_Sev»;
//Print(» Var_Inf «,Var_Inf);
//Print(» N_Centro_20 «,N_Centro);
//Print(» N_Gr200 «,N_Gr20);
Cluster16_inf=CLuster_N1+1;
//Print(» Cluster16_inf «,Cluster16_inf);
AgujaReloj_inf=-1;
//Print(» AgujaReloj_inf «,AgujaReloj_inf);
}
if(Var_I==4)
{
//Print(«+——————————————————————+»);
Arch_Inf=4;
//Print(» Arch_Inf «,Arch_Inf);
Var_Inf=»Bo_1_Sev»;
//Print(» Var_Inf «,Var_Inf);
//Print(» N_Centro_20 «,N_Centro);
//Print(» N_Gr200 «,N_Gr20);
Cluster16_inf=CLuster_N1+1;
//Print(» Cluster16_inf «,Cluster16_inf);
AgujaReloj_inf=-1;
//Print(» AgujaReloj_inf «,AgujaReloj_inf);
}
if(Var_I==5)
{
//Print(«+——————————————————————+»);
Arch_Inf=1;
//Print(» Arch_Inf «,Arch_Inf);
Var_Inf=»Bo_1_Sev»;
//Print(» Var_Inf «,Var_Inf);
//Print(» N_Centro_20 «,N_Centro);
//Print(» N_Gr200 «,N_Gr20);
Cluster16_inf=CLuster_N1+1;
//Print(» Cluster16_inf «,Cluster16_inf);
AgujaReloj_inf=1;
//Print(» AgujaReloj_inf «,AgujaReloj_inf);
}
if(Var_I==6)
{
//Print(«+——————————————————————+»);
Arch_Inf=2;
//Print(» Arch_Inf «,Arch_Inf);
Var_Inf=»Be_0_Sev»;
//Print(» Var_Inf «,Var_Inf);
//Print(» N_Centro_20 «,N_Centro);
//Print(» N_Gr200 «,N_Gr20);
Cluster16_inf=CLuster_N1+1;
//Print(» Cluster16_inf «,Cluster16_inf);
AgujaReloj_inf=1;
//Print(» AgujaReloj_inf «,AgujaReloj_inf);
}
if(Var_I==7)
{
//Print(«+——————————————————————+»);
Arch_Inf=3;
//Print(» Arch_Inf «,Arch_Inf);
Var_Inf=»Bo_0_Sev»;
//Print(» Var_Inf «,Var_Inf);
//Print(» N_Centro_20 «,N_Centro);
//Print(» N_Gr200 «,N_Gr20);
Cluster16_inf=CLuster_N1+1;
//Print(» Cluster16_inf «,Cluster16_inf);
AgujaReloj_inf=1;
//Print(» AgujaReloj_inf «,AgujaReloj_inf);
}
if(Var_I==8)
{
//Print(«+——————————————————————+»);
Arch_Inf=4;
//Print(» Arch_Inf «,Arch_Inf);
Var_Inf=»Be_1_Sev»;
//Print(» Var_Inf «,Var_Inf);
//Print(» N_Centro_20 «,N_Centro);
//Print(» N_Gr200 «,N_Gr20);
Cluster16_inf=CLuster_N1+1;
//Print(» Cluster16_inf «,Cluster16_inf);
AgujaReloj_inf=1;
//Print(» AgujaReloj_inf «,AgujaReloj_inf);
}
if(Var_I==9)
{
//Print(«+——————————————————————+»);
Arch_Inf=1;
//Print(» Arch_Inf «,Arch_Inf);
Var_Inf=»Be_0_Sev»;
//Print(» Var_Inf «,Var_Inf);
//Print(» N_Centro_20 «,N_Centro);
//Print(» N_Gr200 «,N_Gr20);
Cluster16_inf=CLuster_N1+1;
//Print(» Cluster16_inf «,Cluster16_inf);
AgujaReloj_inf=-1;
//Print(» AgujaReloj_inf «,AgujaReloj_inf);
}
if(Var_I==10)
{
//Print(«+——————————————————————+»);
Arch_Inf=2;
//Print(» Arch_Inf «,Arch_Inf);
Var_Inf=»Bo_1_Sev»;
//Print(» Var_Inf «,Var_Inf);
//Print(» N_Centro_20 «,N_Centro);
//Print(» N_Gr200 «,N_Gr20);
Cluster16_inf=CLuster_N1+1;
//Print(» Cluster16_inf «,Cluster16_inf);
AgujaReloj_inf=-1;
//Print(» AgujaReloj_inf «,AgujaReloj_inf);
}
if(Var_I==11)
{
//Print(«+——————————————————————+»);
Arch_Inf=3;
//Print(» Arch_Inf «,Arch_Inf);
Var_Inf=»Be_1_Sev»;
//Print(» Var_Inf «,Var_Inf);
//Print(» N_Centro_20 «,N_Centro);
//Print(» N_Gr200 «,N_Gr20);
Cluster16_inf=CLuster_N1+1;
//Print(» Cluster16_inf «,Cluster16_inf);
AgujaReloj_inf=-1;
//Print(» AgujaReloj_inf «,AgujaReloj_inf);
}
if(Var_I==12)
{
//Print(«+——————————————————————+»);
Arch_Inf=4;
//Print(» Arch_Inf «,Arch_Inf);
Var_Inf=»Bo_0_Sev»;
//Print(» Var_Inf «,Var_Inf);
//Print(» N_Centro_20 «,N_Centro);
//Print(» N_Gr200 «,N_Gr20);
Cluster16_inf=CLuster_N1+1;
//Print(» Cluster16_inf «,Cluster16_inf);
AgujaReloj_inf=-1;
//Print(» AgujaReloj_inf «,AgujaReloj_inf);
}
if(Var_I==13)
{
//Print(«+——————————————————————+»);
Arch_Inf=1;
//Print(» Arch_Inf «,Arch_Inf);
Var_Inf=»Bo_0_Sev»;
//Print(» Var_Inf «,Var_Inf);
//Print(» N_Centro_20 «,N_Centro);
//Print(» N_Gr200 «,N_Gr20);
Cluster16_inf=CLuster_N1+1;
//Print(» Cluster16_inf «,Cluster16_inf);
AgujaReloj_inf=1;
//Print(» AgujaReloj_inf «,AgujaReloj_inf);
}
if(Var_I==14)
{
//Print(«+——————————————————————+»);
Arch_Inf=2;
//Print(» Arch_Inf «,Arch_Inf);
Var_Inf=»Be_1_Sev»;
//Print(» Var_Inf «,Var_Inf);
//Print(» N_Centro_20 «,N_Centro);
//Print(» N_Gr200 «,N_Gr20);
Cluster16_inf=CLuster_N1+1;
//Print(» Cluster16_inf «,Cluster16_inf);
AgujaReloj_inf=1;
//Print(» AgujaReloj_inf «,AgujaReloj_inf);
}
if(Var_I==15)
{
//Print(«+——————————————————————+»);
Arch_Inf=3;
//Print(» Arch_Inf «,Arch_Inf);
Var_Inf=»Bo_1_Sev»;
//Print(» Var_Inf «,Var_Inf);
//Print(» N_Centro_20 «,N_Centro);
//Print(» N_Gr200 «,N_Gr20);
Cluster16_inf=CLuster_N1+1;
//Print(» Cluster16_inf «,Cluster16_inf);
AgujaReloj_inf=1;
//Print(» AgujaReloj_inf «,AgujaReloj_inf);
}
if(Var_I==16)
{
//Print(«+——————————————————————+»);
Arch_Inf=4;
//Print(» Arch_Inf «,Arch_Inf);
Var_Inf=»Be_0_Sev»;
//Print(» Var_Inf «,Var_Inf);
//Print(» N_Centro_20 «,N_Centro);
//Print(» N_Gr200 «,N_Gr20);
Cluster16_inf=CLuster_N1+1;
//Print(» Cluster16_inf «,Cluster16_inf);
AgujaReloj_inf=1;
//Print(» AgujaReloj_inf «,AgujaReloj_inf);
}
//+——————————————————————+
//|END Sunflower – 5 cells of the church dome |
//+——————————————————————+
//Print(» N_Centro «,N_Centro,» N_Gr20 «,N_Gr20);
//Be_0
//Семечка 1
//Архитектура 1
//Заход в архитектуру по формуле
//Be_0
//+——————————————————————+
//|Sunflower – sunflower seeds architecture |
//+——————————————————————+
// —— Свод Цена-Купол + Свод Цена – Крест Абьём
// Пример. Массива Север
// Sev[1,1]=0; Be_0
// Sev[1,2]=0; Bo_0
// Sev[1,3]=0; Be_1
// Sev[1,4]=0; Bo_1
//Блок Получения Разрешений для оброботки события расчёта патернов
//1.Расчитывается – сравнивается предыдущие значения с текущими
//Print(» comp_Sev[1,1]!=Sev[1,1] «,comp_Sev[1,1]!=Sev[1,1]); //
//Print(» comp_Sev «,comp_Sev[1,1],comp_Sev[1,2],comp_Sev[1,3],comp_Sev[1,4],comp_Sev[1,5],comp_Sev[1,6],comp_Sev[1,7],comp_Sev[1,8]);
//Print(» Sev «,Sev[1,1],Sev[1,2],Sev[1,3],Sev[1,4],Sev[1,5],Sev[1,6],Sev[1,7],Sev[1,8]);
if(comp_Sev[1,1]!=Sev[1,1] && Sev[1,1]==1)//Be_0 Место 1,5,9,13,17 Если в массиве появились изменения после пересчёта с массивом сравнения то выявляется место в котором появились изменения и присваиваются разрешения на оброботку
{
Per_Sev1=1;
Per_Sev2=0;
Per_Sev3=0;
Per_Sev4=0;
Per_Sev5=0;
Per_Sev6=0;
Per_Sev7=0;
Per_Sev8=0;
//Print(«Per_Sev1 «,Per_Sev1);
Arch3=1;
} //присвоил разрешение на оброботку события
if(comp_Sev[1,2]!=Sev[1,2] && Sev[1,2]==1)//Bo_0 Место 2,6,10,14,18
{
Per_Sev1=0;
Per_Sev2=1;
Per_Sev3=0;
Per_Sev4=0;
Per_Sev5=0;
Per_Sev6=0;
Per_Sev7=0;
Per_Sev8=0;
//Print(«Per_Sev2 «,Per_Sev2);
Arch3=2;
}
if(comp_Sev[1,3]!=Sev[1,3] && Sev[1,3]==1)//Be_1 Место 3,7,11,15,19
{
Per_Sev1=0;
Per_Sev2=0;
Per_Sev3=1;
Per_Sev4=0;
Per_Sev5=0;
Per_Sev6=0;
Per_Sev7=0;
Per_Sev8=0;
//Print(«Per_Sev3 «,Per_Sev3);
Arch3=3;
}
if(comp_Sev[1,4]!=Sev[1,4] && Sev[1,4]==1)//Bo_1 Место 4,8,12,16,20
{
Per_Sev1=0;
Per_Sev2=0;
Per_Sev3=0;
Per_Sev4=1;
Per_Sev5=0;
Per_Sev6=0;
Per_Sev7=0;
Per_Sev8=0;
//Print(«Per_Sev4 «,Per_Sev4);
Arch3=4;
}
if(comp_Sev[1,5]!=Sev[1,5] && Sev[1,5]==1)//Be_0 Место 1,5,9,13,17 Если в массиве появились изменения после пересчёта с массивом сравнения то выявляется место в котором появились изменения и присваиваются разрешения на оброботку
{
Per_Sev1=0;
Per_Sev2=0;
Per_Sev3=0;
Per_Sev4=0;
Per_Sev5=1;
Per_Sev6=0;
Per_Sev7=0;
Per_Sev8=0;
//Print(«Per_Sev1 «,Per_Sev1);
Arch3=5;
} //присвоил разрешение на оброботку события
if(comp_Sev[1,6]!=Sev[1,6] && Sev[1,6]==1)//Be_0 Место 1,5,9,13,17 Если в массиве появились изменения после пересчёта с массивом сравнения то выявляется место в котором появились изменения и присваиваются разрешения на оброботку
{
Per_Sev1=0;
Per_Sev2=0;
Per_Sev3=0;
Per_Sev4=0;
Per_Sev5=0;
Per_Sev6=1;
Per_Sev7=0;
Per_Sev8=0;
//Print(«Per_Sev1 «,Per_Sev1);
Arch3=6;
} //присвоил разрешение на оброботку события
if(comp_Sev[1,7]!=Sev[1,7] && Sev[1,7]==1)//Be_0 Место 1,5,9,13,17 Если в массиве появились изменения после пересчёта с массивом сравнения то выявляется место в котором появились изменения и присваиваются разрешения на оброботку
{
Per_Sev1=0;
Per_Sev2=0;
Per_Sev3=0;
Per_Sev4=0;
Per_Sev5=0;
Per_Sev6=0;
Per_Sev7=1;
Per_Sev8=0;
//Print(«Per_Sev1 «,Per_Sev1);
Arch3=7;
} //присвоил разрешение на оброботку события
if(comp_Sev[1,8]!=Sev[1,8] && Sev[1,8]==1)//Be_0 Место 1,5,9,13,17 Если в массиве появились изменения после пересчёта с массивом сравнения то выявляется место в котором появились изменения и присваиваются разрешения на оброботку
{
Per_Sev1=0;
Per_Sev2=0;
Per_Sev3=0;
Per_Sev4=0;
Per_Sev5=0;
Per_Sev6=0;
Per_Sev7=0;
Per_Sev8=1;
//Print(«Per_Sev1 «,Per_Sev1);
Arch3=8;
} //присвоил разрешение на оброботку события
//Print(«Arch3 «,Arch3);
//int PermisBLock=0;
//if(comp_Sev[1,1]!=Sev[1,1] && comp_Sev[1,2]!=Sev[1,2] && comp_Sev[1,3]!=Sev[1,3] && comp_Sev[1,4]!=Sev[1,4] && comp_Sev[1,5]!=Sev[1,5] && comp_Sev[1,6]==Sev[1,6] && comp_Sev[1,7]==Sev[1,7] && comp_Sev[1,8]==Sev[1,8])//Если патерн после пересчёта на изменился относительно подачи абьёма
//{ PermisBLock=1;}
//if(PermisBLock==1 && Price_Compare!=bodypips[MaxInd_bodypips,0])//Если цена разная то доступ в блок открыт
//{
//2. Определяется номер центра и порядковый номер семечки
//Print(«N_Centro 1 «,N_Centro);//test OK
N_Centro_r=0;
PipsNumber=0;
if(N_Centro==1)
{
N_Centro_r=1;
PipsNumber=1;
}
if(N_Centro==2)
{
N_Centro_r=2;
PipsNumber=1;
}
if(N_Centro==3)
{
N_Centro_r=3;
PipsNumber=1;
}
if(N_Centro==4)
{
N_Centro_r=4;
PipsNumber=1;
}
if(N_Centro==5)
{
N_Centro_r=1;
PipsNumber=2;
}
if(N_Centro==6)
{
N_Centro_r=2;
PipsNumber=2;
}
if(N_Centro==7)
{
N_Centro_r=3;
PipsNumber=2;
}
if(N_Centro==8)
{
N_Centro_r=4;
PipsNumber=2;
}
if(N_Centro==9)
{
N_Centro_r=1;
PipsNumber=3;
}
if(N_Centro==10)
{
N_Centro_r=2;
PipsNumber=3;
}
if(N_Centro==11)
{
N_Centro_r=3;
PipsNumber=3;
}
if(N_Centro==12)
{
N_Centro_r=4;
PipsNumber=3;
}
if(N_Centro==13)
{
N_Centro_r=1;
PipsNumber=4;
}
if(N_Centro==14)
{
N_Centro_r=2;
PipsNumber=4;
}
if(N_Centro==15)
{
N_Centro_r=3;
PipsNumber=4;
}
if(N_Centro==16)
{
N_Centro_r=4;
PipsNumber=4;
}
if(N_Centro==17)
{
N_Centro_r=1;
PipsNumber=5;
}
if(N_Centro==18)
{
N_Centro_r=2;
PipsNumber=5;
}
if(N_Centro==19)
{
N_Centro_r=3;
PipsNumber=5;
}
if(N_Centro==20)
{
N_Centro_r=4;
PipsNumber=5;
}
//Print(» N_Centro «,N_Centro); ok
//Print(» N_Centro_r «,N_Centro_r);ok
//Print(» PipsNumber «,PipsNumber);
//string PrintArch;
//3.Производится расчт по переменным Be_0,Bo_0,Be_1,Bo_1
//Расчёт по переменной Be_0 Место 1,5,9,13,17
//Print(» Be_0_C,Bo_0_C,Be_1_C,Bo_1_C» ,Be_0_C,Bo_0_C,Be_1_C,Bo_1_C);//ok
//InternalPat_1=0;
if(Per_Sev1==1 && N_Centro_r==1 && Be_1_C==1)//Соеденение Цены в виде архитектуры и обьёма в виде бинарного механизма Патерн 1 Внутреннее соединение //
{
InternalPat_1=1;//Присваивание понимания обьёма и цены
//Per_Sev1=0;//Снятие разрешение на оброботку блока
//Print(» InternalPat_1 «,InternalPat_1,» Price «,bodypips[MaxInd_bodypips,0]);
}
if(Per_Sev1==1 && N_Centro_r==2 && Bo_0_C==1)//Соеденение Цены в виде архитектуры и обьёма в виде бинарного механизма Патерн 1 Внутреннее соединение //
{
InternalPat_1=1;//Присваивание понимания обьёма и цены
//Per_Sev1=0;//Снятие разрешение на оброботку блока
//Print(» InternalPat_1 «,InternalPat_1,» Price «,bodypips[MaxInd_bodypips,0]);
}
if(Per_Sev1==1 && N_Centro_r==3 && Be_0_C==1)//Соеденение Цены в виде архитектуры и обьёма в виде бинарного механизма Патерн 1 Внутреннее соединение //
{
// N_Centro_r==3 – зелёный
// Per_Sev1==1 – Подача обьёма на Be_0
// Be_0_C==1 – Подаваемая переменная в архитектуре центра 3
InternalPat_1=1;//Присваивание понимания обьёма и цены
//Per_Sev1=0;//Снятие разрешение на оброботку блока
//Print(» InternalPat_1 «,InternalPat_1,» Price «,bodypips[MaxInd_bodypips,0]);
}
if(Per_Sev1==1 && N_Centro_r==4 && Bo_1_C==1)//Соеденение Цены в виде архитектуры и обьёма в виде бинарного механизма Патерн 1 Внутреннее соединение //
{
InternalPat_1=1;//Присваивание понимания обьёма и цены
//Per_Sev1=0;//Снятие разрешение на оброботку блока
//Print(» InternalPat_1 «,InternalPat_1,» Price «,bodypips[MaxInd_bodypips,0]);
}
//Расчёт по переменной Be_0 Место 2,6,10,14,18
if(Per_Sev2==1 && N_Centro_r==1 && Bo_1_C==1)//Соеденение Цены в виде архитектуры и обьёма в виде бинарного механизма Патерн 1 Внутреннее соединение //
{
InternalPat_1=2;//Присваивание понимания обьёма и цены
//Per_Sev2=0;//Снятие разрешение на оброботку блока
//Print(» InternalPat_1 «,InternalPat_1,» Price «,bodypips[MaxInd_bodypips,0]);
}
if(Per_Sev2==1 && N_Centro_r==2 && Be_0_C==1)//Соеденение Цены в виде архитектуры и обьёма в виде бинарного механизма Патерн 1 Внутреннее соединение //
{
InternalPat_1=2;//Присваивание понимания обьёма и цены
//Per_Sev2=0;//Снятие разрешение на оброботку блока
//Print(» InternalPat_1 «,InternalPat_1,» Price «,bodypips[MaxInd_bodypips,0]);
}
if(Per_Sev2==1 && N_Centro_r==3 && Bo_0_C==1)//Соеденение Цены в виде архитектуры и обьёма в виде бинарного механизма Патерн 1 Внутреннее соединение //
{
InternalPat_1=2;//Присваивание понимания обьёма и цены
//Per_Sev2=0;//Снятие разрешение на оброботку блока
//Print(» InternalPat_1 «,InternalPat_1,» Price «,bodypips[MaxInd_bodypips,0]);
}
if(Per_Sev2==1 && N_Centro_r==4 && Be_1_C==1)//Соеденение Цены в виде архитектуры и обьёма в виде бинарного механизма Патерн 1 Внутреннее соединение //
{
InternalPat_1=2;//Присваивание понимания обьёма и цены
//Per_Sev2=0;//Снятие разрешение на оброботку блока
//Print(» InternalPat_1 «,InternalPat_1,» Price «,bodypips[MaxInd_bodypips,0]);
}
//Расчёт по переменной Be_0 Место 3,7,11,15,19
if(Per_Sev3==1 && N_Centro_r==1 && Be_0_C==1)//Соеденение Цены в виде архитектуры и обьёма в виде бинарного механизма Патерн 1 Внутреннее соединение //
{
InternalPat_1=3;//Присваивание понимания обьёма и цены
//Per_Sev3=0;//Снятие разрешение на оброботку блока
//Print(» InternalPat_1 «,InternalPat_1,» Price «,bodypips[MaxInd_bodypips,0]);
}
if(Per_Sev3==1 && N_Centro_r==2 && Bo_1_C==1)//Соеденение Цены в виде архитектуры и обьёма в виде бинарного механизма Патерн 1 Внутреннее соединение //
{
InternalPat_1=3;//Присваивание понимания обьёма и цены
//Per_Sev3=0;//Снятие разрешение на оброботку блока
//Print(» InternalPat_1 «,InternalPat_1,» Price «,bodypips[MaxInd_bodypips,0]);
}
if(Per_Sev3==1 && N_Centro_r==3 && Be_1_C==1)//Соеденение Цены в виде архитектуры и обьёма в виде бинарного механизма Патерн 1 Внутреннее соединение //
{
InternalPat_1=3;//Присваивание понимания обьёма и цены
//Per_Sev3=0;//Снятие разрешение на оброботку блока
//Print(» InternalPat_1 «,InternalPat_1,» Price «,bodypips[MaxInd_bodypips,0]);
}
if(Per_Sev3==1 && N_Centro_r==4 && Bo_0_C==1)//Соеденение Цены в виде архитектуры и обьёма в виде бинарного механизма Патерн 1 Внутреннее соединение //
{
InternalPat_1=3;//Присваивание понимания обьёма и цены
//Per_Sev3=0;//Снятие разрешение на оброботку блока
//Print(» InternalPat_1 «,InternalPat_1,» Price «,bodypips[MaxInd_bodypips,0]);
}
//Расчёт по переменной Be_0 Место 4,8,12,16,20
if(Per_Sev4==1 && N_Centro_r==1 && Bo_0_C==1)//Соеденение Цены в виде архитектуры и обьёма в виде бинарного механизма Патерн 1 Внутреннее соединение //
{
InternalPat_1=4;//Присваивание понимания обьёма и цены
//Per_Sev4=0;//Снятие разрешение на оброботку блока
//Print(» InternalPat_1 «,InternalPat_1,» Price «,bodypips[MaxInd_bodypips,0]);
}
if(Per_Sev4==1 && N_Centro_r==2 && Be_1_C==1)//Соеденение Цены в виде архитектуры и обьёма в виде бинарного механизма Патерн 1 Внутреннее соединение //
{
InternalPat_1=4;//Присваивание понимания обьёма и цены
//Per_Sev4=0;//Снятие разрешение на оброботку блока
//Print(» InternalPat_1 «,InternalPat_1,» Price «,bodypips[MaxInd_bodypips,0]);
}
if(Per_Sev4==1 && N_Centro_r==3 && Bo_1_C==1)//Соеденение Цены в виде архитектуры и обьёма в виде бинарного механизма Патерн 1 Внутреннее соединение //
{
InternalPat_1=4;//Присваивание понимания обьёма и цены
//Per_Sev4=0;//Снятие разрешение на оброботку блока
//Print(» InternalPat_1 «,InternalPat_1,» Price «,bodypips[MaxInd_bodypips,0]);
}
if(Per_Sev4==1 && N_Centro_r==4 && Be_0_C==1)//Соеденение Цены в виде архитектуры и обьёма в виде бинарного механизма Патерн 1 Внутреннее соединение //
{
InternalPat_1=4;//Присваивание понимания обьёма и цены
//Per_Sev4=0;//Снятие разрешение на оброботку блока
//Print(» InternalPat_1 «,InternalPat_1,» Price «,bodypips[MaxInd_bodypips,0]);
}
if(Per_Sev5==1 && N_Centro_r==1 && Be_1_C==1)//Соеденение Цены в виде архитектуры и обьёма в виде бинарного механизма Патерн 1 Внутреннее соединение //
{
InternalPat_1=5;//Присваивание понимания обьёма и цены
//Per_Sev1=0;//Снятие разрешение на оброботку блока
//Print(» InternalPat_1 «,InternalPat_1,» Price «,bodypips[MaxInd_bodypips,0]);
}
if(Per_Sev5==1 && N_Centro_r==2 && Bo_0_C==1)//Соеденение Цены в виде архитектуры и обьёма в виде бинарного механизма Патерн 1 Внутреннее соединение //
{
InternalPat_1=5;//Присваивание понимания обьёма и цены
//Per_Sev1=0;//Снятие разрешение на оброботку блока
//Print(» InternalPat_1 «,InternalPat_1,» Price «,bodypips[MaxInd_bodypips,0]);
}
if(Per_Sev5==1 && N_Centro_r==3 && Be_0_C==1)//Соеденение Цены в виде архитектуры и обьёма в виде бинарного механизма Патерн 1 Внутреннее соединение //
{
// N_Centro_r==3 – зелёный
// Per_Sev1==1 – Подача обьёма на Be_0
// Be_0_C==1 – Подаваемая переменная в архитектуре центра 3
InternalPat_1=5;//Присваивание понимания обьёма и цены
//Per_Sev1=0;//Снятие разрешение на оброботку блока
//Print(» InternalPat_1 «,InternalPat_1,» Price «,bodypips[MaxInd_bodypips,0]);
}
if(Per_Sev5==1 && N_Centro_r==4 && Bo_1_C==1)//Соеденение Цены в виде архитектуры и обьёма в виде бинарного механизма Патерн 1 Внутреннее соединение //
{
InternalPat_1=5;//Присваивание понимания обьёма и цены
//Per_Sev1=0;//Снятие разрешение на оброботку блока
//Print(» InternalPat_1 «,InternalPat_1,» Price «,bodypips[MaxInd_bodypips,0]);
}
//Расчёт по переменной Be_0 Место 2,6,10,14,18
if(Per_Sev6==1 && N_Centro_r==1 && Bo_1_C==1)//Соеденение Цены в виде архитектуры и обьёма в виде бинарного механизма Патерн 1 Внутреннее соединение //
{
InternalPat_1=6;//Присваивание понимания обьёма и цены
//Per_Sev2=0;//Снятие разрешение на оброботку блока
//Print(» InternalPat_1 «,InternalPat_1,» Price «,bodypips[MaxInd_bodypips,0]);
}
if(Per_Sev6==1 && N_Centro_r==2 && Be_0_C==1)//Соеденение Цены в виде архитектуры и обьёма в виде бинарного механизма Патерн 1 Внутреннее соединение //
{
InternalPat_1=6;//Присваивание понимания обьёма и цены
//Per_Sev2=0;//Снятие разрешение на оброботку блока
//Print(» InternalPat_1 «,InternalPat_1,» Price «,bodypips[MaxInd_bodypips,0]);
}
if(Per_Sev6==1 && N_Centro_r==3 && Bo_0_C==1)//Соеденение Цены в виде архитектуры и обьёма в виде бинарного механизма Патерн 1 Внутреннее соединение //
{
InternalPat_1=6;//Присваивание понимания обьёма и цены
//Per_Sev2=0;//Снятие разрешение на оброботку блока
//Print(» InternalPat_1 «,InternalPat_1,» Price «,bodypips[MaxInd_bodypips,0]);
}
if(Per_Sev6==1 && N_Centro_r==4 && Be_1_C==1)//Соеденение Цены в виде архитектуры и обьёма в виде бинарного механизма Патерн 1 Внутреннее соединение //
{
InternalPat_1=6;//Присваивание понимания обьёма и цены
//Per_Sev2=0;//Снятие разрешение на оброботку блока
//Print(» InternalPat_1 «,InternalPat_1,» Price «,bodypips[MaxInd_bodypips,0]);
}
//Расчёт по переменной Be_0 Место 3,7,11,15,19
if(Per_Sev7==1 && N_Centro_r==1 && Be_0_C==1)//Соеденение Цены в виде архитектуры и обьёма в виде бинарного механизма Патерн 1 Внутреннее соединение //
{
InternalPat_1=7;//Присваивание понимания обьёма и цены
//Per_Sev3=0;//Снятие разрешение на оброботку блока
//Print(» InternalPat_1 «,InternalPat_1,» Price «,bodypips[MaxInd_bodypips,0]);
}
if(Per_Sev7==1 && N_Centro_r==2 && Bo_1_C==1)//Соеденение Цены в виде архитектуры и обьёма в виде бинарного механизма Патерн 1 Внутреннее соединение //
{
InternalPat_1=7;//Присваивание понимания обьёма и цены
//Per_Sev3=0;//Снятие разрешение на оброботку блока
//Print(» InternalPat_1 «,InternalPat_1,» Price «,bodypips[MaxInd_bodypips,0]);
}
if(Per_Sev7==1 && N_Centro_r==3 && Be_1_C==1)//Соеденение Цены в виде архитектуры и обьёма в виде бинарного механизма Патерн 1 Внутреннее соединение //
{
InternalPat_1=7;//Присваивание понимания обьёма и цены
//Per_Sev3=0;//Снятие разрешение на оброботку блока
//Print(» InternalPat_1 «,InternalPat_1,» Price «,bodypips[MaxInd_bodypips,0]);
}
if(Per_Sev7==1 && N_Centro_r==4 && Bo_0_C==1)//Соеденение Цены в виде архитектуры и обьёма в виде бинарного механизма Патерн 1 Внутреннее соединение //
{
InternalPat_1=7;//Присваивание понимания обьёма и цены
//Per_Sev3=0;//Снятие разрешение на оброботку блока
//Print(» InternalPat_1 «,InternalPat_1,» Price «,bodypips[MaxInd_bodypips,0]);
}
//Расчёт по переменной Be_0 Место 4,8,12,16,20
if(Per_Sev8==1 && N_Centro_r==1 && Bo_0_C==1)//Соеденение Цены в виде архитектуры и обьёма в виде бинарного механизма Патерн 1 Внутреннее соединение //
{
InternalPat_1=8;//Присваивание понимания обьёма и цены
//Per_Sev4=0;//Снятие разрешение на оброботку блока
//Print(» InternalPat_1 «,InternalPat_1,» Price «,bodypips[MaxInd_bodypips,0]);
}
if(Per_Sev8==1 && N_Centro_r==2 && Be_1_C==1)//Соеденение Цены в виде архитектуры и обьёма в виде бинарного механизма Патерн 1 Внутреннее соединение //
{
InternalPat_1=8;//Присваивание понимания обьёма и цены
//Per_Sev4=0;//Снятие разрешение на оброботку блока
//Print(» InternalPat_1 «,InternalPat_1,» Price «,bodypips[MaxInd_bodypips,0]);
}
if(Per_Sev8==1 && N_Centro_r==3 && Bo_1_C==1)//Соеденение Цены в виде архитектуры и обьёма в виде бинарного механизма Патерн 1 Внутреннее соединение //
{
InternalPat_1=8;//Присваивание понимания обьёма и цены
//Per_Sev4=0;//Снятие разрешение на оброботку блока
//Print(» InternalPat_1 «,InternalPat_1,» Price «,bodypips[MaxInd_bodypips,0]);
}
if(Per_Sev8==1 && N_Centro_r==4 && Be_0_C==1)//Соеденение Цены в виде архитектуры и обьёма в виде бинарного механизма Патерн 1 Внутреннее соединение //
{
InternalPat_1=8;//Присваивание понимания обьёма и цены
//Per_Sev4=0;//Снятие разрешение на оброботку блока
//Print(» InternalPat_1 «,InternalPat_1,» Price «,bodypips[MaxInd_bodypips,0]);
}
//Print(» R1 «,» Per_Sev1 «,Per_Sev1,» Per_Sev2 «,Per_Sev2,» Per_Sev3 «,Per_Sev3,» Per_Sev4 «,Per_Sev4,» N_Centro_r «,N_Centro_r,» Bo_0_C «,Bo_0_C,» Be_0_C «,Be_0_C,» Be_1_C «,Be_1_C,» Bo_1_C «,Bo_1_C,» InternalPat_1 «,InternalPat_1,» Form_Patern_Finder[w3,8] «,Form_Patern_Finder[w3,8]);
// —— Функция записи новой цены и отслеживание существующей на предмет складывания патерна «Внутреннего» ——
int newPrise=0;
int PriceExist=0;
for(w=1; w<=1000; w++)//Перебор для поиска по условию Если цена НЕ равна записаннаму значению в Массиве 1,00001!=1,00002
{
if(Array_Errors==true)
{
Print(» Index Array «,w,» 9113″);
}
if((Form_Patern_Finder[w,13]!=0 && Form_Patern_Finder[w,13]==N_Gr20 && Form_Patern_Finder[w,12]==PipsNumber && ((Form_Patern_Finder[w,1]!=bodypips[MaxInd_bodypips,0]) ||(Form_Patern_Finder[w,2]!=bodypips[MaxInd_bodypips,0])|| (Form_Patern_Finder[w,3]!=bodypips[MaxInd_bodypips,0])||(Form_Patern_Finder[w,4]!=bodypips[MaxInd_bodypips,0])))/*Form_Patern_Finder[w,9]=N_Gr20 && Form_Patern_Finder[w,6]==1 &&*/ && InternalPat_1==1) //Поиск цены . Возвращает индекс в массиве
{
PriceExist=1;
if(PriceExist==1/*»Указывает на найденную цену Функцией выше»*/ && InternalPat_1==1/*»Указывает на соеденение в ячейке цены и абьёма»*/ && Form_Patern_Finder[w,11]!=1)//Если цена существует и w не равен 0 и Патерн не был собран. Если w равен налю произвести новую запись то доступ в функцию открыт
{
// Print(«Acces ok»);
// Print(«Form_Patern_Finder[w,2] «,Form_Patern_Finder[w,2]);
// Print(«Form_Patern_Finder[w,3] «,Form_Patern_Finder[w,3]);
// Print(«Form_Patern_Finder[w,4] «,Form_Patern_Finder[w,4]);
// Print(«Form_Patern_Finder[w,5] «,Form_Patern_Finder[w,5]);
// Print(«Form_Patern_Finder[w,8] «,Form_Patern_Finder[w,8]);
// Print(«N_Centro_r «,N_Centro_r);
//Form_Patern_Finder[w,10]=Form_Patern_Finder[w,10]+1;//Подсчёт заходов на проверку при совпадении
//Прослеживаю существующий параметр патерна по 4 направлениям
//Центр 1 Желтый
int Change1=0,Change2=0,Change3=0,Change4=0;
//Print(» Price «,bodypips[MaxInd_bodypips,0],» Form_Patern_Finder[w,2] «,Form_Patern_Finder[w,2],» N_Centro_r==1 «,N_Centro_r==1);
if(Form_Patern_Finder[w,5]==0 && N_Centro_r==1) // Параметр архитектуры 1 ;//Номер Семечки . имеет значение от 1 до 5
{
//Присваиваю значение по архитектуре
Form_Patern_Finder[w,5]=1;//Присваиваю значение соеденения в архитектуре «Желтый Карсный Синий Зелёный » + Место по цене»Архитектура» + Место по полученному абьёму»00000000″
Form_Patern_Finder[w,1]=bodypips[MaxInd_bodypips,0];
DT_Form_Patern_Finder[w,1]=iTime(Symbol(),PERIOD_M1,1);
Change1=1;
//Проверяю наличие остальных архитектур в ячейке
if(Form_Patern_Finder[w,5]==1 && Form_Patern_Finder[w,6]==1 && Form_Patern_Finder[w,7]==1 && Form_Patern_Finder[w,8]==1)
{
Form_Patern_Finder[w,11]=1;//Патерн Заполнен
//Вывести на график цены флаг собранного патерна
}
}
//Центр 2 Красный
// Print(» Price «,bodypips[MaxInd_bodypips,0],» Form_Patern_Finder[w,3] «,Form_Patern_Finder[w,3],» N_Centro_r==2 «,N_Centro_r==2);
if(Form_Patern_Finder[w,6]==0 && N_Centro_r==2) // Параметр архитектуры 1
{
//Присваиваю значение по архитектуре
Form_Patern_Finder[w,6]=1;//Присваиваю значение соеденения в архитектуре «Желтый Карсный Синий Зелёный » + Место по цене»Архитектура» + Место по полученному абьёму»00000000″
Form_Patern_Finder[w,2]=bodypips[MaxInd_bodypips,0];
DT_Form_Patern_Finder[w,2]=iTime(Symbol(),PERIOD_M1,1);
Change2=1;
//Проверяю наличие остальных архитектур в ячейке
if(Form_Patern_Finder[w,5]==1 && Form_Patern_Finder[w,6]==1 && Form_Patern_Finder[w,7]==1 && Form_Patern_Finder[w,8]==1)
{
Form_Patern_Finder[w,11]=1;//Патерн Заполнен
//Вывести на график цены флаг собранного патерна
}
}
//Центр 3 Зелёный
//Print(» Price «,bodypips[MaxInd_bodypips,0],» Form_Patern_Finder[w,4] «,Form_Patern_Finder[w,4],» N_Centro_r==3 «,N_Centro_r==3);
if(Form_Patern_Finder[w,7]==0 && N_Centro_r==3) // Параметр архитектуры 1
{
//Присваиваю значение по архитектуре
Form_Patern_Finder[w,7]=1;//Присваиваю значение соеденения в архитектуре «Желтый Карсный Синий Зелёный » + Место по цене»Архитектура» + Место по полученному абьёму»00000000″
Form_Patern_Finder[w,3]=bodypips[MaxInd_bodypips,0];
DT_Form_Patern_Finder[w,3]=iTime(Symbol(),PERIOD_M1,1);
Change3=1;
//Проверяю наличие остальных архитектур в ячейке
if(Form_Patern_Finder[w,5]==1 && Form_Patern_Finder[w,6]==1 && Form_Patern_Finder[w,7]==1 && Form_Patern_Finder[w,8]==1)
{
Form_Patern_Finder[w,11]=1;//Патерн Заполнен
//Вывести на график цены флаг собранного патерна
}
}
//Центр 4 Синий
//Print(» Price «,bodypips[MaxInd_bodypips,0],» Form_Patern_Finder[w,5] «,Form_Patern_Finder[w,5],» N_Centro_r==4 «,N_Centro_r==4);
if(Form_Patern_Finder[w,8]==0 && N_Centro_r==4) // Параметр архитектуры 1
{
//Присваиваю значение по архитектуре
Form_Patern_Finder[w,8]=1;//Присваиваю значение соеденения в архитектуре «Желтый Карсный Синий Зелёный » + Место по цене»Архитектура» + Место по полученному абьёму»00000000″
Form_Patern_Finder[w,4]=bodypips[MaxInd_bodypips,0];
DT_Form_Patern_Finder[w,4]=iTime(Symbol(),PERIOD_M1,1);
Change4=1;
//Проверяю наличие остальных архитектур в ячейке
if(Form_Patern_Finder[w,5]==1 && Form_Patern_Finder[w,6]==1 && Form_Patern_Finder[w,7]==1 && Form_Patern_Finder[w,8]==1)
{
Form_Patern_Finder[w,11]=1;//Патерн Заполнен
//Вывести на график цены флаг собранного патерна
}
}
}
// break;
}
}
int WriteData=1;
for(int z=1; z<=1000; z++)
{
if(Array_Errors==true)
{
Print(» Index Array «,z,» 9203″);
}
if(bodypips[MaxInd_bodypips,0]!=0 && PriceExist==0 && (Form_Patern_Finder[z,1]==bodypips[MaxInd_bodypips,0] || Form_Patern_Finder[z,2]==bodypips[MaxInd_bodypips,0]||Form_Patern_Finder[z,3]==bodypips[MaxInd_bodypips,0]||Form_Patern_Finder[z,4]==bodypips[MaxInd_bodypips,0]))//Если в любой из ячеек существует цена то запись данных не нужна
{
WriteData=0;
break;
}
}
if(PriceExist==0 && InternalPat_1==1 && WriteData==1) //Еси нет цены в массиве для просмотра
{
// int WRinLine=0;
int t;
for(t=1; t<=1000; t++)
{
if(Array_Errors==true)
{
Print(» Index Array «,t,» 9219″);
}
if(Form_Patern_Finder[t,1]==0 && Form_Patern_Finder[t,2]==0 && Form_Patern_Finder[t,3]==0 && Form_Patern_Finder[t,4]==0 /*&& (Form_Patern_Finder[t,12]==PipsNumber && Form_Patern_Finder[t,13]==N_Gr20 ||Form_Patern_Finder[t,27]==PipsNumber && Form_Patern_Finder[t,28]==N_Gr20 || Form_Patern_Finder[t,42]==PipsNumber && Form_Patern_Finder[t,43]==N_Gr20 || Form_Patern_Finder[t,57]==PipsNumber && Form_Patern_Finder[t,58]==N_Gr20)*/) //Последнее пустое место в массиве
{
// WRinLine=1;
break;
}
}
// for(t=1; t<1000; t++)
// {
// if(WRinLine=0 && Form_Patern_Finder[t,1]==0 && Form_Patern_Finder[t,2]==0 && Form_Patern_Finder[t,3]==0 && Form_Patern_Finder[t,4]==0) //Последнее пустое место в массиве
// {
// break;
// }
// }
//Зацикливание процеса на остановке записывания в Массив данных
//int BlockPermis1=0;
// if(w==1000 && Form_Patern_Finder[t,1]>0)
// {
// BlockPermis1=1;
// }
// Print(» t «, t);
// if(BlockPermis1==0)
// { }
//Праизводится запись нового элемента
//новый элемент записан
//ok Print(» Form_Patern_Finder[t,1] «, Form_Patern_Finder[t,1]);
//ok Print(» N_Centro «,N_Centro_r);
//Print(«t «,t);
if(N_Centro_r==1)
{
// Print(«N_Centro_r «,N_Centro_r);
Form_Patern_Finder[t,5]=1;
Form_Patern_Finder[t,1]=bodypips[MaxInd_bodypips,0];
DT_Form_Patern_Finder[t,1]=iTime(Symbol(),PERIOD_M1,1);
//Print(» Form_Patern_Finder[t,1] » ,Form_Patern_Finder[t,1]);
//ok Print(» Form_Patern_Finder[t,2] «, Form_Patern_Finder[t,2]);
}
if(N_Centro_r==2)
{
//Print(«N_Centro_r «,N_Centro_r);
Form_Patern_Finder[t,6]=1;
Form_Patern_Finder[t,2]=bodypips[MaxInd_bodypips,0];
DT_Form_Patern_Finder[t,2]=iTime(Symbol(),PERIOD_M1,1);
//Print(«Form_Patern_Finder[t,2] «,Form_Patern_Finder[t,2]);
//ok Print(» Form_Patern_Finder[t,3] «, Form_Patern_Finder[t,2]);
}
if(N_Centro_r==3)
{
//Print(«N_Centro_r «,N_Centro_r);
Form_Patern_Finder[t,7]=1;
Form_Patern_Finder[t,3]=bodypips[MaxInd_bodypips,0];
DT_Form_Patern_Finder[t,3]=iTime(Symbol(),PERIOD_M1,1);
//Print(«Form_Patern_Finder[t,3] «,Form_Patern_Finder[t,3]);
//ok Print(» Form_Patern_Finder[t,4] «, Form_Patern_Finder[t,4]);
}
if(N_Centro_r==4)
{
//Print(«N_Centro_r «,N_Centro_r);
Form_Patern_Finder[t,8]=1;
Form_Patern_Finder[t,4]=bodypips[MaxInd_bodypips,0];
DT_Form_Patern_Finder[t,4]=iTime(Symbol(),PERIOD_M1,1);
// Print(«Form_Patern_Finder[t,4] «,Form_Patern_Finder[t,4]);
//ok Print(» Form_Patern_Finder[t,5] «, Form_Patern_Finder[t,5]);
}
Form_Patern_Finder[t,12]=PipsNumber;//Номер Семечки . имеет значение от 1 до 5
Form_Patern_Finder[t,13]=N_Gr20;//Номер блока ценавой 20-ки
Form_Patern_Finder[t,14]=N_Centro;//Номер центра архитектуры
//Произвести запись массива в Бинарнйы фаил.Фаил загружается в массив при запуске программы
}
//BO_0
int newPrise1=0;
int PriceExist1=0;
for(w1=1; w1<=1000; w1++)//Перебор для поиска по условию Если цена НЕ равна записаннаму значению в Массиве 1,00001!=1,00002
{
if(Array_Errors==true)
{
Print(» Index Array «,w1,» 9296″);
}

if((Form_Patern_Finder[w1,28]!=0 && Form_Patern_Finder[w1,28]==N_Gr20 && Form_Patern_Finder[w1,27]==PipsNumber && ((Form_Patern_Finder[w1,16]!=bodypips[MaxInd_bodypips,0]) || (Form_Patern_Finder[w1,17]!=bodypips[MaxInd_bodypips,0])|| (Form_Patern_Finder[w1,18]!=bodypips[MaxInd_bodypips,0])||(Form_Patern_Finder[w1,19]!=bodypips[MaxInd_bodypips,0])))/*Form_Patern_Finder[w,9]=N_Gr20 && Form_Patern_Finder[w,6]==1 &&*/ && InternalPat_1==2) //Поиск цены . Возвращает индекс в массиве
{
PriceExist1=1;
if(PriceExist==1/*»Указывает на найденную цену Функцией выше»*/ && InternalPat_1==2/*»Указывает на соеденение в ячейке цены и абьёма»*/ && Form_Patern_Finder[w,26]!=1)//Если цена существует и w не равен 0 и Патерн не был собран. Если w равен налю произвести новую запись то доступ в функцию открыт
{
int Change1_1=0,Change2_1=0,Change3_1=0,Change4_1=0;
if(Form_Patern_Finder[w1,20]==0 && N_Centro_r==1) // Параметр архитектуры 1 ;//Номер Семечки . имеет значение от 1 до 5
{
//Присваиваю значение по архитектуре
Form_Patern_Finder[w1,20]=1;//Присваиваю значение соеденения в архитектуре «Желтый Карсный Синий Зелёный » + Место по цене»Архитектура» + Место по полученному абьёму»00000000″
Form_Patern_Finder[w1,16]=bodypips[MaxInd_bodypips,0];
DT_Form_Patern_Finder[w1,16]=iTime(Symbol(),PERIOD_M1,1);
Change1_1=1;
//Проверяю наличие остальных архитектур в ячейке
if(Form_Patern_Finder[w1,20]==1 && Form_Patern_Finder[w1,21]==1 && Form_Patern_Finder[w1,22]==1 && Form_Patern_Finder[w1,23]==1)
{
Form_Patern_Finder[w1,26]=1;//Патерн Заполнен
//Вывести на график цены флаг собранного патерна
}
}
//Центр 2 Красный
if(Form_Patern_Finder[w1,21]==0 && N_Centro_r==2) // Параметр архитектуры 1
{
//Присваиваю значение по архитектуре
Form_Patern_Finder[w1,21]=1;//Присваиваю значение соеденения в архитектуре «Желтый Карсный Синий Зелёный » + Место по цене»Архитектура» + Место по полученному абьёму»00000000″
Form_Patern_Finder[w1,17]=bodypips[MaxInd_bodypips,0];
DT_Form_Patern_Finder[w1,17]=iTime(Symbol(),PERIOD_M1,1);
Change2_1=1;
//Проверяю наличие остальных архитектур в ячейке
if(Form_Patern_Finder[w1,20]==1 && Form_Patern_Finder[w1,21]==1 && Form_Patern_Finder[w1,22]==1 && Form_Patern_Finder[w1,23]==1)
{
Form_Patern_Finder[w1,26]=1;//Патерн Заполнен
//Вывести на график цены флаг собранного патерна
}
}
//Центр 3 Зелёный
if(Form_Patern_Finder[w1,22]==0 && N_Centro_r==3) // Параметр архитектуры 1
{
//Присваиваю значение по архитектуре
Form_Patern_Finder[w1,22]=1;//Присваиваю значение соеденения в архитектуре «Желтый Карсный Синий Зелёный » + Место по цене»Архитектура» + Место по полученному абьёму»00000000″
Form_Patern_Finder[w1,18]=bodypips[MaxInd_bodypips,0];
DT_Form_Patern_Finder[w1,18]=iTime(Symbol(),PERIOD_M1,1);
Change3_1=1;
//Проверяю наличие остальных архитектур в ячейке
if(Form_Patern_Finder[w1,20]==1 && Form_Patern_Finder[w1,21]==1 && Form_Patern_Finder[w1,22]==1 && Form_Patern_Finder[w1,23]==1)
{
Form_Patern_Finder[w1,26]=1;//Патерн Заполнен
//Вывести на график цены флаг собранного патерна
}
}
//Центр 4 Синий
if(Form_Patern_Finder[w1,23]==0 && N_Centro_r==4) // Параметр архитектуры 1
{
//Присваиваю значение по архитектуре
Form_Patern_Finder[w1,23]=1;//Присваиваю значение соеденения в архитектуре «Желтый Карсный Синий Зелёный » + Место по цене»Архитектура» + Место по полученному абьёму»00000000″
Form_Patern_Finder[w1,19]=bodypips[MaxInd_bodypips,0];
DT_Form_Patern_Finder[w1,19]=iTime(Symbol(),PERIOD_M1,1);
Change4_1=1;
//Проверяю наличие остальных архитектур в ячейке
if(Form_Patern_Finder[w1,20]==1 && Form_Patern_Finder[w1,21]==1 && Form_Patern_Finder[w1,22]==1 && Form_Patern_Finder[w1,23]==1)
{
Form_Patern_Finder[w1,26]=1;//Патерн Заполнен
//Вывести на график цены флаг собранного патерна
}
}
}
// break;
}
}
// —– Ески нет цены в массиве для просмотра
int WriteData1=1;
for(int z1=1; z1<=1000; z1++)
{
if(Array_Errors==true)
{
Print(» Index Array «,z1,» 9374″);
}
if(bodypips[MaxInd_bodypips,0]!=0 && PriceExist1==0 && (Form_Patern_Finder[z1,16]==bodypips[MaxInd_bodypips,0] || Form_Patern_Finder[z1,17]==bodypips[MaxInd_bodypips,0]||Form_Patern_Finder[z1,18]==bodypips[MaxInd_bodypips,0]||Form_Patern_Finder[z1,19]==bodypips[MaxInd_bodypips,0]))//Если в любой из ячеек существует цена то запись данных не нужна
{
WriteData1=0;
break;
}
}
if(PriceExist1==0 && InternalPat_1==2 && WriteData1==1) //Еси нет цены в массиве для просмотра
{
//int WRinLine1=0;
int t1;
for(t1=1; t1<=1000; t1++)
{
if(Array_Errors==true)
{
Print(» Index Array «,t1,» 9390″);
}
if(Form_Patern_Finder[t1,16]==0 && Form_Patern_Finder[t1,17]==0 && Form_Patern_Finder[t1,18]==0 && Form_Patern_Finder[t1,19]==0 /*&& (Form_Patern_Finder[t1,12]==PipsNumber && Form_Patern_Finder[t1,13]==N_Gr20 ||Form_Patern_Finder[t1,27]==PipsNumber && Form_Patern_Finder[t1,28]==N_Gr20 || Form_Patern_Finder[t1,42]==PipsNumber && Form_Patern_Finder[t1,43]==N_Gr20 || Form_Patern_Finder[t1,57]==PipsNumber && Form_Patern_Finder[t1,58]==N_Gr20)*/) //Последнее пустое место в массиве
{
// WRinLine1=1;
break;
}
}
//for(t1=1; t1<1000; t1++)
// {
// if(WRinLine1=0 && Form_Patern_Finder[t1,17]==0 && Form_Patern_Finder[t1,18]==0 && Form_Patern_Finder[t1,19]==0 && Form_Patern_Finder[t1,20]==0) //Последнее пустое место в массиве
// {
// break;
// }
// }
if(N_Centro_r==1)
{
Form_Patern_Finder[t1,20]=1;
Form_Patern_Finder[t1,16]=bodypips[MaxInd_bodypips,0];
DT_Form_Patern_Finder[t1,16]=iTime(Symbol(),PERIOD_M1,1);
}
if(N_Centro_r==2)
{
Form_Patern_Finder[t1,21]=1;
Form_Patern_Finder[t1,17]=bodypips[MaxInd_bodypips,0];
DT_Form_Patern_Finder[t1,17]=iTime(Symbol(),PERIOD_M1,1);
}
if(N_Centro_r==3)
{
Form_Patern_Finder[t1,22]=1;
Form_Patern_Finder[t1,18]=bodypips[MaxInd_bodypips,0];
DT_Form_Patern_Finder[t1,18]=iTime(Symbol(),PERIOD_M1,1);
}
if(N_Centro_r==4)
{
Form_Patern_Finder[t1,23]=1;
Form_Patern_Finder[t1,19]=bodypips[MaxInd_bodypips,0];
DT_Form_Patern_Finder[t1,19]=iTime(Symbol(),PERIOD_M1,1);
}
Form_Patern_Finder[t1,27]=PipsNumber;//Номер Семечки . имеет значение от 1 до 5
Form_Patern_Finder[t1,28]=N_Gr20;//Номер блока ценавой 20-ки
Form_Patern_Finder[t1,29]=N_Centro;//Номер центра архитектуры
//Произвести запись массива в Бинарнйы фаил.Фаил загружается в массив при запуске программы
}
//Be_1
int newPrise2=0;
int PriceExist2=0;
for(w2=1; w2<=1000; w2++)//Перебор для поиска по условию Если цена НЕ равна записаннаму значению в Массиве 1,00001!=1,00002
{
if(Array_Errors==true)
{
Print(» Index Array «,w2,» 9441″);
}
if((Form_Patern_Finder[w2,43]!=0 && Form_Patern_Finder[w2,43]==N_Gr20 && Form_Patern_Finder[w2,42]==PipsNumber && ((Form_Patern_Finder[w2,31]!=bodypips[MaxInd_bodypips,0]) || (Form_Patern_Finder[w2,32]!=bodypips[MaxInd_bodypips,0]) ||(Form_Patern_Finder[w2,33]!=bodypips[MaxInd_bodypips,0])|| (Form_Patern_Finder[w2,34]!=bodypips[MaxInd_bodypips,0])))/*Form_Patern_Finder[w,9]=N_Gr20 && Form_Patern_Finder[w,6]==1 &&*/ && InternalPat_1==3) //Поиск цены . Возвращает индекс в массиве
{
PriceExist2=1;
if(PriceExist2==1/*»Указывает на найденную цену Функцией выше»*/ && InternalPat_1==3/*»Указывает на соеденение в ячейке цены и абьёма»*/ && Form_Patern_Finder[w2,41]!=1)//Если цена существует и w не равен 0 и Патерн не был собран. Если w равен налю произвести новую запись то доступ в функцию открыт
{
int Change1_2=0,Change2_2=0,Change3_2=0,Change4_2=0;
if(Form_Patern_Finder[w2,35]==0 && N_Centro_r==1) // Параметр архитектуры 1 ;//Номер Семечки . имеет значение от 1 до 5
{
//Присваиваю значение по архитектуре
Form_Patern_Finder[w2,35]=1;//Присваиваю значение соеденения в архитектуре «Желтый Карсный Синий Зелёный » + Место по цене»Архитектура» + Место по полученному абьёму»00000000″
Form_Patern_Finder[w2,31]=bodypips[MaxInd_bodypips,0];
DT_Form_Patern_Finder[w2,31]=iTime(Symbol(),PERIOD_M1,1);
Change1_2=1;
//Проверяю наличие остальных архитектур в ячейке
if(Form_Patern_Finder[w2,35]==1 && Form_Patern_Finder[w2,36]==1 && Form_Patern_Finder[w2,37]==1 && Form_Patern_Finder[w2,38]==1)
{
Form_Patern_Finder[w2,41]=1;//Патерн Заполнен
//Вывести на график цены флаг собранного патерна
}
}
//Центр 2 Красный
if(Form_Patern_Finder[w2,36]==0 && N_Centro_r==2) // Параметр архитектуры 1
{
//Присваиваю значение по архитектуре
Form_Patern_Finder[w2,36]=1;//Присваиваю значение соеденения в архитектуре «Желтый Карсный Синий Зелёный » + Место по цене»Архитектура» + Место по полученному абьёму»00000000″
Form_Patern_Finder[w2,32]=bodypips[MaxInd_bodypips,0];
DT_Form_Patern_Finder[w2,32]=iTime(Symbol(),PERIOD_M1,1);
Change2_2=1;
//Проверяю наличие остальных архитектур в ячейке
if(Form_Patern_Finder[w2,35]==1 && Form_Patern_Finder[w2,36]==1 && Form_Patern_Finder[w2,37]==1 && Form_Patern_Finder[w2,38]==1)
{
Form_Patern_Finder[w2,41]=1;//Патерн Заполнен
//Вывести на график цены флаг собранного патерна
}
}
//Центр 3 Зелёный
if(Form_Patern_Finder[w2,37]==0 && N_Centro_r==3) // Параметр архитектуры 1
{
//Присваиваю значение по архитектуре
Form_Patern_Finder[w2,37]=1;//Присваиваю значение соеденения в архитектуре «Желтый Карсный Синий Зелёный » + Место по цене»Архитектура» + Место по полученному абьёму»00000000″
Form_Patern_Finder[w2,33]=bodypips[MaxInd_bodypips,0];
DT_Form_Patern_Finder[w2,33]=iTime(Symbol(),PERIOD_M1,1);
Change3_2=1;
//Проверяю наличие остальных архитектур в ячейке
if(Form_Patern_Finder[w2,35]==1 && Form_Patern_Finder[w2,36]==1 && Form_Patern_Finder[w2,37]==1 && Form_Patern_Finder[w2,38]==1)
{
Form_Patern_Finder[w2,41]=1;//Патерн Заполнен
//Вывести на график цены флаг собранного патерна
}
}
//Центр 4 Синий
if(Form_Patern_Finder[w2,38]==0 && N_Centro_r==4) // Параметр архитектуры 1
{
//Присваиваю значение по архитектуре
Form_Patern_Finder[w2,38]=1;//Присваиваю значение соеденения в архитектуре «Желтый Карсный Синий Зелёный » + Место по цене»Архитектура» + Место по полученному абьёму»00000000″
Form_Patern_Finder[w2,34]=bodypips[MaxInd_bodypips,0];
DT_Form_Patern_Finder[w2,34]=iTime(Symbol(),PERIOD_M1,1);
Change4_2=1;
//Проверяю наличие остальных архитектур в ячейке
if(Form_Patern_Finder[w2,35]==1 && Form_Patern_Finder[w2,36]==1 && Form_Patern_Finder[w2,37]==1 && Form_Patern_Finder[w2,38]==1)
{
Form_Patern_Finder[w2,41]=1;//Патерн Заполнен
//Вывести на график цены флаг собранного патерна
}
}
}
// break;
}
}
// —– Ески нет цены в массиве для просмотра
int WriteData2=1;
for(int z2=1; z2<=1000; z2++)
{
if(Array_Errors==true)
{
Print(» Index Array «,z2,» 9518″);
}
if(bodypips[MaxInd_bodypips,0]!=0 && PriceExist2==0 && (Form_Patern_Finder[z2,31]==bodypips[MaxInd_bodypips,0] || Form_Patern_Finder[z2,32]==bodypips[MaxInd_bodypips,0]||Form_Patern_Finder[z2,33]==bodypips[MaxInd_bodypips,0]||Form_Patern_Finder[z2,34]==bodypips[MaxInd_bodypips,0]))//Если в любой из ячеек существует цена то запись данных не нужна
{
WriteData2=0;
break;
}
}
if(PriceExist2==0 && InternalPat_1==3 && WriteData2==1) //Еси нет цены в массиве для просмотра
{
// int WRinLine2=0;
int t2;
for(t2=1; t2<=1000; t2++)
{
if(Array_Errors==true)
{
Print(» Index Array «,t2,» 9534″);
}
if(Form_Patern_Finder[t2,31]==0 && Form_Patern_Finder[t2,32]==0 && Form_Patern_Finder[t2,33]==0 && Form_Patern_Finder[t2,34]==0 /*&& (Form_Patern_Finder[t2,12]==PipsNumber && Form_Patern_Finder[t2,13]==N_Gr20 ||Form_Patern_Finder[t2,27]==PipsNumber && Form_Patern_Finder[t2,28]==N_Gr20 || Form_Patern_Finder[t2,42]==PipsNumber && Form_Patern_Finder[t2,43]==N_Gr20 || Form_Patern_Finder[t2,57]==PipsNumber && Form_Patern_Finder[t2,58]==N_Gr20)*/) //Последнее пустое место в массиве
{
// WRinLine2=1;
break;
}
}
// for(t2=1; t2<1000; t2++)
// {
// if(WRinLine2=0 && Form_Patern_Finder[t2,31]==0 && Form_Patern_Finder[t2,32]==0 && Form_Patern_Finder[t2,33]==0 && Form_Patern_Finder[t2,34]==0) //Последнее пустое место в массиве
// {
// break;
// }
// }
if(N_Centro_r==1)
{
Form_Patern_Finder[t2,35]=1;
Form_Patern_Finder[t2,31]=bodypips[MaxInd_bodypips,0];
DT_Form_Patern_Finder[t2,31]=iTime(Symbol(),PERIOD_M1,1);
}
if(N_Centro_r==2)
{
Form_Patern_Finder[t2,36]=1;
Form_Patern_Finder[t2,32]=bodypips[MaxInd_bodypips,0];
DT_Form_Patern_Finder[t2,32]=iTime(Symbol(),PERIOD_M1,1);
}
if(N_Centro_r==3)
{
Form_Patern_Finder[t2,37]=1;
Form_Patern_Finder[t2,33]=bodypips[MaxInd_bodypips,0];
DT_Form_Patern_Finder[t2,33]=iTime(Symbol(),PERIOD_M1,1);
}
if(N_Centro_r==4)
{
Form_Patern_Finder[t2,38]=1;
Form_Patern_Finder[t2,34]=bodypips[MaxInd_bodypips,0];
DT_Form_Patern_Finder[t2,34]=iTime(Symbol(),PERIOD_M1,1);
}
Form_Patern_Finder[t2,42]=PipsNumber;//Номер Семечки . имеет значение от 1 до 5
Form_Patern_Finder[t2,43]=N_Gr20;//Номер блока ценавой 20-ки
Form_Patern_Finder[t2,44]=N_Centro;//Номер центра архитектуры
//Произвести запись массива в Бинарнйы фаил.Фаил загружается в массив при запуске программы
}
//Bo_1
int newPrise3=0;
int PriceExist3=0;
for(w3=1; w3<=1000; w3++)//Перебор для поиска по условию Если цена НЕ равна записаннаму значению в Массиве 1,00001!=1,00002
{
if(Array_Errors==true)
{
Print(» Index Array «,w3,» 9585″);
}
if((Form_Patern_Finder[w3,58]!=0 && Form_Patern_Finder[w3,58]==N_Gr20 && Form_Patern_Finder[w3,57]==PipsNumber && ((Form_Patern_Finder[w3,46]!=bodypips[MaxInd_bodypips,0]) ||(Form_Patern_Finder[w3,47]!=bodypips[MaxInd_bodypips,0])|| (Form_Patern_Finder[w3,48]!=bodypips[MaxInd_bodypips,0])|| (Form_Patern_Finder[w3,49]!=bodypips[MaxInd_bodypips,0])))&& InternalPat_1==4) //Поиск цены . Возвращает индекс в массиве
{
PriceExist3=1;
if(PriceExist3==1/*»Указывает на найденную цену Функцией выше»*/ && InternalPat_1==4/*»Указывает на соеденение в ячейке цены и абьёма»*/ && Form_Patern_Finder[w3,56]!=1)//Если цена существует и w не равен 0 и Патерн не был собран. Если w равен налю произвести новую запись то доступ в функцию открыт
{
int Change1_3=0,Change2_3=0,Change3_3=0,Change4_3=0;
if(Form_Patern_Finder[w3,50]==0 && N_Centro_r==1) // Параметр архитектуры 1 ;//Номер Семечки . имеет значение от 1 до 5
{
//Присваиваю значение по архитектуре
Form_Patern_Finder[w3,50]=1;//Присваиваю значение соеденения в архитектуре «Желтый Карсный Синий Зелёный » + Место по цене»Архитектура» + Место по полученному абьёму»00000000″
Form_Patern_Finder[w3,46]=bodypips[MaxInd_bodypips,0];
DT_Form_Patern_Finder[w3,46]=iTime(Symbol(),PERIOD_M1,1);
Change1_3=1;
//Проверяю наличие остальных архитектур в ячейке
if(Form_Patern_Finder[w3,50]==1 && Form_Patern_Finder[w3,51]==1 && Form_Patern_Finder[w3,52]==1 && Form_Patern_Finder[w3,53]==1)
{
Form_Patern_Finder[w3,56]=1;//Патерн Заполнен
//Вывести на график цены флаг собранного патерна
}
}
//Центр 2 Красный
if(Form_Patern_Finder[w3,51]==0 && N_Centro_r==2) // Параметр архитектуры 1
{
//Присваиваю значение по архитектуре
Form_Patern_Finder[w3,51]=1;//Присваиваю значение соеденения в архитектуре «Желтый Карсный Синий Зелёный » + Место по цене»Архитектура» + Место по полученному абьёму»00000000″
Form_Patern_Finder[w3,47]=bodypips[MaxInd_bodypips,0];
DT_Form_Patern_Finder[w3,47]=iTime(Symbol(),PERIOD_M1,1);
Change2_3=1;
//Проверяю наличие остальных архитектур в ячейке
if(Form_Patern_Finder[w3,50]==1 && Form_Patern_Finder[w3,51]==1 && Form_Patern_Finder[w3,52]==1 && Form_Patern_Finder[w3,53]==1)
{
Form_Patern_Finder[w3,56]=1;//Патерн Заполнен
//Вывести на график цены флаг собранного патерна
}
}
//Центр 3 Зелёный
if(Form_Patern_Finder[w3,52]==0 && N_Centro_r==3) // Параметр архитектуры 1
{
//Присваиваю значение по архитектуре
Form_Patern_Finder[w3,52]=1;//Присваиваю значение соеденения в архитектуре «Желтый Карсный Синий Зелёный » + Место по цене»Архитектура» + Место по полученному абьёму»00000000″
Form_Patern_Finder[w3,48]=bodypips[MaxInd_bodypips,0];
DT_Form_Patern_Finder[w3,48]=iTime(Symbol(),PERIOD_M1,1);
Change3_3=1;
//Проверяю наличие остальных архитектур в ячейке
if(Form_Patern_Finder[w3,50]==1 && Form_Patern_Finder[w3,51]==1 && Form_Patern_Finder[w3,52]==1 && Form_Patern_Finder[w3,53]==1)
{
Form_Patern_Finder[w3,56]=1;//Патерн Заполнен
//Вывести на график цены флаг собранного патерна
}
}
//Центр 4 Синий
if(Form_Patern_Finder[w3,53]==0 && N_Centro_r==4) // Параметр архитектуры 1
{
//Присваиваю значение по архитектуре
Form_Patern_Finder[w3,53]=1;//Присваиваю значение соеденения в архитектуре «Желтый Карсный Синий Зелёный » + Место по цене»Архитектура» + Место по полученному абьёму»00000000″
Form_Patern_Finder[w3,49]=bodypips[MaxInd_bodypips,0];
DT_Form_Patern_Finder[w3,49]=iTime(Symbol(),PERIOD_M1,1);
Change4_3=1;
//Проверяю наличие остальных архитектур в ячейке
if(Form_Patern_Finder[w3,50]==1 && Form_Patern_Finder[w3,51]==1 && Form_Patern_Finder[w3,52]==1 && Form_Patern_Finder[w3,53]==1)
{
Form_Patern_Finder[w3,56]=1;//Патерн Заполнен
//Вывести на график цены флаг собранного патерна
}
}
}
// break;
}
}
// —– Ески нет цены в массиве для просмотра
int WriteData3=1;
for(int z3=1; z3<=1000; z3++)
{
if(Array_Errors==true)
{
Print(» Index Array «,z3,» 9662″);
}
if(bodypips[MaxInd_bodypips,0]!=0 && PriceExist3==0 && (Form_Patern_Finder[z3,46]==bodypips[MaxInd_bodypips,0] || Form_Patern_Finder[z3,47]==bodypips[MaxInd_bodypips,0]||Form_Patern_Finder[z3,48]==bodypips[MaxInd_bodypips,0]||Form_Patern_Finder[z3,49]==bodypips[MaxInd_bodypips,0]))//Если в любой из ячеек существует цена то запись данных не нужна
{
WriteData3=0;
break;
}
}
if(PriceExist3==0 && InternalPat_1==4 && WriteData3==1) //Еси нет цены в массиве для просмотра
{
// int WRinLine3=0;
int t3;
for(t3=1; t3<=1000; t3++)
{
if(Array_Errors==true)
{
Print(» Index Array «,t3,» 9678″);
}
if(Form_Patern_Finder[t3,46]==0 && Form_Patern_Finder[t3,47]==0 && Form_Patern_Finder[t3,48]==0 && Form_Patern_Finder[t3,49]==0 /*&& (Form_Patern_Finder[t3,12]==PipsNumber && Form_Patern_Finder[t3,13]==N_Gr20 ||Form_Patern_Finder[t3,27]==PipsNumber && Form_Patern_Finder[t3,28]==N_Gr20 || Form_Patern_Finder[t3,42]==PipsNumber && Form_Patern_Finder[t3,43]==N_Gr20 || Form_Patern_Finder[t3,57]==PipsNumber && Form_Patern_Finder[t3,58]==N_Gr20)*/) //Последнее пустое место в массиве
{
// WRinLine3=1;
break;
}
}
// for(t3=1; t3<1000; t3++)
// {
// if(WRinLine3=0 && Form_Patern_Finder[t3,46]==0 && Form_Patern_Finder[t3,47]==0 && Form_Patern_Finder[t3,48]==0 && Form_Patern_Finder[t3,49]==0) //Последнее пустое место в массиве
// {
// break;
// }
// }
if(N_Centro_r==1)
{
Form_Patern_Finder[t3,50]=1;
Form_Patern_Finder[t3,46]=bodypips[MaxInd_bodypips,0];
DT_Form_Patern_Finder[t3,46]=iTime(Symbol(),PERIOD_M1,1);
}
if(N_Centro_r==2)
{
Form_Patern_Finder[t3,51]=1;
Form_Patern_Finder[t3,47]=bodypips[MaxInd_bodypips,0];
DT_Form_Patern_Finder[t3,47]=iTime(Symbol(),PERIOD_M1,1);
}
if(N_Centro_r==3)
{
Form_Patern_Finder[t3,52]=1;
Form_Patern_Finder[t3,48]=bodypips[MaxInd_bodypips,0];
DT_Form_Patern_Finder[t3,48]=iTime(Symbol(),PERIOD_M1,1);
}
if(N_Centro_r==4)
{
Form_Patern_Finder[t3,53]=1;
Form_Patern_Finder[t3,49]=bodypips[MaxInd_bodypips,0];
DT_Form_Patern_Finder[t3,49]=iTime(Symbol(),PERIOD_M1,1);
}
Form_Patern_Finder[t3,57]=PipsNumber;//Номер Семечки . имеет значение от 1 до 5
Form_Patern_Finder[t3,58]=N_Gr20;//Номер блока ценавой 20-ки
Form_Patern_Finder[t3,59]=N_Centro;//Номер центра архитектуры
//Произвести запись массива в Бинарнйы фаил.Фаил загружается в массив при запуске программы
}
//BE_0_IZN
int PriceExist4=0;
int w4;
for(w4=1; w4<=1000; w4++)//Перебор для поиска по условию Если цена НЕ равна записаннаму значению в Массиве 1,00001!=1,00002
{
if(Array_Errors==true)
{
Print(» Index Array «,w4,» 9729″);
}
if((Form_Patern_Finder[w4,73]!=0 && Form_Patern_Finder[w4,73]==N_Gr20 && Form_Patern_Finder[w4,72]==PipsNumber && ((Form_Patern_Finder[w4,61]!=bodypips[MaxInd_bodypips,0]) || (Form_Patern_Finder[w4,62]!=bodypips[MaxInd_bodypips,0]) || (Form_Patern_Finder[w4,63]!=bodypips[MaxInd_bodypips,0])||(Form_Patern_Finder[w4,64]!=bodypips[MaxInd_bodypips,0]))) && InternalPat_1==5) //Поиск цены . Возвращает индекс в массиве
{
PriceExist4=1;
if(PriceExist4==1/*»Указывает на найденную цену Функцией выше»*/ && InternalPat_1==5/*»Указывает на соеденение в ячейке цены и абьёма»*/ && Form_Patern_Finder[w4,71]!=1)//Если цена существует и w не равен 0 и Патерн не был собран. Если w равен налю произвести новую запись то доступ в функцию открыт
{
int Change1_4=0,Change2_4=0,Change3_4=0,Change4_4=0;
if(Form_Patern_Finder[w4,65]==0 && N_Centro_r==1) // Параметр архитектуры 1 ;//Номер Семечки . имеет значение от 1 до 5
{
//Присваиваю значение по архитектуре
Form_Patern_Finder[w4,65]=1;//Присваиваю значение соеденения в архитектуре «Желтый Карсный Синий Зелёный » + Место по цене»Архитектура» + Место по полученному абьёму»00000000″
Form_Patern_Finder[w4,61]=bodypips[MaxInd_bodypips,0];
DT_Form_Patern_Finder[w4,61]=iTime(Symbol(),PERIOD_M1,1);
Change1_4=1;
if(Form_Patern_Finder[w4,65]==1 && Form_Patern_Finder[w4,66]==1 && Form_Patern_Finder[w4,67]==1 && Form_Patern_Finder[w4,68]==1)
{
Form_Patern_Finder[w4,71]=1;//Патерн Заполнен
}
}
//Центр 2 Красный
// Print(» Price «,bodypips[MaxInd_bodypips,0],» Form_Patern_Finder[w4,3] «,Form_Patern_Finder[w4,3],» N_Centro_r==2 «,N_Centro_r==2);
if(Form_Patern_Finder[w4,66]==0 && N_Centro_r==2) // Параметр архитектуры 1
{
//Присваиваю значение по архитектуре
Form_Patern_Finder[w4,66]=1;//Присваиваю значение соеденения в архитектуре «Желтый Карсный Синий Зелёный » + Место по цене»Архитектура» + Место по полученному абьёму»00000000″
Form_Patern_Finder[w4,62]=bodypips[MaxInd_bodypips,0];
DT_Form_Patern_Finder[w4,62]=iTime(Symbol(),PERIOD_M1,1);
Change2_4=1;
//Проверяю наличие остальных архитектур в ячейке
if(Form_Patern_Finder[w4,65]==1 && Form_Patern_Finder[w4,66]==1 && Form_Patern_Finder[w4,67]==1 && Form_Patern_Finder[w4,68]==1)
{
Form_Patern_Finder[w4,71]=1;//Патерн Заполнен
//Вывести на график цены флаг собранного патерна
}
}
//Центр 3 Зелёный
//Print(» Price «,bodypips[MaxInd_bodypips,0],» Form_Patern_Finder[w4,4] «,Form_Patern_Finder[w4,4],» N_Centro_r==3 «,N_Centro_r==3);
if(Form_Patern_Finder[w4,67]==0 && N_Centro_r==3) // Параметр архитектуры 1
{
//Присваиваю значение по архитектуре
Form_Patern_Finder[w4,67]=1;//Присваиваю значение соеденения в архитектуре «Желтый Карсный Синий Зелёный » + Место по цене»Архитектура» + Место по полученному абьёму»00000000″
Form_Patern_Finder[w4,63]=bodypips[MaxInd_bodypips,0];
DT_Form_Patern_Finder[w4,63]=iTime(Symbol(),PERIOD_M1,1);
Change3_4=1;
//Проверяю наличие остальных архитектур в ячейке
if(Form_Patern_Finder[w4,65]==1 && Form_Patern_Finder[w4,66]==1 && Form_Patern_Finder[w4,67]==1 && Form_Patern_Finder[w4,68]==1)
{
Form_Patern_Finder[w4,71]=1;//Патерн Заполнен
//Вывести на график цены флаг собранного патерна
}
}
//Центр 4 Синий
//Print(» Price «,bodypips[MaxInd_bodypips,0],» Form_Patern_Finder[w4,5] «,Form_Patern_Finder[w4,5],» N_Centro_r==4 «,N_Centro_r==4);
if(Form_Patern_Finder[w4,68]==0 && N_Centro_r==4) // Параметр архитектуры 1
{
//Присваиваю значение по архитектуре
Form_Patern_Finder[w4,68]=1;//Присваиваю значение соеденения в архитектуре «Желтый Карсный Синий Зелёный » + Место по цене»Архитектура» + Место по полученному абьёму»00000000″
Form_Patern_Finder[w4,64]=bodypips[MaxInd_bodypips,0];
DT_Form_Patern_Finder[w4,64]=iTime(Symbol(),PERIOD_M1,1);
Change4_4=1;
//Проверяю наличие остальных архитектур в ячейке
if(Form_Patern_Finder[w4,65]==1 && Form_Patern_Finder[w4,66]==1 && Form_Patern_Finder[w4,67]==1 && Form_Patern_Finder[w4,68]==1)
{
Form_Patern_Finder[w4,71]=1;//Патерн Заполнен
//Вывести на график цены флаг собранного патерна
}
}
}
// break;
}
}
int WriteData4=1;
for(int z4=1; z4<=1000; z4++)
{
if(Array_Errors==true)
{
Print(» Index Array «,z4,» 9806″);
}
if(bodypips[MaxInd_bodypips,0]!=0 && PriceExist4==0 && (Form_Patern_Finder[z4,61]==bodypips[MaxInd_bodypips,0] || Form_Patern_Finder[z4,62]==bodypips[MaxInd_bodypips,0]||Form_Patern_Finder[z4,63]==bodypips[MaxInd_bodypips,0]||Form_Patern_Finder[z4,64]==bodypips[MaxInd_bodypips,0]))//Если в любой из ячеек существует цена то запись данных не нужна
{
WriteData4=0;
break;
}
}
if(PriceExist4==0 && InternalPat_1==5 && WriteData4==1) //Еси нет цены в массиве для просмотра
{
// int WRinLine=0;
int t4;
for(t4=1; t4<=1000; t4++)
{
if(Array_Errors==true)
{
Print(» Index Array «,t4,» 9822″);
}
if(Form_Patern_Finder[t4,61]==0 && Form_Patern_Finder[t4,62]==0 && Form_Patern_Finder[t4,63]==0 && Form_Patern_Finder[t4,64]==0 /*&& (Form_Patern_Finder[t,12]==PipsNumber && Form_Patern_Finder[t,13]==N_Gr20 ||Form_Patern_Finder[t,27]==PipsNumber && Form_Patern_Finder[t,28]==N_Gr20 || Form_Patern_Finder[t,42]==PipsNumber && Form_Patern_Finder[t,43]==N_Gr20 || Form_Patern_Finder[t,57]==PipsNumber && Form_Patern_Finder[t,58]==N_Gr20)*/) //Последнее пустое место в массиве
{
// WRinLine=1;
break;
}
}
// for(t4=1; t4<1000; t4++)
// {
// if(WRinLine=0 && Form_Patern_Finder[t,1]==0 && Form_Patern_Finder[t,2]==0 && Form_Patern_Finder[t,3]==0 && Form_Patern_Finder[t,4]==0) //Последнее пустое место в массиве
// {
// break;
// }
// }
//Зацикливание процеса на остановке записывания в Массив данных
//int BlockPermis1=0;
// if(w==1000 && Form_Patern_Finder[t,1]>0)
// {
// BlockPermis1=1;
// }
// Print(» t «, t);
// if(BlockPermis1==0)
// { }
//Праизводится запись нового элемента
//новый элемент записан
//ok Print(» Form_Patern_Finder[t,1] «, Form_Patern_Finder[t,1]);
//ok Print(» N_Centro «,N_Centro_r);
//Print(«t «,t);
if(N_Centro_r==1)
{
// Print(«N_Centro_r «,N_Centro_r);
Form_Patern_Finder[t4,65]=1;
Form_Patern_Finder[t4,61]=bodypips[MaxInd_bodypips,0];
DT_Form_Patern_Finder[t4,61]=iTime(Symbol(),PERIOD_M1,1);
}
if(N_Centro_r==2)
{
//Print(«N_Centro_r «,N_Centro_r);
Form_Patern_Finder[t4,66]=1;
Form_Patern_Finder[t4,62]=bodypips[MaxInd_bodypips,0];
DT_Form_Patern_Finder[t4,62]=iTime(Symbol(),PERIOD_M1,1);
//Print(«Form_Patern_Finder[t,2] «,Form_Patern_Finder[t,2]);
//ok Print(» Form_Patern_Finder[t,3] «, Form_Patern_Finder[t,2]);
}
if(N_Centro_r==3)
{
//Print(«N_Centro_r «,N_Centro_r);
Form_Patern_Finder[t4,67]=1;
Form_Patern_Finder[t4,63]=bodypips[MaxInd_bodypips,0];
DT_Form_Patern_Finder[t4,63]=iTime(Symbol(),PERIOD_M1,1);
//Print(«Form_Patern_Finder[t,3] «,Form_Patern_Finder[t,3]);
//ok Print(» Form_Patern_Finder[t,4] «, Form_Patern_Finder[t,4]);
}
if(N_Centro_r==4)
{
//Print(«N_Centro_r «,N_Centro_r);
Form_Patern_Finder[t4,68]=1;
Form_Patern_Finder[t4,64]=bodypips[MaxInd_bodypips,0];
DT_Form_Patern_Finder[t4,64]=iTime(Symbol(),PERIOD_M1,1);
// Print(«Form_Patern_Finder[t,4] «,Form_Patern_Finder[t,4]);
//ok Print(» Form_Patern_Finder[t,5] «, Form_Patern_Finder[t,5]);
}
Form_Patern_Finder[t4,72]=PipsNumber;//Номер Семечки . имеет значение от 1 до 5
Form_Patern_Finder[t4,73]=N_Gr20;//Номер блока ценавой 20-ки
Form_Patern_Finder[t4,74]=N_Centro;//Номер центра архитектуры
//Произвести запись массива в Бинарнйы фаил.Фаил загружается в массив при запуске программы
}
//BO_0_IZN
int newPrise5=0;
int PriceExist5=0;
int w5;
for(w5=1; w5<=1000; w5++)//Перебор для поиска по условию Если цена НЕ равна записаннаму значению в Массиве 1,00001!=1,00002
{
if(Array_Errors==true)
{
Print(» Index Array «,w5,» 9898″);
}
if((Form_Patern_Finder[w5,88]!=0 && Form_Patern_Finder[w5,88]==N_Gr20 && Form_Patern_Finder[w5,87]==PipsNumber && ((Form_Patern_Finder[w5,76]!=bodypips[MaxInd_bodypips,0])|| (Form_Patern_Finder[w5,77]!=bodypips[MaxInd_bodypips,0])||(Form_Patern_Finder[w5,78]!=bodypips[MaxInd_bodypips,0])|| (Form_Patern_Finder[w5,79]!=bodypips[MaxInd_bodypips,0])))/*Form_Patern_Finder[w4,9]=N_Gr20 && Form_Patern_Finder[w4,6]==1 &&*/ && InternalPat_1==6) //Поиск цены . Возвращает индекс в массиве
{
PriceExist5=1;
if(PriceExist5==1/*»Указывает на найденную цену Функцией выше»*/ && InternalPat_1==6/*»Указывает на соеденение в ячейке цены и абьёма»*/ && Form_Patern_Finder[w5,86]!=1)//Если цена существует и w не равен 0 и Патерн не был собран. Если w равен налю произвести новую запись то доступ в функцию открыт
{
int Change1_5=0,Change2_5=0,Change3_5=0,Change4_5=0;if(Form_Patern_Finder[w5,80]==0 && N_Centro_r==1) // Параметр архитектуры 1 ;//Номер Семечки . имеет значение от 1 до 5
{
//Присваиваю значение по архитектуре
Form_Patern_Finder[w5,80]=1;//Присваиваю значение соеденения в архитектуре «Желтый Карсный Синий Зелёный » + Место по цене»Архитектура» + Место по полученному абьёму»00000000″
Form_Patern_Finder[w5,76]=bodypips[MaxInd_bodypips,0];
DT_Form_Patern_Finder[w5,76]=iTime(Symbol(),PERIOD_M1,1);
Change1_5=1;
//Проверяю наличие остальных архитектур в ячейке
if(Form_Patern_Finder[w5,80]==1 && Form_Patern_Finder[w5,81]==1 && Form_Patern_Finder[w5,82]==1 && Form_Patern_Finder[w5,83]==1)
{
Form_Patern_Finder[w5,86]=1;//Патерн Заполнен
//Вывести на график цены флаг собранного патерна
}
}
//Центр 2 Красный
if(Form_Patern_Finder[w5,81]==0 && N_Centro_r==2) // Параметр архитектуры 1
{
//Присваиваю значение по архитектуре
Form_Patern_Finder[w5,81]=1;//Присваиваю значение соеденения в архитектуре «Желтый Карсный Синий Зелёный » + Место по цене»Архитектура» + Место по полученному абьёму»00000000″
Form_Patern_Finder[w5,77]=bodypips[MaxInd_bodypips,0];
DT_Form_Patern_Finder[w5,77]=iTime(Symbol(),PERIOD_M1,1);
Change2_5=1;
//Проверяю наличие остальных архитектур в ячейке
if(Form_Patern_Finder[w5,80]==1 && Form_Patern_Finder[w5,81]==1 && Form_Patern_Finder[w5,82]==1 && Form_Patern_Finder[w5,83]==1)
{
Form_Patern_Finder[w5,86]=1;//Патерн Заполнен
//Вывести на график цены флаг собранного патерна
}
}
//Центр 3 Зелёный
if(Form_Patern_Finder[w5,82]==0 && N_Centro_r==3) // Параметр архитектуры 1
{
//Присваиваю значение по архитектуре
Form_Patern_Finder[w5,82]=1;//Присваиваю значение соеденения в архитектуре «Желтый Карсный Синий Зелёный » + Место по цене»Архитектура» + Место по полученному абьёму»00000000″
Form_Patern_Finder[w5,78]=bodypips[MaxInd_bodypips,0];
DT_Form_Patern_Finder[w5,78]=iTime(Symbol(),PERIOD_M1,1);
Change3_5=1;
//Проверяю наличие остальных архитектур в ячейке
if(Form_Patern_Finder[w5,80]==1 && Form_Patern_Finder[w5,81]==1 && Form_Patern_Finder[w5,82]==1 && Form_Patern_Finder[w5,83]==1)
{
Form_Patern_Finder[w5,86]=1;//Патерн Заполнен
//Вывести на график цены флаг собранного патерна
}
}
//Центр 4 Синий
if(Form_Patern_Finder[w5,83]==0 && N_Centro_r==4) // Параметр архитектуры 1
{
//Присваиваю значение по архитектуре
Form_Patern_Finder[w5,83]=1;//Присваиваю значение соеденения в архитектуре «Желтый Карсный Синий Зелёный » + Место по цене»Архитектура» + Место по полученному абьёму»00000000″
Form_Patern_Finder[w5,79]=bodypips[MaxInd_bodypips,0];
DT_Form_Patern_Finder[w5,79]=iTime(Symbol(),PERIOD_M1,1);
Change4_5=1;
//Проверяю наличие остальных архитектур в ячейке
if(Form_Patern_Finder[w5,80]==1 && Form_Patern_Finder[w5,81]==1 && Form_Patern_Finder[w5,82]==1 && Form_Patern_Finder[w5,83]==1)
{
Form_Patern_Finder[w5,86]=1;//Патерн Заполнен
//Вывести на график цены флаг собранного патерна
}
}
}
// break;
}
}
// —– Ески нет цены в массиве для просмотра
int WriteData5=1;
for(int z5=1; z5<=1000; z5++) { if(Array_Errors==true) { Print(» Index Array «,z5,» 9975″); } if(bodypips[MaxInd_bodypips,0]!=0 && PriceExist5==0 && (Form_Patern_Finder[z5,76]==bodypips[MaxInd_bodypips,0] || Form_Patern_Finder[z5,77]==bodypips[MaxInd_bodypips,0]||Form_Patern_Finder[z5,78]==bodypips[MaxInd_bodypips,0]||Form_Patern_Finder[z5,79]==bodypips[MaxInd_bodypips,0]))//Если в любой из ячеек существует цена то запись данных не нужна { WriteData5=0; break; } } if(PriceExist5==0 && InternalPat_1==6 && WriteData5==1) //Еси нет цены в массиве для просмотра { //int WRinLine1=0; int t5; for(t5=1; t5<1000; t5++) { if(Array_Errors==true) { Print(» Index Array «,t5,» 9991″); } if(Form_Patern_Finder[t5,76]==0 && Form_Patern_Finder[t5,77]==0 && Form_Patern_Finder[t5,78]==0 && Form_Patern_Finder[t5,79]==0 /&& (Form_Patern_Finder[t5,12]==PipsNumber && Form_Patern_Finder[t5,13]==N_Gr20 ||Form_Patern_Finder[t5,27]==PipsNumber && Form_Patern_Finder[t5,28]==N_Gr20 || Form_Patern_Finder[t5,42]==PipsNumber && Form_Patern_Finder[t5,43]==N_Gr20 || Form_Patern_Finder[t5,57]==PipsNumber && Form_Patern_Finder[t5,58]==N_Gr20)/) //Последнее пустое место в массиве { // WRinLine1=1; break; } } //for(t5=1; t5<1000; t5++) // { // if(WRinLine1=0 && Form_Patern_Finder[t5,17]==0 && Form_Patern_Finder[t5,18]==0 && Form_Patern_Finder[t5,19]==0 && Form_Patern_Finder[t5,20]==0) //Последнее пустое место в массиве // { // break; // } // } if(N_Centro_r==1) { Form_Patern_Finder[t5,80]=1; Form_Patern_Finder[t5,76]=bodypips[MaxInd_bodypips,0]; DT_Form_Patern_Finder[t5,76]=iTime(Symbol(),PERIOD_M1,1); } if(N_Centro_r==2) { Form_Patern_Finder[t5,81]=1; Form_Patern_Finder[t5,77]=bodypips[MaxInd_bodypips,0]; DT_Form_Patern_Finder[t5,77]=iTime(Symbol(),PERIOD_M1,1); } if(N_Centro_r==3) { Form_Patern_Finder[t5,82]=1; Form_Patern_Finder[t5,78]=bodypips[MaxInd_bodypips,0]; DT_Form_Patern_Finder[t5,78]=iTime(Symbol(),PERIOD_M1,1); } if(N_Centro_r==4) { Form_Patern_Finder[t5,83]=1; Form_Patern_Finder[t5,79]=bodypips[MaxInd_bodypips,0]; DT_Form_Patern_Finder[t5,79]=iTime(Symbol(),PERIOD_M1,1); } Form_Patern_Finder[t5,87]=PipsNumber;//Номер Семечки . имеет значение от 1 до 5 Form_Patern_Finder[t5,88]=N_Gr20;//Номер блока ценавой 20-ки Form_Patern_Finder[t5,89]=N_Centro;//Номер центра архитектуры //Произвести запись массива в Бинарнйы фаил.Фаил загружается в массив при запуске программы } //Be_1_IZN int newPrise6=0; int PriceExist6=0; int w6; for(w6=1; w6<=1000; w6++)//Перебор для поиска по условию Если цена НЕ равна записаннаму значению в Массиве 1,00001!=1,00002 { if(Array_Errors==true) { Print(» Index Array «,w6,» 10043″); } if((Form_Patern_Finder[w6,103]!=0 && Form_Patern_Finder[w6,103]==N_Gr20 && Form_Patern_Finder[w6,102]==PipsNumber && ((Form_Patern_Finder[w6,91]!=bodypips[MaxInd_bodypips,0]) || (Form_Patern_Finder[w6,92]!=bodypips[MaxInd_bodypips,0]) || (Form_Patern_Finder[w6,93]!=bodypips[MaxInd_bodypips,0])|| (Form_Patern_Finder[w6,94]!=bodypips[MaxInd_bodypips,0])))/Form_Patern_Finder[w4,9]=N_Gr20 && Form_Patern_Finder[w4,6]==1 &&/ && InternalPat_1==7) //Поиск цены . Возвращает индекс в массиве { PriceExist6=1; if(PriceExist6==1/«Указывает на найденную цену Функцией выше»/ && InternalPat_1==7/«Указывает на соеденение в ячейке цены и абьёма»/ && Form_Patern_Finder[w6,101]!=1)//Если цена существует и w не равен 0 и Патерн не был собран. Если w равен налю произвести новую запись то доступ в функцию открыт { int Change1_6=0,Change2_6=0,Change3_6=0,Change4_6=0; if(Form_Patern_Finder[w6,95]==0 && N_Centro_r==1) // Параметр архитектуры 1 ;//Номер Семечки . имеет значение от 1 до 5 { //Присваиваю значение по архитектуре Form_Patern_Finder[w6,95]=1;//Присваиваю значение соеденения в архитектуре «Желтый Карсный Синий Зелёный » + Место по цене»Архитектура» + Место по полученному абьёму»00000000″ Form_Patern_Finder[w6,91]=bodypips[MaxInd_bodypips,0]; DT_Form_Patern_Finder[w6,91]=iTime(Symbol(),PERIOD_M1,1); Change1_6=1; //Проверяю наличие остальных архитектур в ячейке if(Form_Patern_Finder[w6,95]==1 && Form_Patern_Finder[w6,96]==1 && Form_Patern_Finder[w6,97]==1 && Form_Patern_Finder[w6,98]==1) { Form_Patern_Finder[w6,101]=1;//Патерн Заполнен //Вывести на график цены флаг собранного патерна } } //Центр 2 Красный if(Form_Patern_Finder[w6,96]==0 && N_Centro_r==2) // Параметр архитектуры 1 { //Присваиваю значение по архитектуре Form_Patern_Finder[w6,96]=1;//Присваиваю значение соеденения в архитектуре «Желтый Карсный Синий Зелёный » + Место по цене»Архитектура» + Место по полученному абьёму»00000000″ Form_Patern_Finder[w6,92]=bodypips[MaxInd_bodypips,0]; DT_Form_Patern_Finder[w6,92]=iTime(Symbol(),PERIOD_M1,1); Change2_6=1; //Проверяю наличие остальных архитектур в ячейке if(Form_Patern_Finder[w6,95]==1 && Form_Patern_Finder[w6,96]==1 && Form_Patern_Finder[w6,97]==1 && Form_Patern_Finder[w6,98]==1) { Form_Patern_Finder[w6,101]=1;//Патерн Заполнен //Вывести на график цены флаг собранного патерна } } //Центр 3 Зелёный if(Form_Patern_Finder[w6,97]==0 && N_Centro_r==3) // Параметр архитектуры 1 { //Присваиваю значение по архитектуре Form_Patern_Finder[w6,97]=1;//Присваиваю значение соеденения в архитектуре «Желтый Карсный Синий Зелёный » + Место по цене»Архитектура» + Место по полученному абьёму»00000000″ Form_Patern_Finder[w6,93]=bodypips[MaxInd_bodypips,0]; DT_Form_Patern_Finder[w6,93]=iTime(Symbol(),PERIOD_M1,1); Change3_6=1; //Проверяю наличие остальных архитектур в ячейке if(Form_Patern_Finder[w6,95]==1 && Form_Patern_Finder[w6,96]==1 && Form_Patern_Finder[w6,97]==1 && Form_Patern_Finder[w6,98]==1) { Form_Patern_Finder[w6,101]=1;//Патерн Заполнен //Вывести на график цены флаг собранного патерна } } //Центр 4 Синий if(Form_Patern_Finder[w6,98]==0 && N_Centro_r==4) // Параметр архитектуры 1 { //Присваиваю значение по архитектуре Form_Patern_Finder[w6,98]=1;//Присваиваю значение соеденения в архитектуре «Желтый Карсный Синий Зелёный » + Место по цене»Архитектура» + Место по полученному абьёму»00000000″ Form_Patern_Finder[w6,94]=bodypips[MaxInd_bodypips,0]; DT_Form_Patern_Finder[w6,94]=iTime(Symbol(),PERIOD_M1,1); Change4_6=1; //Проверяю наличие остальных архитектур в ячейке if(Form_Patern_Finder[w6,95]==1 && Form_Patern_Finder[w6,96]==1 && Form_Patern_Finder[w6,97]==1 && Form_Patern_Finder[w6,98]==1) { Form_Patern_Finder[w6,101]=1;//Патерн Заполнен //Вывести на график цены флаг собранного патерна } } } // break; } } // —– Ески нет цены в массиве для просмотра int WriteData6=1; for(int z6=1; z6<=1000; z6++) { if(Array_Errors==true) { Print(» Index Array «,z6,» 10120″); } if(bodypips[MaxInd_bodypips,0]!=0 && PriceExist6==0 && (Form_Patern_Finder[z6,91]==bodypips[MaxInd_bodypips,0] || Form_Patern_Finder[z6,92]==bodypips[MaxInd_bodypips,0]||Form_Patern_Finder[z6,93]==bodypips[MaxInd_bodypips,0]||Form_Patern_Finder[z6,94]==bodypips[MaxInd_bodypips,0]))//Если в любой из ячеек существует цена то запись данных не нужна { WriteData6=0; break; } } if(PriceExist6==0 && InternalPat_1==7 && WriteData6==1) //Еси нет цены в массиве для просмотра { // int WRinLine2=0; int t6; for(t6=1; t6<=1000; t6++) { if(Array_Errors==true) { Print(» Index Array «,t6,» 10136″); } if(Form_Patern_Finder[t6,91]==0 && Form_Patern_Finder[t6,92]==0 && Form_Patern_Finder[t6,93]==0 && Form_Patern_Finder[t6,94]==0 /&& (Form_Patern_Finder[t6,12]==PipsNumber && Form_Patern_Finder[t6,13]==N_Gr20 ||Form_Patern_Finder[t6,27]==PipsNumber && Form_Patern_Finder[t6,28]==N_Gr20 || Form_Patern_Finder[t6,42]==PipsNumber && Form_Patern_Finder[t6,43]==N_Gr20 || Form_Patern_Finder[t6,57]==PipsNumber && Form_Patern_Finder[t6,58]==N_Gr20)/) //Последнее пустое место в массиве { // WRinLine2=1; break; } } // for(t6=1; t6<1000; t6++) // { // if(WRinLine6=0 && Form_Patern_Finder[t6,31]==0 && Form_Patern_Finder[t6,32]==0 && Form_Patern_Finder[t6,33]==0 && Form_Patern_Finder[t6,34]==0) //Последнее пустое место в массиве // { // break; // } // } if(N_Centro_r==1) { Form_Patern_Finder[t6,95]=1; Form_Patern_Finder[t6,91]=bodypips[MaxInd_bodypips,0]; DT_Form_Patern_Finder[t6,91]=iTime(Symbol(),PERIOD_M1,1); } if(N_Centro_r==2) { Form_Patern_Finder[t6,96]=1; Form_Patern_Finder[t6,92]=bodypips[MaxInd_bodypips,0]; DT_Form_Patern_Finder[t6,92]=iTime(Symbol(),PERIOD_M1,1); } if(N_Centro_r==3) { Form_Patern_Finder[t6,97]=1; Form_Patern_Finder[t6,93]=bodypips[MaxInd_bodypips,0]; DT_Form_Patern_Finder[t6,93]=iTime(Symbol(),PERIOD_M1,1); } if(N_Centro_r==4) { Form_Patern_Finder[t6,98]=1; Form_Patern_Finder[t6,94]=bodypips[MaxInd_bodypips,0]; DT_Form_Patern_Finder[t6,94]=iTime(Symbol(),PERIOD_M1,1); } Form_Patern_Finder[t6,102]=PipsNumber;//Номер Семечки . имеет значение от 1 до 5 Form_Patern_Finder[t6,103]=N_Gr20;//Номер блока ценавой 20-ки Form_Patern_Finder[t6,104]=N_Centro;//Номер центра архитектуры //Произвести запись массива в Бинарнйы фаил.Фаил загружается в массив при запуске программы } //Bo_1_IZN int newPrise7=0; int PriceExist7=0; int w7; for(w7=1; w7<=1000; w7++)//Перебор для поиска по условию Если цена НЕ равна записаннаму значению в Массиве 1,00001!=1,00002 { if(Array_Errors==true) { Print(» Index Array «,w7,» 10188″); } if((Form_Patern_Finder[w7,118]!=0 && Form_Patern_Finder[w7,118]==N_Gr20 && Form_Patern_Finder[w7,117]==PipsNumber && ((Form_Patern_Finder[w7,106]!=bodypips[MaxInd_bodypips,0]) ||(Form_Patern_Finder[w7,107]!=bodypips[MaxInd_bodypips,0]) ||(Form_Patern_Finder[w7,108]!=bodypips[MaxInd_bodypips,0])||(Form_Patern_Finder[w7,109]!=bodypips[MaxInd_bodypips,0])))&& InternalPat_1==8) //Поиск цены . Возвращает индекс в массиве { PriceExist7=1; if(PriceExist7==1/«Указывает на найденную цену Функцией выше»/ && InternalPat_1==8/«Указывает на соеденение в ячейке цены и абьёма»/ && Form_Patern_Finder[w7,116]!=1)//Если цена существует и w не равен 0 и Патерн не был собран. Если w равен налю произвести новую запись то доступ в функцию открыт { int Change1_7=0,Change2_7=0,Change3_7=0,Change4_7=0; if(Form_Patern_Finder[w7,110]==0 && N_Centro_r==1) // Параметр архитектуры 1 ;//Номер Семечки . имеет значение от 1 до 5 { //Присваиваю значение по архитектуре Form_Patern_Finder[w7,110]=1;//Присваиваю значение соеденения в архитектуре «Желтый Карсный Синий Зелёный » + Место по цене»Архитектура» + Место по полученному абьёму»00000000″ Form_Patern_Finder[w7,106]=bodypips[MaxInd_bodypips,0]; DT_Form_Patern_Finder[w7,106]=iTime(Symbol(),PERIOD_M1,1); Change1_7=1; //Проверяю наличие остальных архитектур в ячейке if(Form_Patern_Finder[w7,110]==1 && Form_Patern_Finder[w7,111]==1 && Form_Patern_Finder[w7,112]==1 && Form_Patern_Finder[w7,113]==1) { Form_Patern_Finder[w7,116]=1;//Патерн Заполнен //Вывести на график цены флаг собранного патерна } } //Центр 2 Красный if(Form_Patern_Finder[w7,111]==0 && N_Centro_r==2) // Параметр архитектуры 1 { //Присваиваю значение по архитектуре Form_Patern_Finder[w7,111]=1;//Присваиваю значение соеденения в архитектуре «Желтый Карсный Синий Зелёный » + Место по цене»Архитектура» + Место по полученному абьёму»00000000″ Form_Patern_Finder[w7,107]=bodypips[MaxInd_bodypips,0]; DT_Form_Patern_Finder[w7,107]=iTime(Symbol(),PERIOD_M1,1); Change2_7=1; //Проверяю наличие остальных архитектур в ячейке if(Form_Patern_Finder[w7,110]==1 && Form_Patern_Finder[w7,111]==1 && Form_Patern_Finder[w7,112]==1 && Form_Patern_Finder[w7,113]==1) { Form_Patern_Finder[w7,116]=1;//Патерн Заполнен //Вывести на график цены флаг собранного патерна } } //Центр 3 Зелёный if(Form_Patern_Finder[w7,112]==0 && N_Centro_r==3) // Параметр архитектуры 1 { //Присваиваю значение по архитектуре Form_Patern_Finder[w7,112]=1;//Присваиваю значение соеденения в архитектуре «Желтый Карсный Синий Зелёный » + Место по цене»Архитектура» + Место по полученному абьёму»00000000″ Form_Patern_Finder[w7,108]=bodypips[MaxInd_bodypips,0]; DT_Form_Patern_Finder[w7,108]=iTime(Symbol(),PERIOD_M1,1); Change3_7=1; //Проверяю наличие остальных архитектур в ячейке if(Form_Patern_Finder[w7,110]==1 && Form_Patern_Finder[w7,111]==1 && Form_Patern_Finder[w7,112]==1 && Form_Patern_Finder[w7,113]==1) { Form_Patern_Finder[w7,116]=1;//Патерн Заполнен //Вывести на график цены флаг собранного патерна } } //Центр 4 Синий if(Form_Patern_Finder[w7,113]==0 && N_Centro_r==4) // Параметр архитектуры 1 { //Присваиваю значение по архитектуре Form_Patern_Finder[w7,113]=1;//Присваиваю значение соеденения в архитектуре «Желтый Карсный Синий Зелёный » + Место по цене»Архитектура» + Место по полученному абьёму»00000000″ Form_Patern_Finder[w7,109]=bodypips[MaxInd_bodypips,0]; DT_Form_Patern_Finder[w7,109]=iTime(Symbol(),PERIOD_M1,1); Change4_7=1; //Проверяю наличие остальных архитектур в ячейке if(Form_Patern_Finder[w7,110]==1 && Form_Patern_Finder[w7,111]==1 && Form_Patern_Finder[w7,112]==1 && Form_Patern_Finder[w7,113]==1) { Form_Patern_Finder[w7,116]=1;//Патерн Заполнен //Вывести на график цены флаг собранного патерна } } } // break; } } // —– Ески нет цены в массиве для просмотра int WriteData7=1; for(int z7=1; z7<=1000; z7++) { if(Array_Errors==true) { Print(» Index Array «,z7,» 10265″); } if(bodypips[MaxInd_bodypips,0]!=0 && PriceExist7==0 && (Form_Patern_Finder[z7,106]==bodypips[MaxInd_bodypips,0] || Form_Patern_Finder[z7,107]==bodypips[MaxInd_bodypips,0]||Form_Patern_Finder[z7,108]==bodypips[MaxInd_bodypips,0]||Form_Patern_Finder[z7,109]==bodypips[MaxInd_bodypips,0]))//Если в любой из ячеек существует цена то запись данных не нужна { WriteData7=0; break; } } if(PriceExist7==0 && InternalPat_1==8 && WriteData7==1) //Еси нет цены в массиве для просмотра { // int WRinLine3=0; int t7; for(t7=1; t7<=1000; t7++) { if(Array_Errors==true) { Print(» Index Array «,t7,» 10281″); } if(Form_Patern_Finder[t7,110]==0 && Form_Patern_Finder[t7,111]==0 && Form_Patern_Finder[t7,112]==0 && Form_Patern_Finder[t7,113]==0 /&& (Form_Patern_Finder[t7,12]==PipsNumber && Form_Patern_Finder[t7,13]==N_Gr20 ||Form_Patern_Finder[t7,27]==PipsNumber && Form_Patern_Finder[t7,28]==N_Gr20 || Form_Patern_Finder[t7,42]==PipsNumber && Form_Patern_Finder[t7,43]==N_Gr20 || Form_Patern_Finder[t7,57]==PipsNumber && Form_Patern_Finder[t7,58]==N_Gr20)/) //Последнее пустое место в массиве { // WRinLine3=1; break; } } // for(t7=1; t7<1000; t7++) // { // if(WRinLine3=0 && Form_Patern_Finder[t7,46]==0 && Form_Patern_Finder[t7,47]==0 && Form_Patern_Finder[t7,48]==0 && Form_Patern_Finder[t7,49]==0) //Последнее пустое место в массиве // { // break; // } // } if(N_Centro_r==1) { Form_Patern_Finder[t7,106]=1; Form_Patern_Finder[t7,110]=bodypips[MaxInd_bodypips,0]; DT_Form_Patern_Finder[t7,110]=iTime(Symbol(),PERIOD_M1,1); } if(N_Centro_r==2) { Form_Patern_Finder[t7,107]=1; Form_Patern_Finder[t7,111]=bodypips[MaxInd_bodypips,0]; DT_Form_Patern_Finder[t7,111]=iTime(Symbol(),PERIOD_M1,1); } if(N_Centro_r==3) { Form_Patern_Finder[t7,108]=1; Form_Patern_Finder[t7,112]=bodypips[MaxInd_bodypips,0]; DT_Form_Patern_Finder[t7,112]=iTime(Symbol(),PERIOD_M1,1); } if(N_Centro_r==4) { Form_Patern_Finder[t7,109]=1; Form_Patern_Finder[t7,113]=bodypips[MaxInd_bodypips,0]; DT_Form_Patern_Finder[t7,113]=iTime(Symbol(),PERIOD_M1,1); } Form_Patern_Finder[t7,117]=PipsNumber;//Номер Семечки . имеет значение от 1 до 5 Form_Patern_Finder[t7,118]=N_Gr20;//Номер блока ценавой 20-ки Form_Patern_Finder[t7,119]=N_Centro;//Номер центра архитектуры //Произвести запись массива в Бинарнйы фаил.Фаил загружается в массив при запуске программы } Pr_Arch=»0″; //Функция соответствия ключа в к номеру центра и полюсному состоянию //Print(«TEST1 Print «,» N_Centro_Ind «,N_Centro_Ind,» Arch3 «,Arch3); // клас для складывания и раскладывания архитектуры. Управляющие элементы //Существует Подклас для Деления с указанием на переменную //Подкласы:Kлас деления, Указание на перемнную и Подклас Деление с Указанием на переменную поочерёдно накладываются на Круг и Звезду и выводят следующие подкласы. // 1. Звесда с Переменной. 2. Звезда с вертикальным разделением 3. Звезда с горизонтальным разделением.4. Звезда с вертикальным разделением и указателем Переменной 5.Звезда с горизонтальным разделением и указателем Переменной // 1. Круг с Переменной. 2. Круг с вертикальным разделением 3. Круг с горизонтальным разделением.4. Круг с вертикальным разделением и указателем Переменной 5.Круг с горизонтальным разделением и указателем Переменной if(comp_Sev[1,1]==0 && comp_Sev[1,2]==0 && comp_Sev[1,3]==0 && comp_Sev[1,4]==0 && comp_Sev[1,5]==0 && comp_Sev[1,6]==0 && comp_Sev[1,7]==0 && comp_Sev[1,8]==0) { N_Petalo_1=0; } int Ch_d1=0;//Permiso para cambiar datos for(int iu=1; iu<=8; iu++)//Сравнение пересчёта бинарного кода. Выявление изменений в 01110110 байте 01101110 { if(Array_Errors==true) { Print(» Index Array «,iu,» 10342″); } if(comp_Sev[1,iu]!=Sev[1,iu] && Sev[1,iu]==1)// условие если произошло изменение в структуре 8 бит { N_Petalo_1=iu;//Присвоение индекса как номер лепестка Ch_d1=1; break; } } if(N_Petalo_1!=0 && Ch_d1==1) { N_Petalo=N_Petalo_1; } //Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1); //Произвести присваивание новых значений в Массив сравнения после проведения всего расчёта //Print(» Cotejamiento de Arrays antes de reasignacion»,comp_Sev[1,1],comp_Sev[1,2],comp_Sev[1,3],comp_Sev[1,4]); comp_Sev[1,1]=Sev[1,1]; //Print(» comp_Sev[1,1]»,comp_Sev[1,1]); comp_Sev[1,2]=Sev[1,2]; //Print(» comp_Sev[1,2]»,comp_Sev[1,2]); comp_Sev[1,3]=Sev[1,3]; //Print(» comp_Sev[1,3]»,comp_Sev[1,3]); comp_Sev[1,4]=Sev[1,4]; //Print(» comp_Sev[1,4″,comp_Sev[1,4]); comp_Sev[1,5]=Sev[1,5]; //Print(» comp_Sev[1,1]»,comp_Sev[1,1]); comp_Sev[1,6]=Sev[1,6]; //Print(» comp_Sev[1,2]»,comp_Sev[1,2]); comp_Sev[1,7]=Sev[1,7]; //Print(» comp_Sev[1,3]»,comp_Sev[1,3]); comp_Sev[1,8]=Sev[1,8]; //Print(» comp_Sev[1,4″,comp_Sev[1,4]); Price_Compare=bodypips[MaxInd_bodypips,0];//Переменная для сравнения цены с предыдущим значением // Конец функции //метод складывания в лепесток. Исходные значения. Номера центров подачи и приёма + или – импулса Определение подачи от центра 2 в центр 4 с использованием текущей архитектуры // произвести сравнения бинарности для выявления номера лепестка. //+——————————————————————+ //| Sunflower 1/0 – Cluster flower | //+——————————————————————+ // Зброс параметров переменных перед расчётом // flower[99,39] Обьявить массив 0. Произвести проверку на >=1 0000 Лепесток1(по архитектурно арх 1 2 3 4) 0000 Лепесток2 0000 Лепесток3 0000 лепесток4 также 5 6 7 8
insert_chanel_1=0;
insert_chanel_2=0;
output_Dir=0;
zaryad=0;
zapret_podachi_input=0;
zapret_podachi_output=0;
//—-modo test
Print(«2- OPA «,opa);
// Print(» flower_Price_3[opa,33] «,flower_Price_3[0,33]);
Print(» Precio AR «,flower_Price_3[opa,33],» precio cor «,Price,» N centro AR «,flower_Price_3[opa,37],» N centro «,N_Centro,» n20 arr «,flower_Price_3[opa,38],» N20 «,N_Gr20);

if(flower_perm==true)
{
//

if(sev==1 && N_Petalo==1/* Определяется по 3 архитектуре */ && N_Centro_r==1/* Определяется по цене в подсолн. */ && f_Be_1==1)//&& N_Gr20== Необходимо писать в массив
{
// Arch 1
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=2;//vostok
zaryad=1;
zapret_podachi_input=2;
zapret_podachi_output=4;
//Be_1 + » – » Arhitektura
flower[1,1]=flower[1,1]+1;//Регистрация подачи значения
//
string fileemoji=»\\Images\\11_m.bmp»;
//———————–
ObjectDelete(Obiekt3001);
ObjectCreate(Obiekt3001,OBJ_BITMAP_LABEL,0,BrTime,HIGHT+0.00015);
ObjectSetString(0,Obiekt3001,OBJPROP_BMPFILE,fileemoji);
ObjectSetInteger(0,Obiekt3001,OBJPROP_XDISTANCE,CHWPX+500);
ObjectSetInteger(0,Obiekt3001,OBJPROP_YDISTANCE,100);
C_Ar_1++;
//Print(Ar_1,» Ar_1 «,C_Ar_1);
if(C_Ar_1>0)
{
Pr_C_Ar_1=Ar_1;
}
if(C_Ar_1<0)
{
Pr_C_Ar_1=» «;
}

//————-Tiempos y permisos – 23 – -1 » una tercera parte de letra ,usar suma para punto adecuado » – 24 – 0 » 3 partes de letra se realiza suma en 2 puntos iluminacion en 3 partes » – 25 1 » 2 partes de letra se suman 2 partes de 3 iluminan 2 partes» si el volumen es el mismo y se cuadro numero volumen realiza el mismo impulso










if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,1]=flower_Price_3[opa,1]+1;//
flower_Price_3[opa,35]=3;//Последняя переменная
flower_Price_3[opa,36]=1;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,1] «,flower_Price_3[opa,1]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,opa,» index 2″,ye,» 10445″);
}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,opa,» index 2″,ye,» 10445″);
}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,1] «,flower_Price_3[opa,1]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 10477 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,1]!=flower_Price_3[opa,1])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,1]=flower_Price_3[opa,1];//
Print(» hehe – cantidad de cambios total 1 «,hehe);
}
}
// flower_Price_3[1,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[1,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}


}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==1)
{
for(int uae=1; uae<=200000; uae++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uae,» 10525 «);


}
if(flower_Price_3[uae,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uae,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uae,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс

}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}

if(sev==1 && N_Petalo==2 && N_Centro_r==1 && f_Bo_1==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=3;//vostok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» – » Arhitektura
flower[1,5]=flower[1,5]-1;//Регистрация подачи значения
//
string fileemoji=»\\Images\\11_p.bmp»;
//———————–
ObjectDelete(Obiekt3001);
ObjectCreate(Obiekt3001,OBJ_BITMAP_LABEL,0,BrTime,HIGHT+0.00015);
ObjectSetString(0,Obiekt3001,OBJPROP_BMPFILE,fileemoji);
ObjectSetInteger(0,Obiekt3001,OBJPROP_XDISTANCE,CHWPX+500);
ObjectSetInteger(0,Obiekt3001,OBJPROP_YDISTANCE,100);
C_Ar_2–;
//Print(Ar_2,» Ar_2 «,C_Ar_2);
if(C_Ar_2>0)
{
Pr_C_Ar_5=Ar_2;
}
if(C_Ar_2<0)
{
Pr_C_Ar_5=» «;
}

//————-Tiempos y permisos – 23 – -1 » una tercera parte de letra ,usar suma para punto adecuado » – 24 – 0 » 3 partes de letra se realiza suma en 2 puntos iluminacion en 3 partes » – 25 1 » 2 partes de letra se suman 2 partes de 3 iluminan 2 partes» si el volumen es el mismo y se cuadro numero volumen realiza el mismo impulso

//summa punto 1
if((Particula[8]!=23 || Particula[8]!=24 || Particula[8]!=25) && Particula[8]<25)//если нет сложенных сум то скласть. Если это 10 то сумируем север
{
Particula[8]=Particula[8]+Sev_Part_Lic[2,24];//tramo 9-12 ok

}
if(Particula[8]>25)
{
Print(» Particula [8] error >25″,Particula[8]);

}
//summa punto 2
// если 23 то не обрабатывается сумма
if((Particula[8]!=23 || Particula[8]!=24 || Particula[8]!=25 || Particula[8]==24 || Particula[8]==25) && Particula[8]<25 && (Particula[6]!=23 || Particula[6]!=24 || Particula[6]!=25) && Particula[6]<25)
{
Particula[6]=Particula[6]+Sev_Part_Lic[2,20];//tramo 9-12

}


if(Particula[6]>25)
{
Print(«Particula [6] error >25»,Particula[6]);

}

//минусование в Изнанке
//При сумме 25 производится сумма в фракции но не обнуление с обратной стороны
// могут быть 2 варрианта. 1 Обнуление для перезаполнения 2 минусование.
// Затирание происходит по направлению переменной
//Фракция 1
if(Particula[8]==23) //если нет сложенных сум то скласть. Если это 10 то сумируем север
{
Particula[18]=0;//Запрет на подачу более чем на 1 часть фракции

}

if(Particula[8]==25) //если нет сложенных сум то скласть. Если это 10 то сумируем север
{
Particula[18]=0;//Запрет на подачу более чем на 1 часть фракции
//Particula[24]=0;//Варриант без обнуления на 25
}
if(Particula[8]==24)//если нет сложенных сум то скласть. Если это 10 то сумируем север
{
Particula[18]=0;//Запрет на подачу более чем на 1 часть фракции
Particula[20]=0;
}
//Фракция 2


if(Particula[6]==23) //если нет сложенных сум то скласть. Если это 10 то сумируем север
{
Particula[20]=0;//Запрет на подачу более чем на 1 часть фракции

}

if(Particula[6]==25) //если нет сложенных сум то скласть. Если это 10 то сумируем север
{
Particula[20]=0;//Запрет на подачу более чем на 1 часть фракции

}
if(Particula[6]==24)//если нет сложенных сум то скласть. Если это 10 то сумируем север
{
Particula[20]=0;//Запрет на подачу более чем на 1 часть фракции

}



if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,5]=flower_Price_3[opa,5]-1;//
flower_Price_3[opa,35]=4;//Последняя переменная
flower_Price_3[opa,36]=1;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,5] «,flower_Price_3[opa,5]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 10590 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 10608 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,5] «,flower_Price_3[opa,5]);
for(int hehe=1; hehe<=200000; hehe++)
{

if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 10627 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,5]!=flower_Price_3[opa,5])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,5]=flower_Price_3[opa,5];//
Print(» hehe – cantidad de cambios total 5 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==1)
{
for(int uae=1; uae<=200000; uae++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uae,» 673 «);


}
if(flower_Price_3[uae,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uae,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uae,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(sev==1 && N_Petalo==3 && N_Centro_r==1 && f_Be_0==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=4;//vostok
zaryad=0;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» + » Arhitektura
flower[1,9]=flower[1,9]+1;//Регистрация подачи значения
//
string fileemoji=»\\Images\\12_m.bmp»;
//———————–
ObjectDelete(Obiekt3001);
ObjectCreate(Obiekt3001,OBJ_BITMAP_LABEL,0,BrTime,HIGHT+0.00015);
ObjectSetString(0,Obiekt3001,OBJPROP_BMPFILE,fileemoji);
ObjectSetInteger(0,Obiekt3001,OBJPROP_XDISTANCE,CHWPX+500);
ObjectSetInteger(0,Obiekt3001,OBJPROP_YDISTANCE,100);
C_Ar_3++;
//Print(Ar_3,» Ar_3 «,C_Ar_3);
if(C_Ar_3>0)
{
Pr_C_Ar_9=Ar_3;
}
if(C_Ar_3<0)
{
Pr_C_Ar_9=» «;
}

//summa punto 1
if((Particula[2]!=23 || Particula[2]!=24 || Particula[2]!=25) && Particula[2]<25)//если нет сложенных сум то скласть. Если это 10 то сумируем север
{
Particula[2]=Particula[2]+Sev_Part_Lic[1,24];//tramo 9-12 ok

}
if(Particula[2]>25)
{
Print(» Particula [2] error >25″,Particula[2]);

}
//summa punto 2
// если 23 то не обрабатывается сумма
if((Particula[2]!=23 || Particula[2]!=24 || Particula[2]!=25 || Particula[2]==24 || Particula[2]==25) && Particula[2]<25 && (Particula[4]!=23 || Particula[4]!=24 || Particula[4]!=25) && Particula[4]<25)
{
Particula[4]=Particula[4]+Sev_Part_Lic[1,32];//tramo 9-12

}


if(Particula[4]>25)
{
Print(«Particula [4] error >25»,Particula[4]);

}

//минусование в Изнанке
//При сумме 25 производится сумма в фракции но не обнуление с обратной стороны
// могут быть 2 варрианта. 1 Обнуление для перезаполнения 2 минусование.
// Затирание происходит по направлению переменной
//Фракция 1
if(Particula[2]==23) //если нет сложенных сум то скласть. Если это 10 то сумируем север
{
Particula[24]=0;//Запрет на подачу более чем на 1 часть фракции

}

if(Particula[2]==25) //если нет сложенных сум то скласть. Если это 10 то сумируем север
{
Particula[24]=0;//Запрет на подачу более чем на 1 часть фракции
//Particula[24]=0;//Варриант без обнуления на 25
}
if(Particula[2]==24)//если нет сложенных сум то скласть. Если это 10 то сумируем север
{
Particula[22]=0;//Запрет на подачу более чем на 1 часть фракции
Particula[24]=0;
}
//Фракция 2


if(Particula[4]==23) //если нет сложенных сум то скласть. Если это 10 то сумируем север
{
Particula[22]=0;//Запрет на подачу более чем на 1 часть фракции

}

if(Particula[4]==25) //если нет сложенных сум то скласть. Если это 10 то сумируем север
{
Particula[22]=0;//Запрет на подачу более чем на 1 часть фракции

}
if(Particula[4]==24)//если нет сложенных сум то скласть. Если это 10 то сумируем север
{
Particula[22]=0;//Запрет на подачу более чем на 1 часть фракции

}

//permisos necesarios para dibujar indicador
// При достижении суммы 23,24 ,25 абьём блокируется до обнуления. Обнуление производит изнаночьная сторона.
// При повторной подаче абьёма абьём доходит до фракции 1 к примеру и останавливается.



if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,9]=flower_Price_3[opa,9]+1;//
flower_Price_3[opa,35]=1;//Последняя переменная
flower_Price_3[opa,36]=1;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,9] «,flower_Price_3[opa,9]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 10736 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 10754 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,9] «,flower_Price_3[opa,9]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 10772 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,9]!=flower_Price_3[opa,9])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,9]=flower_Price_3[opa,9];//
Print(» hehe – cantidad de cambios total 9 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==1)
{
for(int uae=1; uae<=200000; uae++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uae,» 10818 «);


}
if(flower_Price_3[uae,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uae,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uae,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(sev==1 && N_Petalo==4 && N_Centro_r==1 && f_Bo_0==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=1;//vostok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» – » Arhitektura
flower[1,13]=flower[1,13]-1;//Регистрация подачи значения
//
string fileemoji=»\\Images\\12_p.bmp»;
//———————–
ObjectDelete(Obiekt3001);
ObjectCreate(Obiekt3001,OBJ_BITMAP_LABEL,0,BrTime,HIGHT+0.00015);
ObjectSetString(0,Obiekt3001,OBJPROP_BMPFILE,fileemoji);
ObjectSetInteger(0,Obiekt3001,OBJPROP_XDISTANCE,CHWPX+500);
ObjectSetInteger(0,Obiekt3001,OBJPROP_YDISTANCE,100);
C_Ar_4–;
//Print(Ar_4,» Ar_4 «,C_Ar_4);
if(C_Ar_4>0)
{
Pr_C_Ar_13=Ar_4;
}
if(C_Ar_4<0)
{
Pr_C_Ar_13=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,13]=flower_Price_3[opa,13]-1;//
flower_Price_3[opa,35]=2;//Последняя переменная
flower_Price_3[opa,36]=1;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,13] «,flower_Price_3[opa,13]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 10881 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 10899 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,13] «,flower_Price_3[opa,13]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 10917 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,13]!=flower_Price_3[opa,13])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,13]=flower_Price_3[opa,13];//
Print(» hehe – cantidad de cambios total 13″,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==1)
{
for(int uae=1; uae<=200000; uae++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uae,» 10963 «);


}
if(flower_Price_3[uae,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uae,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uae,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(sev==1 && N_Petalo==5/* Определяется по 3 архитектуре */ && N_Centro_r==1/* Определяется по цене в подсолн. */ && f_Be_1==1)//&& N_Gr20== Необходимо писать в массив
{
// Arch 1
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=2;//vostok
zaryad=1;
zapret_podachi_input=2;
zapret_podachi_output=4;
//» + » Arhitektura
flower[1,17]=flower[1,17]+1;//Регистрация подачи значения
//
string fileemoji=»\\Images\\13_m.bmp»;
//———————–
ObjectDelete(Obiekt3001);
ObjectCreate(Obiekt3001,OBJ_BITMAP_LABEL,0,BrTime,HIGHT+0.00015);
ObjectSetString(0,Obiekt3001,OBJPROP_BMPFILE,fileemoji);
ObjectSetInteger(0,Obiekt3001,OBJPROP_XDISTANCE,CHWPX+500);
ObjectSetInteger(0,Obiekt3001,OBJPROP_YDISTANCE,100);
C_Ar_5++;
//Print(Ar_5,» Ar_5 «,C_Ar_5);
if(C_Ar_5>0)
{
Pr_C_Ar_17=Ar_5;
}
if(C_Ar_5<0)
{
Pr_C_Ar_17=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,17]=flower_Price_3[opa,17]+1;//
flower_Price_3[opa,35]=3;//Последняя переменная
flower_Price_3[opa,36]=1;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,17] «,flower_Price_3[opa,17]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 11027 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 11045 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,17] «,flower_Price_3[opa,17]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 11063 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,17]!=flower_Price_3[opa,17])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,17]=flower_Price_3[opa,17];//
Print(» hehe – cantidad de cambios total 17 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==1)
{
for(int uae=1; uae<=200000; uae++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uae,» 11109 «);


}
if(flower_Price_3[uae,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uae,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uae,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(sev==1 && N_Petalo==6 && N_Centro_r==1 && f_Bo_1==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=3;//vostok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» – » Arhitektura
flower[1,21]=flower[1,21]-1;//Регистрация подачи значения
//
string fileemoji=»\\Images\\13_p.bmp»;
//———————–
ObjectDelete(Obiekt3001);
ObjectCreate(Obiekt3001,OBJ_BITMAP_LABEL,0,BrTime,HIGHT+0.00015);
ObjectSetString(0,Obiekt3001,OBJPROP_BMPFILE,fileemoji);
ObjectSetInteger(0,Obiekt3001,OBJPROP_XDISTANCE,CHWPX+500);
ObjectSetInteger(0,Obiekt3001,OBJPROP_YDISTANCE,100);
C_Ar_6–;
//Print(Ar_6,» Ar_6 «,C_Ar_6);
if(C_Ar_6>0)
{
Pr_C_Ar_21=Ar_6;
}
if(C_Ar_6<0)
{
Pr_C_Ar_21=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,21]=flower_Price_3[opa,21]-1;//
flower_Price_3[opa,35]=4;//Последняя переменная
flower_Price_3[opa,36]=1;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,21] «,flower_Price_3[opa,21]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 11172 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 11190 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,21] «,flower_Price_3[opa,21]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 11208 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,21]!=flower_Price_3[opa,21])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,21]=flower_Price_3[opa,21];//
Print(» hehe – cantidad de cambios total 21 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==1)
{
for(int uae=1; uae<=200000; uae++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uae,» 11254 «);


}
if(flower_Price_3[uae,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uae,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uae,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(sev==1 && N_Petalo==7 && N_Centro_r==1 && f_Be_0==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=4;//vostok
zaryad=0;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» + » Arhitektura
flower[1,25]=flower[1,25]+1;//Регистрация подачи значения
//
string fileemoji=»\\Images\\14_m.bmp»;
//———————–
ObjectDelete(Obiekt3001);
ObjectCreate(Obiekt3001,OBJ_BITMAP_LABEL,0,BrTime,HIGHT+0.00015);
ObjectSetString(0,Obiekt3001,OBJPROP_BMPFILE,fileemoji);
ObjectSetInteger(0,Obiekt3001,OBJPROP_XDISTANCE,CHWPX+500);
ObjectSetInteger(0,Obiekt3001,OBJPROP_YDISTANCE,100);
C_Ar_7++;
//Print(Ar_7,» Ar_7 «,C_Ar_7);
if(C_Ar_7>0)
{
Pr_C_Ar_25=Ar_7;
}
if(C_Ar_7<0)
{
Pr_C_Ar_25=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,25]=flower_Price_3[opa,25]+1;//
flower_Price_3[opa,35]=1;//Последняя переменная
flower_Price_3[opa,36]=1;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,25] «,flower_Price_3[opa,25]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 11317 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 11335 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,25] «,flower_Price_3[opa,25]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 11353 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,25]!=flower_Price_3[opa,25])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,25]=flower_Price_3[opa,25];//
Print(» hehe – cantidad de cambios total 25 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==1)
{
for(int uae=1; uae<=200000; uae++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uae,» 11399 «);


}
if(flower_Price_3[uae,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uae,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uae,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(sev==1 && N_Petalo==8 && N_Centro_r==1 && f_Bo_0==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=1;//vostok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» – » Arhitektura
flower[1,29]=flower[1,29]-1;//Регистрация подачи значения
//
string fileemoji=»\\Images\\14_p.bmp»;
//———————–
ObjectDelete(Obiekt3001);
ObjectCreate(Obiekt3001,OBJ_BITMAP_LABEL,0,BrTime,HIGHT+0.00015);
ObjectSetString(0,Obiekt3001,OBJPROP_BMPFILE,fileemoji);
ObjectSetInteger(0,Obiekt3001,OBJPROP_XDISTANCE,CHWPX+500);
ObjectSetInteger(0,Obiekt3001,OBJPROP_YDISTANCE,100);
C_Ar_8–;
//Print(Ar_8,» Ar_8 «,C_Ar_8);
if(C_Ar_8>0)
{
Pr_C_Ar_29=Ar_8;
}
if(C_Ar_8<0)
{
Pr_C_Ar_29=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,29]=flower_Price_3[opa,29]-1;//
flower_Price_3[opa,35]=2;//Последняя переменная
flower_Price_3[opa,36]=1;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,29] «,flower_Price_3[opa,29]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 11462 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 11480 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,29] «,flower_Price_3[opa,29]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 11494 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,29]!=flower_Price_3[opa,29])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,29]=flower_Price_3[opa,29];//
Print(» hehe – cantidad de cambios total 29 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==1)
{
for(int uae=1; uae<=200000; uae++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uae,» 11544 «);


}
if(flower_Price_3[uae,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uae,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uae,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
//
if(sev==1 && N_Petalo==1 && N_Centro_r==2 && f_Bo_0==1)//&& N_Gr20== Необходимо писать в массив
{
// Arch 1
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=2;//vostok
zaryad=1;
zapret_podachi_input=2;
zapret_podachi_output=4;
//» – » Arhitektura
flower[1,2]=flower[1,2]-1;//Регистрация подачи значения
//
string fileemoji=»\\Images\\15_p.bmp»;
//———————–
ObjectDelete(Obiekt3001);
ObjectCreate(Obiekt3001,OBJ_BITMAP_LABEL,0,BrTime,HIGHT+0.00015);
ObjectSetString(0,Obiekt3001,OBJPROP_BMPFILE,fileemoji);
ObjectSetInteger(0,Obiekt3001,OBJPROP_XDISTANCE,CHWPX+500);
ObjectSetInteger(0,Obiekt3001,OBJPROP_YDISTANCE,100);
C_Ar_1–;
//Print(Ar_1,» Ar_1 «,C_Ar_1);
if(C_Ar_1>0)
{
Pr_C_Ar_2=Ar_1;
}
if(C_Ar_1<0)
{
Pr_C_Ar_2=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,2]=flower_Price_3[opa,2]-1;//
flower_Price_3[opa,35]=2;//Последняя переменная
flower_Price_3[opa,36]=1;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,2] «,flower_Price_3[opa,2]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 11609 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 11627 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,2] «,flower_Price_3[opa,2]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 11645 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,2]!=flower_Price_3[opa,2])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,2]=flower_Price_3[opa,2];//
Print(» hehe – cantidad de cambios total 2 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==2)
{
for(int uaa=1; uaa<=200000; uaa++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uaa,» 11691 «);


}
if(flower_Price_3[uaa,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uaa,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uaa,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(sev==1 && N_Petalo==2 && N_Centro_r==2 && f_Be_0==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=3;//vostok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» + » Arhitektura
flower[1,6]=flower[1,6]+1;//Регистрация подачи значения
//
string fileemoji=»\\Images\\15_m.bmp»;
//———————–
ObjectDelete(Obiekt3001);
ObjectCreate(Obiekt3001,OBJ_BITMAP_LABEL,0,BrTime,HIGHT+0.00015);
ObjectSetString(0,Obiekt3001,OBJPROP_BMPFILE,fileemoji);
ObjectSetInteger(0,Obiekt3001,OBJPROP_XDISTANCE,CHWPX+500);
ObjectSetInteger(0,Obiekt3001,OBJPROP_YDISTANCE,100);
C_Ar_2++;
//Print(Ar_2,» Ar_2 «,C_Ar_2);
if(C_Ar_2>0)
{
Pr_C_Ar_6=Ar_2;
}
if(C_Ar_2<0)
{
Pr_C_Ar_6=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,6]=flower_Price_3[opa,6]+1;//
flower_Price_3[opa,35]=1;//Последняя переменная
flower_Price_3[opa,36]=1;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,6] «,flower_Price_3[opa,6]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 11754 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 11772 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,6] «,flower_Price_3[opa,6]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 11790 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,6]!=flower_Price_3[opa,6])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,6]=flower_Price_3[opa,6];//
Print(» hehe – cantidad de cambios total 6 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==2)
{
for(int uaa=1; uaa<=200000; uaa++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uaa,» 11836 «);


}
if(flower_Price_3[uaa,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uaa,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uaa,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(sev==1 && N_Petalo==3 && N_Centro_r==2 && f_Bo_1==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=4;//vostok
zaryad=0;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» – » Arhitektura
flower[1,10]=flower[1,10]-1;//Регистрация подачи значения
//
string fileemoji=»\\Images\\16_p.bmp»;
//———————–
ObjectDelete(Obiekt3001);
ObjectCreate(Obiekt3001,OBJ_BITMAP_LABEL,0,BrTime,HIGHT+0.00015);
ObjectSetString(0,Obiekt3001,OBJPROP_BMPFILE,fileemoji);
ObjectSetInteger(0,Obiekt3001,OBJPROP_XDISTANCE,CHWPX+500);
ObjectSetInteger(0,Obiekt3001,OBJPROP_YDISTANCE,100);
C_Ar_3–;
//Print(Ar_3,» Ar_3 «,C_Ar_3);
if(C_Ar_3>0)
{
Pr_C_Ar_10=Ar_3;
}
if(C_Ar_3<0)
{
Pr_C_Ar_10=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,10]=flower_Price_3[opa,10]-1;//
flower_Price_3[opa,35]=4;//Последняя переменная
flower_Price_3[opa,36]=1;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,10] «,flower_Price_3[opa,10]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 11899 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 11917 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,10] «,flower_Price_3[opa,10]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 11935 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,10]!=flower_Price_3[opa,10])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,10]=flower_Price_3[opa,10];//
Print(» hehe – cantidad de cambios total 10 «,hehe);
}
}
// flower_Price_3[1,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[1,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==2)
{
for(int uaa=1; uaa<=200000; uaa++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uaa,» 11981 «);


}
if(flower_Price_3[uaa,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uaa,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uaa,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(sev==1 && N_Petalo==4 && N_Centro_r==2 && f_Be_1==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=1;//vostok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» + » Arhitektura
flower[1,14]=flower[1,14]+1;//Регистрация подачи значения
//
string fileemoji=»\\Images\\16_m.bmp»;
//———————–
ObjectDelete(Obiekt3001);
ObjectCreate(Obiekt3001,OBJ_BITMAP_LABEL,0,BrTime,HIGHT+0.00015);
ObjectSetString(0,Obiekt3001,OBJPROP_BMPFILE,fileemoji);
ObjectSetInteger(0,Obiekt3001,OBJPROP_XDISTANCE,CHWPX+500);
ObjectSetInteger(0,Obiekt3001,OBJPROP_YDISTANCE,100);
C_Ar_4++;
//Print(Ar_4,» Ar_4 «,C_Ar_4);
if(C_Ar_4>0)
{
Pr_C_Ar_14=Ar_4;
}
if(C_Ar_4<0)
{
Pr_C_Ar_14=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,14]=flower_Price_3[opa,14]+1;//
flower_Price_3[opa,35]=3;//Последняя переменная
flower_Price_3[opa,36]=1;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,14] «,flower_Price_3[opa,14]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 12044 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 12062 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,14] «,flower_Price_3[opa,14]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 12080 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,14]!=flower_Price_3[opa,14])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,14]=flower_Price_3[opa,14];//
Print(» hehe – cantidad de cambios total 14 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==2)
{
for(int uaa=1; uaa<=200000; uaa++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uaa,» 12126 «);


}
if(flower_Price_3[uaa,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uaa,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uaa,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(sev==1 && N_Petalo==5 && N_Centro_r==2 && f_Bo_0==1)//&& N_Gr20== Необходимо писать в массив
{
// Arch 1
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=2;//vostok
zaryad=1;
zapret_podachi_input=2;
zapret_podachi_output=4;
//» – » Arhitektura
flower[1,18]=flower[1,18]-1;//Регистрация подачи значения
//
string fileemoji=»\\Images\\17_p.bmp»;
//———————–
ObjectDelete(Obiekt3001);
ObjectCreate(Obiekt3001,OBJ_BITMAP_LABEL,0,BrTime,HIGHT+0.00015);
ObjectSetString(0,Obiekt3001,OBJPROP_BMPFILE,fileemoji);
ObjectSetInteger(0,Obiekt3001,OBJPROP_XDISTANCE,CHWPX+500);
ObjectSetInteger(0,Obiekt3001,OBJPROP_YDISTANCE,100);
C_Ar_5–;
//Print(Ar_5,» Ar_5 «,C_Ar_5);
if(C_Ar_5>0)
{
Pr_C_Ar_18=Ar_5;
}
if(C_Ar_5<0)
{
Pr_C_Ar_18=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,18]=flower_Price_3[opa,18]-1;//
flower_Price_3[opa,35]=2;//Последняя переменная
flower_Price_3[opa,36]=1;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,18] «,flower_Price_3[opa,18]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 12190 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 12208 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,18] «,flower_Price_3[opa,18]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 12226 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,18]!=flower_Price_3[opa,18])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,18]=flower_Price_3[opa,18];//
Print(» hehe – cantidad de cambios total 18 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==2)
{
for(int uaa=1; uaa<=200000; uaa++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uaa,» 12272 «);


}
if(flower_Price_3[uaa,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uaa,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uaa,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(sev==1 && N_Petalo==6 && N_Centro_r==2 && f_Be_0==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=3;//vostok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» + » Arhitektura
flower[1,22]=flower[1,22]+1;//Регистрация подачи значения
//
string fileemoji=»\\Images\\17_m.bmp»;
//———————–
ObjectDelete(Obiekt3001);
ObjectCreate(Obiekt3001,OBJ_BITMAP_LABEL,0,BrTime,HIGHT+0.00015);
ObjectSetString(0,Obiekt3001,OBJPROP_BMPFILE,fileemoji);
ObjectSetInteger(0,Obiekt3001,OBJPROP_XDISTANCE,CHWPX+500);
ObjectSetInteger(0,Obiekt3001,OBJPROP_YDISTANCE,100);
C_Ar_6++;
//Print(Ar_6,» Ar_6 «,C_Ar_6);
if(C_Ar_6>0)
{
Pr_C_Ar_22=Ar_6;
}
if(C_Ar_6<0)
{
Pr_C_Ar_22=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,22]=flower_Price_3[opa,22]-1;//
flower_Price_3[opa,35]=1;//Последняя переменная
flower_Price_3[opa,36]=1;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,22] «,flower_Price_3[opa,22]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 12335 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 12353 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,22] «,flower_Price_3[opa,22]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 12371 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,22]!=flower_Price_3[opa,22])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,22]=flower_Price_3[opa,22];//
Print(» hehe – cantidad de cambios total 22″,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==2)
{
for(int uaa=1; uaa<=200000; uaa++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uaa,» 12417 «);


}
if(flower_Price_3[uaa,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uaa,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uaa,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(sev==1 && N_Petalo==7 && N_Centro_r==2 && f_Bo_1==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=4;//vostok
zaryad=0;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» – » Arhitektura
flower[1,26]=flower[1,26]-1;//Регистрация подачи значения
//
string fileemoji=»\\Images\\18_p.bmp»;
//———————–
ObjectDelete(Obiekt3001);
ObjectCreate(Obiekt3001,OBJ_BITMAP_LABEL,0,BrTime,HIGHT+0.00015);
ObjectSetString(0,Obiekt3001,OBJPROP_BMPFILE,fileemoji);
ObjectSetInteger(0,Obiekt3001,OBJPROP_XDISTANCE,CHWPX+500);
ObjectSetInteger(0,Obiekt3001,OBJPROP_YDISTANCE,100);
C_Ar_7–;
//Print(Ar_7,» Ar_7 «,C_Ar_7);
if(C_Ar_7>0)
{
Pr_C_Ar_26=Ar_7;
}
if(C_Ar_7<0)
{
Pr_C_Ar_26=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,26]=flower_Price_3[opa,26]-1;//
flower_Price_3[opa,35]=4;//Последняя переменная
flower_Price_3[opa,36]=1;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,26] «,flower_Price_3[opa,24]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 12480 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 12498 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,26] «,flower_Price_3[opa,26]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 12516 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,26]!=flower_Price_3[opa,26])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,26]=flower_Price_3[opa,26];//
Print(» hehe – cantidad de cambios total 26 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==2)
{
for(int uaa=1; uaa<=200000; uaa++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uaa,» 12562 «);


}
if(flower_Price_3[uaa,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uaa,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uaa,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(sev==1 && N_Petalo==8 && N_Centro_r==2 && f_Be_1==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=1;//vostok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» + » Arhitektura
flower[1,30]=flower[1,30]+1;//Регистрация подачи значения
//
string fileemoji=»\\Images\\18_m.bmp»;
//———————–
ObjectDelete(Obiekt3001);
ObjectCreate(Obiekt3001,OBJ_BITMAP_LABEL,0,BrTime,HIGHT+0.00015);
ObjectSetString(0,Obiekt3001,OBJPROP_BMPFILE,fileemoji);
ObjectSetInteger(0,Obiekt3001,OBJPROP_XDISTANCE,CHWPX+500);
ObjectSetInteger(0,Obiekt3001,OBJPROP_YDISTANCE,100);
C_Ar_8++;
//Print(Ar_8,» Ar_8 «,C_Ar_8);
if(C_Ar_8>0)
{
Pr_C_Ar_30=Ar_8;
}
if(C_Ar_8<0)
{
Pr_C_Ar_30=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,30]=flower_Price_3[opa,30]+1;//
flower_Price_3[opa,35]=3;//Последняя переменная
flower_Price_3[opa,36]=1;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,30] «,flower_Price_3[opa,30]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 12625 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 12643 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,30] «,flower_Price_3[opa,30]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 12657 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,30]!=flower_Price_3[opa,30])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,30]=flower_Price_3[opa,30];//
Print(» hehe – cantidad de cambios total 30 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==2)
{
for(int uaa=1; uaa<=200000; uaa++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uaa,» 12707 «);


}
if(flower_Price_3[uaa,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uaa,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uaa,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
//
if(sev==1 && N_Petalo==1 && N_Centro_r==3 && f_Be_0==1)//&& N_Gr20== Необходимо писать в массив
{
// Arch 1
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=2;//vostok
zaryad=1;
zapret_podachi_input=2;
zapret_podachi_output=4;
//» + » Arhitektura
flower[1,3]=flower[1,3]+1;//Регистрация подачи значения
//
string fileemoji=»\\Images\\19_m.bmp»;
//———————–
ObjectDelete(Obiekt3001);
ObjectCreate(Obiekt3001,OBJ_BITMAP_LABEL,0,BrTime,HIGHT+0.00015);
ObjectSetString(0,Obiekt3001,OBJPROP_BMPFILE,fileemoji);
ObjectSetInteger(0,Obiekt3001,OBJPROP_XDISTANCE,CHWPX+500);
ObjectSetInteger(0,Obiekt3001,OBJPROP_YDISTANCE,100);
C_Ar_1++;
//Print(Ar_1,» Ar_1 «,C_Ar_1);
if(C_Ar_1>0)
{
Pr_C_Ar_3=Ar_1;
}
if(C_Ar_1<0)
{
Pr_C_Ar_3=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,3]=flower_Price_3[opa,3]+1;//
flower_Price_3[opa,35]=1;//Последняя переменная
flower_Price_3[opa,36]=1;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,3] «,flower_Price_3[opa,3]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 12772 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 12790 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,3] «,flower_Price_3[opa,3]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 12808 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,3]!=flower_Price_3[opa,3])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,3]=flower_Price_3[opa,3];//
Print(» hehe – cantidad de cambios total 3 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(sev==1 && N_Petalo==2 && N_Centro_r==3 && f_Bo_0==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=3;//vostok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» – » Arhitektura
flower[1,7]=flower[1,7]-1;//Регистрация подачи значения
//
string fileemoji=»\\Images\\19_p.bmp»;
//———————–
ObjectDelete(Obiekt3001);
ObjectCreate(Obiekt3001,OBJ_BITMAP_LABEL,0,BrTime,HIGHT+0.00015);
ObjectSetString(0,Obiekt3001,OBJPROP_BMPFILE,fileemoji);
ObjectSetInteger(0,Obiekt3001,OBJPROP_XDISTANCE,CHWPX+500);
ObjectSetInteger(0,Obiekt3001,OBJPROP_YDISTANCE,100);
C_Ar_2–;
//Print(Ar_2,» Ar_2 «,C_Ar_2);
if(C_Ar_2>0)
{
Pr_C_Ar_7=Ar_2;
}
if(C_Ar_2<0)
{
Pr_C_Ar_7=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,7]=flower_Price_3[opa,7]-1;//
flower_Price_3[opa,35]=2;//Последняя переменная
flower_Price_3[opa,36]=1;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,7] «,flower_Price_3[opa,7]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 12892 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 12910 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,7] «,flower_Price_3[opa,7]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 12928 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,7]!=flower_Price_3[opa,7])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,7]=flower_Price_3[opa,7];//
Print(» hehe – cantidad de cambios total 7 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(sev==1 && N_Petalo==3 && N_Centro_r==3 && f_Be_1==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=4;//vostok
zaryad=0;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» + » Arhitektura
flower[1,11]=flower[1,11]+1;//Регистрация подачи значения
//
string fileemoji=»\\Images\\20_m.bmp»;
//———————–
ObjectDelete(Obiekt3001);
ObjectCreate(Obiekt3001,OBJ_BITMAP_LABEL,0,BrTime,HIGHT+0.00015);
ObjectSetString(0,Obiekt3001,OBJPROP_BMPFILE,fileemoji);
ObjectSetInteger(0,Obiekt3001,OBJPROP_XDISTANCE,CHWPX+500);
ObjectSetInteger(0,Obiekt3001,OBJPROP_YDISTANCE,100);
C_Ar_3++;
//Print(Ar_3,» Ar_3 «,C_Ar_3);
if(C_Ar_3>0)
{
Pr_C_Ar_11=Ar_3;
}
if(C_Ar_3<0)
{
Pr_C_Ar_11=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,11]=flower_Price_3[opa,11]+1;//
flower_Price_3[opa,35]=3;//Последняя переменная
flower_Price_3[opa,36]=1;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,11] «,flower_Price_3[opa,11]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 13012 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 13030 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,11] «,flower_Price_3[opa,11]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 13047 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,11]!=flower_Price_3[opa,11])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,11]=flower_Price_3[opa,11];//
Print(» hehe – cantidad de cambios total 11 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(sev==1 && N_Petalo==4 && N_Centro_r==3 && f_Bo_1==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=1;//vostok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» – » Arhitektura
flower[1,15]=flower[1,15]-1;//Регистрация подачи значения
//
string fileemoji=»\\Images\\20_p.bmp»;
//———————–
ObjectDelete(Obiekt3001);
ObjectCreate(Obiekt3001,OBJ_BITMAP_LABEL,0,BrTime,HIGHT+0.00015);
ObjectSetString(0,Obiekt3001,OBJPROP_BMPFILE,fileemoji);
ObjectSetInteger(0,Obiekt3001,OBJPROP_XDISTANCE,CHWPX+500);
ObjectSetInteger(0,Obiekt3001,OBJPROP_YDISTANCE,100);
C_Ar_4–;
//Print(Ar_4,» Ar_4 «,C_Ar_4);
if(C_Ar_4>0)
{
Pr_C_Ar_15=Ar_4;
}
if(C_Ar_4<0)
{
Pr_C_Ar_15=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,15]=flower_Price_3[opa,15]-1;//
flower_Price_3[opa,35]=4;//Последняя переменная
flower_Price_3[opa,36]=1;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,15] «,flower_Price_3[opa,15]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 13132 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 13150 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,15] «,flower_Price_3[opa,15]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 13168 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,15]!=flower_Price_3[opa,15])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,15]=flower_Price_3[opa,15];//
Print(» hehe – cantidad de cambios total 15 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(sev==1 && N_Petalo==5 && N_Centro_r==3 && f_Be_0==1)//&& N_Gr20== Необходимо писать в массив
{
// Arch 1
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=2;//vostok
zaryad=1;
zapret_podachi_input=2;
zapret_podachi_output=4;
//» + » Arhitektura
flower[1,19]=flower[1,19]+1;//Регистрация подачи значения
C_Ar_5++;
//Print(Ar_5,» Ar_5 «,C_Ar_5);
if(C_Ar_5>0)
{
Pr_C_Ar_19=Ar_5;
}
if(C_Ar_5<0)
{
Pr_C_Ar_19=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,19]=flower_Price_3[opa,19]+1;//
flower_Price_3[opa,35]=1;//Последняя переменная
flower_Price_3[opa,36]=1;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,19] «,flower_Price_3[opa,19]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 13245 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 13263 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,19] «,flower_Price_3[opa,19]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 13281 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,19]!=flower_Price_3[opa,19])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,19]=flower_Price_3[opa,19];//
Print(» hehe – cantidad de cambios total 19 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(sev==1 && N_Petalo==6 && N_Centro_r==3 && f_Bo_0==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=3;//vostok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» – » Arhitektura
flower[1,23]=flower[1,23]-1;//Регистрация подачи значения
C_Ar_6–;
//Print(Ar_6,» Ar_6 «,C_Ar_6);
if(C_Ar_6>0)
{
Pr_C_Ar_23=Ar_6;
}
if(C_Ar_6<0)
{
Pr_C_Ar_23=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,23]=flower_Price_3[opa,23]-1;//
flower_Price_3[opa,35]=2;//Последняя переменная
flower_Price_3[opa,36]=1;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,23] «,flower_Price_3[opa,23]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 13357 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 13375 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,23] «,flower_Price_3[opa,23]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 13393 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,23]!=flower_Price_3[opa,23])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,23]=flower_Price_3[opa,23];//
Print(» hehe – cantidad de cambios total 23 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(sev==1 && N_Petalo==7 && N_Centro_r==3 && f_Be_1==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=4;//vostok
zaryad=0;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» + » Arhitektura
flower[1,27]=flower[1,27]+1;//Регистрация подачи значения
C_Ar_7++;
//Print(Ar_7,» Ar_7 «,C_Ar_7);
if(C_Ar_7>0)
{
Pr_C_Ar_27=Ar_7;
}
if(C_Ar_7<0)
{
Pr_C_Ar_27=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,27]=flower_Price_3[opa,27]+1;//
flower_Price_3[opa,35]=3;//Последняя переменная
flower_Price_3[opa,36]=1;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,27] «,flower_Price_3[opa,27]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 13476 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 13492 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,27] «,flower_Price_3[opa,27]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 13511 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,27]!=flower_Price_3[opa,27])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,27]=flower_Price_3[opa,27];//
Print(» hehe – cantidad de cambios total 27 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(sev==1 && N_Petalo==8 && N_Centro_r==3 && f_Bo_1==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=1;//vostok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» – » Arhitektura
flower[1,31]=flower[1,31]-1;//Регистрация подачи значения
C_Ar_8–;
//Print(Ar_8,» Ar_8 «,C_Ar_8);
if(C_Ar_8>0)
{
Pr_C_Ar_31=Ar_8;
}
if(C_Ar_8<0)
{
Pr_C_Ar_31=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,31]=flower_Price_3[opa,31]-1;//
flower_Price_3[opa,35]=4;//Последняя переменная
flower_Price_3[opa,36]=1;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,31] «,flower_Price_3[opa,31]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 13587 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 13605 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,31] «,flower_Price_3[opa,31]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 13623 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,31]!=flower_Price_3[opa,31])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,31]=flower_Price_3[opa,31];//
Print(» hehe – cantidad de cambios total 31 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
//
if(sev==1 && N_Petalo==1 && N_Centro_r==4 && f_Bo_1==1)//&& N_Gr20== Необходимо писать в массив
{
// Arch 1
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=2;//vostok
zaryad=1;
zapret_podachi_input=2;
zapret_podachi_output=4;
//» – » Arhitektura
flower[1,4]=flower[1,4]-1;//Регистрация подачи значения
C_Ar_1–;
//Print(Ar_1,» Ar_1 «,C_Ar_1);
if(C_Ar_1>0)
{
Pr_C_Ar_4=Ar_1;
}
if(C_Ar_1<0)
{
Pr_C_Ar_4=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,4]=flower_Price_3[opa,4]-1;//
flower_Price_3[opa,35]=4;//Последняя переменная
flower_Price_3[opa,36]=1;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,4] «,flower_Price_3[opa,4]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 13700 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 13719 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,4] «,flower_Price_3[opa,4]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 13737 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,4]!=flower_Price_3[opa,4])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,4]=flower_Price_3[opa,4];//
Print(» hehe – cantidad de cambios total 4 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==4)
{
for(int uau=1; uau<=200000; uau++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uau,» 13783 «);


}
if(flower_Price_3[uau,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uau,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uau,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(sev==1 && N_Petalo==2 && N_Centro_r==4 && f_Be_1==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=3;//vostok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» + » Arhitektura
flower[1,8]=flower[1,8]+1;//Регистрация подачи значения
C_Ar_2++;
//Print(Ar_2,» Ar_2 «,C_Ar_2);
if(C_Ar_2>0)
{
Pr_C_Ar_8=Ar_2;
}
if(C_Ar_2<0)
{
Pr_C_Ar_8=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,8]=flower_Price_3[opa,8]+1;//
flower_Price_3[opa,35]=3;//Последняя переменная
flower_Price_3[opa,36]=1;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,8] «,flower_Price_3[opa,8]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 13837 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 13856 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,8] «,flower_Price_3[opa,8]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 13870 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,8]!=flower_Price_3[opa,8])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,8]=flower_Price_3[opa,8];//
Print(» hehe – cantidad de cambios total 8 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==4)
{
for(int uau=1; uau<=200000; uau++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uau,» 13920 «);


}
if(flower_Price_3[uau,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uau,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uau,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(sev==1 && N_Petalo==3 && N_Centro_r==4 && f_Bo_0==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=4;//vostok
zaryad=0;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» – » Arhitektura
flower[1,12]=flower[1,12]-1;//Регистрация подачи значения
C_Ar_3–;
//Print(Ar_3,» Ar_3 «,C_Ar_3);
if(C_Ar_30>0)
{
Pr_C_Ar_12=Ar_30;
}
if(C_Ar_30<0)
{
Pr_C_Ar_12=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,12]=flower_Price_3[opa,12]-1;//
flower_Price_3[opa,35]=2;//Последняя переменная
flower_Price_3[opa,36]=1;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,12] «,flower_Price_3[opa,12]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 13975 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 13993 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,12] «,flower_Price_3[opa,12]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 14011 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,12]!=flower_Price_3[opa,12])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,12]=flower_Price_3[opa,12];//
Print(» hehe – cantidad de cambios total 12 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==4)
{
for(int uau=1; uau<=200000; uau++)
{
if(flower_Price_3[uau,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
if(Array_Errors==true)
{
Print(» Index Array «,uau,» 14059 «);


}
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uau,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uau,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(sev==1 && N_Petalo==4 && N_Centro_r==4 && f_Be_0==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=1;//vostok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» + » Arhitektura
flower[1,16]=flower[1,16]+1;//Регистрация подачи значения
C_Ar_4++;
//Print(Ar_4,» Ar_4 «,C_Ar_4);
if(C_Ar_4>0)
{
Pr_C_Ar_16=Ar_4;
}
if(C_Ar_4<0)
{
Pr_C_Ar_16=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,16]=flower_Price_3[opa,16]+1;//
flower_Price_3[opa,35]=1;//Последняя переменная
flower_Price_3[opa,36]=1;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,16] «,flower_Price_3[opa,16]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 14112 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 14129 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,16] «,flower_Price_3[opa,16]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 14148 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,16]!=flower_Price_3[opa,16])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,16]=flower_Price_3[opa,16];//
Print(» hehe – cantidad de cambios total 16 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==4)
{
for(int uau=1; uau<=200000; uau++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uau,» 14194 «);


}
if(flower_Price_3[uau,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uau,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uau,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(sev==1 && N_Petalo==5 && N_Centro_r==4 && f_Bo_1==1)//&& N_Gr20== Необходимо писать в массив
{
// Arch 1
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=2;//vostok
zaryad=1;
zapret_podachi_input=2;
zapret_podachi_output=4;
//» – » Arhitektura
flower[1,20]=flower[1,20]-1;//Регистрация подачи значения
C_Ar_5–;
//Print(Ar_5,» Ar_5 «,C_Ar_5);
if(C_Ar_5>0)
{
Pr_C_Ar_20=Ar_5;
}
if(C_Ar_5<0)
{
Pr_C_Ar_20=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,20]=flower_Price_3[opa,20]-1;//
flower_Price_3[opa,35]=4;//Последняя переменная
flower_Price_3[opa,36]=1;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,20] «,flower_Price_3[opa,20]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 14250 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 14268 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,20] «,flower_Price_3[opa,20]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 14286 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,20]!=flower_Price_3[opa,20])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,20]=flower_Price_3[opa,20];//
Print(» hehe – cantidad de cambios total 20 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==4)
{
for(int uau=1; uau<=200000; uau++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uau,» 14332 «);


}
if(flower_Price_3[uau,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uau,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uau,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(sev==1 && N_Petalo==6 && N_Centro_r==4 && f_Be_1==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=3;//vostok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» + » Arhitektura
flower[1,24]=flower[1,24]+1;//Регистрация подачи значения
C_Ar_6++;
//Print(Ar_6,» Ar_6 «,C_Ar_6);
if(C_Ar_6>0)
{
Pr_C_Ar_24=Ar_6;
}
if(C_Ar_6<0)
{
Pr_C_Ar_24=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,24]=flower_Price_3[opa,24]+1;//
flower_Price_3[opa,35]=3;//Последняя переменная
flower_Price_3[opa,36]=1;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,24] «,flower_Price_3[opa,24]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 14387 «);

}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 14405 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,24] «,flower_Price_3[opa,24]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 14423 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,24]!=flower_Price_3[opa,24])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,24]=flower_Price_3[opa,24];//
Print(» hehe – cantidad de cambios total 24 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==4)
{
for(int uau=1; uau<=200000; uau++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uau,» 14469 «);


}
if(flower_Price_3[uau,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uau,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uau,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(sev==1 && N_Petalo==7 && N_Centro_r==4 && f_Bo_0==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=4;//vostok
zaryad=0;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» – » Arhitektura
flower[1,28]=flower[1,28]-1;//Регистрация подачи значения
C_Ar_7–;
//Print(Ar_7,» Ar_7 «,C_Ar_7);
if(C_Ar_7>0)
{
Pr_C_Ar_28=Ar_7;
}
if(C_Ar_7<0)
{
Pr_C_Ar_28=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,28]=flower_Price_3[opa,28]-1;//
flower_Price_3[opa,35]=2;//Последняя переменная
flower_Price_3[opa,36]=1;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,28] «,flower_Price_3[opa,28]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 14524 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 14542 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,28] «,flower_Price_3[opa,28]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 14560 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,28]!=flower_Price_3[opa,28])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,28]=flower_Price_3[opa,28];//
Print(» hehe – cantidad de cambios total 28 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==4)
{
for(int uau=1; uau<=200000; uau++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uau,» 14606 «);


}
if(flower_Price_3[uau,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uau,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uau,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(sev==1 && N_Petalo==8 && N_Centro_r==4 && f_Be_0==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=1;//vostok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» + » Arhitektura
flower[1,32]=flower[1,32]+1;//Регистрация подачи значения
C_Ar_8++;
//Print(Ar_8,» Ar_8 «,C_Ar_8);
if(C_Ar_8>0)
{
Pr_C_Ar_32=Ar_8;
}
if(C_Ar_8<0)
{
Pr_C_Ar_32=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,32]=flower_Price_3[opa,32]+1;//
flower_Price_3[opa,35]=1;//Последняя переменная
flower_Price_3[opa,36]=1;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,32] «,flower_Price_3[opa,32]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 14661 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 14679 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,32] «,flower_Price_3[opa,32]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 14697 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,32]!=flower_Price_3[opa,32])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,32]=flower_Price_3[opa,32];//
Print(» hehe – cantidad de cambios total 32 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==4)
{
for(int uau=1; uau<=200000; uau++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uau,» 14743 «);


}
if(flower_Price_3[uau,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uau,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uau,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
//
if(vost==1 && N_Petalo==1 && N_Centro_r==1 && f_Bo_0==1)//&& N_Gr20== Необходимо писать в массив
{
// Arch 1
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=2;//vostok
zaryad=1;
zapret_podachi_input=2;
zapret_podachi_output=4;
//» + » Arhitektura
flower[1,1]=flower[1,1]+1;//Регистрация подачи значения
C_Ar_14++;
//Print(Ar_14,» Ar_14 «,C_Ar_14);
if(C_Ar_14>0)
{
Pr_C_Ar_1=Ar_14;
}
if(C_Ar_14<0)
{
Pr_C_Ar_1=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,1]=flower_Price_3[opa,1]+1;//
flower_Price_3[opa,35]=2;//Последняя переменная
flower_Price_3[opa,36]=2;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,1] «,flower_Price_3[opa,1]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 14800 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 14818 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,1] «,flower_Price_3[opa,1]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 14836 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,1]!=flower_Price_3[opa,1])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,1]=flower_Price_3[opa,1];//
Print(» hehe – cantidad de cambios total 1 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==1)
{
for(int uae=1; uae<=200000; uae++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uae,» 14882 «);


}
if(flower_Price_3[uae,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uae,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uae,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(vost==1 && N_Petalo==2 && N_Centro_r==1 && f_Be_1==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=3;//vostok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» – » Arhitektura
flower[1,5]=flower[1,5]-1;//Регистрация подачи значения
C_Ar_9–;
//Print(Ar_9,» Ar_9 «,C_Ar_9);
if(C_Ar_9>0)
{
Pr_C_Ar_5=Ar_9;
}
if(C_Ar_9<0)
{
Pr_C_Ar_5=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,5]=flower_Price_3[opa,5]-1;//
flower_Price_3[opa,35]=3;//Последняя переменная
flower_Price_3[opa,36]=2;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,5] «,flower_Price_3[opa,5]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 14937 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 14955 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,5] «,flower_Price_3[opa,5]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 14973 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,5]!=flower_Price_3[opa,5])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,5]=flower_Price_3[opa,5];//
Print(» hehe – cantidad de cambios total 5 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==1)
{
for(int uae=1; uae<=200000; uae++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uae,» 15019 «);


}
if(flower_Price_3[uae,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uae,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uae,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(vost==1 && N_Petalo==3 && N_Centro_r==1 && f_Bo_1==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=4;//vostok
zaryad=0;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» + » Arhitektura
flower[1,9]=flower[1,9]+1;//Регистрация подачи значения
C_Ar_10++;
//Print(Ar_10,» Ar_10 «,C_Ar_10);
if(C_Ar_10>0)
{
Pr_C_Ar_9=Ar_10;
}
if(C_Ar_10<0)
{
Pr_C_Ar_9=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,9]=flower_Price_3[opa,9]-1;//
flower_Price_3[opa,35]=4;//Последняя переменная
flower_Price_3[opa,36]=2;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,9] «,flower_Price_3[opa,9]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 15074 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 15092 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,9] «,flower_Price_3[opa,9]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 15110 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,9]!=flower_Price_3[opa,9]-1)//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,9]=flower_Price_3[opa,9];//
Print(» hehe – cantidad de cambios total 9 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==1)
{
for(int uae=1; uae<=200000; uae++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uae,» 15156 «);


}
if(flower_Price_3[uae,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uae,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uae,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(vost==1 && N_Petalo==4 && N_Centro_r==1 && f_Be_0==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=1;//vostok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» – » Arhitektura
flower[1,13]=flower[1,13]-1;//Регистрация подачи значения
C_Ar_13–;
//Print(Ar_13,» Ar_13 «,C_Ar_13);
if(C_Ar_13>0)
{
Pr_C_Ar_13=Ar_13;
}
if(C_Ar_13<0)
{
Pr_C_Ar_13=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,13]=flower_Price_3[opa,13]-1;//
flower_Price_3[opa,35]=1;//Последняя переменная
flower_Price_3[opa,36]=2;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,13] «,flower_Price_3[opa,13]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 15211 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 15229 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,13] «,flower_Price_3[opa,13]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 15247 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,13]!=flower_Price_3[opa,13])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,13]=flower_Price_3[opa,13];//
Print(» hehe – cantidad de cambios total 13 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==1)
{
for(int uae=1; uae<=200000; uae++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uae,» 15293 «);


}
if(flower_Price_3[uae,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uae,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uae,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(vost==1 && N_Petalo==5 && N_Centro_r==1 && f_Bo_0==1)//&& N_Gr20== Необходимо писать в массив
{
// Arch 1
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=2;//vostok
zaryad=1;
zapret_podachi_input=2;
zapret_podachi_output=4;
//» + » Arhitektura
flower[1,17]=flower[1,17]+1;//Регистрация подачи значения
C_Ar_16++;
//Print(Ar_16,» Ar_16 «,C_Ar_16);
if(C_Ar_16>0)
{
Pr_C_Ar_17=Ar_16;
}
if(C_Ar_16<0)
{
Pr_C_Ar_17=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,17]=flower_Price_3[opa,17]+1;//
flower_Price_3[opa,35]=2;//Последняя переменная
flower_Price_3[opa,36]=2;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,17] «,flower_Price_3[opa,17]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 15349 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 15367 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,17] «,flower_Price_3[opa,17]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 15385 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,17]!=flower_Price_3[opa,17])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,17]=flower_Price_3[opa,17];//
Print(» hehe – cantidad de cambios total 17 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==1)
{
for(int uae=1; uae<=200000; uae++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uae,» 15431 «);


}
if(flower_Price_3[uae,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uae,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uae,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(vost==1 && N_Petalo==6 && N_Centro_r==1 && f_Be_1==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=3;//vostok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» – » Arhitektura
flower[1,21]=flower[1,21]-1;//Регистрация подачи значения
C_Ar_11–;
//Print(Ar_11,» Ar_11 «,C_Ar_11);
if(C_Ar_11>0)
{
Pr_C_Ar_21=Ar_11;
}
if(C_Ar_11<0)
{
Pr_C_Ar_21=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,21]=flower_Price_3[opa,21]-1;//
flower_Price_3[opa,35]=3;//Последняя переменная
flower_Price_3[opa,36]=2;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,21] «,flower_Price_3[opa,21]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 15486 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 15504 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,21] «,flower_Price_3[opa,21]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 15522 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,21]!=flower_Price_3[opa,21])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,21]=flower_Price_3[opa,21];//
Print(» hehe – cantidad de cambios total 21 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==1)
{
for(int uae=1; uae<=200000; uae++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uae,» 15568 «);


}
if(flower_Price_3[uae,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uae,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uae,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(vost==1 && N_Petalo==7 && N_Centro_r==1 && f_Bo_1==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=4;//vostok
zaryad=0;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» + » Arhitektura
flower[1,25]=flower[1,25]+1;//Регистрация подачи значения
C_Ar_12++;
//Print(Ar_12,» Ar_12 «,C_Ar_12);
if(C_Ar_12>0)
{
Pr_C_Ar_25=Ar_12;
}
if(C_Ar_12<0)
{
Pr_C_Ar_25=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,25]=flower_Price_3[opa,25]+1;//
flower_Price_3[opa,35]=4;//Последняя переменная
flower_Price_3[opa,36]=2;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,25] «,flower_Price_3[opa,25]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 15623 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 15641 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,25] «,flower_Price_3[opa,25]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 15659 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,25]!=flower_Price_3[opa,25])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,25]=flower_Price_3[opa,25];//
Print(» hehe – cantidad de cambios total 25 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==1)
{
for(int uae=1; uae<=200000; uae++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uae,» 15705 «);


}
if(flower_Price_3[uae,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uae,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uae,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(vost==1 && N_Petalo==8 && N_Centro_r==1 && f_Be_0==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=1;//vostok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» – » Arhitektura
flower[1,29]=flower[1,29]-1;//Регистрация подачи значения
C_Ar_15–;
//Print(Ar_15,» Ar_15 «,C_Ar_15);
if(C_Ar_15>0)
{
Pr_C_Ar_29=Ar_15;
}
if(C_Ar_15<0)
{
Pr_C_Ar_29=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,29]=flower_Price_3[opa,29]-1;//
flower_Price_3[opa,35]=1;//Последняя переменная
flower_Price_3[opa,36]=2;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,29] «,flower_Price_3[opa,29]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 15760 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 15778 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,29] «,flower_Price_3[opa,29]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 15796 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,29]!=flower_Price_3[opa,29])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,29]=flower_Price_3[opa,29];//
Print(» hehe – cantidad de cambios total 29 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==1)
{
for(int uae=1; uae<=200000; uae++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uae,» 15842 «);


}
if(flower_Price_3[uae,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uae,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uae,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
//
if(vost==1 && N_Petalo==1 && N_Centro_r==2 && f_Be_0==1)//&& N_Gr20== Необходимо писать в массив
{
// Arch 1
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=2;//vostok
zaryad=1;
zapret_podachi_input=2;
zapret_podachi_output=4;
//» – » Arhitektura
flower[1,2]=flower[1,2]-1;//Регистрация подачи значения
C_Ar_14–;
//Print(Ar_14,» Ar_14 «,C_Ar_14);
if(C_Ar_14>0)
{
Pr_C_Ar_2=Ar_14;
}
if(C_Ar_14<0)
{
Pr_C_Ar_2=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,2]=flower_Price_3[opa,2]-1;//
flower_Price_3[opa,35]=1;//Последняя переменная
flower_Price_3[opa,36]=2;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,2] «,flower_Price_3[opa,2]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 15899 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 15917 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,2] «,flower_Price_3[opa,2]);
for(int hehe=1; hehe<=999; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 15935 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,2]!=flower_Price_3[opa,2])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,2]=flower_Price_3[opa,2];//
Print(» hehe – cantidad de cambios total 2 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==2)
{
for(int uaa=1; uaa<=200000; uaa++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uaa,» 15981 «);


}
if(flower_Price_3[uaa,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uaa,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uaa,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(vost==1 && N_Petalo==2 && N_Centro_r==2 && f_Bo_1==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=3;//vostok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» + » Arhitektura
flower[1,6]=flower[1,6]+1;//Регистрация подачи значения
C_Ar_9++;
//Print(Ar_9,» Ar_9 «,C_Ar_9);
if(C_Ar_9>0)
{
Pr_C_Ar_6=Ar_9;
}
if(C_Ar_9<0)
{
Pr_C_Ar_6=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,6]=flower_Price_3[opa,6]+1;//
flower_Price_3[opa,35]=4;//Последняя переменная
flower_Price_3[opa,36]=2;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,6] «,flower_Price_3[opa,6]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 16036 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 16054 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,6] «,flower_Price_3[opa,6]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 16072 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,6]!=flower_Price_3[opa,6])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,6]=flower_Price_3[opa,6];//
Print(» hehe – cantidad de cambios total 6 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==2)
{
for(int uaa=1; uaa<=200000; uaa++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uaa,» 16118 «);


}
if(flower_Price_3[uaa,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uaa,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uaa,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(vost==1 && N_Petalo==3 && N_Centro_r==2 && f_Be_1==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=4;//vostok
zaryad=0;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» – » Arhitektura
flower[1,10]=flower[1,10]-1;//Регистрация подачи значения
C_Ar_10–;
//Print(Ar_10,» Ar_10 «,C_Ar_10);
if(C_Ar_10>0)
{
Pr_C_Ar_10=Ar_10;
}
if(C_Ar_10<0)
{
Pr_C_Ar_10=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,10]=flower_Price_3[opa,10]-1;//
flower_Price_3[opa,35]=3;//Последняя переменная
flower_Price_3[opa,36]=2;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,10] «,flower_Price_3[opa,10]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 16173 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 16191 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,10] «,flower_Price_3[opa,10]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 16209 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,10]!=flower_Price_3[opa,10])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,10]=flower_Price_3[opa,10];//
Print(» hehe – cantidad de cambios total 10 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==2)
{
for(int uaa=1; uaa<=200000; uaa++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uaa,» 16255 «);


}
if(flower_Price_3[uaa,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uaa,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uaa,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(vost==1 && N_Petalo==4 && N_Centro_r==2 && f_Bo_0==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=1;//vostok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» + » Arhitektura
flower[1,14]=flower[1,14]+1;//Регистрация подачи значения
C_Ar_13++;
//Print(Ar_13,» Ar_13 «,C_Ar_13);
if(C_Ar_13>0)
{
Pr_C_Ar_14=Ar_13;
}
if(C_Ar_13<0)
{
Pr_C_Ar_14=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,14]=flower_Price_3[opa,14]+1;//
flower_Price_3[opa,35]=2;//Последняя переменная
flower_Price_3[opa,36]=2;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,14] «,flower_Price_3[opa,14]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 16310 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 16328 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,14] «,flower_Price_3[opa,14]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 16346 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,14]!=flower_Price_3[opa,14])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,14]=flower_Price_3[opa,14];//
Print(» hehe – cantidad de cambios total 14 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==2)
{
for(int uaa=1; uaa<=200000; uaa++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uaa,» 16392 «);


}
if(flower_Price_3[uaa,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uaa,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uaa,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(vost==1 && N_Petalo==5 && N_Centro_r==2 && f_Be_0==1)//&& N_Gr20== Необходимо писать в массив
{
// Arch 1
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=2;//vostok
zaryad=1;
zapret_podachi_input=2;
zapret_podachi_output=4;
//» – » Arhitektura
flower[1,18]=flower[1,18]-1;//Регистрация подачи значения
C_Ar_16–;
//Print(Ar_16,» Ar_16 «,C_Ar_16);
if(C_Ar_16>0)
{
Pr_C_Ar_18=Ar_16;
}
if(C_Ar_16<0)
{
Pr_C_Ar_18=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,18]=flower_Price_3[opa,18]-1;//
flower_Price_3[opa,35]=1;//Последняя переменная
flower_Price_3[opa,36]=2;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,18] «,flower_Price_3[opa,18]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 16448 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 16466 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,18] «,flower_Price_3[opa,18]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 16484 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,18]!=flower_Price_3[opa,18])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,18]=flower_Price_3[opa,18];//
Print(» hehe – cantidad de cambios total 18 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==2)
{
for(int uaa=1; uaa<=200000; uaa++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uaa,» 16530 «);


}
if(flower_Price_3[uaa,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uaa,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uaa,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(vost==1 && N_Petalo==6 && N_Centro_r==2 && f_Bo_1==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=3;//vostok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» + » Arhitektura
flower[1,22]=flower[1,22]+1;//Регистрация подачи значения
C_Ar_11++;
//Print(Ar_11,» Ar_11 «,C_Ar_11);
if(C_Ar_11>0)
{
Pr_C_Ar_22=Ar_11;
}
if(C_Ar_11<0)
{
Pr_C_Ar_22=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,22]=flower_Price_3[opa,22]+1;//
flower_Price_3[opa,35]=4;//Последняя переменная
flower_Price_3[opa,36]=2;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,22] «,flower_Price_3[opa,22]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 16585 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 16603 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,22] «,flower_Price_3[opa,22]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 16621 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,22]!=flower_Price_3[opa,22])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,22]=flower_Price_3[opa,22];//
Print(» hehe – cantidad de cambios total 22 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==2)
{
for(int uaa=1; uaa<=200000; uaa++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uaa,» 16667 «);


}
if(flower_Price_3[uaa,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uaa,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uaa,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(vost==1 && N_Petalo==7 && N_Centro_r==2 && f_Be_1==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=4;//vostok
zaryad=0;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» – » Arhitektura
flower[1,26]=flower[1,26]-1;//Регистрация подачи значения
C_Ar_12–;
//Print(Ar_12,» Ar_12 «,C_Ar_12);
if(C_Ar_12>0)
{
Pr_C_Ar_26=Ar_12;
}
if(C_Ar_12<0)
{
Pr_C_Ar_26=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,26]=flower_Price_3[opa,26]-1;//
flower_Price_3[opa,35]=3;//Последняя переменная
flower_Price_3[opa,36]=2;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,26] «,flower_Price_3[opa,26]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 16722 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 16740 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,26] «,flower_Price_3[opa,26]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 16758 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,26]!=flower_Price_3[opa,26])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,26]=flower_Price_3[opa,26];//
Print(» hehe – cantidad de cambios total 26 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==2)
{
for(int uaa=1; uaa<=200000; uaa++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uaa,» 16804 «);


}
if(flower_Price_3[uaa,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uaa,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uaa,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(vost==1 && N_Petalo==8 && N_Centro_r==2 && f_Bo_0==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=1;//vostok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» + » Arhitektura
flower[1,30]=flower[1,30]+1;//Регистрация подачи значения
C_Ar_15++;
//Print(Ar_15,» Ar_15 «,C_Ar_15);
if(C_Ar_15>0)
{
Pr_C_Ar_30=Ar_15;
}
if(C_Ar_15<0)
{
Pr_C_Ar_30=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,30]=flower_Price_3[opa,30]+1;//
flower_Price_3[opa,35]=2;//Последняя переменная
flower_Price_3[opa,36]=2;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,30] «,flower_Price_3[opa,30]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 16859 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 16877 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,30] «,flower_Price_3[opa,30]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 16895 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,30]!=flower_Price_3[opa,30])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,30]=flower_Price_3[opa,30];//
Print(» hehe – cantidad de cambios total 30 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==2)
{
for(int uaa=1; uaa<=200000; uaa++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uaa,» 16941 «);


}
if(flower_Price_3[uaa,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uaa,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uaa,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
//
if(vost==1 && N_Petalo==1 && N_Centro_r==3 && f_Bo_1==1)//&& N_Gr20== Необходимо писать в массив
{
// Arch 1
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=2;//vostok
zaryad=1;
zapret_podachi_input=2;
zapret_podachi_output=4;
//» + » Arhitektura
flower[1,3]=flower[1,3]+1;//Регистрация подачи значения
C_Ar_14++;
//Print(Ar_14,» Ar_14 «,C_Ar_14);
if(C_Ar_14>0)
{
Pr_C_Ar_3=Ar_14;
}
if(C_Ar_14<0)
{
Pr_C_Ar_3=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,3]=flower_Price_3[opa,3]+1;//
flower_Price_3[opa,35]=4;//Последняя переменная
flower_Price_3[opa,36]=2;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,3] «,flower_Price_3[opa,3]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 16998 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 17016 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,3] «,flower_Price_3[opa,3]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 17034 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,3]!=flower_Price_3[opa,3])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,3]=flower_Price_3[opa,3];//
Print(» hehe – cantidad de cambios total 3 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(vost==1 && N_Petalo==2 && N_Centro_r==3 && f_Be_0==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=3;//vostok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» – » Arhitektura
flower[1,7]=flower[1,7]-1;//Регистрация подачи значения
C_Ar_9–;
//Print(Ar_9,» Ar_9 «,C_Ar_9);
if(C_Ar_9>0)
{
Pr_C_Ar_7=Ar_9;
}
if(C_Ar_9<0)
{
Pr_C_Ar_7=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,7]=flower_Price_3[opa,7]-1;//
flower_Price_3[opa,35]=1;//Последняя переменная
flower_Price_3[opa,36]=2;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,7] «,flower_Price_3[opa,7]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 17115 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 17133 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,7] «,flower_Price_3[opa,7]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 17151 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,7]!=flower_Price_3[opa,7])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,7]=flower_Price_3[opa,7];//
Print(» hehe – cantidad de cambios total 7 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(vost==1 && N_Petalo==3 && N_Centro_r==3 && f_Bo_0==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=4;//vostok
zaryad=0;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» + » Arhitektura
flower[1,11]=flower[1,11]+1;//Регистрация подачи значения
C_Ar_10++;
//Print(Ar_10,» Ar_10 «,C_Ar_10);
if(C_Ar_10>0)
{
Pr_C_Ar_11=Ar_10;
}
if(C_Ar_10<0)
{
Pr_C_Ar_11=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,11]=flower_Price_3[opa,11]+1;//
flower_Price_3[opa,35]=2;//Последняя переменная
flower_Price_3[opa,36]=2;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,11] «,flower_Price_3[opa,11]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 17232 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 17250 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,11] «,flower_Price_3[opa,11]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 17268 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,11]!=flower_Price_3[opa,11])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,11]=flower_Price_3[opa,11];//
Print(» hehe – cantidad de cambios total 11 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(vost==1 && N_Petalo==4 && N_Centro_r==3 && f_Be_1==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=1;//vostok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» – » Arhitektura
flower[1,15]=flower[1,15]-1;//Регистрация подачи значения
C_Ar_13–;
//Print(Ar_13,» Ar_13 «,C_Ar_13);
if(C_Ar_13>0)
{
Pr_C_Ar_15=Ar_13;
}
if(C_Ar_13<0)
{
Pr_C_Ar_15=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,15]=flower_Price_3[opa,15]-1;//
flower_Price_3[opa,35]=3;//Последняя переменная
flower_Price_3[opa,36]=2;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,15] «,flower_Price_3[opa,15]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 17344 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 17363 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,15] «,flower_Price_3[opa,15]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 17380 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,15]!=flower_Price_3[opa,15])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,15]=flower_Price_3[opa,15];//
Print(» hehe – cantidad de cambios total 15 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(vost==1 && N_Petalo==5 && N_Centro_r==3 && f_Bo_1==1)//&& N_Gr20== Необходимо писать в массив
{
// Arch 1
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=2;//vostok
zaryad=1;
zapret_podachi_input=2;
zapret_podachi_output=4;
//» + » Arhitektura
flower[1,19]=flower[1,19]+1;//Регистрация подачи значения
C_Ar_16++;
//Print(Ar_16,» Ar_16 «,C_Ar_16);
if(C_Ar_16>0)
{
Pr_C_Ar_19=Ar_16;
}
if(C_Ar_16<0)
{
Pr_C_Ar_19=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,19]=flower_Price_3[opa,19]+1;//
flower_Price_3[opa,35]=4;//Последняя переменная
flower_Price_3[opa,36]=2;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,19] «,flower_Price_3[opa,19]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 17457 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 17475 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,19] «,flower_Price_3[opa,19]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 17493 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,19]!=flower_Price_3[opa,19])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,19]=flower_Price_3[opa,19];//
Print(» hehe – cantidad de cambios total 19 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(vost==1 && N_Petalo==6 && N_Centro_r==3 && f_Be_0==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=3;//vostok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» – » Arhitektura
flower[1,23]=flower[1,23]-1;//Регистрация подачи значения
C_Ar_11–;
//Print(Ar_11,» Ar_11 «,C_Ar_11);
if(C_Ar_11>0)
{
Pr_C_Ar_23=Ar_11;
}
if(C_Ar_11<0)
{
Pr_C_Ar_23=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,23]=flower_Price_3[opa,23]-1;//
flower_Price_3[opa,35]=1;//Последняя переменная
flower_Price_3[opa,36]=2;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,23] «,flower_Price_3[opa,23]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 17569 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 17587 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,23] «,flower_Price_3[opa,23]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 17605 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,23]!=flower_Price_3[opa,23])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,23]=flower_Price_3[opa,23];//
Print(» hehe – cantidad de cambios total 23 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(vost==1 && N_Petalo==7 && N_Centro_r==3 && f_Bo_0==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=4;//vostok
zaryad=0;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» + » Arhitektura
flower[1,27]=flower[1,27]+1;//Регистрация подачи значения
C_Ar_12++;
//Print(Ar_12,» Ar_12 «,C_Ar_12);
if(C_Ar_12>0)
{
Pr_C_Ar_27=Ar_12;
}
if(C_Ar_12<0)
{
Pr_C_Ar_27=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,27]=flower_Price_3[opa,27]+1;//
flower_Price_3[opa,35]=2;//Последняя переменная
flower_Price_3[opa,36]=2;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,27] «,flower_Price_3[opa,27]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 17681 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 17699 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,27] «,flower_Price_3[opa,27]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 17717 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,27]!=flower_Price_3[opa,27])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,27]=flower_Price_3[opa,27];//
Print(» hehe – cantidad de cambios total 27 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(vost==1 && N_Petalo==8 && N_Centro_r==3 && f_Be_1==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=1;//vostok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» – » Arhitektura
flower[1,31]=flower[1,31]-1;//Регистрация подачи значения
C_Ar_15–;
//Print(Ar_15,» Ar_15 «,C_Ar_15);
if(C_Ar_15>0)
{
Pr_C_Ar_31=Ar_15;
}
if(C_Ar_15<0)
{
Pr_C_Ar_31=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,31]=flower_Price_3[opa,31]-1;//
flower_Price_3[opa,35]=3;//Последняя переменная
flower_Price_3[opa,36]=2;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,31] «,flower_Price_3[opa,31]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 17793 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 17811 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,31] «,flower_Price_3[opa,31]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 17829 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,31]!=flower_Price_3[opa,31])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,31]=flower_Price_3[opa,31];//
Print(» hehe – cantidad de cambios total 31 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
//
if(vost==1 && N_Petalo==1 && N_Centro_r==4 && f_Be_1==1)//&& N_Gr20== Необходимо писать в массив
{
// Arch 1
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=2;//vostok
zaryad=1;
zapret_podachi_input=2;
zapret_podachi_output=4;
//» – » Arhitektura
flower[1,4]=flower[1,4]-1;//Регистрация подачи значения
C_Ar_14–;
//Print(Ar_14,» Ar_14 «,C_Ar_14);
if(C_Ar_14>0)
{
Pr_C_Ar_4=Ar_14;
}
if(C_Ar_14<0)
{
Pr_C_Ar_4=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,4]=flower_Price_3[opa,4]-1;//
flower_Price_3[opa,35]=3;//Последняя переменная
flower_Price_3[opa,36]=2;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,4] «,flower_Price_3[opa,4]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 17912 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 17930 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,4] «,flower_Price_3[opa,4]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 17948 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,4]!=flower_Price_3[opa,4])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,4]=flower_Price_3[opa,4];//
Print(» hehe – cantidad de cambios total 4 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==4)
{
for(int uau=1; uau<=200000; uau++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uau,» 17994 «);


}
if(flower_Price_3[uau,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uau,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uau,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(vost==1 && N_Petalo==2 && N_Centro_r==4 && f_Bo_0==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=3;//vostok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» + » Arhitektura
flower[1,8]=flower[1,8]+1;//Регистрация подачи значения
C_Ar_9++;
//Print(Ar_9,» Ar_9 «,C_Ar_9);
if(C_Ar_9>0)
{
Pr_C_Ar_8=Ar_9;
}
if(C_Ar_9<0)
{
Pr_C_Ar_8=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,8]=flower_Price_3[opa,8]+1;//
flower_Price_3[opa,35]=2;//Последняя переменная
flower_Price_3[opa,36]=2;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,8] «,flower_Price_3[opa,8]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 18049 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 18067 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,8] «,flower_Price_3[opa,8]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 18085 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,8]!=flower_Price_3[opa,8])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,8]=flower_Price_3[opa,8];//
Print(» hehe – cantidad de cambios total 8 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==4)
{
for(int uau=1; uau<=200000; uau++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uau,» 18131 «);


}
if(flower_Price_3[uau,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uau,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uau,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(vost==1 && N_Petalo==3 && N_Centro_r==4 && f_Be_0==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=4;//vostok
zaryad=0;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» – » Arhitektura
flower[1,12]=flower[1,12]-1;//Регистрация подачи значения
C_Ar_10–;
//Print(Ar_10,» Ar_10 «,C_Ar_10);
if(C_Ar_10>0)
{
Pr_C_Ar_12=Ar_10;
}
if(C_Ar_10<0)
{
Pr_C_Ar_12=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,12]=flower_Price_3[opa,12]-1;//
flower_Price_3[opa,35]=1;//Последняя переменная
flower_Price_3[opa,36]=2;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,12] «,flower_Price_3[opa,12]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 18186 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 18204 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,12] «,flower_Price_3[opa,12]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 18222 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,12]!=flower_Price_3[opa,12])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,12]=flower_Price_3[opa,12];//
Print(» hehe – cantidad de cambios total 12 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==4)
{
for(int uau=1; uau<=200000; uau++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uau,» 18268 «);


}
if(flower_Price_3[uau,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uau,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uau,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(vost==1 && N_Petalo==4 && N_Centro_r==4 && f_Bo_1==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=1;//vostok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» + » Arhitektura
flower[1,16]=flower[1,16]+1;//Регистрация подачи значения
C_Ar_13++;
//Print(Ar_13,» Ar_13 «,C_Ar_13);
if(C_Ar_13>0)
{
Pr_C_Ar_16=Ar_13;
}
if(C_Ar_13<0)
{
Pr_C_Ar_16=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,16]=flower_Price_3[opa,16]+1;//
flower_Price_3[opa,35]=4;//Последняя переменная
flower_Price_3[opa,36]=2;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,16] «,flower_Price_3[opa,16]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 18323 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 18341 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,16] «,flower_Price_3[opa,16]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 18359 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,16]!=flower_Price_3[opa,16])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,16]=flower_Price_3[opa,16];//
Print(» hehe – cantidad de cambios total 16 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==4)
{
for(int uau=1; uau<=200000; uau++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uau,» 18405 «);


}
if(flower_Price_3[uau,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uau,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uau,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(vost==1 && N_Petalo==5 && N_Centro_r==4 && f_Be_1==1)//&& N_Gr20== Необходимо писать в массив
{
// Arch 1
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=2;//vostok
zaryad=1;
zapret_podachi_input=2;
zapret_podachi_output=4;
//» – » Arhitektura
flower[1,20]=flower[1,20]-1;//Регистрация подачи значения
C_Ar_16–;
//Print(Ar_16,» Ar_16 «,C_Ar_16);
if(C_Ar_16>0)
{
Pr_C_Ar_20=Ar_16;
}
if(C_Ar_16<0)
{
Pr_C_Ar_20=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,20]=flower_Price_3[opa,20]-1;//
flower_Price_3[opa,35]=3;//Последняя переменная
flower_Price_3[opa,36]=2;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,20] «,flower_Price_3[opa,20]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 18461 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 18479 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,20] «,flower_Price_3[opa,20]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 18049 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,20]!=flower_Price_3[opa,20])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,20]=flower_Price_3[opa,20];//
Print(» hehe – cantidad de cambios total 20 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==4)
{
for(int uau=1; uau<=200000; uau++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uau,» 18543 «);


}
if(flower_Price_3[uau,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uau,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uau,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(vost==1 && N_Petalo==6 && N_Centro_r==4 && f_Bo_0==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=3;//vostok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» + » Arhitektura
flower[1,24]=flower[1,24]+1;//Регистрация подачи значения
C_Ar_11++;
//Print(Ar_11,» Ar_11 «,C_Ar_11);
if(C_Ar_11>0)
{
Pr_C_Ar_24=Ar_11;
}
if(C_Ar_11<0)
{
Pr_C_Ar_24=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,24]=flower_Price_3[opa,24]+1;//
flower_Price_3[opa,35]=2;//Последняя переменная
flower_Price_3[opa,36]=2;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,24] «,flower_Price_3[opa,24]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 18598 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 18616 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,24] «,flower_Price_3[opa,24]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 18634 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,24]!=flower_Price_3[opa,24])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,24]=flower_Price_3[opa,24];//
Print(» hehe – cantidad de cambios total 24 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==4)
{
for(int uau=1; uau<=200000; uau++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uau,» 18680 «);


}
if(flower_Price_3[uau,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uau,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uau,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(vost==1 && N_Petalo==7 && N_Centro_r==4 && f_Be_0==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=4;//vostok
zaryad=0;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» – » Arhitektura
flower[1,28]=flower[1,28]-1;//Регистрация подачи значения
C_Ar_12–;
//Print(Ar_12,» Ar_12 «,C_Ar_12);
if(C_Ar_12>0)
{
Pr_C_Ar_28=Ar_12;
}
if(C_Ar_12<0)
{
Pr_C_Ar_28=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,28]=flower_Price_3[opa,28]-1;//
flower_Price_3[opa,35]=1;//Последняя переменная
flower_Price_3[opa,36]=2;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,28] «,flower_Price_3[opa,28]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 18735 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 18753 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,28] «,flower_Price_3[opa,28]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 18771 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,28]!=flower_Price_3[opa,28])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,28]=flower_Price_3[opa,28];//
Print(» hehe – cantidad de cambios total 28 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==4)
{
for(int uau=1; uau<=200000; uau++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uau,» 18816 «);


}
if(flower_Price_3[uau,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uau,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uau,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(vost==1 && N_Petalo==8 && N_Centro_r==4 && f_Bo_1==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=1;//vostok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» + » Arhitektura
flower[1,32]=flower[1,32]+1;//Регистрация подачи значения
C_Ar_15++;
//Print(Ar_15,» Ar_15 «,C_Ar_15);
if(C_Ar_15>0)
{
Pr_C_Ar_32=Ar_15;
}
if(C_Ar_15<0)
{
Pr_C_Ar_32=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,32]=flower_Price_3[opa,32]+1;//
flower_Price_3[opa,35]=4;//Последняя переменная
flower_Price_3[opa,36]=2;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,32] «,flower_Price_3[opa,32]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 18872 «);

}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 18890 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,32] «,flower_Price_3[opa,32]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 18908 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,32]!=flower_Price_3[opa,32])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,32]=flower_Price_3[opa,32];//
Print(» hehe – cantidad de cambios total 32 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
//Произвести запось в тетрадь начала сигнала,и время отщёта и номер индекса для выведения данных на график
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==4)
{
for(int uau=1; uau<=200000; uau++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uau,» 18955 «);


}
if(flower_Price_3[uau,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uau,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uau,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
//
if(yug==1 && N_Petalo==1 && N_Centro_r==1 && f_Be_0==1)//&& N_Gr20== Необходимо писать в массив
{
// Arch 1
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=2;//yugok
zaryad=1;
zapret_podachi_input=2;
zapret_podachi_output=4;
//» + » Arhitektura
flower[1,1]=flower[1,1]+1;//Регистрация подачи значения
C_Ar_21++;
//Print(Ar_21,» Ar_21 «,C_Ar_21);
if(C_Ar_21>0)
{
Pr_C_Ar_1=Ar_21;
}
if(C_Ar_21<0)
{
Pr_C_Ar_1=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,1]=flower_Price_3[opa,1]+1;//
flower_Price_3[opa,35]=1;//Последняя переменная
flower_Price_3[opa,36]=3;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,1] «,flower_Price_3[opa,1]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 19012 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 19030 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,1] «,flower_Price_3[opa,1]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 19048 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,1]!=flower_Price_3[opa,1])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,1]=flower_Price_3[opa,1];//
Print(» hehe – cantidad de cambios total 1 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==1)
{
for(int uae=1; uae<=200000; uae++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uae,» 19094 «);


}
if(flower_Price_3[uae,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uae,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uae,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(yug==1 && N_Petalo==2 && N_Centro_r==1 && f_Bo_0==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=3;//yugok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» – » Arhitektura
flower[1,5]=flower[1,5]-1;//Регистрация подачи значения
C_Ar_22–;
//Print(Ar_22,» Ar_22 «,C_Ar_22);
if(C_Ar_22>0)
{
Pr_C_Ar_5=Ar_22;
}
if(C_Ar_22<0)
{
Pr_C_Ar_5=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,5]=flower_Price_3[opa,5]-1;//
flower_Price_3[opa,35]=2;//Последняя переменная
flower_Price_3[opa,36]=3;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,5] «,flower_Price_3[opa,5]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 19149 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 19168 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,5] «,flower_Price_3[opa,5]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 19185 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,5]!=flower_Price_3[opa,5])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,5]=flower_Price_3[opa,5];//
Print(» hehe – cantidad de cambios total 5 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==1)
{
for(int uae=1; uae<=200000; uae++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uae,» 19231 «);


}
if(flower_Price_3[uae,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uae,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uae,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(yug==1 && N_Petalo==3 && N_Centro_r==1 && f_Be_1==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=4;//yugok
zaryad=0;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» + » Arhitektura
flower[1,9]=flower[1,9]+1;//Регистрация подачи значения
C_Ar_17++;
//Print(Ar_17,» Ar_17 «,C_Ar_17);
if(C_Ar_17>0)
{
Pr_C_Ar_9=Ar_17;
}
if(C_Ar_17<0)
{
Pr_C_Ar_9=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,9]=flower_Price_3[opa,9]+1;//
flower_Price_3[opa,35]=3;//Последняя переменная
flower_Price_3[opa,36]=3;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,9] «,flower_Price_3[opa,9]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 19286 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 19304 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,9] «,flower_Price_3[opa,9]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 19322 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,9]!=flower_Price_3[opa,9])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,9]=flower_Price_3[opa,9];//
Print(» hehe – cantidad de cambios total 9 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==1)
{
for(int uae=1; uae<=200000; uae++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uae,» 19368 «);


}
if(flower_Price_3[uae,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uae,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uae,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(yug==1 && N_Petalo==4 && N_Centro_r==1 && f_Bo_1==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=1;//yugok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» – » Arhitektura
flower[1,13]=flower[1,13]-1;//Регистрация подачи значения
C_Ar_18–;
//Print(Ar_18,» Ar_18 «,C_Ar_18);
if(C_Ar_18>0)
{
Pr_C_Ar_13=Ar_18;
}
if(C_Ar_18<0)
{
Pr_C_Ar_13=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,13]=flower_Price_3[opa,13]-1;//
flower_Price_3[opa,35]=4;//Последняя переменная
flower_Price_3[opa,36]=3;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,13] «,flower_Price_3[opa,13]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 19423 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 19441 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,13] «,flower_Price_3[opa,13]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 19459 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,13]!=flower_Price_3[opa,13])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,13]=flower_Price_3[opa,13];//
Print(» hehe – cantidad de cambios total 13 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==1)
{
for(int uae=1; uae<=200000; uae++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uae,» 19505 «);


}
if(flower_Price_3[uae,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uae,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uae,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(yug==1 && N_Petalo==5 && N_Centro_r==1 && f_Be_0==1)//&& N_Gr20== Необходимо писать в массив
{
// Arch 1
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=2;//yugok
zaryad=1;
zapret_podachi_input=2;
zapret_podachi_output=4;
//» + » Arhitektura
flower[1,17]=flower[1,17]+1;//Регистрация подачи значения
C_Ar_23++;
//Print(Ar_23,» Ar_23 «,C_Ar_23);
if(C_Ar_23>0)
{
Pr_C_Ar_17=Ar_23;
}
if(C_Ar_23<0)
{
Pr_C_Ar_17=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,17]=flower_Price_3[opa,17]+1;//
flower_Price_3[opa,35]=1;//Последняя переменная
flower_Price_3[opa,36]=3;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,17] «,flower_Price_3[opa,17]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 19561 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 19579 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,17] «,flower_Price_3[opa,17]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 19597 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,17]!=flower_Price_3[opa,17])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,17]=flower_Price_3[opa,17];//
Print(» hehe – cantidad de cambios total 17 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==1)
{
for(int uae=1; uae<=200000; uae++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uae,» 19643 «);


}
if(flower_Price_3[uae,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uae,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uae,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(yug==1 && N_Petalo==6 && N_Centro_r==1 && f_Bo_0==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=3;//yugok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» – » Arhitektura
flower[1,21]=flower[1,21]-1;//Регистрация подачи значения
C_Ar_24–;
//Print(Ar_24,» Ar_24 «,C_Ar_24);
if(C_Ar_24>0)
{
Pr_C_Ar_21=Ar_24;
}
if(C_Ar_24<0)
{
Pr_C_Ar_21=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,21]=flower_Price_3[opa,21]-1;//
flower_Price_3[opa,35]=2;//Последняя переменная
flower_Price_3[opa,36]=3;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,21] «,flower_Price_3[opa,21]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 19698 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 19716 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,21] «,flower_Price_3[opa,21]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 19734 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,21]!=flower_Price_3[opa,21])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,21]=flower_Price_3[opa,21];//
Print(» hehe – cantidad de cambios total 21 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==1)
{
for(int uae=1; uae<=200000; uae++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uae,» 19780 «);


}
if(flower_Price_3[uae,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uae,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uae,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(yug==1 && N_Petalo==7 && N_Centro_r==1 && f_Be_1==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=4;//yugok
zaryad=0;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» + » Arhitektura
flower[1,25]=flower[1,25]+1;//Регистрация подачи значения
C_Ar_19++;
//Print(Ar_19,» Ar_19 «,C_Ar_19);
if(C_Ar_19>0)
{
Pr_C_Ar_25=Ar_19;
}
if(C_Ar_19<0)
{
Pr_C_Ar_25=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,25]=flower_Price_3[opa,25]+1;//
flower_Price_3[opa,35]=3;//Последняя переменная
flower_Price_3[opa,36]=3;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,25] «,flower_Price_3[opa,25]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 19835 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 19853 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,25] «,flower_Price_3[opa,25]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 19871 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,25]!=flower_Price_3[opa,25])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,25]=flower_Price_3[opa,25];//
Print(» hehe – cantidad de cambios total 25 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==1)
{
for(int uae=1; uae<=200000; uae++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uae,» 19917 «);


}
if(flower_Price_3[uae,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uae,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uae,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(yug==1 && N_Petalo==8 && N_Centro_r==1 && f_Bo_1==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=1;//yugok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» – » Arhitektura
flower[1,29]=flower[1,29]-1;//Регистрация подачи значения
C_Ar_20–;
//Print(Ar_20,» Ar_20 «,C_Ar_20);
if(C_Ar_20>0)
{
Pr_C_Ar_29=Ar_20;
}
if(C_Ar_20<0)
{
Pr_C_Ar_29=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,29]=flower_Price_3[opa,29]-1;//
flower_Price_3[opa,35]=4;//Последняя переменная
flower_Price_3[opa,36]=3;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,29] «,flower_Price_3[opa,29]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 19972 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 19990 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,29] «,flower_Price_3[opa,29]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 20009 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,29]!=flower_Price_3[opa,29])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,29]=flower_Price_3[opa,29];//
Print(» hehe – cantidad de cambios total 29 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==1)
{
for(int uae=1; uae<=200000; uae++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uae,» 20054 «);


}
if(flower_Price_3[uae,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uae,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uae,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
//
if(yug==1 && N_Petalo==1 && N_Centro_r==2 && f_Bo_1==1)//&& N_Gr20== Необходимо писать в массив
{
// Arch 1
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=2;//yugok
zaryad=1;
zapret_podachi_input=2;
zapret_podachi_output=4;
//» – » Arhitektura
flower[1,2]=flower[1,2]-1;//Регистрация подачи значения
C_Ar_21–;
//Print(Ar_21,» Ar_21 «,C_Ar_21);
if(C_Ar_21>0)
{
Pr_C_Ar_2=Ar_21;
}
if(C_Ar_21<0)
{
Pr_C_Ar_2=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,2]=flower_Price_3[opa,12]-1;//
flower_Price_3[opa,35]=4;//Последняя переменная
flower_Price_3[opa,36]=3;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,12] «,flower_Price_3[opa,12]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 20111 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 20129 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,12] «,flower_Price_3[opa,12]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 20147 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,12]!=flower_Price_3[opa,12])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,12]=flower_Price_3[opa,12];//
Print(» hehe – cantidad de cambios total 12 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==2)
{
for(int uaa=1; uaa<=200000; uaa++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uaa,» 20193 «);


}
if(flower_Price_3[uaa,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uaa,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uaa,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(yug==1 && N_Petalo==2 && N_Centro_r==2 && f_Be_1==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=3;//yugok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» + » Arhitektura
flower[1,6]=flower[1,6]+1;//Регистрация подачи значения
C_Ar_22++;
//Print(Ar_22,» Ar_22 «,C_Ar_22);
if(C_Ar_22>0)
{
Pr_C_Ar_6=Ar_22;
}
if(C_Ar_22<0)
{
Pr_C_Ar_6=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,6]=flower_Price_3[opa,6]+1;//
flower_Price_3[opa,35]=3;//Последняя переменная
flower_Price_3[opa,36]=3;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,6] «,flower_Price_3[opa,6]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 20248 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 20266 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,6] «,flower_Price_3[opa,6]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 20284 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,6]!=flower_Price_3[opa,6])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,6]=flower_Price_3[opa,6];//
Print(» hehe – cantidad de cambios total 6 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==2)
{
for(int uaa=1; uaa<=200000; uaa++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uaa,» 20330 «);


}
if(flower_Price_3[uaa,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uaa,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uaa,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(yug==1 && N_Petalo==3 && N_Centro_r==2 && f_Bo_0==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=4;//yugok
zaryad=0;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» – » Arhitektura
flower[1,10]=flower[1,10]-1;//Регистрация подачи значения
C_Ar_17–;
//Print(Ar_17,» Ar_17 «,C_Ar_17);
if(C_Ar_17>0)
{
Pr_C_Ar_10=Ar_17;
}
if(C_Ar_17<0)
{
Pr_C_Ar_10=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,10]=flower_Price_3[opa,10]-1;//
flower_Price_3[opa,35]=2;//Последняя переменная
flower_Price_3[opa,36]=3;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,10] «,flower_Price_3[opa,10]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 20385 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 20403 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,10] «,flower_Price_3[opa,10]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 20421 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,10]!=flower_Price_3[opa,10])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,10]=flower_Price_3[opa,10];//
Print(» hehe – cantidad de cambios total 10 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==2)
{
for(int uaa=1; uaa<=200000; uaa++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uaa,» 20467 «);


}
if(flower_Price_3[uaa,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uaa,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uaa,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(yug==1 && N_Petalo==4 && N_Centro_r==2 && f_Be_0==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=1;//yugok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» + » Arhitektura
flower[1,14]=flower[1,14]+1;//Регистрация подачи значения
C_Ar_18++;
//Print(Ar_18,» Ar_18 «,C_Ar_18);
if(C_Ar_18>0)
{
Pr_C_Ar_14=Ar_18;
}
if(C_Ar_18<0)
{
Pr_C_Ar_14=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,14]=flower_Price_3[opa,14]+1;//
flower_Price_3[opa,35]=1;//Последняя переменная
flower_Price_3[opa,36]=3;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,14] «,flower_Price_3[opa,14]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 20522 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 20540 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,14] «,flower_Price_3[opa,14]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 20558 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,14]!=flower_Price_3[opa,14])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,14]=flower_Price_3[opa,14];//
Print(» hehe – cantidad de cambios total 14 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==2)
{
for(int uaa=1; uaa<=200000; uaa++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uaa,» 20604 «);


}
if(flower_Price_3[uaa,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uaa,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uaa,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(yug==1 && N_Petalo==5 && N_Centro_r==2 && f_Bo_1==1)//&& N_Gr20== Необходимо писать в массив
{
// Arch 1
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=2;//yugok
zaryad=1;
zapret_podachi_input=2;
zapret_podachi_output=4;
//» – » Arhitektura
flower[1,18]=flower[1,18]-1;//Регистрация подачи значения
C_Ar_23–;
//Print(Ar_23,» Ar_23 «,C_Ar_23);
if(C_Ar_23>0)
{
Pr_C_Ar_18=Ar_23;
}
if(C_Ar_23<0)
{
Pr_C_Ar_18=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,18]=flower_Price_3[opa,18]-1;//
flower_Price_3[opa,35]=4;//Последняя переменная
flower_Price_3[opa,36]=3;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,18] «,flower_Price_3[opa,18]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 20660 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 20678 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,18] «,flower_Price_3[opa,18]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 20696 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,18]!=flower_Price_3[opa,18])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,18]=flower_Price_3[opa,18];//
Print(» hehe – cantidad de cambios total 18 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==2)
{
for(int uaa=1; uaa<=200000; uaa++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uaa,» 20742 «);


}
if(flower_Price_3[uaa,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uaa,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uaa,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(yug==1 && N_Petalo==6 && N_Centro_r==2 && f_Be_1==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=3;//yugok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» + » Arhitektura
flower[1,22]=flower[1,22]+1;//Регистрация подачи значения
C_Ar_24++;
//Print(Ar_24,» Ar_24 «,C_Ar_24);
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,22]=flower_Price_3[opa,22]+1;//
flower_Price_3[opa,35]=3;//Последняя переменная
flower_Price_3[opa,36]=3;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,22] «,flower_Price_3[opa,22]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 20789 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 20807 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,22] «,flower_Price_3[opa,22]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 20825 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,22]!=flower_Price_3[opa,22])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,22]=flower_Price_3[opa,22];//
Print(» hehe – cantidad de cambios total «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==2)
{
for(int uaa=1; uaa<=200000; uaa++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uaa,» 20871 «);


}
if(flower_Price_3[uaa,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uaa,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uaa,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(yug==1 && N_Petalo==7 && N_Centro_r==2 && f_Bo_0==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=4;//yugok
zaryad=0;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» – » Arhitektura
flower[1,26]=flower[1,26]-1;//Регистрация подачи значения
C_Ar_19–;
//Print(Ar_19,» Ar_19 «,C_Ar_19);
if(C_Ar_19>0)
{
Pr_C_Ar_26=Ar_19;
}
if(C_Ar_19<0)
{
Pr_C_Ar_26=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,26]=flower_Price_3[opa,26]-1;//
flower_Price_3[opa,35]=2;//Последняя переменная
flower_Price_3[opa,36]=3;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,26] «,flower_Price_3[opa,26]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 20926 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 20944 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,26] «,flower_Price_3[opa,26]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 20962 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,26]!=flower_Price_3[opa,26])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,26]=flower_Price_3[opa,26];//
Print(» hehe – cantidad de cambios total 26 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==2)
{
for(int uaa=1; uaa<=200000; uaa++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uaa,» 21008 «);


}
if(flower_Price_3[uaa,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uaa,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uaa,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(yug==1 && N_Petalo==8 && N_Centro_r==2 && f_Be_0==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=1;//yugok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» + » Arhitektura
flower[1,30]=flower[1,30]+1;//Регистрация подачи значения
C_Ar_20++;
//Print(Ar_20,» Ar_20 «,C_Ar_20);
if(C_Ar_20>0)
{
Pr_C_Ar_30=Ar_20;
}
if(C_Ar_20<0)
{
Pr_C_Ar_30=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,30]=flower_Price_3[opa,30]+1;//
flower_Price_3[opa,35]=1;//Последняя переменная
flower_Price_3[opa,36]=3;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,30] «,flower_Price_3[opa,30]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 21063 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 21081 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,30] «,flower_Price_3[opa,30]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 21099 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,30]!=flower_Price_3[opa,30])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,30]=flower_Price_3[opa,30];//
Print(» hehe – cantidad de cambios total 30 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==2)
{
for(int uaa=1; uaa<=200000; uaa++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uaa,» 21144 «);


}
if(flower_Price_3[uaa,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uaa,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uaa,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
//
if(yug==1 && N_Petalo==1 && N_Centro_r==3 && f_Be_1==1)//&& N_Gr20== Необходимо писать в массив
{
// Arch 1
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=2;//yugok
zaryad=1;
zapret_podachi_input=2;
zapret_podachi_output=4;
//» + » Arhitektura
flower[1,3]=flower[1,3]+1;//Регистрация подачи значения
C_Ar_21++;
//Print(Ar_21,» Ar_21 «,C_Ar_21);
if(C_Ar_21>0)
{
Pr_C_Ar_3=Ar_21;
}
if(C_Ar_21<0)
{
Pr_C_Ar_3=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,3]=flower_Price_3[opa,3]+1;//
flower_Price_3[opa,35]=3;//Последняя переменная
flower_Price_3[opa,36]=3;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,3] «,flower_Price_3[opa,3]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 21202 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 21220 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,3] «,flower_Price_3[opa,3]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 21238 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,3]!=flower_Price_3[opa,3])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,3]=flower_Price_3[opa,3];//
Print(» hehe – cantidad de cambios total 3 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(yug==1 && N_Petalo==2 && N_Centro_r==3 && f_Bo_1==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=3;//yugok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» – » Arhitektura
flower[1,7]=flower[1,7]-1;//Регистрация подачи значения
C_Ar_22–;
//Print(Ar_22,» Ar_22 «,C_Ar_22);
if(C_Ar_22>0)
{
Pr_C_Ar_7=Ar_22;
}
if(C_Ar_22<0)
{
Pr_C_Ar_7=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,7]=flower_Price_3[opa,7]-1;//
flower_Price_3[opa,35]=4;//Последняя переменная
flower_Price_3[opa,36]=3;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,7] «,flower_Price_3[opa,7]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 21314 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 21332 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,7] «,flower_Price_3[opa,7]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 21350 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,7]!=flower_Price_3[opa,7])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,7]=flower_Price_3[opa,7];//
Print(» hehe – cantidad de cambios total 7 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(yug==1 && N_Petalo==3 && N_Centro_r==3 && f_Be_0==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=4;//yugok
zaryad=0;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» + » Arhitektura
flower[1,11]=flower[1,11]+1;//Регистрация подачи значения
C_Ar_17++;
//Print(Ar_17,» Ar_17 «,C_Ar_17);
if(C_Ar_17>0)
{
Pr_C_Ar_11=Ar_17;
}
if(C_Ar_17<0)
{
Pr_C_Ar_11=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,11]=flower_Price_3[opa,11]+1;//
flower_Price_3[opa,35]=1;//Последняя переменная
flower_Price_3[opa,36]=3;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,11] «,flower_Price_3[opa,11]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 21431 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 21449 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,11] «,flower_Price_3[opa,11]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 21467 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,11]!=flower_Price_3[opa,11])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,11]=flower_Price_3[opa,11];//
Print(» hehe – cantidad de cambios total 11 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(yug==1 && N_Petalo==4 && N_Centro_r==3 && f_Bo_0==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=1;//yugok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» – » Arhitektura
flower[1,15]=flower[1,15]-1;//Регистрация подачи значения
C_Ar_18–;
//Print(Ar_18,» Ar_18 «,C_Ar_18);
if(C_Ar_18>0)
{
Pr_C_Ar_15=Ar_18;
}
if(C_Ar_18<0)
{
Pr_C_Ar_15=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,15]=flower_Price_3[opa,15]-1;//
flower_Price_3[opa,35]=2;//Последняя переменная
flower_Price_3[opa,36]=3;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,15] «,flower_Price_3[opa,15]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 21548 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 21566 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,15] «,flower_Price_3[opa,15]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 21584 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,15]!=flower_Price_3[opa,15])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,15]=flower_Price_3[opa,15];//
Print(» hehe – cantidad de cambios total 15 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(yug==1 && N_Petalo==5 && N_Centro_r==3 && f_Be_1==1)//&& N_Gr20== Необходимо писать в массив
{
// Arch 1
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=2;//yugok
zaryad=1;
zapret_podachi_input=2;
zapret_podachi_output=4;
//» + » Arhitektura
flower[1,19]=flower[1,19]+1;//Регистрация подачи значения
C_Ar_23++;
//Print(Ar_23,» Ar_23 «,C_Ar_23);
if(C_Ar_23>0)
{
Pr_C_Ar_19=Ar_23;
}
if(C_Ar_23<0)
{
Pr_C_Ar_19=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,19]=flower_Price_3[opa,19]+1;//
flower_Price_3[opa,35]=3;//Последняя переменная
flower_Price_3[opa,36]=3;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,19] «,flower_Price_3[opa,19]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 21661 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 21679 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,19] «,flower_Price_3[opa,19]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 21697 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,19]!=flower_Price_3[opa,19])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,19]=flower_Price_3[opa,19];//
Print(» hehe – cantidad de cambios total 19 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(yug==1 && N_Petalo==6 && N_Centro_r==3 && f_Bo_1==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=3;//yugok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» – » Arhitektura
flower[1,23]=flower[1,23]-1;//Регистрация подачи значения
C_Ar_24–;
//Print(Ar_24,» Ar_24 «,C_Ar_24);
if(C_Ar_24>0)
{
Pr_C_Ar_23=Ar_24;
}
if(C_Ar_24<0)
{
Pr_C_Ar_23=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,23]=flower_Price_3[opa,23]-1;//
flower_Price_3[opa,35]=4;//Последняя переменная
flower_Price_3[opa,36]=3;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,23] «,flower_Price_3[opa,23]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 21773 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 21791 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,23] «,flower_Price_3[opa,23]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 21809 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,23]!=flower_Price_3[opa,23])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,23]=flower_Price_3[opa,23];//
Print(» hehe – cantidad de cambios total 23 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(yug==1 && N_Petalo==7 && N_Centro_r==3 && f_Be_0==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=4;//yugok
zaryad=0;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» + » Arhitektura
flower[1,27]=flower[1,27]+1;//Регистрация подачи значения
C_Ar_19++;
//Print(Ar_19,» Ar_19 «,C_Ar_19);
if(C_Ar_19>0)
{
Pr_C_Ar_27=Ar_19;
}
if(C_Ar_19<0)
{
Pr_C_Ar_27=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,27]=flower_Price_3[opa,27]+1;//
flower_Price_3[opa,35]=1;//Последняя переменная
flower_Price_3[opa,36]=3;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,27] «,flower_Price_3[opa,27]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 21890 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 21908 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,27] «,flower_Price_3[opa,27]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 21926 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,27]!=flower_Price_3[opa,27])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,27]=flower_Price_3[opa,27];//
Print(» hehe – cantidad de cambios total 27 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(yug==1 && N_Petalo==8 && N_Centro_r==3 && f_Bo_0==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=1;//yugok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» – » Arhitektura
flower[1,31]=flower[1,31]-1;//Регистрация подачи значения
C_Ar_20–;
//Print(Ar_20,» Ar_20 «,C_Ar_20);
if(C_Ar_20>0)
{
Pr_C_Ar_31=Ar_20;
}
if(C_Ar_20<0)
{
Pr_C_Ar_31=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,31]=flower_Price_3[opa,31]-1;//
flower_Price_3[opa,35]=2;//Последняя переменная
flower_Price_3[opa,36]=3;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,31] «,flower_Price_3[opa,31]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 22002 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 22021 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,31] «,flower_Price_3[opa,31]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 22039 «);


}

//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,31]!=flower_Price_3[opa,31])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,31]=flower_Price_3[opa,31];//
Print(» hehe – cantidad de cambios total 31 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
//
if(yug==1 && N_Petalo==1 && N_Centro_r==4 && f_Bo_0==1)//&& N_Gr20== Необходимо писать в массив
{
// Arch 1
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=2;//yugok
zaryad=1;
zapret_podachi_input=2;
zapret_podachi_output=4;
//» – » Arhitektura
flower[1,4]=flower[1,4]-1;//Регистрация подачи значения
C_Ar_21–;
//Print(Ar_21,» Ar_21 «,C_Ar_21);
if(C_Ar_21>0)
{
Pr_C_Ar_4=Ar_21;
}
if(C_Ar_21<0)
{
Pr_C_Ar_4=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,4]=flower_Price_3[opa,4]-1;//
flower_Price_3[opa,35]=2;//Последняя переменная
flower_Price_3[opa,36]=3;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,4] «,flower_Price_3[opa,4]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 22127 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 22145 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,4] «,flower_Price_3[opa,4]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 22163 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,4]!=flower_Price_3[opa,4])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,4]=flower_Price_3[opa,4];//
Print(» hehe – cantidad de cambios total 4 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==4)
{
for(int uau=1; uau<=200000; uau++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uau,» 22209 «);


}
if(flower_Price_3[uau,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uau,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uau,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(yug==1 && N_Petalo==2 && N_Centro_r==4 && f_Be_0==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=3;//yugok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» + » Arhitektura
flower[1,8]=flower[1,8]+1;//Регистрация подачи значения
C_Ar_22++;
//Print(Ar_22,» Ar_22 «,C_Ar_22);
if(C_Ar_22>0)
{
Pr_C_Ar_8=Ar_22;
}
if(C_Ar_22<0)
{
Pr_C_Ar_8=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,8]=flower_Price_3[opa,8]+1;//
flower_Price_3[opa,35]=1;//Последняя переменная
flower_Price_3[opa,36]=3;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,8] «,flower_Price_3[opa,8]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 22264 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 22282 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,8] «,flower_Price_3[opa,8]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 22300 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,8]!=flower_Price_3[opa,8])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,8]=flower_Price_3[opa,8];//
Print(» hehe – cantidad de cambios total 8 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==4)
{
for(int uau=1; uau<=200000; uau++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uau,» 22346 «);


}
if(flower_Price_3[uau,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uau,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uau,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(yug==1 && N_Petalo==3 && N_Centro_r==4 && f_Bo_1==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=4;//yugok
zaryad=0;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» – » Arhitektura
flower[1,12]=flower[1,12]-1;//Регистрация подачи значения
C_Ar_17–;
//Print(Ar_17,» Ar_17 «,C_Ar_17);
if(C_Ar_17>0)
{
Pr_C_Ar_12=Ar_17;
}
if(C_Ar_17<0)
{
Pr_C_Ar_12=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,12]=flower_Price_3[opa,12]-1;//
flower_Price_3[opa,35]=4;//Последняя переменная
flower_Price_3[opa,36]=3;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,12] «,flower_Price_3[opa,12]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 22401 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 22419 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,12] «,flower_Price_3[opa,12]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 22437 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,12]!=flower_Price_3[opa,12])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,12]=flower_Price_3[opa,12];//
Print(» hehe – cantidad de cambios total 12 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==4)
{
for(int uau=1; uau<=200000; uau++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uau,» 22483 «);


}
if(flower_Price_3[uau,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uau,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uau,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(yug==1 && N_Petalo==4 && N_Centro_r==4 && f_Be_1==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=1;//yugok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» + » Arhitektura
flower[1,16]=flower[1,16]+1;//Регистрация подачи значения
C_Ar_18++;
//Print(Ar_18,» Ar_18 «,C_Ar_18);
if(C_Ar_18>0)
{
Pr_C_Ar_16=Ar_18;
}
if(C_Ar_18<0)
{
Pr_C_Ar_16=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,16]=flower_Price_3[opa,16]-1;//
flower_Price_3[opa,35]=3;//Последняя переменная
flower_Price_3[opa,36]=3;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,16] «,flower_Price_3[opa,16]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 22538 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 22556 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,16] «,flower_Price_3[opa,16]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 22574 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,16]!=flower_Price_3[opa,16])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,16]=flower_Price_3[opa,16];//
Print(» hehe – cantidad de cambios total 16 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==4)
{
for(int uau=1; uau<=200000; uau++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uau,» 22620 «);


}
if(flower_Price_3[uau,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uau,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uau,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(yug==1 && N_Petalo==5 && N_Centro_r==4 && f_Bo_0==1)//&& N_Gr20== Необходимо писать в массив
{
// Arch 1
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=2;//yugok
zaryad=1;
zapret_podachi_input=2;
zapret_podachi_output=4;
//» – » Arhitektura
flower[1,20]=flower[1,20]-1;//Регистрация подачи значения
C_Ar_23–;
//Print(Ar_23,» Ar_23 «,C_Ar_23);
if(C_Ar_23>0)
{
Pr_C_Ar_20=Ar_23;
}
if(C_Ar_23<0)
{
Pr_C_Ar_20=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,20]=flower_Price_3[opa,20]-1;//
flower_Price_3[opa,35]=2;//Последняя переменная
flower_Price_3[opa,36]=3;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,20] «,flower_Price_3[opa,20]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 22677 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 22693 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,20] «,flower_Price_3[opa,20]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 22712 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,20]!=flower_Price_3[opa,20])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,20]=flower_Price_3[opa,20];//
Print(» hehe – cantidad de cambios total 20 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==4)
{
for(int uau=1; uau<=200000; uau++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uau,» 22758 «);


}
if(flower_Price_3[uau,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uau,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uau,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(yug==1 && N_Petalo==6 && N_Centro_r==4 && f_Be_0==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=3;//yugok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» + » Arhitektura
flower[1,24]=flower[1,24]+1;//Регистрация подачи значения
C_Ar_24++;
//Print(Ar_24,» Ar_24 «,C_Ar_24);
if(C_Ar_24>0)
{
Pr_C_Ar_24=Ar_24;
}
if(C_Ar_24<0)
{
Pr_C_Ar_24=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,24]=flower_Price_3[opa,10]+1;//
flower_Price_3[opa,35]=1;//Последняя переменная
flower_Price_3[opa,36]=3;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,24] «,flower_Price_3[opa,24]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 22813 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 22831 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,24] «,flower_Price_3[opa,24]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 22849 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,24]!=flower_Price_3[opa,24])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,24]=flower_Price_3[opa,24];//
Print(» hehe – cantidad de cambios total 24 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==4)
{
for(int uau=1; uau<=200000; uau++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uau,» 22895 «);


}
if(flower_Price_3[uau,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uau,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uau,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(yug==1 && N_Petalo==7 && N_Centro_r==4 && f_Bo_1==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=4;//yugok
zaryad=0;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» – » Arhitektura
flower[1,28]=flower[1,28]-1;//Регистрация подачи значения
C_Ar_19–;
//Print(Ar_19,» Ar_19 «,C_Ar_19);
if(C_Ar_19>0)
{
Pr_C_Ar_28=Ar_19;
}
if(C_Ar_19<0)
{
Pr_C_Ar_28=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,28]=flower_Price_3[opa,28]-1;//
flower_Price_3[opa,35]=4;//Последняя переменная
flower_Price_3[opa,36]=3;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,28] «,flower_Price_3[opa,28]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 22950 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 22969 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,28] «,flower_Price_3[opa,28]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 22986 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,28]!=flower_Price_3[opa,28])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,28]=flower_Price_3[opa,28];//
Print(» hehe – cantidad de cambios total 28 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==4)
{
for(int uau=1; uau<=200000; uau++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uau,» 23032 «);


}
if(flower_Price_3[uau,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uau,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uau,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(yug==1 && N_Petalo==8 && N_Centro_r==4 && f_Be_1==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=1;//yugok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» + » Arhitektura
flower[1,32]=flower[1,32]+1;//Регистрация подачи значения
C_Ar_20++;
//Print(Ar_20,» Ar_20 «,C_Ar_20);
if(C_Ar_20>0)
{
Pr_C_Ar_32=Ar_20;
}
if(C_Ar_20<0)
{
Pr_C_Ar_32=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,32]=flower_Price_3[opa,32]+1;//
flower_Price_3[opa,35]=3;//Последняя переменная
flower_Price_3[opa,36]=3;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,32] «,flower_Price_3[opa,32]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 23083 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 23100 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,32] «,flower_Price_3[opa,32]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 23118 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,32]!=flower_Price_3[opa,32])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,32]=flower_Price_3[opa,32];//
Print(» hehe – cantidad de cambios total 32 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==4)
{
for(int uau=1; uau<=200000; uau++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uau,» 23164 «);


}
if(flower_Price_3[uau,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uau,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uau,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
//
if(zap==1 && N_Petalo==1 && N_Centro_r==1 && f_Bo_1==1)//&& N_Gr20== Необходимо писать в массив
{
// Arch 1
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=2;//zapok
zaryad=1;
zapret_podachi_input=2;
zapret_podachi_output=4;
//» + » Arhitektura
flower[1,1]=flower[1,1]+1;//Регистрация подачи значения
C_Ar_26++;
//Print(Ar_26,» Ar_26 «,C_Ar_26);
if(C_Ar_26>0)
{
Pr_C_Ar_1=Ar_26;
}
if(C_Ar_26<0)
{
Pr_C_Ar_1=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,1]=flower_Price_3[opa,1]+1;//
flower_Price_3[opa,35]=4;//Последняя переменная
flower_Price_3[opa,36]=4;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,1] «,flower_Price_3[opa,1]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 23221 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 23239 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,1] «,flower_Price_3[opa,1]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 23257 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,1]!=flower_Price_3[opa,1])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,1]=flower_Price_3[opa,1];//
Print(» hehe – cantidad de cambios total 1 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==1)
{
for(int uae=1; uae<=200000; uae++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uae,» 23303 «);


}
if(flower_Price_3[uae,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uae,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uae,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(zap==1 && N_Petalo==2 && N_Centro_r==1 && f_Be_0==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=3;//zapok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» – » Arhitektura
flower[1,5]=flower[1,5]-1;//Регистрация подачи значения
C_Ar_29–;
//Print(Ar_29,» Ar_29 «,C_Ar_29);
if(C_Ar_29>0)
{
Pr_C_Ar_5=Ar_29;
}
if(C_Ar_29<0)
{
Pr_C_Ar_5=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,5]=flower_Price_3[opa,5]-1;//
flower_Price_3[opa,35]=1;//Последняя переменная
flower_Price_3[opa,36]=4;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,5] «,flower_Price_3[opa,5]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 23358 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 23376 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,5] «,flower_Price_3[opa,5]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 23394 «);

}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,5]!=flower_Price_3[opa,5])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,5]=flower_Price_3[opa,5];//
Print(» hehe – cantidad de cambios total 5 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==1)
{
for(int uae=1; uae<=200000; uae++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uae,» 23440 «);


}
if(flower_Price_3[uae,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uae,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uae,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(zap==1 && N_Petalo==3 && N_Centro_r==1 && f_Bo_0==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=4;//zapok
zaryad=0;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» + » Arhitektura
flower[1,9]=flower[1,9]+1;//Регистрация подачи значения
C_Ar_30++;
//Print(Ar_30,» Ar_30 «,C_Ar_30);
if(C_Ar_30>0)
{
Pr_C_Ar_9=Ar_30;
}
if(C_Ar_30<0)
{
Pr_C_Ar_9=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,9]=flower_Price_3[opa,9]+1;//
flower_Price_3[opa,35]=2;//Последняя переменная
flower_Price_3[opa,36]=4;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,9] «,flower_Price_3[opa,9]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 23495 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 23513 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,9] «,flower_Price_3[opa,9]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 23531 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,9]!=flower_Price_3[opa,9])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,9]=flower_Price_3[opa,9];//
Print(» hehe – cantidad de cambios total 9 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==1)
{
for(int uae=1; uae<=200000; uae++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uae,» 23577 «);


}
if(flower_Price_3[uae,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uae,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uae,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(zap==1 && N_Petalo==4 && N_Centro_r==1 && f_Be_1==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=1;//zapok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» – » Arhitektura
flower[1,13]=flower[1,13]-1;//Регистрация подачи значения
C_Ar_25–;
//Print(Ar_25,» Ar_25 «,C_Ar_25);
if(C_Ar_25>0)
{
Pr_C_Ar_13=Ar_25;
}
if(C_Ar_25<0)
{
Pr_C_Ar_13=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,13]=flower_Price_3[opa,13]-1;//
flower_Price_3[opa,35]=3;//Последняя переменная
flower_Price_3[opa,36]=4;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,13] «,flower_Price_3[opa,13]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 23632 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 23650 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,13] «,flower_Price_3[opa,13]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 23668 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,13]!=flower_Price_3[opa,13])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,13]=flower_Price_3[opa,13];//
Print(» hehe – cantidad de cambios total 13 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==1)
{
for(int uae=1; uae<=200000; uae++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uae,» 23714 «);


}
if(flower_Price_3[uae,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uae,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uae,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(zap==1 && N_Petalo==5 && N_Centro_r==1 && f_Bo_1==1)//&& N_Gr20== Необходимо писать в массив
{
// Arch 1
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=2;//zapok
zaryad=1;
zapret_podachi_input=2;
zapret_podachi_output=4;
//» – » Arhitektura
flower[1,17]=flower[1,17]+1;//Регистрация подачи значения
C_Ar_28–;
//Print(Ar_28,» Ar_28 «,C_Ar_28);
if(C_Ar_28>0)
{
Pr_C_Ar_17=Ar_28;
}
if(C_Ar_28<0)
{
Pr_C_Ar_17=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,17]=flower_Price_3[opa,17]+1;//
flower_Price_3[opa,35]=4;//Последняя переменная
flower_Price_3[opa,36]=4;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,17] «,flower_Price_3[opa,17]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 23770 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 23788 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,17] «,flower_Price_3[opa,17]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 23032 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,17]!=flower_Price_3[opa,17])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,17]=flower_Price_3[opa,17];//
Print(» hehe – cantidad de cambios total 17 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==1)
{
for(int uae=1; uae<=200000; uae++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uae,» 23852 «);


}
if(flower_Price_3[uae,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uae,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uae,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(zap==1 && N_Petalo==6 && N_Centro_r==1 && f_Be_0==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=3;//zapok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» – » Arhitektura
flower[1,21]=flower[1,21]-1;//Регистрация подачи значения
C_Ar_31–;
//Print(Ar_31,» Ar_31 «,C_Ar_31);
if(C_Ar_31>0)
{
Pr_C_Ar_21=Ar_31;
}
if(C_Ar_31<0)
{
Pr_C_Ar_21=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,21]=flower_Price_3[opa,21]-1;//
flower_Price_3[opa,35]=1;//Последняя переменная
flower_Price_3[opa,36]=4;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,21] «,flower_Price_3[opa,21]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 23907 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 23925 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,21] «,flower_Price_3[opa,21]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 23943 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,21]!=flower_Price_3[opa,21])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,21]=flower_Price_3[opa,21];//
Print(» hehe – cantidad de cambios total 21 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==1)
{
for(int uae=1; uae<=200000; uae++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uae,» 23989 «);


}
if(flower_Price_3[uae,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uae,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uae,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(zap==1 && N_Petalo==7 && N_Centro_r==1 && f_Bo_0==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=4;//zapok
zaryad=0;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» + » Arhitektura
flower[1,25]=flower[1,25]+1;//Регистрация подачи значения
C_Ar_32++;
//Print(Ar_32,» Ar_32 «,C_Ar_32);
if(C_Ar_32>0)
{
Pr_C_Ar_25=Ar_32;
}
if(C_Ar_32<0)
{
Pr_C_Ar_25=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,25]=flower_Price_3[opa,25]+1;//
flower_Price_3[opa,35]=2;//Последняя переменная
flower_Price_3[opa,36]=4;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,25] «,flower_Price_3[opa,25]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 24044 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 24062 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,25] «,flower_Price_3[opa,25]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 24080 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,25]!=flower_Price_3[opa,25])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,25]=flower_Price_3[opa,25];//
Print(» hehe – cantidad de cambios total 25 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==1)
{
for(int uae=1; uae<=200000; uae++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uae,» 24126 «);


}
if(flower_Price_3[uae,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uae,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uae,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(zap==1 && N_Petalo==8 && N_Centro_r==1 && f_Be_1==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=1;//zapok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» – » Arhitektura
flower[1,29]=flower[1,29]-1;//Регистрация подачи значения
C_Ar_27–;
//Print(Ar_27,» Ar_27 «,C_Ar_27);
if(C_Ar_27>0)
{
Pr_C_Ar_29=Ar_27;
}
if(C_Ar_27<0)
{
Pr_C_Ar_29=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,29]=flower_Price_3[opa,29]-1;//
flower_Price_3[opa,35]=3;//Последняя переменная
flower_Price_3[opa,36]=4;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,29] «,flower_Price_3[opa,29]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 24181 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 24199 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,29] «,flower_Price_3[opa,29]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 24217 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,29]!=flower_Price_3[opa,29])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,29]=flower_Price_3[opa,29];//
Print(» hehe – cantidad de cambios total 29 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==1)
{
for(int uae=1; uae<=200000; uae++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uae,» 24263 «);


}
if(flower_Price_3[uae,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uae,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uae,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
//
if(zap==1 && N_Petalo==1 && N_Centro_r==2 && f_Be_1==1)//&& N_Gr20== Необходимо писать в массив
{
// Arch 1
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=2;//zapok
zaryad=1;
zapret_podachi_input=2;
zapret_podachi_output=4;
//» – » Arhitektura
flower[1,2]=flower[1,2]-1;//Регистрация подачи значения
C_Ar_26–;
//Print(Ar_26,» Ar_26 «,C_Ar_26);
if(C_Ar_26>0)
{
Pr_C_Ar_2=Ar_26;
}
if(C_Ar_26<0)
{
Pr_C_Ar_2=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,2]=flower_Price_3[opa,2]-1;//
flower_Price_3[opa,35]=3;//Последняя переменная
flower_Price_3[opa,36]=4;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,2] «,flower_Price_3[opa,2]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 24320 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 24338 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,2] «,flower_Price_3[opa,2]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 24356 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,2]!=flower_Price_3[opa,2])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,2]=flower_Price_3[opa,2];//
Print(» hehe – cantidad de cambios total 2 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==2)
{
for(int uaa=1; uaa<=200000; uaa++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uaa,» 24402 «);


}
if(flower_Price_3[uaa,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uaa,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uaa,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(zap==1 && N_Petalo==2 && N_Centro_r==2 && f_Bo_0==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=3;//zapok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» + » Arhitektura
flower[1,6]=flower[1,6]+1;//Регистрация подачи значения
C_Ar_29++;
//Print(Ar_29,» Ar_29 «,C_Ar_29);
if(C_Ar_29>0)
{
Pr_C_Ar_6=Ar_29;
}
if(C_Ar_29<0)
{
Pr_C_Ar_6=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,6]=flower_Price_3[opa,6]+1;//
flower_Price_3[opa,35]=2;//Последняя переменная
flower_Price_3[opa,36]=4;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,6] «,flower_Price_3[opa,6]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 24456 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 24475 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,6] «,flower_Price_3[opa,6]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 24493 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,6]!=flower_Price_3[opa,6])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,6]=flower_Price_3[opa,6];//
Print(» hehe – cantidad de cambios total 6 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==2)
{
for(int uaa=1; uaa<=200000; uaa++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uaa,» 24539 «);


}
if(flower_Price_3[uaa,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uaa,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uaa,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
//
if(zap==1 && N_Petalo==3 && N_Centro_r==2 && f_Be_0==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=4;//zapok
zaryad=0;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» – » Arhitektura
flower[1,10]=flower[1,10]-1;//Регистрация подачи значения
C_Ar_30–;
//Print(Ar_30,» Ar_30 «,C_Ar_30);
if(C_Ar_30>0)
{
Pr_C_Ar_10=Ar_30;
}
if(C_Ar_30<0)
{
Pr_C_Ar_10=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,10]=flower_Price_3[opa,10]-1;//
flower_Price_3[opa,35]=1;//Последняя переменная
flower_Price_3[opa,36]=4;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,10] «,flower_Price_3[opa,10]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 24595 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 24613 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,10] «,flower_Price_3[opa,10]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 24631 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,10]!=flower_Price_3[opa,10])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,10]=flower_Price_3[opa,10];//
Print(» hehe – cantidad de cambios total 10 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==2)
{
for(int uaa=1; uaa<=200000; uaa++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uaa,» 24677 «);


}
if(flower_Price_3[uaa,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uaa,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uaa,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
//
if(zap==1 && N_Petalo==4 && N_Centro_r==2 && f_Bo_1==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=1;//zapok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» + » Arhitektura
flower[1,14]=flower[1,14]+1;//Регистрация подачи значения
C_Ar_25++;
//Print(Ar_25,» Ar_25 «,C_Ar_25);
if(C_Ar_25>0)
{
Pr_C_Ar_14=Ar_25;
}
if(C_Ar_25<0)
{
Pr_C_Ar_14=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,14]=flower_Price_3[opa,14]+1;//
flower_Price_3[opa,35]=4;//Последняя переменная
flower_Price_3[opa,36]=4;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,14] «,flower_Price_3[opa,14]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 24733 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 24751 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,14] «,flower_Price_3[opa,14]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 24769 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,14]!=flower_Price_3[opa,14])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,14]=flower_Price_3[opa,14];//
Print(» hehe – cantidad de cambios total 14 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==2)
{
for(int uaa=1; uaa<=200000; uaa++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uaa,» 24815 «);


}
if(flower_Price_3[uaa,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uaa,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uaa,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
//
if(zap==1 && N_Petalo==5 && N_Centro_r==2 && f_Be_1==1)//&& N_Gr20== Необходимо писать в массив
{
// Arch 1
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=2;//zapok
zaryad=1;
zapret_podachi_input=2;
zapret_podachi_output=4;
//»+ » Arhitektura
flower[1,18]=flower[1,18]-1;//Регистрация подачи значения
C_Ar_28++;
//Print(Ar_28,» Ar_28 «,C_Ar_28);
if(C_Ar_28>0)
{
Pr_C_Ar_18=Ar_28;
}
if(C_Ar_28<0)
{
Pr_C_Ar_18=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,18]=flower_Price_3[opa,18]-1;//
flower_Price_3[opa,35]=3;//Последняя переменная
flower_Price_3[opa,36]=4;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,18] «,flower_Price_3[opa,18]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 24872 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 24890 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,18] «,flower_Price_3[opa,18]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 24908 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,18]!=flower_Price_3[opa,18])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,18]=flower_Price_3[opa,18];//
Print(» hehe – cantidad de cambios total 18 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==2)
{
for(int uaa=1; uaa<=200000; uaa++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uaa,» 24954 «);


}
if(flower_Price_3[uaa,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uaa,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uaa,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(zap==1 && N_Petalo==6 && N_Centro_r==2 && f_Bo_0==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=3;//zapok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» + » Arhitektura
flower[1,22]=flower[1,22]+1;//Регистрация подачи значения
C_Ar_31++;
//Print(Ar_31,» Ar_31 «,C_Ar_31);
if(C_Ar_31>0)
{
Pr_C_Ar_22=Ar_31;
}
if(C_Ar_31<0)
{
Pr_C_Ar_22=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,22]=flower_Price_3[opa,22]+1;//
flower_Price_3[opa,35]=2;//Последняя переменная
flower_Price_3[opa,36]=4;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,22] «,flower_Price_3[opa,22]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 25009 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 25027 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,22] «,flower_Price_3[opa,22]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 25045 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,22]!=flower_Price_3[opa,22])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,22]=flower_Price_3[opa,22];//
Print(» hehe – cantidad de cambios total 22 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==2)
{
for(int uae=1; uae<=200000; uae++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uae,» 25091 «);


}
if(flower_Price_3[uae,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uae,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uae,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
//
if(zap==1 && N_Petalo==7 && N_Centro_r==2 && f_Be_0==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=4;//zapok
zaryad=0;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» – » Arhitektura
flower[1,26]=flower[1,26]-1;//Регистрация подачи значения
C_Ar_32–;
//Print(Ar_32,» Ar_32 «,C_Ar_32);
if(C_Ar_32>0)
{
Pr_C_Ar_26=Ar_32;
}
if(C_Ar_32<0)
{
Pr_C_Ar_26=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,26]=flower_Price_3[opa,26]-1;//
flower_Price_3[opa,35]=1;//Последняя переменная
flower_Price_3[opa,36]=4;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,26] «,flower_Price_3[opa,26]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 25147 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 25165 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,26] «,flower_Price_3[opa,26]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 25183 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,26]!=flower_Price_3[opa,26])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,26]=flower_Price_3[opa,26];//
Print(» hehe – cantidad de cambios total 26 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==2)
{
for(int uae=1; uae<=200000; uae++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uae,» 25229 «);


}
if(flower_Price_3[uae,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uae,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uae,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
//
if(zap==1 && N_Petalo==8 && N_Centro_r==2 && f_Bo_1==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=1;//zapok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» + » Arhitektura
flower[1,30]=flower[1,30]+1;//Регистрация подачи значения
C_Ar_27++;
//Print(Ar_27,» Ar_27 «,C_Ar_27);
if(C_Ar_27>0)
{
Pr_C_Ar_30=Ar_27;
}
if(C_Ar_27<0)
{
Pr_C_Ar_30=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,30]=flower_Price_3[opa,30]+1;//
flower_Price_3[opa,35]=4;//Последняя переменная
flower_Price_3[opa,36]=4;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,30] «,flower_Price_3[opa,30]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 25285 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 25303 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,30] «,flower_Price_3[opa,30]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 25321 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,30]!=flower_Price_3[opa,30])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,30]=flower_Price_3[opa,30];//
Print(» hehe – cantidad de cambios total 30 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==2)
{
for(int uae=1; uae<=200000; uae++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uae,» 25367 «);


}
if(flower_Price_3[uae,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uae,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uae,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
//
if(zap==1 && N_Petalo==1 && N_Centro_r==3 && f_Bo_0==1)//&& N_Gr20== Необходимо писать в массив
{
// Arch 1
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=2;//zapok
zaryad=1;
zapret_podachi_input=2;
zapret_podachi_output=4;
//» + » Arhitektura
flower[1,3]=flower[1,3]+1;//Регистрация подачи значения
C_Ar_26++;
//Print(Ar_26,» Ar_26 «,C_Ar_26);
if(C_Ar_26>0)
{
Pr_C_Ar_3=Ar_26;
}
if(C_Ar_26<0)
{
Pr_C_Ar_3=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,3]=flower_Price_3[opa,3]+1;//
flower_Price_3[opa,35]=2;//Последняя переменная
flower_Price_3[opa,36]=4;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,3] «,flower_Price_3[opa,3]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 25424 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 25442 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,3] «,flower_Price_3[opa,3]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 25460 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,3]!=flower_Price_3[opa,3])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,3]=flower_Price_3[opa,3];//
Print(» hehe – cantidad de cambios total 3 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
//
if(zap==1 && N_Petalo==2 && N_Centro_r==3 && f_Be_1==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=3;//zapok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» – » Arhitektura
flower[1,7]=flower[1,7]-1;//Регистрация подачи значения
C_Ar_29–;
//Print(Ar_29,» Ar_29 «,C_Ar_29);
if(C_Ar_29>0)
{
Pr_C_Ar_7=Ar_29;
}
if(C_Ar_29<0)
{
Pr_C_Ar_7=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,7]=flower_Price_3[opa,7]-1;//
flower_Price_3[opa,35]=3;//Последняя переменная
flower_Price_3[opa,36]=4;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,7] «,flower_Price_3[opa,7]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 25543 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 25561 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,7] «,flower_Price_3[opa,7]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 25579 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,7]!=flower_Price_3[opa,7])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,7]=flower_Price_3[opa,7];//
Print(» hehe – cantidad de cambios total 7 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(zap==1 && N_Petalo==3 && N_Centro_r==3 && f_Bo_1==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=4;//zapok
zaryad=0;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» + » Arhitektura
flower[1,11]=flower[1,11]+1;//Регистрация подачи значения
C_Ar_30++;
//Print(Ar_30,» Ar_30 «,C_Ar_30);
if(C_Ar_30>0)
{
Pr_C_Ar_11=Ar_30;
}
if(C_Ar_30<0)
{
Pr_C_Ar_11=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,11]=flower_Price_3[opa,11]+1;//
flower_Price_3[opa,35]=4;//Последняя переменная
flower_Price_3[opa,36]=4;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,11] «,flower_Price_3[opa,11]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 25660 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 25678 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,11] «,flower_Price_3[opa,11]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 25696 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,11]!=flower_Price_3[opa,11])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,11]=flower_Price_3[opa,11];//
Print(» hehe – cantidad de cambios total 11 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(zap==1 && N_Petalo==4 && N_Centro_r==3 && f_Be_0==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=1;//zapok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» – » Arhitektura
flower[1,15]=flower[1,15]-1;//Регистрация подачи значения
C_Ar_25–;
//Print(Ar_25,» Ar_25 «,C_Ar_25);
if(C_Ar_25>0)
{
Pr_C_Ar_15=Ar_25;
}
if(C_Ar_25<0)
{
Pr_C_Ar_15=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,15]=flower_Price_3[opa,15]-1;//
flower_Price_3[opa,35]=1;//Последняя переменная
flower_Price_3[opa,36]=4;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,15] «,flower_Price_3[opa,15]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 25777 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 25795 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,15] «,flower_Price_3[opa,15]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 25813 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,15]!=flower_Price_3[opa,15])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,15]=flower_Price_3[opa,15];//
Print(» hehe – cantidad de cambios total 15 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(zap==1 && N_Petalo==5 && N_Centro_r==3 && f_Bo_0==1)//&& N_Gr20== Необходимо писать в массив
{
// Arch 1
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=2;//zapok
zaryad=1;
zapret_podachi_input=2;
zapret_podachi_output=4;
//» – » Arhitektura
flower[1,19]=flower[1,19]+1;//Регистрация подачи значения
C_Ar_28–;
//Print(Ar_28,» Ar_28 «,C_Ar_28);
if(C_Ar_28>0)
{
Pr_C_Ar_19=Ar_28;
}
if(C_Ar_28<0)
{
Pr_C_Ar_19=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,19]=flower_Price_3[opa,19]+1;//
flower_Price_3[opa,35]=2;//Последняя переменная
flower_Price_3[opa,36]=4;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,19] «,flower_Price_3[opa,19]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 25895 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 25913 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,19] «,flower_Price_3[opa,19]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 25931 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,19]!=flower_Price_3[opa,19])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,19]=flower_Price_3[opa,19];//
Print(» hehe – cantidad de cambios total 19 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(zap==1 && N_Petalo==6 && N_Centro_r==3 && f_Be_1==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=3;//zapok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» – » Arhitektura
flower[1,23]=flower[1,23]-1;//Регистрация подачи значения
C_Ar_31–;
//Print(Ar_31,» Ar_31 «,C_Ar_31);
if(C_Ar_31>0)
{
Pr_C_Ar_23=Ar_31;
}
if(C_Ar_31<0)
{
Pr_C_Ar_23=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,23]=flower_Price_3[opa,23]-1;//
flower_Price_3[opa,35]=3;//Последняя переменная
flower_Price_3[opa,36]=4;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,23] «,flower_Price_3[opa,23]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 26012 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 26030 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,23] «,flower_Price_3[opa,23]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 26048 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,23]!=flower_Price_3[opa,23])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,23]=flower_Price_3[opa,23];//
Print(» hehe – cantidad de cambios total 23 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(zap==1 && N_Petalo==7 && N_Centro_r==3 && f_Bo_1==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=4;//zapok
zaryad=0;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» + » Arhitektura
flower[1,27]=flower[1,27]+1;//Регистрация подачи значения
C_Ar_32++;
//Print(Ar_32,» Ar_32 «,C_Ar_32);
if(C_Ar_32>0)
{
Pr_C_Ar_27=Ar_32;
}
if(C_Ar_32<0)
{
Pr_C_Ar_27=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,27]=flower_Price_3[opa,27]+1;//
flower_Price_3[opa,35]=4;//Последняя переменная
flower_Price_3[opa,36]=4;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,27] «,flower_Price_3[opa,27]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 26129 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 26147 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,27] «,flower_Price_3[opa,27]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 26165 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,27]!=flower_Price_3[opa,27])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,27]=flower_Price_3[opa,27];//
Print(» hehe – cantidad de cambios total 27 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(zap==1 && N_Petalo==8 && N_Centro_r==3 && f_Be_0==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=1;//zapok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» – » Arhitektura
flower[1,31]=flower[1,31]-1;//Регистрация подачи значения
C_Ar_27–;
//Print(Ar_27,» Ar_27 «,C_Ar_27);
if(C_Ar_27>0)
{
Pr_C_Ar_31=Ar_27;
}
if(C_Ar_27<0)
{
Pr_C_Ar_31=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,31]=flower_Price_3[opa,31]-1;//
flower_Price_3[opa,35]=1;//Последняя переменная
flower_Price_3[opa,36]=4;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,31] «,flower_Price_3[opa,31]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 26246 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 26264 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,31] «,flower_Price_3[opa,31]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 26282 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,31]!=flower_Price_3[opa,31])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,31]=flower_Price_3[opa,31];//
Print(» hehe – cantidad de cambios total 31 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
//
if(zap==1 && N_Petalo==1 && N_Centro_r==4 && f_Be_0==1)//&& N_Gr20== Необходимо писать в массив
{
// Arch 1
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=2;//zapok
zaryad=1;
zapret_podachi_input=2;
zapret_podachi_output=4;
//» – » Arhitektura
flower[1,4]=flower[1,4]-1;//Регистрация подачи значения
C_Ar_26–;
//Print(Ar_26,» Ar_26 «,C_Ar_26);
if(C_Ar_26>0)
{
Pr_C_Ar_4=Ar_26;
}
if(C_Ar_26<0)
{
Pr_C_Ar_4=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,4]=flower_Price_3[opa,4]-1;//
flower_Price_3[opa,35]=1;//Последняя переменная
flower_Price_3[opa,36]=4;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,4] «,flower_Price_3[opa,4]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 26365 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 26383 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,4] «,flower_Price_3[opa,4]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 26401 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,4]!=flower_Price_3[opa,4])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,4]=flower_Price_3[opa,4];//
Print(» hehe – cantidad de cambios total 4 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==4)
{
for(int uau=1; uau<=200000; uau++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uau,» 26447 «);


}
if(flower_Price_3[uau,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uau,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uau,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(zap==1 && N_Petalo==2 && N_Centro_r==4 && f_Bo_1==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=3;//zapok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» + » Arhitektura
flower[1,8]=flower[1,8]+1;//Регистрация подачи значения
C_Ar_29++;
//Print(Ar_29,» Ar_29 «,C_Ar_29);
if(C_Ar_29>0)
{
Pr_C_Ar_8=Ar_29;
}
if(C_Ar_29<0)
{
Pr_C_Ar_8=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,8]=flower_Price_3[opa,8]+1;//
flower_Price_3[opa,35]=4;//Последняя переменная
flower_Price_3[opa,36]=4;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,8] «,flower_Price_3[opa,8]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 26502 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 26520 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,8] «,flower_Price_3[opa,8]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 26538 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,8]!=flower_Price_3[opa,8])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,8]=flower_Price_3[opa,8];//
Print(» hehe – cantidad de cambios total 8 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==4)
{
for(int uau=1; uau<=200000; uau++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uau,» 26584 «);


}
if(flower_Price_3[uau,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uau,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uau,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(zap==1 && N_Petalo==3 && N_Centro_r==4 && f_Be_1==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=4;//zapok
zaryad=0;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» – » Arhitektura
flower[1,12]=flower[1,12]-1;//Регистрация подачи значения
C_Ar_30–;
//Print(Ar_30,» Ar_30 «,C_Ar_30);
if(C_Ar_30>0)
{
Pr_C_Ar_12=Ar_30;
}
if(C_Ar_30<0)
{
Pr_C_Ar_12=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,12]=flower_Price_3[opa,12]-1;//
flower_Price_3[opa,35]=3;//Последняя переменная
flower_Price_3[opa,36]=4;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,12] «,flower_Price_3[opa,12]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 26639 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 26657 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,12] «,flower_Price_3[opa,12]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 26675 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,12]!=flower_Price_3[opa,12])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,12]=flower_Price_3[opa,12];//
Print(» hehe – cantidad de cambios total 12 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==4)
{
for(int uau=1; uau<=200000; uau++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uau,» 26721 «);


}
if(flower_Price_3[uau,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uau,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uau,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(zap==1 && N_Petalo==4 && N_Centro_r==4 && f_Bo_0==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=1;//zapok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» + » Arhitektura
flower[1,16]=flower[1,16]+1;//Регистрация подачи значения
C_Ar_25++;
//Print(Ar_25,» Ar_25 «,C_Ar_25);
if(C_Ar_25>0)
{
Pr_C_Ar_16=Ar_25;
}
if(C_Ar_25<0)
{
Pr_C_Ar_16=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,16]=flower_Price_3[opa,16]+1;//
flower_Price_3[opa,35]=2;//Последняя переменная
flower_Price_3[opa,36]=4;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,16] «,flower_Price_3[opa,16]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 26776 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 26793 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,16] «,flower_Price_3[opa,16]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 26811 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,16]!=flower_Price_3[opa,16])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,16]=flower_Price_3[opa,16];//
Print(» hehe – cantidad de cambios total 16 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==4)
{
for(int uau=1; uau<=200000; uau++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uau,» 26857 «);


}
if(flower_Price_3[uau,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uau,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uau,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(zap==1 && N_Petalo==5 && N_Centro_r==4 && f_Be_0==1)//&& N_Gr20== Необходимо писать в массив
{
// Arch 1
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=2;//zapok
zaryad=1;
zapret_podachi_input=2;
zapret_podachi_output=4;
//» + » Arhitektura
flower[1,20]=flower[1,20]-1;//Регистрация подачи значения
C_Ar_28++;
//Print(Ar_28,» Ar_28 «,C_Ar_28);
if(C_Ar_28>0)
{
Pr_C_Ar_20=Ar_28;
}
if(C_Ar_28<0)
{
Pr_C_Ar_20=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,20]=flower_Price_3[opa,20]-1;//
flower_Price_3[opa,35]=1;//Последняя переменная
flower_Price_3[opa,36]=4;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,20] «,flower_Price_3[opa,20]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 26913 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 26931 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,20] «,flower_Price_3[opa,20]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 26949 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,20]!=flower_Price_3[opa,20])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,20]=flower_Price_3[opa,20];//
Print(» hehe – cantidad de cambios total 20 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==4)
{
for(int uau=1; uau<=200000; uau++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uau,» 26995 «);


}
if(flower_Price_3[uau,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uau,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uau,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(zap==1 && N_Petalo==6 && N_Centro_r==4 && f_Bo_1==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=3;//zapok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» + » Arhitektura
flower[1,24]=flower[1,24]+1;//Регистрация подачи значения
C_Ar_31++;
//Print(Ar_31,» Ar_31 «,C_Ar_31);
if(C_Ar_31>0)
{
Pr_C_Ar_24=Ar_31;
}
if(C_Ar_31<0)
{
Pr_C_Ar_24=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,24]=flower_Price_3[opa,24]+1;//
flower_Price_3[opa,35]=4;//Последняя переменная
flower_Price_3[opa,36]=4;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,24] «,flower_Price_3[opa,24]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{

if(Array_Errors==true)
{
Print(» Index Array «,ye,» 27051 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 27069 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,24] «,flower_Price_3[opa,24]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 27087 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,24]!=flower_Price_3[opa,24])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,24]=flower_Price_3[opa,24];//
Print(» hehe – cantidad de cambios total 24 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==4)
{
for(int uau=1; uau<=200000; uau++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uau,» 27133 «);


}
if(flower_Price_3[uau,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uau,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uau,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(zap==1 && N_Petalo==7 && N_Centro_r==4 && f_Be_1==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=4;//zapok
zaryad=0;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» – » Arhitektura
flower[1,28]=flower[1,28]-1;//Регистрация подачи значения
C_Ar_32–;
//Print(Ar_32,» Ar_32 «,C_Ar_32);
if(C_Ar_32>0)
{
Pr_C_Ar_28=Ar_32;
}
if(C_Ar_32<0)
{
Pr_C_Ar_28=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,28]=flower_Price_3[opa,28]-1;//
flower_Price_3[opa,35]=3;//Последняя переменная
flower_Price_3[opa,36]=4;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,28] «,flower_Price_3[opa,28]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 27188 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 27206 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,28] «,flower_Price_3[opa,28]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 27224 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,28]!=flower_Price_3[opa,28])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,28]=flower_Price_3[opa,28];//
Print(» hehe – cantidad de cambios total 28 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==4)
{
for(int uau=1; uau<=200000; uau++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uau,» 27270 «);


}
if(flower_Price_3[uau,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uau,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uau,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
if(zap==1 && N_Petalo==8 && N_Centro_r==4 && f_Bo_0==1)
{
insert_chanel_1=2;
insert_chanel_2=4;
output_Dir=1;//zapok
zaryad=1;
zapret_podachi_input=4;
zapret_podachi_output=2;
//» + » Arhitektura
flower[1,32]=flower[1,32]+1;//Регистрация подачи значения
C_Ar_27++;
//Print(Ar_27,» Ar_27 «,C_Ar_27);
if(C_Ar_27>0)
{
Pr_C_Ar_32=Ar_27;
}
if(C_Ar_27<0)
{
Pr_C_Ar_32=» «;
}
if(flower_Price_3[opa,42]==0)// Если запрет на запись данных снят
{
// Произвожу запись в массив для смены расчётч в блоке управления направлени «компас» Условие – Если центральный массив 3 то изменения вносятся только в архитектуру 3 если это 1 2 или 4 то изменения проводятся по вему массиву
if(flower_Price_3[opa,33]==Price && flower_Price_3[opa,37]==N_Centro && flower_Price_3[opa,38]==N_Gr20)
{
flower_Price_3[opa,32]=flower_Price_3[opa,32]+1;//
flower_Price_3[opa,35]=2;//Последняя переменная
flower_Price_3[opa,36]=4;//Последний Полюс
Print(«opa «,opa,» flower_Price_3[opa,32] «,flower_Price_3[opa,32]);
// запись временного массива
if(flower_Price_3[opa,41]==0) //Временной массив не существует для этого расчёта
{
flower_Price_3[opa,41]=1;//Есть записи времени в массиве flower_Price_3_TIME
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 27325 «);


}
if(flower_Price_3_TIME[opa,ye]==0)
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи для дальнейшей анаитики
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
if(flower_Price_3[opa,41]==1) //Временной массив существует произвести действия// заносится время свечи в массив
{
int ye;
for(ye=0; ye<=999; ye++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ye,» 27343 «);


}
if(flower_Price_3_TIME[opa,ye]==0)// index opa определяет в массиве линию по цене, индекс ye место в массиве
{
break;
}
}
flower_Price_3_TIME[opa,ye]=iTime(Symbol(),PERIOD_M1,1);
int file_handle31=FileOpen(FileName26,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle31>0)
{
FileSeek(file_handle31,0,SEEK_CUR); // Присваивается время свечи
uint test=FileWriteArray(file_handle31,flower_Price_3_TIME,0,WHOLE_ARRAY);
FileClose(file_handle31);
}
}
// формула закрытия расчёта
// расчётное значение по цене
Print(» flower_Price_3[opa,32] «,flower_Price_3[opa,32]);
for(int hehe=1; hehe<=200000; hehe++)
{
if(Array_Errors==true)
{
Print(» Index Array «,hehe,» 27361 «);


}
//Теория.
//Кластер формируется из 8 цен.
//Если производится изменение в данных 1 части кластера то изменения должны быть зафиксированны в массиве
//в остальных 7 частях
if(flower_Price_3[hehe,39]==flower_Price_3[opa,39] && flower_Price_3[hehe,32]!=flower_Price_3[opa,32])//доназначение данных в нутри группы. производится праход по базе по признаку группы кластера которая имеет 8 значений в нутри базы
{
flower_Price_3[hehe,32]=flower_Price_3[opa,32];//
Print(» hehe – cantidad de cambios total 32 «,hehe);
}
}
// flower_Price_3[opa,39]=grupo_8_claster_o;//группа из 8 цельное число
// flower_Price_3[opa,40]=fract;//группа 8 фракция
//if(flower_Price_3[opa,40]==N_Petalo_1)//сравнить номер фракции с номером лепестка
//{
//}
// Проверить соответсвует ли расчёт цены – фрактала с номером лепестка через переменную
//Print(«Fractal «,flower_Price_3[opa,40],» N_Petalo_1 «,N_Petalo_1);
if(flower_Price_3[opa,1]!=0 && flower_Price_3[opa,2]!=0 && flower_Price_3[opa,3]!=0 && flower_Price_3[opa,4]!=0 && flower_Price_3[opa,5]!=0 && flower_Price_3[opa,6]!=0 && flower_Price_3[opa,7]!=0 && flower_Price_3[opa,8]!=0 && flower_Price_3[opa,9]!=0 && flower_Price_3[opa,10]!=0 && flower_Price_3[opa,11]!=0 && flower_Price_3[opa,12]!=0 && flower_Price_3[opa,13]!=0 && flower_Price_3[opa,14]!=0 && flower_Price_3[opa,15]!=0 && flower_Price_3[opa,16]!=0 && flower_Price_3[opa,17]!=0 && flower_Price_3[opa,18]!=0 && flower_Price_3[opa,19]!=0 && flower_Price_3[opa,20]!=0 && flower_Price_3[opa,21]!=0 && flower_Price_3[opa,22]!=0 && flower_Price_3[opa,23]!=0 && flower_Price_3[opa,24]!=0 && flower_Price_3[opa,25]!=0 && flower_Price_3[opa,26]!=0 && flower_Price_3[opa,27]!=0 && flower_Price_3[opa,28]!=0 && flower_Price_3[opa,29]!=0 && flower_Price_3[opa,30]!=0 && flower_Price_3[opa,31]!=0 && flower_Price_3[opa,32]!=0)
{
//При условии заполнении всех 32 ячеек Останока записи для анализа
flower_Price_3[opa,42]=1;
int file_handle30=FileOpen(FileName27,FILE_READ|FILE_WRITE,» «);
if(file_handle30>0)
{
FileSeek(file_handle30,0,SEEK_END); //Расчёт исполнен. Запись закрыта
FileWrite(file_handle30,Symbol(),» T «,iTime(Symbol(),0,1),» check close caunt «,flower_Price_3[opa,42], » index array flower_Price_3 «,opa);
FileClose(file_handle30);
}
}
}
//Расчёт для архитектур 1,2,4
//Теория.
//Производится изменения параметров Последняя переменная и последнию полюс в архитектурах
//1 2 и 4 по всей базе с целью переподачи значений на перерасчёт
// и только в архитектуре 3 данные значения остаются локально
// далее использовать данное правило при централизации архитектур 1 2 и 4 с соответствующими сателитами
if(N_Centro_r==4)
{
for(int uau=1; uau<=200000; uau++)
{
if(Array_Errors==true)
{
Print(» Index Array «,uau,» 27407 «);


}
if(flower_Price_3[uau,37]==flower_Price_3[opa,37]) //данные по этому признаку уже изменены више
{
// Присваивание Последнего значения переменной и полюса по базе
flower_Price_3[uau,35]=flower_Price_3[opa,35];//Последняя переменная
flower_Price_3[uau,36]=flower_Price_3[opa,36];
Print(«Последняя переменная «,flower_Price_3[opa,35],» Последний Полюс «,flower_Price_3[opa,36]);//Последний Полюс//Последний Полюс
}
}
}
}
else
Print(«opa «,opa,» Datos de acceso al block no coinciden Comprobar «);
}
// Impresion de juego de palabras
Print(Pr_C_Ar_1,» «,Pr_C_Ar_2,» «,Pr_C_Ar_3,» «,Pr_C_Ar_4,» «,Pr_C_Ar_5,» «,Pr_C_Ar_6,» «,Pr_C_Ar_7,» «,Pr_C_Ar_8,» «,Pr_C_Ar_9,» «,Pr_C_Ar_10,» «,Pr_C_Ar_11,» «,Pr_C_Ar_12,» «,Pr_C_Ar_13,» «,Pr_C_Ar_14,» «,Pr_C_Ar_15,» «,Pr_C_Ar_16,» «,Pr_C_Ar_17,» «,Pr_C_Ar_18,» «,Pr_C_Ar_19,» «,Pr_C_Ar_20,» «,Pr_C_Ar_21,» «,Pr_C_Ar_22,» «,Pr_C_Ar_23,» «,Pr_C_Ar_24,» «,Pr_C_Ar_25,» «,Pr_C_Ar_26,» «,Pr_C_Ar_27,» «,Pr_C_Ar_28,» «,Pr_C_Ar_29,» «,Pr_C_Ar_30,» «,Pr_C_Ar_31,» «,Pr_C_Ar_32,» «);
Petalos_32=0;
for(int ia=1; ia<=32; ia++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ia,» 27431 «);


}
if(flower[1,ia]!=0)
{
Petalos_32=Petalos_32+1;//Складывание 32 истин в массиве
//Print(«Petalos_32 «,Petalos_32);
}
if(flower[1,ia]==0)
{
break;
}
}
//Print(«1 «,flower[1,1],» 2 «,flower[1,2],» 3 «,flower[1,3],» 4 «,flower[1,4],» 5 «,flower[1,5],» 6 «,flower[1,6],» 7 «,flower[1,7],» 8 «,flower[1,8],» 9 «,flower[1,9],» 10 «,flower[1,10],» 11 «,flower[1,11],» 12 «,flower[1,12],» 13 «,flower[1,13],» 14 «,flower[1,14],» 15 «,flower[1,15],» 16 «,flower[1,16],» 17 «,flower[1,17],» 18 «,flower[1,18],» 19 «,flower[1,19],» 20 «,flower[1,20],» 21 «,flower[1,21],» 22 «,flower[1,22],» 23 «,flower[1,23],» 24 «,flower[1,24],» 25 «,flower[1,25],» 26 «,flower[1,26],» 27 «,flower[1,27],» 28 «,flower[1,28],» 29 «,flower[1,29],» 30 «,flower[1,30],» 31 «,flower[1,31],» 32 «,flower[1,32]);
//После сравнения массива выявляем число 32 если достигнуто то цветок склался
if(Petalos_32==32)
{
flower_Plus=1;
}
}
//Проверка на сбор архитектурной ячейки
//—– Произвожу запись массивива в Бинарный Фаил
int file_handle25=FileOpen(FileName18,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle25>0)
{
FileSeek(file_handle25,0,SEEK_CUR);
FileWriteArray(file_handle25,Form_Patern_Finder,0,WHOLE_ARRAY);
FileClose(file_handle25);
}
int file_handle26=FileOpen(FileName10,FILE_READ|FILE_WRITE|FILE_BIN);
if(file_handle26>0)
{
FileSeek(file_handle26,0,SEEK_CUR);
FileWriteArray(file_handle26,DT_Form_Patern_Finder,0,WHOLE_ARRAY);
FileClose(file_handle26);
}
//Запись соответствия Архитектуры
if(N_Centro==1 && Be_1_C==1 && PipsNumber==1 && Arch3==1)
{
// Присваивание текстового значения
}
// —— Printing Collected Values ​​to File ——
if(bodypips[MaxInd_bodypips,0]>price_Menus_one && (bodypips[MaxInd_bodypips,0]>price_plus ||bodypips[MaxInd_bodypips,0]<price_plus))
{
int file_handle14=FileOpen(FileName14,FILE_READ|FILE_WRITE,» «);
if(file_handle14>0)
{
FileSeek(file_handle14,0,SEEK_END);
FileWrite(file_handle14,Symbol(),» T «,iTime(Symbol(),0,1),/*» Var1Wr «,Var1Wr,» B 3 «,*/Bo,» D x «,napravlenie,» arr Napr «,sev_p,vost_p,yug_p,zap_p,» Var1 «,Var1_Be_0,Var1_Bo_0,Var1_Be_1,Var1_Bo_1,» Var2 «,Var2_Be_0_p,Var2_Bo_0_p,Var2_Be_1_p,Var2_Bo_1_p,/*» C16V x «,Var_I,»Face»,face,*//*» BlockNum «,BlockNum,*/» F X «,Sev[1,1],Sev[1,2],Sev[1,3],Sev[1,4],Sev[1,5],Sev[1,6],Sev[1,7],Sev[1,8],» PR «,bodypips[MaxInd_bodypips,0],» N_C «,N_Centro,» N_Gr20 «,N_Gr20,» N_Pet «,N_Petalo, » fP «,flower_Plus,/*» In_Ch1 «,insert_chanel_1,» In_Ch2 «,insert_chanel_2,» out_Dir «,output_Dir,» imp «,zaryad,*/» Dir z «,z_napravlenie,» F Z «,z_Sev[1,1],z_Sev[1,2],z_Sev[1,3],z_Sev[1,4],z_Sev[1,5],z_Sev[1,6],z_Sev[1,7],z_Sev[1,8]/*, » PM 1 «,Form_Patern_Finder[w,11],» 2 «,Form_Patern_Finder[w,26],» 3 «,Form_Patern_Finder[w,41],» 4 «,Form_Patern_Finder[w,56],» 5 «,Form_Patern_Finder[w,71],» 6 «,Form_Patern_Finder[w,86],» 7 «,Form_Patern_Finder[w,101],» 8 «,Form_Patern_Finder[w,116] » X «,Gx,» Y «,Gy/*» I CONT «,bodypips[MaxInd_bodypips,1],» O «,Onda1/*» ERR2 «, Sterr2*/);
FileClose(file_handle14);
}
}
if(bodypips[MaxInd_bodypips,0]<price_Menus_one && (bodypips[MaxInd_bodypips,0]>price_minus || bodypips[MaxInd_bodypips,0]<price_minus))
{
int file_handle14=FileOpen(FileName14,FILE_READ|FILE_WRITE,» «);
if(file_handle14>0)
{
FileSeek(file_handle14,0,SEEK_END);
FileWrite(file_handle14,Symbol(),» T «,iTime(Symbol(),0,1),/*» Var1Wr «,Var1Wr,» B 3 «,*/Be,/*»Face»,face,*/» D x «,napravlenie,» arr Napr «,sev_p,vost_p,yug_p,zap_p,» Var1 «,Var1_Be_0,Var1_Bo_0,Var1_Be_1,Var1_Bo_1,» Var2 «,Var2_Be_0_p,Var2_Bo_0_p,Var2_Be_1_p,Var2_Bo_1_p,/*» C16V x «,Var_I,» BlockNum «,BlockNum,*/» F X «,Sev[1,1],Sev[1,2],Sev[1,3],Sev[1,4],Sev[1,5],Sev[1,6],Sev[1,7],Sev[1,8],» PR «,bodypips[MaxInd_bodypips,0],» N_C «,N_Centro,» N_Gr20 «,N_Gr20,» N_Pet «,N_Petalo, » fP «,flower_Plus,/*» In_Ch1 «,insert_chanel_1,» In_Ch2 «,insert_chanel_2,» out_Dir «,output_Dir,» imp «,zaryad,*/» Dir z «,z_napravlenie,» F Z «,z_Sev[1,1],z_Sev[1,2],z_Sev[1,3],z_Sev[1,4],z_Sev[1,5],z_Sev[1,6],z_Sev[1,7],z_Sev[1,8]/*,» PM 1 «,Form_Patern_Finder[w,11],» 2 «,Form_Patern_Finder[w,26],» 3 «,Form_Patern_Finder[w,41],» 4 «,Form_Patern_Finder[w,56],» 5 «,Form_Patern_Finder[w,71],» 6 «,Form_Patern_Finder[w,86],» 7 «,Form_Patern_Finder[w,101],» 8 «,Form_Patern_Finder[w,116]/* » X «,Gx,» Y «,Gy/*» I CONT «,bodypips[MaxInd_bodypips,1],» O «,Onda1/*» ERR2 «, Sterr2*/);
FileClose(file_handle14);
}
}
}
//+——————————————————————+
//| Sunflower 1/0 – Cluster flower |
//+——————————————————————+
//Print(» PR «,bodypips[MaxInd_bodypips,0]);
//Comment(» Fly X «,Sev[1,1],Sev[1,2],Sev[1,3],Sev[1,4],Sev[1,5],Sev[1,6],Sev[1,7],Sev[1,8], » PR «,bodypips[MaxInd_bodypips,0],» Fly Z «,z_Sev[1,1],z_Sev[1,2],z_Sev[1,3],z_Sev[1,4],z_Sev[1,5],z_Sev[1,6],z_Sev[1,7],z_Sev[1,8]);
//—Были определены синапсные связи которые могут показывать на смену тенденции—//
//—Тип 1 Bo_0/Bo_1
//—Тип 2 Be_0/Be_1
//—Было выявленно чо нужно обратить внимание на цену каждого типа и индекс контейнера.
//Расчитать до конца этот механизм на подаче 2 переменных Также расчитать второй механизм и сравнить разницы сумм и вычитаний цифер.
//На разнице цифер вывести индикатор
// Привентить буквенную подачу в механизм
//Print(» IFb1 «,IFb1);
//if(IFb1==1441)//Запись данных в Массив и обнуление первичьного массива один раз в сутки
// {
//—–
//bintoarrTIME[IFb1]=iTime(Symbol(),0,1);//Пишу время предыдущей анализируемой свечи в массив
//Print( bintoarrTIME[IFb1]);
//—–
//int i;
//—загружаю в 2 массива данные о Бинарном коде, Времени и Цене
//int file_handle8=FileOpen(FileName8,FILE_READ|FILE_BIN);
//Print(» file_handle8 «,file_handle8);//Monitoring
//if(file_handle8>0)
//{
//FileSeek(file_handle8,0,SEEK_CUR);
//FileReadArray(file_handle8,BinaryToArray,0,WHOLE_ARRAY);//загрузка данных из файла в массив данных
//FileClose(file_handle8);
//}
//—Загрузка в массив базы данных о повторах бинарных ключей
//int file_handle11=FileOpen(FileName11,FILE_READ|FILE_BIN);
//Print(» file_handle8 «,file_handle8);//Monitoring
//if(file_handle11>0)
//{
//FileSeek(file_handle11,0,SEEK_CUR);
//FileReadArray(file_handle11,binrepit,0,WHOLE_ARRAY);//данны о полученых повторах.С
//FileClose(file_handle11);
//}
//int file_handle9=FileOpen(FileName9,FILE_READ|FILE_BIN);
//if(file_handle9>0)
//{
// FileSeek(file_handle9,0,SEEK_CUR);
// FileReadArray(file_handle9,BinaryToArrayBID,0,WHOLE_ARRAY);
// FileClose(file_handle9);
//}
// int file_handle10=FileOpen(FileName10,FILE_READ|FILE_BIN);
//if(file_handle10>0)
// {
//FileSeek(file_handle10,0,SEEK_CUR);
//FileReadArray(file_handle10,BinaryToArrayTIME,0,WHOLE_ARRAY);
//FileClose(file_handle10);
//}
//——————-
//for(i=1; i<32000; i++) //Получение индекса в заполненом массива
//{
//if(BinaryToArray[i,0]==10)
// {
// break;
//}
// }
//Print(«index «,i);
//–Перед записью в файлы нужно фильтрую на дубли с переносом во временный массив
//int ia=0;//индекс для перебора массива
//int ib=0;//индекс для перебора массива
//int ic=0;//индекс для перебора массива
//int id=0;//индекс для перебора массива
//int iei=0;
//int ie=1;
//for(ia=1; ia<20/*1442*/; ia++) //Получение индекса в заполненом массива
//{
//Print(«щёт ia «,ia);
// for(ib=1; ib<20/*32001*/; ib++) //Получение индекса в заполненом массива
// {
//Print(«щёт ib «,ib);
// for(ic=0; ic<20/*1002*/; ic++) //Получение индекса в заполненом массива
// {
// Print(«щёт ia «,ia,»щёт ib «,ib,»щёт ic «,ic);
//Print(» BinaryToArray[ib,ic] «,BinaryToArray[ib,ic],» bintoarr[ia,ic] «,bintoarr[ia,ic],» bintoarr[1,0] «,bintoarr[1,0],» bintoarr[1,1] «,bintoarr[1,1],» bintoarr[2,0] «,bintoarr[2,0],» bintoarr[2,1] «,bintoarr[2,1]);
//if(BinaryToArray[ib,ic]!=bintoarr[ia,ic])//Ищу не равенство в строке.Если хоть один элемент не равен то щитать как новая запись
//{
//—–Писать во временный фаил отфильтрованные сигналы с дальнейшей дозаписью
//Переносить во времменный массив все параметры
// for(id=0; id<20/*1002*/; id++)
// {
// permis=1;
// iei=ie;
//temparrbin[ie,id]=bintoarr[ia,id];//Присваиваю во временный массив не повторение полученное в результате отсева
//temparrbid[ie,id]=bintoarrBID[ia,id];//цена
//temparrtime[ie]=bintoarrTIME[ia];//
// Print(» temparrbin[ie,id] «,temparrbin[ie,id]);
//Print(» temparrbid[ie,id] «,temparrbid[ie,id]);
// Print(» temparrtime[ie] «,temparrtime[ie]);
//Print(» ie «,ie,» id «,id);
// Print(«щёт ie «,ie,»щёт id «,id);
// }
//ie++;//Увеличиваю номер строки на 1
//—Ошибкав доступе в массив
//if(ie>1441)//Если ие 1442 то прервать функцию
//{
// Print(» ie «,ie,» Break «);
// break;
// }
// Print(» ie «,ie);//
//}
//if(permis==1)
// {
// break;
// }
//break;
//if(iei<ie)
//{
//break;
//}
//—-Вписать сравнение на совместимость. Если совмещается сигнал то писать только время открытия свечи в массив.
//}
//}
//}
//file_handle8=FileOpen(FileName8,FILE_READ|FILE_WRITE|FILE_BIN);
//Print(» file_handle8 «,file_handle8);
//if(file_handle8>0)
// {
// FileSeek(file_handle8,0,SEEK_CUR);
// FileWriteArray(file_handle8,temparrbin,i,WHOLE_ARRAY);
// FileClose(file_handle8);
// }
//int file_handle9=FileOpen(FileName9,FILE_READ|FILE_WRITE|FILE_BIN);
// if(file_handle9>0)
// {
// FileSeek(file_handle9,0,SEEK_CUR);
//FileWriteArray(file_handle9,temparrbid,i,WHOLE_ARRAY);
//FileClose(file_handle9);
// }
// int file_handle10=FileOpen(FileName10,FILE_READ|FILE_WRITE|FILE_BIN);
//if(file_handle10>0)
//{
// FileSeek(file_handle10,0,SEEK_CUR);
//FileWriteArray(file_handle10,temparrtime,i,WHOLE_ARRAY);
//FileClose(file_handle10);
// }
//—Провожу запись в базу данных отобранных повторов – в базу нужно писать как время новых ключей так и время повторений
//————————————
//ArrayInitialize(bintoarr,10);//Перезагрузка массива после отгрузки в базу
//ArrayInitialize(temparrbin,10);
//ArrayInitialize(temparrbid,10);
//ArrayInitialize(temparrtime,10);
//ArrayInitialize(bintoarrBID,10);
//ArrayInitialize(bintoarrTIME,10);
//IFb1=0;//Индекс строки устанавливаю на 1
//IFb2=0;//Начинаю писать в строке с 0 позиции
//}
//if(IFb1<1441)
// {
// bintoarrTIME[IFb1]=iTime(Symbol(),0,1);//Пишу время предыдущей анализируемой свечи в массив
// IFb1++;//Увеличивание значения строки в массиве при наступлении нового бара.Запись будетпроизводится в следующую строку
// IFb2=0;//Начинаю писать в строке с 0 позиции
// }
//Print(» IFb1 «,IFb1,» IFb2 «, IFb2);//Мониторинг индексов массива
//———————
//+——————————————————————+
//|END Sunflower – sunflower seeds architecture |
//+——————————————————————+
ArrayInitialize(komp1,0);
ArrayInitialize(kompa,10);
//———————————————
int inr;
for(inr=1; inr<=99998; inr++)
{
if(Array_Errors==true)
{
Print(» Index Array «,inr,» 27665 «);


}
if(body[inr,0]==10)
{
break;
}
}
int inr1=inr-1;
for(int inb=1; inb<inr1; inb++)
{
if(Array_Errors==true)
{
Print(» Index Array «,inb,» 27679 «);


}
if(body[inb,0]>0 && body[inb+1,0]>0)
{
if(body[inb,0]==body[inb+1,0])
{
if((body[inb,1]==1 && body[inb+1,1]==0) || (body[inb,1]==0 && body[inb+1,1]==1))
{
komp1[inb]=body[inb,0];
kompa[inb]=body[inb,0];
}
}
}
if(body[inb,0]>0 && body[inb+1,0]==0)
{
if(body[inb,0]==body[inb+1,3])
{
if((body[inb,1]==1 && body[inb+1,1]==0) || (body[inb,1]==0 && body[inb+1,1]==1))
{
komp1[inb]=body[inb,0];
kompa[inb]= body[inb,0];
}
}
}
if(body[inb,0]==0 && body[inb+1,0]>0)
{
if(body[inb,3]==body[inb+1,0])
{
if((body[inb,1]==1 && body[inb+1,1]==0) || (body[inb,1]==0 && body[inb+1,1]==1))
{
komp1[inb]=body[inb,0];
kompa[inb]= body[inb,0];
}
}
}
}
int MinPriceSintezINDEX=ArrayMinimum(kompa,WHOLE_ARRAY,0);
double MinPriceSintez=(kompa[MinPriceSintezINDEX]);
//—————————————
int MaxPriceSintezINDEX=ArrayMaximum(kompa,WHOLE_ARRAY,0);
double MaxPriceSintez=(kompa[MaxPriceSintezINDEX]);
int file_handle17=FileOpen(FileName17,FILE_READ|FILE_WRITE,» «);
if(file_handle17>0)
{
FileSeek(file_handle17,0,SEEK_END);
FileWrite(file_handle17,Symbol(),» MinPriceSintezINDEX «,MinPriceSintezINDEX,» MaxPriceSintezINDEX «,MaxPriceSintezINDEX);
FileClose(file_handle17);
}
//+——————————————————————+
//|END Counter Summa 1/0 – Synapsys Indicator |
//+——————————————————————+
//+——————————————————————+
//| Counter Summa 1/0 – MaxBinNumber 1/0 |
//+——————————————————————+
//——-Arrays——
ArrayInitialize(ArrayMaximum_0,0);
ArrayInitialize(ArrayMaximum_1,0);
//—————Contador de ARRAY Identificacion de Index. Se identifica fin de relleno de datos
int i;
for(i=1; i<=99998; i++)
{
if(Array_Errors==true)
{
Print(» Index Array «,i,» 27744 «);


}
if(body[i,0]==10)
{
//Print(i);//index maximum donde acava array hay que restar 1 para saber ultimo dato
break;
}
}
//————–
int If=i-1;
//————————————-
int count_1=1;
int count_0=1;
int in1;//Index
int ArM1=1;
int ArM0=1;
int Permis=1;
//Print(If);
for(in1=1; in1<If; in1++)
{
if(Array_Errors==true)
{
Print(» Index Array «,in1,» 27768 «);


}
if(Permis==1)
{
if(body[in1,1]==body[in1+1,1] && body[in1,1]==1 && body[in1+1,1]==1)
{
count_1++;
}
if(body[in1,1]!=body[in1+1,1])
{
ArrayMaximum_1[ArM1]=count_1;//4
ArM1++;
Permis=0;
in1++;
count_1=1;
}
}
if(Permis==0)
{
if(body[in1,1]==body[in1+1,1] && body[in1,1]==0 && body[in1+1,1]==0)
{
count_0++;
}
if(body[in1,1]!=body[in1+1,1])
{
ArrayMaximum_0[ArM0]=count_0;
ArM0++;
Permis=1;
count_0=1;
}
}
}
MaxBinNumber_1Index=ArrayMaximum(ArrayMaximum_1,WHOLE_ARRAY,0);
MaxBinNumber_0Index=ArrayMaximum(ArrayMaximum_0,WHOLE_ARRAY,0);
MaxBinNumber_1=(ArrayMaximum_1[MaxBinNumber_1Index]);
MaxBinNumber_0=(ArrayMaximum_0[MaxBinNumber_0Index]);
// —– Compensation indicator—–
int compensation_1,compensation_2;
compensation_1=Maximum-MaxBinNumber_1;
compensation_2=Minimum+MaxBinNumber_0;
//Print(» compensation_1 «,compensation_1);
//Print(» compensation_2 «,compensation_2);
//+——————————————————————+
//| END Counter Summa 1/0 – MaxBinNumber 1/0 |
//+——————————————————————+
// ——— Test of received values ​​——–
//Print(» TIME «,iTime(Symbol(),0,1));
//Print(» Counter_Summa0 «,Counter_Summa0,» Counter_Summa1 «,Counter_Summa1);//OK
//Print(» IndexMaximum «,IndexMaximum,» IndexMinimum «,IndexMinimum);//
//Print(» Maximum «,Maximum,» Minimum «,Minimum);
//Print(» zeroindex «,zeroindex);
//Print(» MinPriceSintezINDEX «,MinPriceSintezINDEX,» MaxPriceSintezINDEX «,MaxPriceSintezINDEX);
//Print(» Sw_On «,Sw_On);
//Print(» MaxBinNumber_1 «,MaxBinNumber_1,» MaxBinNumber_0 «,MaxBinNumber_0);
//Print(» compensation_1 «,MaxMinArr[IndexMaximum]-MaxBinNumber_1,» compensation_2 «,MaxMinArr[IndexMinimum]+MaxBinNumber_0);
//Print(«Bo «,Bo,» Be «,Be);
//Print(«LasData «,LasData);
//——resepcion de indice del 0
for(i=1; i<=8; i++)
{
if(Array_Errors==true)
{
Print(» Index Array «,i,» 27832 «);


}

if(MaxMinArr[i,1]==0)
{
zeroindex=i;
break;
}
}
file_handle17=FileOpen(FileName17,FILE_READ|FILE_WRITE,» «);
if(file_handle17>0)
{
FileSeek(file_handle17,0,SEEK_END);
FileWrite(file_handle17,Symbol(),» zeroindex «,zeroindex);
FileClose(file_handle17);
}
//+——————————————————————+
//| Counter Summa 1/0 – MaxBinNumber 1/0 Signal processing |
//+——————————————————————+
// ————- Signal processing with classification and writing to the bbb_compare array —————– //
if(Rez_BE==0)
{
int ibbb;
for(ibbb=1; ibbb<=1680; ibbb++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ibbb,» 27861 «);


}
if(one_BE>15 && bbb[ibbb,0]==Maximum-MaxBinNumber_1 && bbb[ibbb,1]==Minimum+MaxBinNumber_0)
{
int ibb;
for(ibb=1; ibb<=9998; ibb++)
{
if(Array_Errors==true)
{
Print(» Index Array «,ibb,» 27872 «);


}
if(bbb_compare[ibb,0,ibbb]==0)
{
bbb_compare[ibb,0,ibbb]=iarw;
int SignalCuant=bbb_compare[1,1,ibbb];
SignalCuant++;
bbb_compare[1,1,ibbb]=SignalCuant;
int file_handle13=FileOpen(FileName13,FILE_READ|FILE_WRITE|FILE_BIN);
//Print(«HANDLE «,file_handle13);
if(file_handle13>0)
{
FileSeek(file_handle13,0,SEEK_CUR);
uint test =FileWriteArray(file_handle13,bbb_compare,0,WHOLE_ARRAY);
//Print(«WRITED «,test);
FileClose(file_handle13);
}
break;
}
}
}
}
}
//+——————————————————————+
//| END Counter Summa 1/0 – MaxBinNumber 1/0 Signal processing |
//+——————————————————————+
//—–брос переменных и массива
Counter1=0; //obnulyaem peremennye
Counter1_1 = 0;
Counter0 = 0;
Counter0_1 = 0;
Counter_Summa1 = 0;
Counter_Summa0 = 0;
Counter=0;
//+——————————————————————+
//|Counter Summa 1/0 – Generation of initial data |
//+——————————————————————+
ArrayInitialize(body,10);
//Print(«TEST1 WRITDATA «,» resOperandMax==PriceZero «,resOperandMax==PriceZero,» Maximum «,Maximum,» Minimum «,Minimum,» Rez_BE «,Rez_BE);
if(resOperandMax==PriceZero && (Maximum>0 || Maximum<0 || Maximum==0) && (Minimum>0 || Minimum<0 || Minimum==0) && Rez_BE==0)
{
//TextVisualIndicator=»SHORT»;
//Alert(«SHORT»);
//string signalgroup=IntegerToString(zeroindex);
//string Hora=TimeToString(iTime(Symbol(),0,1));
//string levelnotificacion=DoubleToString(one_BE);
//string message1=» TIME «+Hora+» SIGNAL NUMBER «+levelnotificacion+» SHORT «;
//SendNotification(message1);
//TelegramSendText(apikey,chatid,message1);
//SendNotification(«SHORT»);
//SendNotification(Hora);
//SendNotification(levelnotificacion);
ONE_BE=(int)one_BE;
file_handle4=FileOpen(FileName4,FILE_READ|FILE_WRITE,» «);
if(file_handle4>0)
{
FileSeek(file_handle4,0,SEEK_END);
FileWrite(file_handle4,» NEW SIGNAL «);
// FileWrite(file_handle4,»___________________________________________________________»);
// FileWrite(file_handle4,» SIMBOL | TIME | FONT | DIRECTION | PUSH |»);
// FileWrite(file_handle4,»¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯»);
FileWrite(file_handle4,Symbol(),» | «,iTime(Symbol(),0,1),» | «,ONE_BE,» | «,» SHORT «,» | «,zeroindex,» | «);
// FileWrite(file_handle4,»¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯»);
FileClose(file_handle4);
}
}
//—LONG Posicion
//Print(«TEST2 WRITDATA «,» resOperandMin==PriceZero «,resOperandMin==PriceZero,» Maximum «,Maximum,» Minimum «,Minimum,» Rez_BE «,Rez_BE);
if(resOperandMin==PriceZero && (Maximum>0 || Maximum<0 || Maximum==0) && (Minimum>0 || Minimum<0 || Minimum==0) && Rez_BE==0)
{
//TextVisualIndicator=»LONG»;
//Alert(«LONG»);
//string signalgroup=IntegerToString(zeroindex);
//string Hora1=TimeToString(iTime(Symbol(),0,1));
//string levelnotificacion1=DoubleToString(one_BE);
//string message2=» TIME «+Hora1+» SIGNAL NUMBER «+levelnotificacion1+» LONG «+signalgroup;
//SendNotification(message2); //
//TelegramSendText(apikey,chatid,message2);
//SendNotification(«LONG»);
//SendNotification(Hora);
//SendNotification(levelnotificacion);
file_handle4=FileOpen(FileName4,FILE_READ|FILE_WRITE,» «);if(file_handle4>0)
{
FileSeek(file_handle4,0,SEEK_END);
FileWrite(file_handle4,» NEW SIGNAL «);
// FileWrite(file_handle4,»_______________________________________________«);
// FileWrite(file_handle4,» SIMBOL | TIME | FONT | DIRECTION | PUSH |»);
// FileWrite(file_handle4,»¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯»);
FileWrite(file_handle4,Symbol(),» | «,iTime(Symbol(),0,1),» | «,ONE_BE,» | «,» LONG «,» | «,zeroindex,» | «);
//FileWrite(file_handle4,»¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯»);
FileClose(file_handle4);
}
}// Anadir excepcion de 10
double Copen=iOpen(Symbol(),0,1);
double Cclose=iClose(Symbol(),0,1);
if(Copen>Cclose)
{
CopenRes=Copen-MaxPriceSintez;
CcloseRes=MinPriceSintez-Cclose;
}
if(Copen0)
{
FileSeek(file_handle17,0,SEEK_END);
FileWrite(file_handle17,Symbol(),» MaxBinNumber_1 «,MaxBinNumber_1,» MaxBinNumber_0 «,MaxBinNumber_0);
FileClose(file_handle17);
}
if((resOperandMin==PriceZero || resOperandMax==PriceZero) && (Maximum>0 || Maximum<0 || Maximum==0) && (Minimum>0 || Minimum<0 || Minimum==0)) { if(printdesc1==1) { ObjectSetString(0,Obiektcampo1,OBJPROP_TEXT,TimeToString(iTime(Symbol(),0,1))); ObjectSetString(0,Obiektcampo7,OBJPROP_TEXT,IntegerToString(one_BE,3));//Obiektcampo7 – 11 ObjectSetString(0,Obiektcampo8,OBJPROP_TEXT,IntegerToString((int) Maximum,3)); ObjectSetString(0,Obiektcampo9,OBJPROP_TEXT,IntegerToString((int) Minimum,3)); ObjectSetString(0,Obiektcampo10,OBJPROP_TEXT,IntegerToString(MaxBinNumber_1,3)); ObjectSetString(0,Obiektcampo11,OBJPROP_TEXT,IntegerToString(MaxBinNumber_0,3)); ObjectSetString(0,Obiektcampo12,OBJPROP_TEXT,TextVisualIndicator); //printdesc1=0; //printdesc2=1; string priceZero=DoubleToStr(PriceZero,8);//Pole ceni zero ObjectDelete(Obiektcampo13);//Pole vivod Long ili Short ObjectCreate(Obiektcampo13,OBJ_BITMAP_LABEL,0,BrTime,HIGHT+0.00015); ObjectSetInteger(0,Obiektcampo13,OBJPROP_XDISTANCE,CHWPX-250); ObjectSetInteger(0,Obiektcampo13,OBJPROP_YDISTANCE,150); ObjectSetString(0,Obiektcampo13,OBJPROP_BMPFILE,priceZero); ObjectSetInteger(0,Obiektcampo13,OBJPROP_COLOR,clrRed); string pricemin=DoubleToStr(resOperandMin,8);//Pole ceni zero int PixMin=(int)(PriceZero-resOperandMin)*100000; ObjectDelete(Obiektcampo14); ObjectCreate(Obiektcampo14,OBJ_BITMAP_LABEL,0,BrTime,HIGHT+0.00015); ObjectSetInteger(0,Obiektcampo14,OBJPROP_XDISTANCE,CHWPX-230); ObjectSetInteger(0,Obiektcampo14,OBJPROP_YDISTANCE,150-PixMin); ObjectSetString(0,Obiektcampo14,OBJPROP_BMPFILE,pricemin); ObjectSetInteger(0,Obiektcampo14,OBJPROP_COLOR,clrGreen); string pricemax=DoubleToStr(resOperandMax,8);//Pole ceni zero int PixMax=(int)(resOperandMax-PriceZero)*100000; ObjectDelete(Obiektcampo15);//Pole cenizero ObjectCreate(Obiektcampo15,OBJ_BITMAP_LABEL,0,BrTime,HIGHT+0.00015); ObjectSetInteger(0,Obiektcampo15,OBJPROP_XDISTANCE,CHWPX-280); ObjectSetInteger(0,Obiektcampo15,OBJPROP_YDISTANCE,150-PixMax); ObjectSetString(0,Obiektcampo15,OBJPROP_BMPFILE,pricemax); ObjectSetInteger(0,Obiektcampo15,OBJPROP_COLOR,clrBlue); //operandopen //operandclose } } int Result_Compensation=compensation_1+compensation_2; int CompensationForGrafik=compensation_2*(-1); //Print(«TEST4 WRITDATA «,» resOperandMin==PriceZero «,resOperandMin==PriceZero,» resOperandMax==PriceZero «,resOperandMax==PriceZero,» Maximum «,Maximum,» Minimum «,Minimum,» Rez_BE «,Rez_BE); if((resOperandMin==PriceZero || resOperandMax==PriceZero) && (Maximum>0 || Maximum<0 || Maximum==0) && (Minimum>0 || Minimum<0 || Minimum==0) && Rez_BE==0) { int fg=0; fg++; //Print(» fg «,fg); file_handle4=FileOpen(FileName4,FILE_READ|FILE_WRITE,» «); if(file_handle4>0)
{
// — Direction change indicator —–
// The indicator remembers the last change of direction based on the compensation indicator
// If there is 0 in one or the other indicator, then the position in short or long changes
string Text_Switch=»No Data»;
Bool_Z=Maximum-MaxBinNumber_1;
Bear_Z=Minimum+MaxBinNumber_0;
//——————————————–
if(((Bool_Z>0 && Bear_Z==0)||(Bool_Z==0 && Bear_Z<0)) && Rez_BE==0 && one_BE>=1 && one_BE<=60) { Switch_L_S=1;// Position 1 means opening only long orders } if(((Bool_Z<0 && Bear_Z==0)||(Bool_Z==0 && Bear_Z>0)) && Rez_BE==0 && one_BE>=1 && one_BE<=60) { Switch_L_S=2;// Position 2 means opening only order shorts } if(Switch_L_S==1) { Text_Switch=»Switch_L_S — LONG»; } if(Switch_L_S==2) { Text_Switch=»Switch_L_S — SHORT»; } // — function Record price in the Market Events Log // — The prices of the UP5 / 8 i DOWSN5 / 8 levels are recorded double Price5ForWrite=0; double Price8ForWrite=0; if(Maximum-MaxBinNumber_1==0) { Price5ForWrite=IpaintFiboLineDOWN_5; Price8ForWrite=IpaintFiboLineDOWN_8; } if(Minimum+MaxBinNumber_0==0) { Price5ForWrite=IpaintFiboLineUP_5; Price8ForWrite=IpaintFiboLineUP_8; } BoolInd=NormalizeDouble((Maximum+MaxBinNumber_1)/(Minimum+MaxBinNumber_0),2);//Bool BearInd=NormalizeDouble((Minimum+MaxBinNumber_0)/(Maximum+MaxBinNumber_1),2);//Bear double SumaBoolBear=BoolInd+BearInd; // —– record the index number in the database —– // // load base from file into array int file_handle7=FileOpen(FileName7,FILE_READ|FILE_BIN); if(file_handle7>0)
{
FileSeek(file_handle7,0,SEEK_CUR);
FileReadArray(file_handle7,bodyAR,0,WHOLE_ARRAY);
FileClose(file_handle7);
}
for(iarw=1; iarw<=89999; iarw++)
{
if(Array_Errors==true)
{
Print(» Index Array «,iarw,» 28091 «);

             }
           if(bodyAR[iarw,0]==61)
             {
              //Print(" indexIAR = ",iar);
              break;
             }
          }
        //---------------------------------------------//
        FileSeek(file_handle4,0,SEEK_END);
        // FileWrite(file_handle4,"___________________________________________________________");
        // FileWrite(file_handle4," SIMBOL |         TIME         | FONT |  BOOL-F  | BEAR-F |");
        //FileWrite(file_handle4,"¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯");
        FileWrite(file_handle4,Symbol()," | ",iTime(Symbol(),0,1)," | ",ONE_BE," | ",Maximum-MaxBinNumber_1," | ",Minimum+MaxBinNumber_0," | ");
        // FileWrite(file_handle4,"¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯");
        // FileWrite(file_handle4," ",Text_Switch);
        // FileWrite(file_handle4,"¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯");
        // FileWrite(file_handle4," SIMBOL |         TIME         | FONT |  BOOL-N  | BEAR-N|");
        // FileWrite(file_handle4,"¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯");
        // FileWrite(file_handle4,Symbol()," | ",iTime(Symbol(),0,1)," | ",ONE_BE," | ",Maximum+MaxBinNumber_1," | ",Minimum+MaxBinNumber_0," | ");
        // FileWrite(file_handle4,"¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯");
        // FileWrite(file_handle4,Symbol()," | ",iTime(Symbol(),0,1)," | ",ONE_BE," | ",BoolInd," | ",BearInd," | ",SumaBoolBear);
        // FileWrite(file_handle4,"¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯");
        // FileWrite(file_handle4,Symbol()," | ",iTime(Symbol(),0,1)," | ",ONE_BE," | ",Price5ForWrite," | ",Price8ForWrite," | ");
        //FileWrite(file_handle4,"¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯");
        // FileWrite(file_handle4,"| INDEX in DB | ",iarw," | ");
        FileWrite(file_handle4,"¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯");
        FileClose(file_handle4);
       }

     // Load Data to .SCV to Joomla HikaShop


     //WRITE SELLER .TXT
     datetime DTTestdata=iTime(Symbol(),0,1);
     string TestTIme=TimeToStr(DTTestdata,TIME_DATE);

     datetime DTforFile=iTime(Symbol(),0,1);
     string DTySignal=TimeToStr(DTforFile,TIME_DATE|TIME_MINUTES);
     datetime TimeForTXT=iTime(Symbol(),0,1);
     int PowerF=ONE_BE;
     int BoolF=Maximum-MaxBinNumber_1;
     int BeerF=Minimum+MaxBinNumber_0;


     string FileName34="EurUsd-PositionData"+TestTIme+"_"+PowerF+"_"+BoolF+".txt";
     int file_handle34=FileOpen(FileName34,FILE_READ|FILE_WRITE|FILE_TXT);
     if(file_handle34>0)
       {
        FileSeek(file_handle34,0,SEEK_CUR);
        FileWrite(file_handle34,"                                                                                  ");
        FileWrite(file_handle34,"                                                                                  ");
        FileWrite(file_handle34,"                                                                                  ");
        FileWrite(file_handle34,"                                                                                  ");
        FileWrite(file_handle34,"|---------------------------------------*----------------------------------------|");//80 punktov
        FileWrite(file_handle34,"|-----------------------      TIME DATA FROM GLASS OK . ES ----------------------|");
        FileWrite(file_handle34,"|--------------------------------------------------------------------------------|");
        FileWrite(file_handle34,"|--  Thank you for participating in our development  ----------------------------|");
        FileWrite(file_handle34,"|--------------------------------------------------------------------------------|");
        FileWrite(file_handle34,"|--  You have just purchased a EURUSD signal  -----------------------------------|");
        FileWrite(file_handle34,"|--  for FOREX on the MQL4 platform  --------------------------------------------|");
        FileWrite(file_handle34,"|--------------------------------------------------------------------------------|");
        FileWrite(file_handle34,"|--  Here is the EXPERT URL that you can download for free  ---------------------|");
        FileWrite(file_handle34,"|--  Open a position in the market using the following signal based on  ---------|");
        FileWrite(file_handle34,"|-------------------         TIME, STRENGHT, and DENSITY        -----------------|");
        FileWrite(file_handle34,"|--  https://www.mql5.com/en/market/product/41101  ------------------------------|");
        FileWrite(file_handle34,"|--  You will find the Expert User Instructions at the same URL  ----------------|");
        FileWrite(file_handle34,"|--------------------------------------------------------------------------------|");
        FileWrite(file_handle34,"|--  The following data is for integration into the Expert program  -------------|");
        FileWrite(file_handle34,"|--------------------------------------------------------------------------------|");
        FileWrite(file_handle34,"|--  Expert's exact Opening "+TimeForTXT+"  --------------------------------|");//Usar Variables
        FileWrite(file_handle34,"|--------------------------------------------------------------------------------|");
        FileWrite(file_handle34,"|--  Binary Signal Strength  "+PowerF+"  ------------------------------------------------|");//Usar Variables
        FileWrite(file_handle34,"|--------------------------------------------------------------------------------|");
        FileWrite(file_handle34,"|--  BUFFALO Market Force   "+BoolF+"  -------------------------------------------------|");//Usar Variables
        FileWrite(file_handle34,"|--------------------------------------------------------------------------------|");
        FileWrite(file_handle34,"|--  BEAR Market Force       "+BeerF+"  -------------------------------------------------|");//Usar Variables
        FileWrite(file_handle34,"|--------------------------------------------------------------------------------|");
        FileWrite(file_handle34,"|--  You can open a STOP or LIMIT position  -------------------------------------|");
        FileWrite(file_handle34,"|--------------------------------------------------------------------------------|");
        FileWrite(file_handle34,"|--  The opening volumes are decided by you under your own responsibility  ------|");
        FileWrite(file_handle34,"|--  We also recommend opening positions with your credentials on a DEMO account |");
        FileWrite(file_handle34,"|--If you trade on a live account, we are not responsible for any losses or gains|");
        FileWrite(file_handle34,"|--------------------------------------------------------------------------------|");
        FileWrite(file_handle34,"|--  Feedback  ------------------------------------------------------------------|");
        FileWrite(file_handle34,"|--------------------------------------------------------------------------------|");
        FileWrite(file_handle34,"|--  Carrer Pubilla Cases 24 Atico 3 --------------------------------------------|");
        FileWrite(file_handle34,"|--  Hospitalet de Llobregat ----------------------------------------------------|");
        FileWrite(file_handle34,"|--  Barcelona 08906  Spain -----------------------------------------------------|");
        FileWrite(file_handle34,"|--------------------------------------------------------------------------------|");
        FileWrite(file_handle34,"|--  EMAIL info@glassko.es  -----------------------------------------------------|");
        FileWrite(file_handle34,"|--------------------------------------------------------------------------------|");
        FileWrite(file_handle34,"|--  Phone and Whatsupp +34671306552  -------------------------------------------|");
        FileWrite(file_handle34,"|--------------------------------------------------------------------------------|");
        FileWrite(file_handle34,"|--  WEB SAIT www.glassko.es  ---------------------------------------------------|");
        FileWrite(file_handle34,"|--------------------------------------------------------------------------------|");
        FileWrite(file_handle34,"|--  Profile Information  -------------------------------------------------------|");
        FileWrite(file_handle34,"|--------------------------------------------------------------------------------|");
        FileWrite(file_handle34,"|--  https://www.mql5.com/en/users/eugeniokp  -----------------------------------|");
        FileWrite(file_handle34,"|--------------------------------------------------------------------------------|");
        FileWrite(file_handle34,"|--------------------------------------------------------------------------------|");


        FileClose(file_handle34);
       }
     SendFTP(FileName34,NULL);

     if(ONE_BE>0)
       {

        int in;
        for(in=1; in<99999; in++)
          {
           //Print("IN1 ",TimeArrSignal_Int_Wordpress[49,1]);
           //Print("IN2 ",TimeArrSignal_Int_Wordpress[in,1]);

           //Print("INfor ",in);
           if(TimeArrSignal_Int_Wordpress[in,1]==0)
             {
              break;
             }

          }//end break

        //Присвоение поллученных данных в массив
        TimeArrSignal_Int_Wordpress[in,1]=ONE_BE;
        TimeArrSignal_Int_Wordpress[in,2]=PowerF;
        TimeArrSignal_Int_Wordpress[in,3]=BoolF;
        TimeArrSignal_Int_Wordpress[in,4]=BeerF;
        TimeArrSignal_Wordpress[in]=iTime(Symbol(),0,1);


        int file_handle42=FileOpen(FileName30,FILE_READ|FILE_WRITE|FILE_BIN);
        if(file_handle42>0)
          {
           FileSeek(file_handle42,0,SEEK_CUR);
           FileWriteArray(file_handle42,TimeArrSignal_Wordpress,0,WHOLE_ARRAY);
           FileClose(file_handle42);
          }


        int file_handle43=FileOpen(FileName31,FILE_READ|FILE_WRITE|FILE_BIN);
        if(file_handle43>0)
          {
           FileSeek(file_handle43,0,SEEK_CUR);
           FileWriteArray(file_handle43,TimeArrSignal_Int_Wordpress,0,WHOLE_ARRAY);
           FileClose(file_handle43);
          }


        for(in=98; in<9999; in++)
          {
           //Print("IN1 ",TimeArrSignal_Int_Wordpress[49,1]);
           //Print("IN2 ",TimeArrSignal_Int_Wordpress[in,1]);

           //Print("INfor ",in);
           if(TimeArrSignal_Int_Wordpress[in,1]==0)
             {
              break;
             }

          }

string w_PowerF=DoubleToStr(PowerF);
string w_BoolF=DoubleToStr(BoolF);
string w_BeerF=DoubleToStr(BeerF);
int file_handle33=FileOpen(FileName33,FILE_READ|FILE_WRITE|FILE_TXT);
{
//———————————————//
FileSeek(file_handle33,0,SEEK_END);
string PrVa1= IntegerToString((int)ONE_BE,0);
FileWrite(file_handle33,TestTIme,» «,»Curency – «,Symbol(),» «,»8 BITS C – «,Sev[1,1],Sev[1,2],Sev[1,3],Sev[1,4],Sev[1,5],Sev[1,6],Sev[1,7],Sev[1,8],»;»/#_p_n/,» Time – «,TestTIme,»,»,» F Of Signal – «,ONE_BE,»,»,» BE PR – «,Minimum+MaxBinNumber_0,»,»,» B P – «,Maximum-MaxBinNumber_1,»,», » Accesor URL for FREE – https://www.mql5.com/es/market/product/41101″,» ; «/#_p_d/,» EURUSD SIGNAL ROOT «,TestTIme,» ; «/#_p_p_t/,ONE_BE/#_price_value/,» 1 «,»;»/SKU/,in, «;»,» http://www.glassok.es/mql4DataFiles/»+FileName34,»;»/#_D URL/,» EurUsd-PositionDataDTySignal.txt «,»;»/#_D N/,»1″,»;»/#_D ID/,»http://www.glassok.es/wp-content/uploads/SignalNumbers/»+PowerF+».png»/#_ImageUrl/,»;», iTime(Symbol(),0,1),»;»/#_Longitud/,w_PowerF,»;»/#_Ancho/,w_BoolF,»;»/*#_Alto */,w_BeerF,»;»/*#_Peso */,»1″,»;»/#_Categoria/,»EurUsd»);

           FileClose(file_handle33);
          }

        //-----Пересмотр Массива с целью регенерации цены

        // 3 операции с вычитанием времени
        //



        // Запись нового сигнала в Массив - Сигнал без обработки

        FileDelete(FileName32);


        // Общий перебор всего массива со временем

        for(i=69; i<in; i++)
          {



           Time_from_Array=TimeArrSignal_Wordpress[i];//+

           // Comment(Result);

           //Извлекаем параметры из стринг и переводим в Число. Далее возвращаем в стринг и выводим 3 группы
           string str1=TimeToString(Time_from_Array);
           string test=StringSubstr(str1,5,2);

           string year=StringSubstr(str1,0,4);
           string mes=StringSubstr(str1,5,2);
           string day=StringSubstr(str1,8,2);
           string hora=StringSubstr(str1,11,2);
           string minutos=StringSubstr(str1,14,2);

           //конверт время в числа
           long Yeari=StringToInteger(year);
           long Mesi=StringToInteger(mes);
           long MesiC=StringToInteger(mes);
           long dayi=StringToInteger(day);
           long Horai=StringToInteger(hora);
           long minutai=StringToInteger(minutos);
           calcday=dayi;
           long Mes2=Mesi;


           //Print(dayi," ",Mesi);
           int check1=0;
           if(Mesi==01 && dayi==31 || Mesi==02 && dayi==28 || Mesi==02 && dayi==29 ||Mesi==03 && dayi==31 ||Mesi==04 && dayi==30 ||Mesi==05 && dayi==31 ||Mesi==06 && dayi==30 ||Mesi==07 && dayi==31 ||Mesi==08 && dayi==31 ||Mesi==09 && dayi==30 ||Mesi==10 && dayi==31 ||Mesi==11 && dayi==30 ||Mesi==12 && dayi==31)  //dic 31 +1 enero евраль добавить 28 29 с месяцем
             {
              int enerm=01,febm=02,marm=03,aprm=04,maym=05,junm=06,julm=07,agom=08,sepm=09,octm=10,novm=11,dicm=12;//mes
              int enerd=31,febd=28,mard=31,aprd=30,mayd=31,jund=30,juld=31,agod=31,sepd=30,octd=31,novd=30,dicd=31;//day


              if(Mesi==enerm && check1==0)
                {
                 ;   ///февр
                 Mesi=Mesi+1;
                 check1=1;
                 //day=33;
                }
              if(Mesi==febm && check1==0)
                {
                 //март
                 Mesi=Mesi+1;
                 check1=1;
                }
              if(Mesi==marm && check1==0)
                {
                 //апр
                 Mesi=Mesi+1;
                 check1=1;
                }
              if(Mesi==aprm && check1==0)
                {
                 //май
                 Mesi=Mesi+1;
                 check1=1;
                }
              if(Mesi==maym && check1==0)
                {
                 ;   //июнь
                 Mesi=Mesi+1;
                 check1=1;
                }
              if(Mesi==junm && check1==0)
                {
                 //июль
                 Mesi=Mesi+1;
                 check1=1;
                }
              if(Mesi==julm && check1==0)
                {
                 //авг
                 Mesi=Mesi+1;
                 check1=1;
                }
              if(Mesi==agom && check1==0)
                {
                 //сент
                 Mesi=Mesi+1;
                 check1=1;
                }
              if(Mesi==sepm && check1==0)
                {
                 Mesi=Mesi+1;
                 calcday=octd;
                 check1=1;   //окт
                }
              if(Mesi==octm && check1==0)
                {
                 //ноя
                 Mesi=Mesi+1;
                 check1=1;

                }
              if(Mesi==novm && check1==0)
                {
                 //дек
                 Mesi=Mesi+1;
                 check1=1;
                }
              if(Mesi==dicm && check1==0)
                {
                 //Январь
                 Mesi=enerm;
                 check1=1;
                }



              //Comment(calcday," ",Mesi);
              //Возврат значений в формат тайм для сравнения
              //string nueva = StringSubstr(str1,1,5);
              //Разделяем Элементы месяц на 2 части
              string mesiStr= IntegerToString(Mesi,2);

              string simb1=StringSubstr(mesiStr,0,1);

              string simb2=StringSubstr(mesiStr,1,1);

              int simbInt=StringToInteger(simb1);

              //Print(mesiStr," mes ",simb1," ",simb2);//ok


              int UshortSimb1,IntegerSImb1;
              int simB1=StringToInteger(simb1);
              IntegerSImb1=simB1;
              if(IntegerSImb1==0)
                {
                 UshortSimb1=48;
                }
              if(IntegerSImb1==1)
                {
                 UshortSimb1=49;
                }
              if(IntegerSImb1==2)
                {
                 UshortSimb1=50;
                }
              if(IntegerSImb1==3)
                {
                 UshortSimb1=51;
                }
              if(IntegerSImb1==4)
                {
                 UshortSimb1=52;
                }
              if(IntegerSImb1==5)
                {
                 UshortSimb1=53;
                }
              if(IntegerSImb1==6)
                {
                 UshortSimb1=54;
                }
              if(IntegerSImb1==7)
                {
                 UshortSimb1=55;
                }
              if(IntegerSImb1==8)
                {
                 UshortSimb1=56;
                }
              if(IntegerSImb1==9)
                {
                 UshortSimb1=57;
                }
              //Print(Ushort);
              string retsimb=StringSetChar(str1,5,UshortSimb1);//тильды по одному символу
              //Print(retsimb); // Результат: ABXDE
              //замена второго символа месяца


              int UshortSimb2,IntegerSImb2;
              int simB2=StringToInteger(simb2);
              IntegerSImb2=simB2;
              if(IntegerSImb2==0)
                {
                 UshortSimb2=48;
                }
              if(IntegerSImb2==1)
                {
                 UshortSimb2=49;
                }
              if(IntegerSImb2==2)
                {
                 UshortSimb2=50;
                }
              if(IntegerSImb2==3)
                {
                 UshortSimb2=51;
                }
              if(IntegerSImb2==4)
                {
                 UshortSimb2=52;
                }
              if(IntegerSImb2==5)
                {
                 UshortSimb2=53;
                }
              if(IntegerSImb2==6)
                {
                 UshortSimb2=54;
                }
              if(IntegerSImb2==7)
                {
                 UshortSimb2=55;
                }
              if(IntegerSImb2==8)
                {
                 UshortSimb2=56;
                }
              if(IntegerSImb2==9)
                {
                 UshortSimb2=57;
                }

              string retsimb1=StringSetChar(retsimb,6,UshortSimb2);
              //Print(retsimb1," ",UshortSimb1," ",UshortSimb2);//Дневная позиция установленна


              //установка дневной позиции

              string deiiStr= IntegerToString(calcday,2);

              string simb3="0";

              string simb4="1";

              int simbInt2=StringToInteger(simb3);
              //Print(simb3," ",simb4);//ok

              int UshortSimb3,IntegerSImb3;
              int simB3=StringToInteger(simb3);
              IntegerSImb3=simB3;
              if(IntegerSImb3==0)
                {
                 UshortSimb3=48;
                }
              if(IntegerSImb3==1)
                {
                 UshortSimb3=49;
                }
              if(IntegerSImb3==2)
                {
                 UshortSimb3=50;
                }
              if(IntegerSImb3==3)
                {
                 UshortSimb3=51;
                }
              if(IntegerSImb3==4)
                {
                 UshortSimb3=52;
                }
              if(IntegerSImb3==5)
                {
                 UshortSimb3=53;
                }
              if(IntegerSImb3==6)
                {
                 UshortSimb3=54;
                }
              if(IntegerSImb3==7)
                {
                 UshortSimb3=55;
                }
              if(IntegerSImb3==8)
                {
                 UshortSimb3=56;
                }
              if(IntegerSImb3==9)
                {
                 UshortSimb3=57;
                }
              //Print(Ushort);
              string retsimb2=StringSetChar(retsimb1,8,UshortSimb3);
              //Print(retsimb2);//ok


              int UshortSimb4,IntegerSImb4;
              int simB4=StringToInteger(simb4);
              IntegerSImb4=simB4;
              if(IntegerSImb4==0)
                {
                 UshortSimb4=48;
                }
              if(IntegerSImb4==1)
                {
                 UshortSimb4=49;
                }
              if(IntegerSImb4==2)
                {
                 UshortSimb4=50;
                }
              if(IntegerSImb4==3)
                {
                 UshortSimb4=51;
                }
              if(IntegerSImb4==4)
                {
                 UshortSimb4=52;
                }
              if(IntegerSImb4==5)
                {
                 UshortSimb4=53;
                }
              if(IntegerSImb4==6)
                {
                 UshortSimb4=54;
                }
              if(IntegerSImb4==7)
                {
                 UshortSimb4=55;
                }
              if(IntegerSImb4==8)
                {
                 UshortSimb4=56;
                }
              if(IntegerSImb4==9)
                {
                 UshortSimb4=57;
                }

              retsimb3=StringSetChar(retsimb2,9,UshortSimb4);


              //  Print("Y ",MesiC);
              //Print(mesiStri," dm ",deiiStri);
              if(MesiC==12) //Обрабатываем Год
                {

                 Yearf=Yeari+1;

                 string yearStr=IntegerToString(Yearf,4);

                 string simb7=StringSubstr(yearStr,0,1);
                 string simb8=StringSubstr(yearStr,1,1);
                 string simb9=StringSubstr(yearStr,2,1);
                 string simb10=StringSubstr(yearStr,3,1);

                 int UshortSimb7,IntegerSImb7;
                 int simB7=StringToInteger(simb7);
                 IntegerSImb7=simB7;
                 if(IntegerSImb7==0)
                   {
                    UshortSimb7=48;
                   }
                 if(IntegerSImb7==1)
                   {
                    UshortSimb7=49;
                   }
                 if(IntegerSImb7==2)
                   {
                    UshortSimb7=50;
                   }
                 if(IntegerSImb7==3)
                   {
                    UshortSimb7=51;
                   }
                 if(IntegerSImb7==4)
                   {
                    UshortSimb7=52;
                   }
                 if(IntegerSImb7==5)
                   {
                    UshortSimb7=53;
                   }
                 if(IntegerSImb7==6)
                   {
                    UshortSimb7=54;
                   }
                 if(IntegerSImb7==7)
                   {
                    UshortSimb7=55;
                   }
                 if(IntegerSImb7==8)
                   {
                    UshortSimb7=56;
                   }
                 if(IntegerSImb7==9)
                   {
                    UshortSimb7=57;
                   }
                 string retsimb6=StringSetChar(retsimb3,0,UshortSimb7);
                 //Print("res ",retsimb6);
                 int UshortSimb8,IntegerSImb8;
                 int simB8=StringToInteger(simb8);
                 IntegerSImb8=simB8;
                 if(IntegerSImb8==0)
                   {
                    UshortSimb8=48;
                   }
                 if(IntegerSImb8==1)
                   {
                    UshortSimb8=49;
                   }
                 if(IntegerSImb8==2)
                   {
                    UshortSimb8=50;
                   }
                 if(IntegerSImb8==3)
                   {
                    UshortSimb8=51;
                   }
                 if(IntegerSImb8==4)
                   {
                    UshortSimb8=52;
                   }
                 if(IntegerSImb8==5)
                   {
                    UshortSimb8=53;
                   }
                 if(IntegerSImb8==6)
                   {
                    UshortSimb8=54;
                   }
                 if(IntegerSImb8==7)
                   {
                    UshortSimb8=55;
                   }
                 if(IntegerSImb8==8)
                   {
                    UshortSimb8=56;
                   }
                 if(IntegerSImb8==9)
                   {
                    UshortSimb8=57;
                   }
                 string retsimb7=StringSetChar(retsimb6,1,UshortSimb8);

                 //Print("res ",retsimb7);


                 //Print("res ",retsimb6);
                 int UshortSimb9,IntegerSImb9;
                 int simB9=StringToInteger(simb9);
                 IntegerSImb9=simB9;
                 if(IntegerSImb9==0)
                   {
                    UshortSimb9=48;
                   }
                 if(IntegerSImb9==1)
                   {
                    UshortSimb9=49;
                   }
                 if(IntegerSImb9==2)
                   {
                    UshortSimb9=50;
                   }
                 if(IntegerSImb9==3)
                   {
                    UshortSimb9=51;
                   }
                 if(IntegerSImb9==4)
                   {
                    UshortSimb9=52;
                   }
                 if(IntegerSImb9==5)
                   {
                    UshortSimb9=53;
                   }
                 if(IntegerSImb9==6)
                   {
                    UshortSimb9=54;
                   }
                 if(IntegerSImb9==7)
                   {
                    UshortSimb9=55;
                   }
                 if(IntegerSImb9==8)
                   {
                    UshortSimb9=56;
                   }
                 if(IntegerSImb9==9)
                   {
                    UshortSimb9=57;
                   }
                 string retsimb8=StringSetChar(retsimb7,2,UshortSimb9);

                 //Print("res ",retsimb8);


                 //Print("res ",retsimb6);
                 int UshortSimb10,IntegerSImb10;
                 int simB10=StringToInteger(simb10);
                 IntegerSImb10=simB10;
                 if(IntegerSImb10==0)
                   {
                    UshortSimb10=48;
                   }
                 if(IntegerSImb10==1)
                   {
                    UshortSimb10=49;
                   }
                 if(IntegerSImb10==2)
                   {
                    UshortSimb10=50;
                   }
                 if(IntegerSImb10==3)
                   {
                    UshortSimb10=51;
                   }
                 if(IntegerSImb10==4)
                   {
                    UshortSimb10=52;
                   }
                 if(IntegerSImb10==5)
                   {
                    UshortSimb10=53;
                   }
                 if(IntegerSImb10==6)
                   {
                    UshortSimb10=54;
                   }
                 if(IntegerSImb10==7)
                   {
                    UshortSimb10=55;
                   }
                 if(IntegerSImb10==8)
                   {
                    UshortSimb10=56;
                   }
                 if(IntegerSImb10==9)
                   {
                    UshortSimb10=57;
                   }
                 retsimb3=StringSetChar(retsimb8,3,UshortSimb10);

                 //Print("res ",retsimb9);

                }

              //Print(retsimb3);//Дневная позиция установленна
             }//End of the funcion


           //Формула расчёта вычитания времени
           //Print(dayi,"day",Mesi);

           if(Mes2==01 && dayi!=31 && dayi<31|| Mes2==02 && dayi!=28 && dayi<28 || Mes2==02 && dayi!=29 && dayi<29||Mes2==03 && dayi!=31 && dayi<31 ||Mes2==04 && dayi!=30 && dayi<30||Mes2==05 && dayi!=31 && dayi<31 ||Mes2==06 && dayi!=30 && dayi<30 ||Mes2==07 && dayi!=31 && dayi<31 ||Mes2==08 && dayi!=31 && dayi<31||Mes2==09 && dayi!=30 && dayi<30||Mes2==10 && dayi!=31 && dayi<31||Mes2==11 && dayi!=30 && dayi<30 ||Mes2==12 && dayi!=31)
             {


              calcday=dayi+1;// Получаем плюс 1 день


              //Print(Mes2," cd ",dayi);
              long calcdayL=calcday;
              string deiiStr= IntegerToString(calcdayL,2);

              string simb5=StringSubstr(deiiStr,0,1);

              string simb6=StringSubstr(deiiStr,1,1);
              //Print(" pr ",simb5,"  pr ",simb6);
              int simb5I;
              if(calcdayL<10)
                {simb5I=0; simb5=IntegerToString(simb5I);}//установка значения 0 если переменная меньше 10



              //Print(calcday," ",simb5," ",simb6);

              int UshortSimb5,IntegerSImb5;
              int simB5=StringToInteger(simb5);
              IntegerSImb5=simB5;
              if(IntegerSImb5==0)
                {
                 UshortSimb5=48;
                }
              if(IntegerSImb5==1)
                {
                 UshortSimb5=49;
                }
              if(IntegerSImb5==2)
                {
                 UshortSimb5=50;
                }
              if(IntegerSImb5==3)
                {
                 UshortSimb5=51;
                }
              if(IntegerSImb5==4)
                {
                 UshortSimb5=52;
                }
              if(IntegerSImb5==5)
                {
                 UshortSimb5=53;
                }
              if(IntegerSImb5==6)
                {
                 UshortSimb5=54;
                }
              if(IntegerSImb5==7)
                {
                 UshortSimb5=55;
                }
              if(IntegerSImb5==8)
                {
                 UshortSimb5=56;
                }
              if(IntegerSImb5==9)
                {
                 UshortSimb5=57;
                }
              retsimb4=StringSetChar(str1,8,UshortSimb5);
              // Print(retsimb4," ",UshortSimb5);

              int UshortSimb6,IntegerSImb6;
              int simB6=StringToInteger(simb6);
              IntegerSImb6=simB6;
              if(IntegerSImb6==0)
                {
                 UshortSimb6=48;
                }
              if(IntegerSImb6==1)
                {
                 UshortSimb6=49;
                }
              if(IntegerSImb6==2)
                {
                 UshortSimb6=50;
                }
              if(IntegerSImb6==3)
                {
                 UshortSimb6=51;
                }
              if(IntegerSImb6==4)
                {
                 UshortSimb6=52;
                }
              if(IntegerSImb6==5)
                {
                 UshortSimb6=53;
                }
              if(IntegerSImb6==6)
                {
                 UshortSimb6=54;
                }
              if(IntegerSImb6==7)
                {
                 UshortSimb6=55;
                }
              if(IntegerSImb6==8)
                {
                 UshortSimb6=56;
                }
              if(IntegerSImb6==9)
                {
                 UshortSimb6=57;
                }
              retsimb5=StringSetChar(retsimb4,9,UshortSimb6);

             }

           //Print("res3 ",retsimb3);//Время с Изменением года
           //Print("res5 ",retsimb5);//Время без изменения года
           //----------------------------------------------------------------------------



           str1=TimeToString(Time_from_Array);
           test=StringSubstr(str1,5,2);

           year=StringSubstr(str1,0,4);
           mes=StringSubstr(str1,5,2);
           day=StringSubstr(str1,8,2);
           hora=StringSubstr(str1,11,2);
           minutos=StringSubstr(str1,14,2);

           //конверт время в числа
           Yeari=StringToInteger(year);
           Mesi=StringToInteger(mes);
           MesiC=StringToInteger(mes);
           dayi=StringToInteger(day);
           Horai=StringToInteger(hora);
           minutai=StringToInteger(minutos);
           calcday=dayi;
           Mes2=Mesi;


           //Print(dayi," ",Mesi);
           check1=0;
           if(Mesi==01 && dayi==31 || Mesi==02 && dayi==28 || Mesi==02 && dayi==29 ||Mesi==03 && dayi==31 ||Mesi==04 && dayi==30 ||Mesi==05 && dayi==31 ||Mesi==06 && dayi==30 ||Mesi==07 && dayi==31 ||Mesi==08 && dayi==31 ||Mesi==09 && dayi==30 ||Mesi==10 && dayi==31 ||Mesi==11 && dayi==30 ||Mesi==12 && dayi==31)  //dic 31 +1 enero евраль добавить 28 29 с месяцем
             {
              int enerm=01,febm=02,marm=03,aprm=04,maym=05,junm=06,julm=07,agom=08,sepm=09,octm=10,novm=11,dicm=12;//mes
              int enerd=31,febd=28,mard=31,aprd=30,mayd=31,jund=30,juld=31,agod=31,sepd=30,octd=31,novd=30,dicd=31;//day


              if(Mesi==enerm && check1==0)
                {
                 ;   ///февр
                 Mesi=Mesi+1;
                 check1=1;
                 //day=33;
                }
              if(Mesi==febm && check1==0)
                {
                 //март
                 Mesi=Mesi+1;
                 check1=1;
                }
              if(Mesi==marm && check1==0)
                {
                 //апр
                 Mesi=Mesi+1;
                 check1=1;
                }
              if(Mesi==aprm && check1==0)
                {
                 //май
                 Mesi=Mesi+1;
                 check1=1;
                }
              if(Mesi==maym && check1==0)
                {
                 ;   //июнь
                 Mesi=Mesi+1;
                 check1=1;
                }
              if(Mesi==junm && check1==0)
                {
                 //июль
                 Mesi=Mesi+1;
                 check1=1;
                }
              if(Mesi==julm && check1==0)
                {
                 //авг
                 Mesi=Mesi+1;
                 check1=1;
                }
              if(Mesi==agom && check1==0)
                {
                 //сент
                 Mesi=Mesi+1;
                 check1=1;
                }
              if(Mesi==sepm && check1==0)
                {
                 Mesi=Mesi+1;
                 calcday=octd;
                 check1=1;   //окт
                }
              if(Mesi==octm && check1==0)
                {
                 //ноя
                 Mesi=Mesi+1;
                 check1=1;

                }
              if(Mesi==novm && check1==0)
                {
                 //дек
                 Mesi=Mesi+1;
                 check1=1;
                }
              if(Mesi==dicm && check1==0)
                {
                 //Январь
                 Mesi=enerm;
                 check1=1;
                }



              //Comment(calcday," ",Mesi);
              //Возврат значений в формат тайм для сравнения
              //string nueva = StringSubstr(str1,1,5);
              //Разделяем Элементы месяц на 2 части
              string mesiStr= IntegerToString(Mesi,2);

              string simb1=StringSubstr(mesiStr,0,1);

              string simb2=StringSubstr(mesiStr,1,1);

              int simbInt=StringToInteger(simb1);

              //  Print(mesiStr," mes ",simb1," ",simb2);//ok


              int UshortSimb1,IntegerSImb1;
              int simB1=StringToInteger(simb1);
              IntegerSImb1=simB1;
              if(IntegerSImb1==0)
                {
                 UshortSimb1=48;
                }
              if(IntegerSImb1==1)
                {
                 UshortSimb1=49;
                }
              if(IntegerSImb1==2)
                {
                 UshortSimb1=50;
                }
              if(IntegerSImb1==3)
                {
                 UshortSimb1=51;
                }
              if(IntegerSImb1==4)
                {
                 UshortSimb1=52;
                }
              if(IntegerSImb1==5)
                {
                 UshortSimb1=53;
                }
              if(IntegerSImb1==6)
                {
                 UshortSimb1=54;
                }
              if(IntegerSImb1==7)
                {
                 UshortSimb1=55;
                }
              if(IntegerSImb1==8)
                {
                 UshortSimb1=56;
                }
              if(IntegerSImb1==9)
                {
                 UshortSimb1=57;
                }
              //Print(Ushort);
              string retsimb=StringSetChar(str1,5,UshortSimb1);//тильды по одному символу
              //Print(retsimb); // Результат: ABXDE
              //замена второго символа месяца


              int UshortSimb2,IntegerSImb2;
              int simB2=StringToInteger(simb2);
              IntegerSImb2=simB2;
              if(IntegerSImb2==0)
                {
                 UshortSimb2=48;
                }
              if(IntegerSImb2==1)
                {
                 UshortSimb2=49;
                }
              if(IntegerSImb2==2)
                {
                 UshortSimb2=50;
                }
              if(IntegerSImb2==3)
                {
                 UshortSimb2=51;
                }
              if(IntegerSImb2==4)
                {
                 UshortSimb2=52;
                }
              if(IntegerSImb2==5)
                {
                 UshortSimb2=53;
                }
              if(IntegerSImb2==6)
                {
                 UshortSimb2=54;
                }
              if(IntegerSImb2==7)
                {
                 UshortSimb2=55;
                }
              if(IntegerSImb2==8)
                {
                 UshortSimb2=56;
                }
              if(IntegerSImb2==9)
                {
                 UshortSimb2=57;
                }

              string retsimb1=StringSetChar(retsimb,6,UshortSimb2);
              //Print(retsimb1," ",UshortSimb1," ",UshortSimb2);//Дневная позиция установленна


              //установка дневной позиции

              string deiiStr= IntegerToString(calcday,2);

              string simb3="0";

              string simb4="7";

              int simbInt2=StringToInteger(simb3);
              //Print(simb3," ",simb4);//ok

              int UshortSimb3,IntegerSImb3;
              int simB3=StringToInteger(simb3);
              IntegerSImb3=simB3;
              if(IntegerSImb3==0)
                {
                 UshortSimb3=48;
                }
              if(IntegerSImb3==1)
                {
                 UshortSimb3=49;
                }
              if(IntegerSImb3==2)
                {
                 UshortSimb3=50;
                }
              if(IntegerSImb3==3)
                {
                 UshortSimb3=51;
                }
              if(IntegerSImb3==4)
                {
                 UshortSimb3=52;
                }
              if(IntegerSImb3==5)
                {
                 UshortSimb3=53;
                }
              if(IntegerSImb3==6)
                {
                 UshortSimb3=54;
                }
              if(IntegerSImb3==7)
                {
                 UshortSimb3=55;
                }
              if(IntegerSImb3==8)
                {
                 UshortSimb3=56;
                }
              if(IntegerSImb3==9)
                {
                 UshortSimb3=57;
                }
              //Print(Ushort);
              string retsimb2=StringSetChar(retsimb1,8,UshortSimb3);
              //Print(retsimb2);//ok


              int UshortSimb4,IntegerSImb4;
              int simB4=StringToInteger(simb4);
              IntegerSImb4=simB4;
              if(IntegerSImb4==0)
                {
                 UshortSimb4=48;
                }
              if(IntegerSImb4==1)
                {
                 UshortSimb4=49;
                }
              if(IntegerSImb4==2)
                {
                 UshortSimb4=50;
                }
              if(IntegerSImb4==3)
                {
                 UshortSimb4=51;
                }
              if(IntegerSImb4==4)
                {
                 UshortSimb4=52;
                }
              if(IntegerSImb4==5)
                {
                 UshortSimb4=53;
                }
              if(IntegerSImb4==6)
                {
                 UshortSimb4=54;
                }
              if(IntegerSImb4==7)
                {
                 UshortSimb4=55;
                }
              if(IntegerSImb4==8)
                {
                 UshortSimb4=56;
                }
              if(IntegerSImb4==9)
                {
                 UshortSimb4=57;
                }

              retsimb13=StringSetChar(retsimb2,9,UshortSimb4);


              //   Print("Y ",MesiC);
              //Print(mesiStri," dm ",deiiStri);
              if(MesiC==12) //Обрабатываем Год
                {

                 Yearf=Yeari+1;

                 string yearStr=IntegerToString(Yearf,4);

                 string simb7=StringSubstr(yearStr,0,1);
                 string simb8=StringSubstr(yearStr,1,1);
                 string simb9=StringSubstr(yearStr,2,1);
                 string simb10=StringSubstr(yearStr,3,1);

                 int UshortSimb7,IntegerSImb7;
                 int simB7=StringToInteger(simb7);
                 IntegerSImb7=simB7;
                 if(IntegerSImb7==0)
                   {
                    UshortSimb7=48;
                   }
                 if(IntegerSImb7==1)
                   {
                    UshortSimb7=49;
                   }
                 if(IntegerSImb7==2)
                   {
                    UshortSimb7=50;
                   }
                 if(IntegerSImb7==3)
                   {
                    UshortSimb7=51;
                   }
                 if(IntegerSImb7==4)
                   {
                    UshortSimb7=52;
                   }
                 if(IntegerSImb7==5)
                   {
                    UshortSimb7=53;
                   }
                 if(IntegerSImb7==6)
                   {
                    UshortSimb7=54;
                   }
                 if(IntegerSImb7==7)
                   {
                    UshortSimb7=55;
                   }
                 if(IntegerSImb7==8)
                   {
                    UshortSimb7=56;
                   }
                 if(IntegerSImb7==9)
                   {
                    UshortSimb7=57;
                   }
                 string retsimb6=StringSetChar(retsimb13,0,UshortSimb7);
                 //Print("res ",retsimb6);
                 int UshortSimb8,IntegerSImb8;
                 int simB8=StringToInteger(simb8);
                 IntegerSImb8=simB8;
                 if(IntegerSImb8==0)
                   {
                    UshortSimb8=48;
                   }
                 if(IntegerSImb8==1)
                   {
                    UshortSimb8=49;
                   }
                 if(IntegerSImb8==2)
                   {
                    UshortSimb8=50;
                   }
                 if(IntegerSImb8==3)
                   {
                    UshortSimb8=51;
                   }
                 if(IntegerSImb8==4)
                   {
                    UshortSimb8=52;
                   }
                 if(IntegerSImb8==5)
                   {
                    UshortSimb8=53;
                   }
                 if(IntegerSImb8==6)
                   {
                    UshortSimb8=54;
                   }
                 if(IntegerSImb8==7)
                   {
                    UshortSimb8=55;
                   }
                 if(IntegerSImb8==8)
                   {
                    UshortSimb8=56;
                   }
                 if(IntegerSImb8==9)
                   {
                    UshortSimb8=57;
                   }
                 string retsimb7=StringSetChar(retsimb6,1,UshortSimb8);

                 //Print("res ",retsimb7);


                 //Print("res ",retsimb6);
                 int UshortSimb9,IntegerSImb9;
                 int simB9=StringToInteger(simb9);
                 IntegerSImb9=simB9;
                 if(IntegerSImb9==0)
                   {
                    UshortSimb9=48;
                   }
                 if(IntegerSImb9==1)
                   {
                    UshortSimb9=49;
                   }
                 if(IntegerSImb9==2)
                   {
                    UshortSimb9=50;
                   }
                 if(IntegerSImb9==3)
                   {
                    UshortSimb9=51;
                   }
                 if(IntegerSImb9==4)
                   {
                    UshortSimb9=52;
                   }
                 if(IntegerSImb9==5)
                   {
                    UshortSimb9=53;
                   }
                 if(IntegerSImb9==6)
                   {
                    UshortSimb9=54;
                   }
                 if(IntegerSImb9==7)
                   {
                    UshortSimb9=55;
                   }
                 if(IntegerSImb9==8)
                   {
                    UshortSimb9=56;
                   }
                 if(IntegerSImb9==9)
                   {
                    UshortSimb9=57;
                   }
                 string retsimb8=StringSetChar(retsimb7,2,UshortSimb9);

                 //Print("res ",retsimb8);


                 //Print("res ",retsimb6);
                 int UshortSimb10,IntegerSImb10;
                 int simB10=StringToInteger(simb10);
                 IntegerSImb10=simB10;
                 if(IntegerSImb10==0)
                   {
                    UshortSimb10=48;
                   }
                 if(IntegerSImb10==1)
                   {
                    UshortSimb10=49;
                   }
                 if(IntegerSImb10==2)
                   {
                    UshortSimb10=50;
                   }
                 if(IntegerSImb10==3)
                   {
                    UshortSimb10=51;
                   }
                 if(IntegerSImb10==4)
                   {
                    UshortSimb10=52;
                   }
                 if(IntegerSImb10==5)
                   {
                    UshortSimb10=53;
                   }
                 if(IntegerSImb10==6)
                   {
                    UshortSimb10=54;
                   }
                 if(IntegerSImb10==7)
                   {
                    UshortSimb10=55;
                   }
                 if(IntegerSImb10==8)
                   {
                    UshortSimb10=56;
                   }
                 if(IntegerSImb10==9)
                   {
                    UshortSimb10=57;
                   }
                 retsimb13=StringSetChar(retsimb8,3,UshortSimb10);

                 //Print("res ",retsimb9);

                }

              //Print(retsimb3);//Дневная позиция установленна
             }//End of the funcion


           //Формула расчёта вычитания времени
           //Print(dayi,"day",dayi<31-7);

           if(Mes2==01 && dayi!=31 || Mes2==02 && dayi!=28  || Mes2==02 && dayi!=29|| Mes2==03 && dayi!=31  || Mes2==04 && dayi!=30 || Mes2==05 && dayi!=31 || Mes2==06 && dayi!=30  || Mes2==07 && dayi!=31  || Mes2==08 && dayi!=31 || Mes2==09 && dayi!=30 || Mes2==10 && dayi!=31 || Mes2==11 && dayi!=30  || Mes2==12 && dayi!=31)
             {

              if(Mes2==01 && dayi<31-7)
                {
                 calcday=dayi+7;
                }// Получаем плюс 1 день}
              if(Mes2==02 && dayi<28-7)
                {
                 calcday=dayi+7;
                }// Получаем плюс 1 день}
              if(Mes2==02 && dayi<29-7)
                {
                 calcday=dayi+7;
                }// Получаем плюс 1 день}
              if(Mes2==03 && dayi<31-7)
                {
                 calcday=dayi+7;
                }// Получаем плюс 1 день}
              if(Mes2==04 && dayi<30-7)
                {
                 calcday=dayi+7;
                }// Получаем плюс 1 день}
              if(Mes2==05 && dayi<31-7)
                {
                 calcday=dayi+7;
                }// Получаем плюс 1 день}
              if(Mes2==06 && dayi<30-7)
                {
                 calcday=dayi+7;
                }// Получаем плюс 1 день}
              if(Mes2==07 && dayi<31-7)
                {
                 calcday=dayi+7;
                }// Получаем плюс 1 день}
              if(Mes2==08 && dayi<31-7)
                {
                 calcday=dayi+7;
                }// Получаем плюс 1 день}
              if(Mes2==09 && dayi<30-7)
                {
                 calcday=dayi+7;
                }// Получаем плюс 1 день}
              if(Mes2==10 && dayi<31-7)
                {
                 calcday=dayi+7;
                }// Получаем плюс 1 день}
              if(Mes2==11 && dayi<30-7)
                {
                 calcday=dayi+7;
                }// Получаем плюс 1 день}
              if(Mes2==12 && dayi<31-7)
                {
                 calcday=dayi+7;
                }// Получаем плюс 1 день}


              bool chekc2=true;
              if(Mes2==01 && dayi>31-7 && chekc2==true)//24 25
                {


                 if(dayi==25)
                   { Mes2=Mes2+1; dayi=01; }
                 if(dayi==26)
                   { Mes2=Mes2+1; dayi=02; }
                 if(dayi==27)
                   { Mes2=Mes2+1; dayi=03; }
                 if(dayi==28)
                   { Mes2=Mes2+1; dayi=04; }
                 if(dayi==29)
                   { Mes2=Mes2+1; dayi=05; }
                 if(dayi==30)
                   { Mes2=Mes2+1; dayi=06; }
                 if(dayi==31)
                   { Mes2=Mes2+1; dayi=07; }

                 calcday=dayi;
                 chekc2=false;
                }

              if(Mes2==02 && dayi>28-7  && chekc2==true)//24 25
                {

                 if(dayi==22)
                   { Mes2=Mes2+1; dayi=01; }
                 if(dayi==23)
                   { Mes2=Mes2+1; dayi=02; }
                 if(dayi==24)
                   { Mes2=Mes2+1; dayi=03; }
                 if(dayi==25)
                   { Mes2=Mes2+1; dayi=04; }
                 if(dayi==26)
                   { Mes2=Mes2+1; dayi=05; }
                 if(dayi==27)
                   { Mes2=Mes2+1; dayi=06; }
                 if(dayi==28)
                   { Mes2=Mes2+1; dayi=07; }
                 //Print("mes2 ",Mes2);
                 calcday=dayi;
                 chekc2=false;
                }

              if(Mes2==03 && dayi>31-7 && chekc2==true)//24 25
                {
                 if(dayi==25)
                   { Mes2=Mes2+1; dayi=01; }
                 if(dayi==26)
                   { Mes2=Mes2+1; dayi=02; }
                 if(dayi==27)
                   { Mes2=Mes2+1; dayi=03; }
                 if(dayi==28)
                   { Mes2=Mes2+1; dayi=04; }
                 if(dayi==29)
                   { Mes2=Mes2+1; dayi=05; }
                 if(dayi==30)
                   { Mes2=Mes2+1; dayi=06; }
                 if(dayi==31)
                   { Mes2=Mes2+1; dayi=07; }

                 calcday=dayi;
                 chekc2=false;
                }
              if(Mes2==04 && dayi>30-7 && chekc2==true)//23 24
                {
                 if(dayi==24)
                   { Mes2=Mes2+1; dayi=01; }
                 if(dayi==25)
                   { Mes2=Mes2+1; dayi=02; }
                 if(dayi==26)
                   { Mes2=Mes2+1; dayi=03; }
                 if(dayi==27)
                   { Mes2=Mes2+1; dayi=04; }
                 if(dayi==28)
                   { Mes2=Mes2+1; dayi=05; }
                 if(dayi==29)
                   { Mes2=Mes2+1; dayi=06; }
                 if(dayi==30)
                   { Mes2=Mes2+1; dayi=07; }

                 calcday=dayi;
                 chekc2=false;
                }

              if(Mes2==05 && dayi>31-7 && chekc2==true)//24 25
                {
                 if(dayi==25)
                   { Mes2=Mes2+1; dayi=01; }
                 if(dayi==26)
                   { Mes2=Mes2+1; dayi=02; }
                 if(dayi==27)
                   { Mes2=Mes2+1; dayi=03; }
                 if(dayi==28)
                   { Mes2=Mes2+1; dayi=04; }
                 if(dayi==29)
                   { Mes2=Mes2+1; dayi=05; }
                 if(dayi==30)
                   { Mes2=Mes2+1; dayi=06; }
                 if(dayi==31)
                   { Mes2=Mes2+1; dayi=07; }

                 calcday=dayi;
                 chekc2=false;
                }
              if(Mes2==06 && dayi>30-7 && chekc2==true)//23 24
                {
                 if(dayi==24)
                   { Mes2=Mes2+1; dayi=01; }
                 if(dayi==25)
                   { Mes2=Mes2+1; dayi=02; }
                 if(dayi==26)
                   { Mes2=Mes2+1; dayi=03; }
                 if(dayi==27)
                   { Mes2=Mes2+1; dayi=04; }
                 if(dayi==28)
                   { Mes2=Mes2+1; dayi=05; }
                 if(dayi==29)
                   { Mes2=Mes2+1; dayi=06; }
                 if(dayi==30)
                   { Mes2=Mes2+1; dayi=07; }

                 calcday=dayi;
                 chekc2=false;
                }

              if(Mes2==09 && dayi>30-7 && chekc2==true)//23 24
                {
                 if(dayi==24)
                   { Mes2=Mes2+1; dayi=01; }
                 if(dayi==25)
                   { Mes2=Mes2+1; dayi=02; }
                 if(dayi==26)
                   { Mes2=Mes2+1; dayi=03; }
                 if(dayi==27)
                   { Mes2=Mes2+1; dayi=04; }
                 if(dayi==28)
                   { Mes2=Mes2+1; dayi=05; }
                 if(dayi==29)
                   { Mes2=Mes2+1; dayi=06; }
                 if(dayi==30)
                   { Mes2=Mes2+1; dayi=07; }

                 calcday=dayi;
                 chekc2=false;
                }
              if(Mes2==11 && dayi>30-7 && chekc2==true)//23 24
                {
                 if(dayi==24)
                   { Mes2=Mes2+1; dayi=01; }
                 if(dayi==25)
                   { Mes2=Mes2+1; dayi=02; }
                 if(dayi==26)
                   { Mes2=Mes2+1; dayi=03; }
                 if(dayi==27)
                   { Mes2=Mes2+1; dayi=04; }
                 if(dayi==28)
                   { Mes2=Mes2+1; dayi=05; }
                 if(dayi==29)
                   { Mes2=Mes2+1; dayi=06; }
                 if(dayi==30)
                   { Mes2=Mes2+1; dayi=07; }

                 calcday=dayi;
                 chekc2=false;
                }

              if(Mes2==07 && dayi>31-7 && chekc2==true)//24 25
                {
                 if(dayi==25)
                   { Mes2=Mes2+1; dayi=01; }
                 if(dayi==26)
                   { Mes2=Mes2+1; dayi=02; }
                 if(dayi==27)
                   { Mes2=Mes2+1; dayi=03; }
                 if(dayi==28)
                   { Mes2=Mes2+1; dayi=04; }
                 if(dayi==29)
                   { Mes2=Mes2+1; dayi=05; }
                 if(dayi==30)
                   { Mes2=Mes2+1; dayi=06; }
                 if(dayi==31)
                   { Mes2=Mes2+1; dayi=07; }

                 calcday=dayi;
                 chekc2=false;
                }
              if(Mes2==08 && dayi>31-7 && chekc2==true)//24 25
                {
                 if(dayi==25)
                   { Mes2=Mes2+1; dayi=01; }
                 if(dayi==26)
                   { Mes2=Mes2+1; dayi=02; }
                 if(dayi==27)
                   { Mes2=Mes2+1; dayi=03; }
                 if(dayi==28)
                   { Mes2=Mes2+1; dayi=04; }
                 if(dayi==29)
                   { Mes2=Mes2+1; dayi=05; }
                 if(dayi==30)
                   { Mes2=Mes2+1; dayi=06; }
                 if(dayi==31)
                   { Mes2=Mes2+1; dayi=07; }

                 calcday=dayi;
                 chekc2=false;
                }
              if(Mes2==10 && dayi>31-7 && chekc2==true)//24 25
                {
                 if(dayi==25)
                   { Mes2=Mes2+1; dayi=01; }
                 if(dayi==26)
                   { Mes2=Mes2+1; dayi=02; }
                 if(dayi==27)
                   { Mes2=Mes2+1; dayi=03; }
                 if(dayi==28)
                   { Mes2=Mes2+1; dayi=04; }
                 if(dayi==29)
                   { Mes2=Mes2+1; dayi=05; }
                 if(dayi==30)
                   { Mes2=Mes2+1; dayi=06; }
                 if(dayi==31)
                   { Mes2=Mes2+1; dayi=07; }

                 calcday=dayi;
                 chekc2=false;
                }

              if(Mes2==12 && dayi>31-7 && chekc2==true)//24 25
                {
                 if(dayi==25)
                   { Mes2=01; dayi=01; }
                 if(dayi==26)
                   { Mes2=01; dayi=02; }
                 if(dayi==27)
                   { Mes2=01; dayi=03; }
                 if(dayi==28)
                   { Mes2=01; dayi=04; }
                 if(dayi==29)
                   { Mes2=01; dayi=05; }
                 if(dayi==30)
                   { Mes2=01; dayi=06; }
                 if(dayi==31)
                   { Mes2=01; dayi=07; }

                 calcday=dayi;
                 chekc2=false;
                }

              //Print(Mes2," cd ",dayi);
              long calcdayL=calcday;
              string deiiStr= IntegerToString(calcdayL,2);


              string simb5=StringSubstr(deiiStr,0,1);

              string simb6=StringSubstr(deiiStr,1,1);

              int simb5I;
              if(calcdayL<10)
                {simb5I=0; simb5=IntegerToString(simb5I);}//установка значения 0 если переменная меньше 10

              //Print(" pr5 ",simb5,"  pr6 ",simb6);

              //Print(calcday," ",simb5," ",simb6);

              int UshortSimb5,IntegerSImb5;
              int simB5=StringToInteger(simb5);
              IntegerSImb5=simB5;
              if(IntegerSImb5==0)
                {
                 UshortSimb5=48;
                }
              if(IntegerSImb5==1)
                {
                 UshortSimb5=49;
                }
              if(IntegerSImb5==2)
                {
                 UshortSimb5=50;
                }
              if(IntegerSImb5==3)
                {
                 UshortSimb5=51;
                }
              if(IntegerSImb5==4)
                {
                 UshortSimb5=52;
                }
              if(IntegerSImb5==5)
                {
                 UshortSimb5=53;
                }
              if(IntegerSImb5==6)
                {
                 UshortSimb5=54;
                }
              if(IntegerSImb5==7)
                {
                 UshortSimb5=55;
                }
              if(IntegerSImb5==8)
                {
                 UshortSimb5=56;
                }
              if(IntegerSImb5==9)
                {
                 UshortSimb5=57;
                }
              retsimb4=StringSetChar(str1,8,UshortSimb5);
              // Print(retsimb4," ",UshortSimb5);
              //Print("cd ",retsimb4);
              int UshortSimb6,IntegerSImb6;
              int simB6=StringToInteger(simb6);
              IntegerSImb6=simB6;
              if(IntegerSImb6==0)
                {
                 UshortSimb6=48;
                }
              if(IntegerSImb6==1)
                {
                 UshortSimb6=49;
                }
              if(IntegerSImb6==2)
                {
                 UshortSimb6=50;
                }
              if(IntegerSImb6==3)
                {
                 UshortSimb6=51;
                }
              if(IntegerSImb6==4)
                {
                 UshortSimb6=52;
                }
              if(IntegerSImb6==5)
                {
                 UshortSimb6=53;
                }
              if(IntegerSImb6==6)
                {
                 UshortSimb6=54;
                }
              if(IntegerSImb6==7)
                {
                 UshortSimb6=55;
                }
              if(IntegerSImb6==8)
                {
                 UshortSimb6=56;
                }
              if(IntegerSImb6==9)
                {
                 UshortSimb6=57;
                }
              retsimb15=StringSetChar(retsimb4,9,UshortSimb6);
              //  Print("cd ",UshortSimb6);

              //Отображение месяца

              long calcmesL=Mes2;
              string messStr= IntegerToString(calcmesL,2);

              string simb11=StringSubstr(messStr,0,1);

              string simb12=StringSubstr(messStr,1,1);


              int simb11I;
              if(calcmesL<10)
                {simb11I=0; simb11=IntegerToString(simb11I);}//установка значения 0 если переменная меньше 10



              //Print(calcday," ",simb5," ",simb6);

              int UshortSimb11,IntegerSImb11;
              int simB11=StringToInteger(simb11);
              IntegerSImb11=simB11;
              if(IntegerSImb11==0)
                {
                 UshortSimb11=48;
                }
              if(IntegerSImb11==1)
                {
                 UshortSimb11=49;
                }
              if(IntegerSImb11==2)
                {
                 UshortSimb11=50;
                }
              if(IntegerSImb11==3)
                {
                 UshortSimb11=51;
                }
              if(IntegerSImb11==4)
                {
                 UshortSimb11=52;
                }
              if(IntegerSImb11==5)
                {
                 UshortSimb11=53;
                }
              if(IntegerSImb11==6)
                {
                 UshortSimb11=54;
                }
              if(IntegerSImb11==7)
                {
                 UshortSimb11=55;
                }
              if(IntegerSImb11==8)
                {
                 UshortSimb11=56;
                }
              if(IntegerSImb11==9)
                {
                 UshortSimb11=57;
                }
              string  retsimb11=StringSetChar(retsimb15,5,UshortSimb11);
              //Print(UshortSimb11,"  11us ");

              int UshortSimb12,IntegerSImb12;
              int simB12=StringToInteger(simb12);
              IntegerSImb12=simB12;
              if(IntegerSImb12==0)
                {
                 UshortSimb12=48;
                }
              if(IntegerSImb12==1)
                {
                 UshortSimb12=49;
                }
              if(IntegerSImb12==2)
                {
                 UshortSimb12=50;
                }
              if(IntegerSImb12==3)
                {
                 UshortSimb12=51;
                }
              if(IntegerSImb12==4)
                {
                 UshortSimb12=52;
                }
              if(IntegerSImb12==5)
                {
                 UshortSimb12=53;
                }
              if(IntegerSImb12==6)
                {
                 UshortSimb12=54;
                }
              if(IntegerSImb12==7)
                {
                 UshortSimb12=55;
                }
              if(IntegerSImb12==8)
                {
                 UshortSimb12=56;
                }
              if(IntegerSImb12==9)
                {
                 UshortSimb12=57;
                }
              retsimb12=StringSetChar(retsimb11,6,UshortSimb12);

              //Print(" simb11 ",simb11," retsimb12 ",retsimb12);
              //Print(UshortSimb12,"  12us ");


              // YEAR

              if(MesiC==12) //Обрабатываем Год
                {

                 Yearf=Yeari+1;

                 string yearStr=IntegerToString(Yearf,4);

                 string simb7=StringSubstr(yearStr,0,1);
                 string simb8=StringSubstr(yearStr,1,1);
                 string simb9=StringSubstr(yearStr,2,1);
                 string simb10=StringSubstr(yearStr,3,1);

                 int UshortSimb7,IntegerSImb7;
                 int simB7=StringToInteger(simb7);
                 IntegerSImb7=simB7;
                 if(IntegerSImb7==0)
                   {
                    UshortSimb7=48;
                   }
                 if(IntegerSImb7==1)
                   {
                    UshortSimb7=49;
                   }
                 if(IntegerSImb7==2)
                   {
                    UshortSimb7=50;
                   }
                 if(IntegerSImb7==3)
                   {
                    UshortSimb7=51;
                   }
                 if(IntegerSImb7==4)
                   {
                    UshortSimb7=52;
                   }
                 if(IntegerSImb7==5)
                   {
                    UshortSimb7=53;
                   }
                 if(IntegerSImb7==6)
                   {
                    UshortSimb7=54;
                   }
                 if(IntegerSImb7==7)
                   {
                    UshortSimb7=55;
                   }
                 if(IntegerSImb7==8)
                   {
                    UshortSimb7=56;
                   }
                 if(IntegerSImb7==9)
                   {
                    UshortSimb7=57;
                   }
                 string retsimb6=StringSetChar(retsimb12,0,UshortSimb7);
                 //Print("res ",retsimb6);
                 int UshortSimb8,IntegerSImb8;
                 int simB8=StringToInteger(simb8);
                 IntegerSImb8=simB8;
                 if(IntegerSImb8==0)
                   {
                    UshortSimb8=48;
                   }
                 if(IntegerSImb8==1)
                   {
                    UshortSimb8=49;
                   }
                 if(IntegerSImb8==2)
                   {
                    UshortSimb8=50;
                   }
                 if(IntegerSImb8==3)
                   {
                    UshortSimb8=51;
                   }
                 if(IntegerSImb8==4)
                   {
                    UshortSimb8=52;
                   }
                 if(IntegerSImb8==5)
                   {
                    UshortSimb8=53;
                   }
                 if(IntegerSImb8==6)
                   {
                    UshortSimb8=54;
                   }
                 if(IntegerSImb8==7)
                   {
                    UshortSimb8=55;
                   }
                 if(IntegerSImb8==8)
                   {
                    UshortSimb8=56;
                   }
                 if(IntegerSImb8==9)
                   {
                    UshortSimb8=57;
                   }
                 string retsimb7=StringSetChar(retsimb6,1,UshortSimb8);

                 //Print("res ",retsimb7);


                 //Print("res ",retsimb6);
                 int UshortSimb9,IntegerSImb9;
                 int simB9=StringToInteger(simb9);
                 IntegerSImb9=simB9;
                 if(IntegerSImb9==0)
                   {
                    UshortSimb9=48;
                   }
                 if(IntegerSImb9==1)
                   {
                    UshortSimb9=49;
                   }
                 if(IntegerSImb9==2)
                   {
                    UshortSimb9=50;
                   }
                 if(IntegerSImb9==3)
                   {
                    UshortSimb9=51;
                   }
                 if(IntegerSImb9==4)
                   {
                    UshortSimb9=52;
                   }
                 if(IntegerSImb9==5)
                   {
                    UshortSimb9=53;
                   }
                 if(IntegerSImb9==6)
                   {
                    UshortSimb9=54;
                   }
                 if(IntegerSImb9==7)
                   {
                    UshortSimb9=55;
                   }
                 if(IntegerSImb9==8)
                   {
                    UshortSimb9=56;
                   }
                 if(IntegerSImb9==9)
                   {
                    UshortSimb9=57;
                   }
                 string retsimb8=StringSetChar(retsimb7,2,UshortSimb9);

                 //Print("res ",retsimb8);


                 //Print("res ",retsimb6);
                 int UshortSimb10,IntegerSImb10;
                 int simB10=StringToInteger(simb10);
                 IntegerSImb10=simB10;
                 if(IntegerSImb10==0)
                   {
                    UshortSimb10=48;
                   }
                 if(IntegerSImb10==1)
                   {
                    UshortSimb10=49;
                   }
                 if(IntegerSImb10==2)
                   {
                    UshortSimb10=50;
                   }
                 if(IntegerSImb10==3)
                   {
                    UshortSimb10=51;
                   }
                 if(IntegerSImb10==4)
                   {
                    UshortSimb10=52;
                   }
                 if(IntegerSImb10==5)
                   {
                    UshortSimb10=53;
                   }
                 if(IntegerSImb10==6)
                   {
                    UshortSimb10=54;
                   }
                 if(IntegerSImb10==7)
                   {
                    UshortSimb10=55;
                   }
                 if(IntegerSImb10==8)
                   {
                    UshortSimb10=56;
                   }
                 if(IntegerSImb10==9)
                   {
                    UshortSimb10=57;
                   }
                 retsimb18=StringSetChar(retsimb12,3,UshortSimb10);

                 //Print("res ",retsimb9);

                }



             }

           //Print("res12 ",retsimb18);//Время с Изменением года
           //Print("res13 ",retsimb13);//Время с Изменением года
           //Print("res15 ",retsimb15);//Время без изменения года



           //1 дневные
           datetime h24Plus1 = StringToTime(retsimb3);
           datetime h24Plus2 = StringToTime(retsimb5);
           //1 дневные
           datetime h168Plus1 =StringToTime(retsimb12);
           datetime h168Plus2 =StringToTime(retsimb18);
           //1 дневные
           //Print(" ",h24Plus1," ",h24Plus2," ",h168Plus1," ",h168Plus2);


           //Print(TimeArrSignal_Wordpress[i]);

           //Print(TimeArrSignal_Wordpress[i]," 24/1 ",h24Plus1," 24/2 ",h24Plus2, " i ", i);
           //Print(TimeArrSignal_Wordpress[i]," 168/1 ",h168Plus1," 168/2 ",h168Plus2, " i ", i);


           // Запись в Массив Програмированных данных временного отчёта 24 часа и 68 часов
           // По этапное обьяснение. Загрузка Полученного сигнала производится с верху В релизе АррайТаймПлюс подключается массив ранее заполненный рукамию
           // В релизе Рут Сигнал 1,8 Поступает сигнал с рынка после Записывается в Массив далее обрабатывается написанным скриптом с занесением полученных значений в 2 массива 24 и 168 часов для
           // Сравнения с текущим временем при получении нового сигнала.
           //Далее перегенерируется фаил с импортом цены который содержит Индекс,Врем,Новая цена

           // Переменные для сравнения
           // Производим отбор сгенерированной информации с дуаля 0/1

           datetime NoTime=D'1970.01.01 00:00:00';
           //Print(" TimeArrSignal_Wordpress ",TimeArrSignal_Wordpress[i]);
           // Print(" h24Plus1 ",h24Plus1);
           // Print(" h24Plus2 ",h24Plus2);
           // Print(" h168Plus1 ",h168Plus1);
           // Print(" h168Plus2 ",h168Plus2);






           if(h24Plus1!=NoTime)
             {
              TimeArrSignal_Wordpress_24[i]=h24Plus1;
              //Print("h24Plus1!=NoTime ",h24Plus1!=NoTime);
              int file_handle54=FileOpen(FileName40,FILE_READ|FILE_WRITE|FILE_BIN);
              if(file_handle54>0)
                {
                 FileSeek(file_handle54,0,SEEK_CUR);
                 NDT2= FileWriteArray(file_handle54,TimeArrSignal_Wordpress_24,0,WHOLE_ARRAY);
                 FileClose(file_handle54);
                }

             }
           if(h24Plus2!=NoTime)
             {
              TimeArrSignal_Wordpress_24[i]=h24Plus2;
              //Print("h24Plus2!=NoTime ",h24Plus2!=NoTime);

              int file_handle54=FileOpen(FileName40,FILE_READ|FILE_WRITE|FILE_BIN);
              if(file_handle54>0)
                {
                 FileSeek(file_handle54,0,SEEK_CUR);
                 NDT2= FileWriteArray(file_handle54,TimeArrSignal_Wordpress_24,0,WHOLE_ARRAY);
                 FileClose(file_handle54);
                }

             }

           if(h168Plus1!=NoTime)
             {
              TimeArrSignal_Wordpress_168[i]=h168Plus1;
              //Print("h168Plus1!=NoTime ",h168Plus1!=NoTime);

              int file_handle55=FileOpen(FileName41,FILE_READ|FILE_WRITE|FILE_BIN);
              if(file_handle55>0)
                {
                 FileSeek(file_handle55,0,SEEK_CUR);
                 NDT3= FileWriteArray(file_handle55,TimeArrSignal_Wordpress_168,0,WHOLE_ARRAY);
                 FileClose(file_handle55);
                }


             }

           if(h168Plus2!=NoTime)
             {
              TimeArrSignal_Wordpress_168[i]=h168Plus2;
              //Print("h168Plus2!=NoTime ",h168Plus2!=NoTime);

              int file_handle55=FileOpen(FileName41,FILE_READ|FILE_WRITE|FILE_BIN);
              if(file_handle55>0)
                {
                 FileSeek(file_handle55,0,SEEK_CUR);
                 NDT3= FileWriteArray(file_handle55,TimeArrSignal_Wordpress_168,0,WHOLE_ARRAY);
                 FileClose(file_handle55);
                }


             }
           //Print(" TimeArrSignal_Wordpress ",TimeArrSignal_Wordpress[i]);
           // Print(" TimeArrSignal_Wordpress[i] ",TimeArrSignal_Wordpress_24[i]);
           // Print(" TimeArrSignal_Wordpress[i] ",TimeArrSignal_Wordpress_24[i]);
           // Print(" TimeArrSignal_Wordpress[i] ",TimeArrSignal_Wordpress_168[i]);
           // Print(" TimeArrSignal_Wordpress[i]",TimeArrSignal_Wordpress_168[i]);




           // Generaci`Fajla posle Sraneni
           // Сравнение
           //TimeArrSignal_Wordpress[i];//Этат массив не используется в сравнение а только в генерировании 24 и 168 часов
           //TimeArrSignal_Int_Wordpress[i,1];
           //TimeArrSignal_Wordpress_24[i];
           //TimeArrSignal_Wordpress_168[i];
           //Udalit´fail


           // Предварительное удаление файла перед новой записью


           bool Permicen3=true;

           Print("24 ",TimeArrSignal_Wordpress_24[i]," 168 ",TimeArrSignal_Wordpress_168[i]);
           //Print(" B1_TC ",TimeCurrent());
           //Print(" B1_TimeArrSignal_Wordpress[i] ",TimeArrSignal_Wordpress[i]);
           //Print(" B1_TimeCurrent()<=TimeArrSignal_Wordpress_24[i]",TimeCurrent()<=TimeArrSignal_Wordpress_24[i] );
           //Print(" B1_TimeArrSignal_Wordpress_24[i] ",TimeArrSignal_Wordpress_24[i]);

           if(TimeCurrent()<=TimeArrSignal_Wordpress_24[i] && Permicen3==true)//Если время текущее меньше 24 часов то доступ в модуль
             {
              double PriceCalc=TimeArrSignal_Int_Wordpress[i,1];
              //Print("b1_PC ",PriceCalc);
              int file_handle48=FileOpen(FileName32,FILE_READ|FILE_WRITE|FILE_TXT);
                {
                 Print("1 ",file_handle48);
                 //---------------------------------------------//
                 FileSeek(file_handle48,0,SEEK_END);

                 uint fv1= FileWrite(file_handle48,TimeCurrent(),";"/*NOT US*/,";"," i ",";",i,";"," Index ",";",TimeArrSignal_Wordpress[i],";"," Signal Original ",";",PriceCalc,";"," Precio Original ");
                 // Print(" i ",i);
                 FileClose(file_handle48);
                 //Print(TimeCurrent(),";"/*NOT US*/,";"," i ",i,";"," Index ",";",TimeArrSignal_Wordpress[i],";"," Signal Original ",";",PriceCalc,";"," Precio Original ");
                 //Print("b1_fv1 ",fv1);
                 Permicen3==false;
                }



             }

           //Print(" B2_TimeCurrent()>TimeArrSignal_Wordpress_24[i] && TimeCurrent()<=TimeArrSignal_Wordpress_168[i] ",TimeCurrent()>TimeArrSignal_Wordpress_24[i] && TimeCurrent()<=TimeArrSignal_Wordpress_168[i] );
           //Print(" B2_TimeArrSignal_Wordpress_24[i] ",TimeArrSignal_Wordpress_24[i]);
           //Print(" B2_TimeArrSignal_Wordpress[i]_168 ",TimeArrSignal_Wordpress_168[i]);

           if(TimeCurrent()>TimeArrSignal_Wordpress_24[i] && TimeCurrent()<=TimeArrSignal_Wordpress_168[i]   && Permicen3==true)
             {
              double PriceCalc=NormalizeDouble((TimeArrSignal_Int_Wordpress[i,1]*0.1),2);
              //Print("b2_PC ",PriceCalc);
              int file_handle49=FileOpen(FileName32,FILE_READ|FILE_WRITE|FILE_TXT);
                {
                 //---------------------------------------------//
                 FileSeek(file_handle49,0,SEEK_END);

                 uint fv2=  FileWrite(file_handle49,TimeCurrent(),";"/*NOT US*/,";"," i ",";",i,";"," Index ",";",TimeArrSignal_Wordpress[i],";"," Signal Original ",";",PriceCalc,";"," Precio Original");
                 //Print("2 ",file_handle49);
                 FileClose(file_handle49);
                 //Print(TimeCurrent(),";"/*NOT US*/,";"," i ",i,";"," Index ",";",TimeArrSignal_Wordpress[i],";"," Signal Original ",";",PriceCalc,";"," Precio Original ");
                 //Print("b2_fv2 ",fv2);
                 Permicen3==false;
                }
              //Print(" i2 ",i);

             }





           //Print(" B3_TF TimeCurrent()>TimeArrSignal_Wordpress_168[i]",TimeCurrent()>TimeArrSignal_Wordpress_168[i]);


           if(TimeCurrent()>TimeArrSignal_Wordpress_168[i]  && Permicen3==true)
             {
              double PriceCalc=NormalizeDouble((TimeArrSignal_Int_Wordpress[i,1]*0.01),2);
              //Print("b3_PC ",PriceCalc);
              int file_handle50=FileOpen(FileName32,FILE_READ|FILE_WRITE|FILE_TXT);
                {
                 bool tf=false;
                 //---------------------------------------------//
                 tf =FileSeek(file_handle50,0,SEEK_END);
                 //Print(" tf ",tf);
                 uint fv3=FileWrite(file_handle50,TimeCurrent(),";"/*NOT US*/,";"," i ",";",i,";"," Index ",";",TimeArrSignal_Wordpress[i],";"," Signal Original ",";",PriceCalc,";"," Precio Original ");
                 //Print("3 ",file_handle50);
                 FileClose(file_handle50);
                 //Print(TimeCurrent(),";"/*NOT US*/,";"," i ",i,";"," Index ",";",TimeArrSignal_Wordpress[i],";"," Signal Original ",";",PriceCalc,";"," Precio Original ");
                 //Print("b3_fv3 ",fv3);
                 Permicen3==false;
                }


             }




          }//end for

       }

     LongShort=10;
     if(resOperandMin==PriceZero && (Maximum>0 || Maximum<0 || Maximum==0) && (Minimum>0 || Minimum<0 || Minimum==0) && one_BE>=1 && one_BE<=60 && Rez_BE==0)
       {
        TextVisualIndicator="LONG";
        Alert("LONG");
        string signalgroup=IntegerToString(zeroindex);
        string Hora1=TimeToString(iTime(Symbol(),0,1));
        string levelnotificacion1=IntegerToString(ONE_BE);
        string Comp1=IntegerToString(Maximum-MaxBinNumber_1);
        string Comp2=IntegerToString(Minimum+MaxBinNumber_0);
        string message2=SYmbol+" TIME "+Hora1+" SIGNAL NUMBER "+levelnotificacion1+" LONG "+" BOOL-F= "+Comp1+" BEAR-F= "+Comp2;
        SendNotification(message2); //
        LongShort=1;
       }
     if(resOperandMax==PriceZero && (Maximum>0 || Maximum<0 || Maximum==0) && (Minimum>0 || Minimum<0 || Minimum==0) && one_BE>=1 && one_BE<=60 && Rez_BE==0)
       {
        TextVisualIndicator="SHORT";
        Alert("SHORT");
        string signalgroup=IntegerToString(zeroindex);
        string Hora=TimeToString(iTime(Symbol(),0,1));
        string levelnotificacion=IntegerToString(ONE_BE);
        string Comp1=IntegerToString(Maximum-MaxBinNumber_1);
        string Comp2=IntegerToString(Minimum+MaxBinNumber_0);
        string message1=SYmbol+"-TIME "+Hora+" SIGNAL NUMBER "+levelnotificacion+" SHORT "+" BOOL-F= "+Comp1+" BEAR-F= "+Comp2;
        SendNotification(message1);
        LongShort=0;
       }
     RefreshRates();
     if(one_BE>15 && Maximum-MaxBinNumber_1==0 && Minimum+MaxBinNumber_0>0 && Rez_BE==0)
       {
        LongPosition=true;
        ShortPosition=false;
       }
     if(one_BE>15 && Maximum-MaxBinNumber_1<0 && Minimum+MaxBinNumber_0==0 && Rez_BE==0)
       {
        ShortPosition=true;
        LongPosition=false;
       }
     //------------------------------------------------------------------------------
     if(one_BE>15 && Maximum-MaxBinNumber_1==0 && Minimum+MaxBinNumber_0<0 && Rez_BE==0)
       {
        ShortPosition=true;
        LongPosition=false;
       }
     if(one_BE>15 && Maximum-MaxBinNumber_1>0 && Minimum+MaxBinNumber_0==0 && Rez_BE==0)
       {
        LongPosition=true;
        ShortPosition=false;
       }
     if(LongPosition==true && ((one_BE>15 && Maximum-MaxBinNumber_1>0 && Minimum+MaxBinNumber_0>0)||(one_BE>15 && Maximum-MaxBinNumber_1<0 && Minimum+MaxBinNumber_0<0)) && Rez_BE==0)//||(one_BE>25 && Maximum-MaxBinNumber_1<0 && Minimum+MaxBinNumber_0==0)||(one_BE>25 && Maximum-MaxBinNumber_1>0 && Minimum+MaxBinNumber_0==0)
       {
        string  subject="From Tatiana - RootDiamond - LONG SIGNAL EURUSD";       // заголовок
        string messageLong="Open Long, "+" Simbol "+Symbol()+" Time "+TimeToString(iTime(Symbol(),0,1),TIME_DATE|TIME_MINUTES)+" FONT "+IntegerToString(one_BE,0,0)+"/   DONATE PLEASE FOR UPDATE PROJECT http://paypal.me/mql4Root ";
        SendMail(subject,messageLong);
        string Curency=Symbol();
        string Hora=TimeToString(iTime(Symbol(),0,1));
        string levelnotificacion=IntegerToString(ONE_BE);
        string message1=Curency +" LONG - FOR ROOTDIAMOND, TIME "+Hora+" SIGNAL NUMBER "+levelnotificacion;
        //TelegramSendText(apikey,chatid,message1);
       }
     if(ShortPosition==true && ((one_BE>15 && Maximum-MaxBinNumber_1>0 && Minimum+MaxBinNumber_0>0)||(one_BE>15 && Maximum-MaxBinNumber_1<0 && Minimum+MaxBinNumber_0<0)) && Rez_BE==0)//||(one_BE>25 && Maximum-MaxBinNumber_1<0 && Minimum+MaxBinNumber_0==0)||(one_BE>25 && Maximum-MaxBinNumber_1>0 && Minimum+MaxBinNumber_0==0)
       {
        string  subject="From Tatiana - RootDiamond - SHORT SIGNAL EURUSD";       // заголовок
        string messageShort=" Open Short, "+" Simbol "+Symbol()+" Time "+TimeToString(iTime(Symbol(),0,1),TIME_DATE|TIME_MINUTES)+" FONT "+IntegerToString(one_BE,0,0)+"/   DONATE PLEASE FOR UPDATE PROJECT http://paypal.me/mql4Root ";
        SendMail(subject,messageShort);
        string Hora=TimeToString(iTime(Symbol(),0,1));
        string Curency=Symbol();
        string levelnotificacion=IntegerToString(ONE_BE);
        string message1=Curency + " SHORT - FOR ROOTDIAMOND, TIME "+Hora+" SIGNAL NUMBER "+levelnotificacion;
        //TelegramSendText(apikey,chatid,message1);
       }
     if(((one_BE>15 && Maximum-MaxBinNumber_1==0 && Minimum+MaxBinNumber_0>0)||(one_BE>15 && Maximum-MaxBinNumber_1==0 && Minimum+MaxBinNumber_0<0)) && Rez_BE==0)//||(one_BE>25 && Maximum-MaxBinNumber_1<0 && Minimum+MaxBinNumber_0==0)||(one_BE>25 && Maximum-MaxBinNumber_1>0 && MaxMinArr[IndexMinimum]+MaxBinNumber_0==0)
       {
        string  subject="From Tatiana - RootDiamond_8 - SHORT SIGNAL EURUSD";       // заголовок
        string messageShort=" Open Short, "+" Simbol "+Symbol()+" Time "+TimeToString(iTime(Symbol(),0,1),TIME_DATE|TIME_MINUTES)+" FONT "+IntegerToString(one_BE,0,0)+"   DONATE PLEASE FOR UPDATE PROJECT http://paypal.me/mql4Root ";
        SendMail(subject,messageShort);
        string Curency=Symbol();
        string Hora=TimeToString(iTime(Symbol(),0,1));
        string levelnotificacion=IntegerToString(ONE_BE);
        string message1=Curency+" SHORT - FOR ROOTDIAMOND_8 , TIME "+Hora+" SIGNAL NUMBER "+levelnotificacion;
        //int testT=TelegramSendText(apikey,chatid,message1);
       }
     if(((one_BE>15 && Maximum-MaxBinNumber_1>0 && Minimum+MaxBinNumber_0==0)||(one_BE>15 && Maximum-MaxBinNumber_1<0 && Minimum+MaxBinNumber_0==0)) && Rez_BE==0)//||(one_BE>25 && Maximum-MaxBinNumber_1<0 && MaxMinArr[IndexMinimum]+MaxBinNumber_0==0)||(one_BE>25 && Maximum-MaxBinNumber_1>0 && MaxMinArr[IndexMinimum]+MaxBinNumber_0==0)
       {
        string  subject="From Tatiana - RootDiamond_8 - LONG SIGNAL EURUSD";
        string messageLong="Open Long, "+" Simbol "+Symbol()+" Time "+TimeToString(iTime(Symbol(),0,1),TIME_DATE|TIME_MINUTES)+" LEVEL "+IntegerToString(one_BE,0,0)+"   DONATE PLEASE FOR UPDATE PROJECT http://paypal.me/mql4Root ";
        SendMail(subject,messageLong);
        string Hora=TimeToString(iTime(Symbol(),0,1));
        string Curency=Symbol();
        string levelnotificacion=IntegerToString(ONE_BE);
        string message1=Curency+" LONG - FOR ROOTDIAMOND_8 , TIME "+Hora+" SIGNAL NUMBER "+levelnotificacion;
       }
     if(one_BE>0 && Rez_BE==0)
       {
        int file_handle6=FileOpen(FileName6,FILE_READ|FILE_BIN);
        if(file_handle6>0)
          {
           FileSeek(file_handle6,0,SEEK_CUR);
           FileReadArray(file_handle6,bodydt,0,WHOLE_ARRAY);
           FileClose(file_handle6);
          }
        int file_handle7=FileOpen(FileName7,FILE_READ|FILE_BIN);
        if(file_handle7>0)
          {
           FileSeek(file_handle7,0,SEEK_CUR);
           FileReadArray(file_handle7,bodyAR,0,WHOLE_ARRAY);
           FileClose(file_handle7);
          }
        //----------------------------------------------
        int iar=1;
        for(iar=1; iar<=89999; iar++)
          {
           if(Array_Errors==true)
             {
              Print(" Index Array ",iar," 28236 ");


             }
           if(bodyAR[iar,0]==61)
             {
              //Print(" indexIAR = ",iar);
              break;
             }
          }
        RefreshRates();
        datetime IreceiveBarTime=iTime(Symbol(),0,1);
        bartimeresult=IreceiveBarTime;
        IreceiveLevelresult=one_BE;
        HIGHT=iHigh(Symbol(),0,1);
        LOW=iLow(Symbol(),0,1);
        CLOSE=iClose(Symbol(),0,1);
        OPEN=iOpen(Symbol(),0,1);
        normalLevel=IreceiveLevelresult*Point;
        center=NormalizeDouble(HIGHT-((HIGHT-LOW)/2),NormalizaDigi);
        //---Lines calculation------
        DoublspredPoint=spredpoints*Point();
        LEVELUP=NormalizeDouble((center+normalLevel),NormalizaDigi);//1
        LEVELDOWN=NormalizeDouble((center-normalLevel),NormalizaDigi);//1
        //--------niveles de caracol
        bodydt[iar]=bartimeresult;
        bodyAR[iar,0]=IreceiveLevelresult;
        bodyAR[iar,1]=LEVELUP;
        bodyAR[iar,2]=IpaintFiboLineUP_2;
        bodyAR[iar,3]=IpaintFiboLineUP_3;
        bodyAR[iar,4]=IpaintFiboLineUP_5;
        bodyAR[iar,5]=IpaintFiboLineUP_8;
        bodyAR[iar,6]=IpaintFiboLineUP_13;
        bodyAR[iar,7]=IpaintFiboLineUP_21;
        bodyAR[iar,8]=IpaintFiboLineUP_34;
        bodyAR[iar,9]=IpaintFiboLineUP_55;
        bodyAR[iar,10]=IpaintFiboLineUP_89;
        bodyAR[iar,11]=IpaintFiboLineUP_144;
        bodyAR[iar,12]=LEVELDOWN;
        bodyAR[iar,13]=IpaintFiboLineDOWN_2;
        bodyAR[iar,14]=IpaintFiboLineDOWN_3;
        bodyAR[iar,15]=IpaintFiboLineDOWN_5;
        bodyAR[iar,16]=IpaintFiboLineDOWN_8;
        bodyAR[iar,17]=IpaintFiboLineDOWN_13;
        bodyAR[iar,18]=IpaintFiboLineDOWN_21;
        bodyAR[iar,20]=IpaintFiboLineDOWN_34;
        bodyAR[iar,21]=IpaintFiboLineDOWN_55;
        bodyAR[iar,22]=IpaintFiboLineDOWN_89;
        bodyAR[iar,23]=IpaintFiboLineDOWN_144;
        //--------сигналы------------
        bodyAR[iar,24]=Maximum-MaxBinNumber_1;
        bodyAR[iar,25]=Minimum+MaxBinNumber_0;
        bodyAR[iar,26]=Maximum+MaxBinNumber_1;
        bodyAR[iar,27]=Minimum+MaxBinNumber_0;
        bodyAR[iar,28]=BoolInd;
        bodyAR[iar,29]=BearInd;
        //--------Лонг Шорт-----------
        bodyAR[iar,30]=LongShort;//0/1
        FileDelete(FileName6,0);
        FileDelete(FileName7,0);
        file_handle6=FileOpen(FileName6,FILE_READ|FILE_WRITE|FILE_BIN);
        if(file_handle6>0)
          {
           FileSeek(file_handle6,0,SEEK_CUR);
           FileWriteArray(file_handle6,bodydt,0,WHOLE_ARRAY);
           FileClose(file_handle6);
          }
        file_handle7=FileOpen(FileName7,FILE_READ|FILE_WRITE|FILE_BIN);
        if(file_handle7>0)
          {
           FileSeek(file_handle7,0,SEEK_CUR);
           FileWriteArray(file_handle7,bodyAR,0,WHOLE_ARRAY);
           FileClose(file_handle7);
          }
       }
     //------------------------------------//
    }
  if(ALLtoARRAYWRITE==true)
    {
     // ---- Writing Mass to the Binary file of all indicators.
     // ---- Every minute session I write time and data into arrays using an index.
     for(i=1; i<=7204; i++)
       {
        if(Array_Errors==true)
          {
           Print(" Index Array ",i," 28321 ");


          }
        if(AllAnalisysData[i,1]==1000)//получаю индекс заполненного элемента
          {
           break;
          }
       }
     DT_AllAnalisysData[i,0]=iTime(Symbol(),0,1);
     AllAnalisysData[i,0]=Counter_Summa0;
     AllAnalisysData[i,1]=Counter_Summa1;
     AllAnalisysData[i,2]=IndexMaximum;
     AllAnalisysData[i,3]=IndexMinimum;
     AllAnalisysData[i,4]=Maximum;
     AllAnalisysData[i,5]=Minimum;
     AllAnalisysData[i,6]=MinPriceSintezINDEX;
     AllAnalisysData[i,7]=MaxBinNumber_1;
     AllAnalisysData[i,8]=MaxBinNumber_0;
     AllAnalisysData[i,9]=Minimum-MaxBinNumber_1;
     AllAnalisysData[i,10]=Minimum+MaxBinNumber_0;
     AllAnalisysData[i,11]=bodypips[MaxInd_bodypips,0];
     AllAnalisysData[i,12]=bodypips[MaxInd_bodypips,1];
     AllAnalisysData[i,13]=BinInd3BO;
     AllAnalisysData[i,14]=BinInd3BE;
     AllAnalisysData[i,15]=Onda1;
     int file_handle19=FileOpen(FileName19,FILE_READ|FILE_WRITE|FILE_BIN);
     if(file_handle19>0)
       {
        FileSeek(file_handle19,0,SEEK_CUR);
        FileWriteArray(file_handle19,AllAnalisysData,0,WHOLE_ARRAY);
        FileClose(file_handle19);
       }
     int file_handle20=FileOpen(FileName20,FILE_READ|FILE_WRITE|FILE_BIN);
     if(file_handle20>0)
       {
        FileSeek(file_handle20,0,SEEK_CUR);
        FileWriteArray(file_handle20,DT_AllAnalisysData,0,WHOLE_ARRAY);
        FileClose(file_handle20);
       }
    }
  //}
  //}
  //if((resOperandMin==PriceZero || resOperandMax==PriceZero) && Maximum>0 && Minimum>0 && one_BE>=1 && one_BE<=60 && Rez_BE==0)
  // {
  // }
  //-------------------------------------------
  // string filename_bin=TimeToStr(iTime(Symbol(),0,1),TIME_DATE|TIME_MINUTES)+"_BIN.bin";
  //int file_handle_BIN=FileOpen(filename_bin,FILE_READ|FILE_WRITE|FILE_BIN );
  // if(file_handle_BIN>0)
  //   {
  //  int i;
  // for(i=0;i<9999;i++)
  //FileReadArray(file_handle_BIN,body,0,i);
  //    Comment(body[i,0]);
  //FileClose(file_handle_BIN);
  //  }
  //FileClose(file_handle_BIN);
  //-----------------------------------------------------------
  // Вариант 1
  /*if(Z_N<500)
             {MasD[Z_N,0]=(int)Time[1];
              MasD[Z_N,1]=Counter_Summa1;
              MasD[Z_N,2]=Counter_Summa0;
              Z_N++;
             }
             else {Z_N=0;ArrayInitialize(MasD,0);}*/
  // Вариант 2
  /*   MasD[Z_N,0]=(int)Time[1];
              MasD[Z_N,1]=Counter_Summa1;
              MasD[Z_N,2]=Counter_Summa0;
              Z_N++;
           if(Z_N>499)
             {
              Z_N-=1;
              for(int qt=0; qt<499; qt++)
                {
                 MasD[qt,0]=MasD[qt+1,0];
                 MasD[qt,1]=MasD[qt+1,1];
                 MasD[qt,2]=MasD[qt+1,2];
                }
              MasD[499,0]=0;
              MasD[499,1]=0;
              MasD[499,2]=0;
             }*/
  // Вариант 3/2
  // op_MasD(Counter_Summa1,Counter_Summa0);
  //---------------------------------------------
  //-------------------------------------------------------------------
  // if(Rez_BE>=0)
  // {
  //string Color1=IntegerToString(Rez_BE,0);
  //string Color2=IntegerToString(one_BE,0);
  //string Color3=IntegerToString(zero_BE,0);
  //string Color=Color1+","+Color2+","+Color3;
  //string rgb="C'"+Color+"'";
  //color  rgbcolor=StringToColor(rgb);
  //ObjectSetInteger(0,Obiekt101,OBJPROP_COLOR,rgbcolor);
  //Comment(rgb);
  // }
  // int file_handle3=FileOpen(FileName3,FILE_READ|FILE_WRITE," ");
  //if(file_handle3>0)
  // {
  //  FileSeek(file_handle3,0,SEEK_END);
  //  FileWrite(file_handle3,Symbol()," ",iTime(Symbol(),0,1),Rez_BE," % ",one_BE,"  ",zero_BE);
  //  FileClose(file_handle3);
  // }
  //-----------------------Tiempo de senal
  // datetime date1=D'00:00:00';
  //datetime date2=D'06:00:00';
  //------------------------------------
  //if(Rez_BE==0 /*&& zero_BE>60*//*&& TimeCurrent()> date2 && TimeCurrent()<date1*/)//--Минусавой сигнал
  // {
  //  if(write_Zero==true)
  //   {
  //    int file_handle2=FileOpen(FileName2,FILE_READ|FILE_WRITE," ");
  //   if(file_handle2>0)
  //  {
  //FileClose(Handle);
  //FileCopy(
  //--
  //    FileSeek(file_handle2,0,SEEK_END);
  //    FileWrite(file_handle2,Symbol()," ",iTime(Symbol(),0,1),Rez_BE," % ",one_BE,"  ",zero_BE);
  //   FileClose(file_handle2);
  //Alert(Rez_BE);
  //string Hora=TimeToString(iTime(Symbol(),0,1));
  //string levelnotificacion=DoubleToString(one_BE);
  //SendNotification(Hora);
  //SendNotification(levelnotificacion);
  //SendFTP(FileName3);
  //---Move Files to destyny foldrer
  //FileCopy(filename,0,filename+copy,0);
  // FileMove(filename,0,"Candles H1+ binmarker\\Analiz\\"+filename,/*|FILE_COMMON|/FILE_REWRITE*/0);
  //-----------------
  //  }
  //  }
  // }
  //+------------------------------------------------------------------+
  //|END Counter Summa 1/0 - Generation of initial data                |
  //+------------------------------------------------------------------+
  //+------------------------------------------------------------------+
  //|Grafic indicator                                                  |
  //+------------------------------------------------------------------+
 }

if(Bar_Tm==0 && time_BR==Time[0])
{
Text_OBJ_LABEL(«Tx_FM»,1,1,50,»l»,28,»Wingdings»,clrWhite);
return(0);
}
if(Bar_Tm!=Time[0])
{
Bar_Tm=Time[0];
string File_Name_Close=TimeToStr(iTime(Symbol(),0,1),TIME_DATE|TIME_MINUTES)+»-«+SYmbol+FR_Nm;
int replacedC=StringReplace(File_Name_Close,»:»,» «);
FileClose(replacedC);
filename=TimeToStr(iTime(Symbol(),0,1),TIME_DATE|TIME_MINUTES)+»-«+SYmbol+FR_Nm;
string terminal_data_path=TerminalInfoString(TERMINAL_DATA_PATH);
File_Name=terminal_data_path+»\MQL4\Files\digitscandlesALL\»+filename;
int replaced=StringReplace(File_Name,»:»,» «);
File_Name=DoubleToStr(Bar_Tm/60,0)+FR_Nm;
Str_Pr_Bar=Bid;
//Handle=FileOpen(File_Name_Close,FILE_CSV|FILE_WRITE,»;»);
}
Bars_Z(Bid);
Text_OBJ_LABEL(«Tx_FM»,1,1,50,»l»,28,»Wingdings»,clrOrange);
return(0);
}
//+——————————————————————+
//|Grafic indicator |
//+——————————————————————+
//+——————————————————————+
//| Binary Miner |
//+——————————————————————+
void Bars_Z(double iBid)// Собрал я с Ирой с красочьных полей зерно и дали по горсти каждый дочери Крестине
{
int Cqt=0;
Counter++;
Cqt=(int)NormalizeDouble((iBid-Str_Pr_Bar)/Point,0);
int qt_C=0;
if(Cqt>1)//paso 1 arriba
{
for(int qt=0; qt<Cqt-1; qt++)
{
if(Array_Errors==true)
{
Print(» Index Array «,qt,» 28507 «);

       }
     qt_C=Counter+qt;
     body[qt_C,0]=3;
     body[qt_C,1]=1;
     body [qt_C,2]=2;
     body [qt_C,3]=Str_Pr_Bar+(qt+1)*Point;
     //body [qt_C,4]=TimeCurrent();//Записываю время тика.
     //bintoarr[IFb1,IFb2]=1;//запись в строку параметров бинарного вычисления
     //bintoarrBID[IFb1,IFb2]=Bid;
     //body [qt_C,7]=iTime(Symbol(),PERIOD_CURRENT,0);
     //---
     // body [qt_C,4]=Open[0];
     // body [qt_C,5]=High[0];
     // body [qt_C,6]=Low[0];
     // body [qt_C,7]=111;//TEST
     //    FileWrite(Handle,body[qt_C,0],body[qt_C,1],body[qt_C,2],body[qt_C,3],body[qt_C,4],body[qt_C,5],body[qt_C,6],body[qt_C,7]);
     Counter1++;
    }
  Counter=qt_C+1;
 }

if(Cqt<-1)
{
for(int qt=0; qt<MathAbs(Cqt)-1; qt++)
{
if(Array_Errors==true)
{
Print(» Index Array «,qt,» 28535 «);

       }
     qt_C=Counter+qt;
     body [qt_C,0]=3;
     body [qt_C,1]=0;
     body [qt_C,2]=3;
     body [qt_C,3]=Str_Pr_Bar-(qt+1)*Point;
     //body [qt_C,4]=TimeCurrent();//Записываю время тика.
     // bintoarr[IFb1,IFb2]=0;
     // bintoarrBID[IFb1,IFb2]=Bid;
     //body [qt_C,7]=iTime(Symbol(),PERIOD_CURRENT,0);
     //---
     // body [qt_C,4]=Open[0];
     // body [qt_C,5]=High[0];
     // body [qt_C,6]=Low[0];
     //FileWrite(Handle,body[qt_C,0],body[qt_C,1],body[qt_C,2],body[qt_C,3],body[qt_C,4],body[qt_C,5],body[qt_C,6],body[qt_C,7]);
     Counter0++;
    }
  Counter=qt_C+1;
 }

if(Str_Pr_Bar<=iBid)
{
body [Counter,1]=1;
body [Counter,2]=1;
//body [Counter,4]=TimeCurrent();//Записываю время тика.
//bintoarr[IFb1,IFb2]=1;
//bintoarrBID[IFb1,IFb2]=Bid;
Counter1_1++;
}
else
{
body [Counter,1]=0;
body [Counter,2]=0;
//body [Counter,4]=TimeCurrent();//Записываю время тика.
//bintoarr[IFb1,IFb2]=0;//пишу тик в бинарной интерпретации
//bintoarrBID[IFb1,IFb2]=Bid;//пишу цену для тика
Counter0_1++;
}
body [Counter,0]=iBid;
body [Counter,3]=111;
//body [Counter,4]=TimeCurrent();//Записываю время тика.p
// body [Counter,4]=Open[0];
// body [Counter,5]=High[0];
// body [Counter,6]=Low[0];
//body[Counter,7]=iTime(Symbol(),PERIOD_CURRENT,0);
//FileWrite(Handle,body[Counter,0],body[Counter,1],body[Counter,2],body[Counter,3],body[Counter,4],body[Counter,5],body[Counter,6],body[Counter,7]);
Str_Pr_Bar=iBid;
Counter_Summa1 = Counter1+Counter1_1;
Counter_Summa0 = Counter0+Counter0_1;
}
//+——————————————————————+
//| END Binary Miner |
//+——————————————————————+
//+——————————————————————+
//| |
//+——————————————————————+

//+——————————————————————+
//| Expert deinitialization function |
//+——————————————————————+
void deinit()
{
//————————————————————————-
Str_Pr_Bar=0;
time_bar=0;
time_BR=0;
ObjectsDeleteAll(0,OBJ_LABEL);
FileClose(Handle);
}
//+——————————————————————+
//| void Text_OBJ_LABEL() |
//+——————————————————————+
void Text_OBJ_LABEL(string Nm_T,int CORN,int XD,int YD,string Tx_Znk,int Sz,string Tx_cr,color CLR)
{
//—-
ObjectCreate(Nm_T,OBJ_LABEL,0,0,0);
ObjectSet(Nm_T,OBJPROP_CORNER,CORN);
ObjectSet(Nm_T,OBJPROP_XDISTANCE,XD);
ObjectSet(Nm_T,OBJPROP_YDISTANCE,YD);
ObjectSetText(Nm_T,Tx_Znk,Sz,Tx_cr,CLR);
ObjectSet(Nm_T,OBJPROP_HIDDEN,true);
ObjectSet(Nm_T,OBJPROP_SELECTABLE,false);
//—
}
//+——————————————————————+
//+——————————————————————+
//+——————————————————————+

//+——————————————————————+