/ip hotspot user profile add keepalive-timeout=none mac-cookie-timeout=1h name="1 HORA" on-login="{:local DescripcionScriptPlan \"PscriptCorrido\";:local PSocial 0;:local Tplan 0;:local DPlan \"MikroTecRed\";:local planDias 0;:l\ ocal planHoras 1;:local planMinutos 0;:local atime [ /system clock get time ];:local adate [ /system clock get date ];:local tempDia [:pick \$adate 4 6];:local tempMes [:pick \$adate 0 3];:local tempA\ no [:pick \$adate 7 11];:local tempHoraCompleta [:pick \$atime 0 5];:local mesesArray (\"jan\",\"feb\",\"mar\",\"apr\",\"may\",\"jun\",\"jul\",\"aug\",\"sep\",\"oct\",\"nov\",\"dec\");:local diasArray\ \_(\"31\",\"28\",\"31\",\"30\",\"31\",\"30\",\"31\",\"31\",\"30\",\"31\",\"30\",\"31\");:local anosbisArray (\"2020\",\"2024\",\"2028\",\"2032\",\"2036\",\"2040\",\"2044\",\"2048\",\"2052\",\"2056\",\ \"2060\");:local numMes ([:find \$mesesArray \$tempMes]);:local dia ([:pick \$diasArray \$numMes]);:if (\$numMes=1) do={:local numAnoBis ([:find \$anosbisArray \$tempAno]);:if (\$numAnoBis>=0) do={:se\ t \$dia 29;}}; /log info \"Usuario/Ficha= \$user fecha=\$adate hora=\$atime Dias=\$planDias Plan=PscriptCorrido\";:local tempHora [:pick \$atime 0 2];:local tempMinutos [:pick \$atime 3 5];:local temp\ Segundos [:pick \$atime 6 9];:if (\$tempSegundos>59) do={:if ((\$tempSegundos-60)<10) do={:set \$tempSegundos (\"0\".\$tempSegundos)};:set \$tempMinutos (\$tempMinutos+1)};:set \$tempMinutos (\$tempMi\ nutos+\$planMinutos);:if (\$tempMinutos>59) do={:set \$tempMinutos (\$tempMinutos-60);:set \$tempHora (\$tempHora+1)};:if (\$tempMinutos<10) do={:set \$tempMinutos (\"0\".\$tempMinutos)};:set \$tempHo\ ra (\$tempHora+\$planHoras);:if (\$tempHora>23) do={:set \$tempHora (\$tempHora-24);:set \$planDias (\$planDias+1);};:if (\$tempHora<10) do={:set \$tempHora (\"0\".\$tempHora)};:set \$atime (\$tempHor\ a.\":\".\$tempMinutos.\":\".\$tempSegundos);:local TMes 0;:local TAno 0;:local NdiasMes ([:pick \$diasArray \$numMes]);if ((\$planDias+\$tempDia)<=\$NdiasMes) do={:set \$tempDia (\$tempDia+\$planDias)\ ;} else={:local sumaDias (\$NdiasMes-\$tempDia);:while (\$sumaDias<\$planDias) do={:set \$numMes (\$numMes+1);:if (\$numMes>11) do={:set \$numMes (0);:set \$TAno (\$TAno+1)};:set \$NdiasMes ([:pick \$\ diasArray \$numMes]);:if (\$numMes=1) do={:local numAnoBis ([:find \$anosbisArray (\$tempAno+\$TAno)]);:if (\$numAnoBis>=0) do={:set \$NdiasMes 29}};:set \$sumaDias (\$sumaDias+\$NdiasMes);:if (\$suma\ Dias>=\$planDias) do={:set \$tempDia (\$NdiasMes-(\$sumaDias-\$planDias));:set \$tempMes ([:pick \$mesesArray \$numMes])}}};:set \$tempAno (\$tempAno+\$TAno);:if (\$tempDia < 10) do={:set \$tempDia (\ \"0\".\$tempDia)};:set \$adate (\$tempMes.\"/\".\$tempDia.\"/\".\$tempAno);:local comentario \"MikroTecRed\";:if (\$Tplan=0) do={:set \$DPlan \"MikroTecRed-Corrido\";} else={:if (\$Tplan=1) do={:set \ \$DPlan \"MikroTecRed-Pausado\"}};:if (\$PSocial=0) do={:set \$comentario (\"FeMTR:\".\$adate.\" \".\$atime.\"-\".\$DPlan);} else={:if (\$PSocial=1) do={:set \$comentario (\"FeMTR:\".\$adate.\" \".\$a\ time.\"-\".\$DPlan.\" Facebook\");} else={:if (\$PSocial=2) do={:set \$comentario (\"FeMTR:\".\$adate.\" \".\$atime.\"-\".\$DPlan.\" WhatsApp\")}}};:set \$DPlan \$comentario;:local tcomment [ /ip hots\ pot user get \$user comment ];:local EscribirLog (false);:local MesesAno (\"MTR\",\"jan\",\"feb\",\"mar\",\"apr\",\"may\",\"jun\",\"jul\",\"aug\",\"sep\",\"oct\",\"nov\",\"dec\");:if ( [:find \$tcomme\ nt \"FcMTR:\"]=0 ) do={:local FechaActual [ /system clock get date ];:local FechaCreacion [pick \$tcomment 6 16];:if ([:pick \$FechaActual 7 11] < [:pick \$FechaCreacion 6 10]) do={:set \$EscribirLog \ (true);} else={:if ([:pick \$FechaActual 7 11] = [:pick \$FechaCreacion 6 10]) do={:local MesActual ([:find \$MesesAno [:pick \$FechaActual 0 3]]);:if (\$MesActual < 10) do={set \$MesActual (\"0\".\$M\ esActual)};:if (\$MesActual < [:pick \$FechaCreacion 3 5]) do={:set \$EscribirLog (true);} else={:if (\$MesActual = [:pick \$FechaCreacion 3 5]) do={:local DiaActual ([ :pick \$FechaActual 4 6 ]);:if \ (\$DiaActual < 10) do={set \$DiaActual (\"0\".\$DiaActual)};:if (\$DiaActual < [ :pick \$FechaCreacion 0 2 ]) do={:set \$EscribirLog (true);} else={:if (\$DiaActual = [ :pick \$FechaCreacion 0 2 ]) do\ ={:local HoraActual [ /system clock get time ];:local HoraCreacion [:pick \$tcomment 17 25];:if ([:pick \$HoraActual 0 2] < [:pick \$HoraCreacion 0 2]) do={:set \$EscribirLog (true);} else={:if ([:pic\ k \$HoraActual 0 2] = [:pick \$HoraCreacion 0 2]) do={:if ([:pick \$HoraActual 3 5] < [:pick \$HoraCreacion 3 5]) do={:set \$EscribirLog (true);}}}}}}}}}};:if (\$EscribirLog=false) do={:if ( [:find \$\ tcomment \"Fe\"]!=26 ) do={:set \$tcomment ( \$tcomment.\" \".\$comentario );[ /ip hotspot user set \$user comment= \$tcomment ];}} else={ /log info \"ERROR: Usuario/Ficha= \$user creado con MikroTec\ Red no se le Coloco EL TIEMPO DE EXPIRACION en su Comentario porque la FECHA DEL MIKROTIK esta Desactualizada. Pero, sera Removida una vez que Cumpla su Tiempo Limite\"}}}}" rate-limit=10M/10M \ transparent-proxy=yes add keepalive-timeout=none mac-cookie-timeout=3h name="3 HORAS" on-login="{:local DescripcionScriptPlan \"PscriptCorrido\";:local PSocial 0;:local Tplan 0;:local DPlan \"MikroTecRed\";:local planDias 0;:\ local planHoras 3;:local planMinutos 0;:local atime [ /system clock get time ];:local adate [ /system clock get date ];:local tempDia [:pick \$adate 4 6];:local tempMes [:pick \$adate 0 3];:local temp\ Ano [:pick \$adate 7 11];:local tempHoraCompleta [:pick \$atime 0 5];:local mesesArray (\"jan\",\"feb\",\"mar\",\"apr\",\"may\",\"jun\",\"jul\",\"aug\",\"sep\",\"oct\",\"nov\",\"dec\");:local diasArra\ y (\"31\",\"28\",\"31\",\"30\",\"31\",\"30\",\"31\",\"31\",\"30\",\"31\",\"30\",\"31\");:local anosbisArray (\"2020\",\"2024\",\"2028\",\"2032\",\"2036\",\"2040\",\"2044\",\"2048\",\"2052\",\"2056\",\ \"2060\");:local numMes ([:find \$mesesArray \$tempMes]);:local dia ([:pick \$diasArray \$numMes]);:if (\$numMes=1) do={:local numAnoBis ([:find \$anosbisArray \$tempAno]);:if (\$numAnoBis>=0) do={:se\ t \$dia 29;}}; /log info \"Usuario/Ficha= \$user fecha=\$adate hora=\$atime Dias=\$planDias Plan=PscriptCorrido\";:local tempHora [:pick \$atime 0 2];:local tempMinutos [:pick \$atime 3 5];:local temp\ Segundos [:pick \$atime 6 9];:if (\$tempSegundos>59) do={:if ((\$tempSegundos-60)<10) do={:set \$tempSegundos (\"0\".\$tempSegundos)};:set \$tempMinutos (\$tempMinutos+1)};:set \$tempMinutos (\$tempMi\ nutos+\$planMinutos);:if (\$tempMinutos>59) do={:set \$tempMinutos (\$tempMinutos-60);:set \$tempHora (\$tempHora+1)};:if (\$tempMinutos<10) do={:set \$tempMinutos (\"0\".\$tempMinutos)};:set \$tempHo\ ra (\$tempHora+\$planHoras);:if (\$tempHora>23) do={:set \$tempHora (\$tempHora-24);:set \$planDias (\$planDias+1);};:if (\$tempHora<10) do={:set \$tempHora (\"0\".\$tempHora)};:set \$atime (\$tempHor\ a.\":\".\$tempMinutos.\":\".\$tempSegundos);:local TMes 0;:local TAno 0;:local NdiasMes ([:pick \$diasArray \$numMes]);if ((\$planDias+\$tempDia)<=\$NdiasMes) do={:set \$tempDia (\$tempDia+\$planDias)\ ;} else={:local sumaDias (\$NdiasMes-\$tempDia);:while (\$sumaDias<\$planDias) do={:set \$numMes (\$numMes+1);:if (\$numMes>11) do={:set \$numMes (0);:set \$TAno (\$TAno+1)};:set \$NdiasMes ([:pick \$\ diasArray \$numMes]);:if (\$numMes=1) do={:local numAnoBis ([:find \$anosbisArray (\$tempAno+\$TAno)]);:if (\$numAnoBis>=0) do={:set \$NdiasMes 29}};:set \$sumaDias (\$sumaDias+\$NdiasMes);:if (\$suma\ Dias>=\$planDias) do={:set \$tempDia (\$NdiasMes-(\$sumaDias-\$planDias));:set \$tempMes ([:pick \$mesesArray \$numMes])}}};:set \$tempAno (\$tempAno+\$TAno);:if (\$tempDia < 10) do={:set \$tempDia (\ \"0\".\$tempDia)};:set \$adate (\$tempMes.\"/\".\$tempDia.\"/\".\$tempAno);:local comentario \"MikroTecRed\";:if (\$Tplan=0) do={:set \$DPlan \"MikroTecRed-Corrido\";} else={:if (\$Tplan=1) do={:set \ \$DPlan \"MikroTecRed-Pausado\"}};:if (\$PSocial=0) do={:set \$comentario (\"FeMTR:\".\$adate.\" \".\$atime.\"-\".\$DPlan);} else={:if (\$PSocial=1) do={:set \$comentario (\"FeMTR:\".\$adate.\" \".\$a\ time.\"-\".\$DPlan.\" Facebook\");} else={:if (\$PSocial=2) do={:set \$comentario (\"FeMTR:\".\$adate.\" \".\$atime.\"-\".\$DPlan.\" WhatsApp\")}}};:set \$DPlan \$comentario;:local tcomment [ /ip hots\ pot user get \$user comment ];:local EscribirLog (false);:local MesesAno (\"MTR\",\"jan\",\"feb\",\"mar\",\"apr\",\"may\",\"jun\",\"jul\",\"aug\",\"sep\",\"oct\",\"nov\",\"dec\");:if ( [:find \$tcomme\ nt \"FcMTR:\"]=0 ) do={:local FechaActual [ /system clock get date ];:local FechaCreacion [pick \$tcomment 6 16];:if ([:pick \$FechaActual 7 11] < [:pick \$FechaCreacion 6 10]) do={:set \$EscribirLog \ (true);} else={:if ([:pick \$FechaActual 7 11] = [:pick \$FechaCreacion 6 10]) do={:local MesActual ([:find \$MesesAno [:pick \$FechaActual 0 3]]);:if (\$MesActual < 10) do={set \$MesActual (\"0\".\$M\ esActual)};:if (\$MesActual < [:pick \$FechaCreacion 3 5]) do={:set \$EscribirLog (true);} else={:if (\$MesActual = [:pick \$FechaCreacion 3 5]) do={:local DiaActual ([ :pick \$FechaActual 4 6 ]);:if \ (\$DiaActual < 10) do={set \$DiaActual (\"0\".\$DiaActual)};:if (\$DiaActual < [ :pick \$FechaCreacion 0 2 ]) do={:set \$EscribirLog (true);} else={:if (\$DiaActual = [ :pick \$FechaCreacion 0 2 ]) do\ ={:local HoraActual [ /system clock get time ];:local HoraCreacion [:pick \$tcomment 17 25];:if ([:pick \$HoraActual 0 2] < [:pick \$HoraCreacion 0 2]) do={:set \$EscribirLog (true);} else={:if ([:pic\ k \$HoraActual 0 2] = [:pick \$HoraCreacion 0 2]) do={:if ([:pick \$HoraActual 3 5] < [:pick \$HoraCreacion 3 5]) do={:set \$EscribirLog (true);}}}}}}}}}};:if (\$EscribirLog=false) do={:if ( [:find \$\ tcomment \"Fe\"]!=26 ) do={:set \$tcomment ( \$tcomment.\" \".\$comentario );[ /ip hotspot user set \$user comment= \$tcomment ];}} else={ /log info \"ERROR: Usuario/Ficha= \$user creado con MikroTec\ Red no se le Coloco EL TIEMPO DE EXPIRACION en su Comentario porque la FECHA DEL MIKROTIK esta Desactualizada. Pero, sera Removida una vez que Cumpla su Tiempo Limite\"}}}}" rate-limit=10M/10M \ transparent-proxy=yes add keepalive-timeout=none mac-cookie-timeout=6h name="6 HORAS" on-login="{:local DescripcionScriptPlan \"PscriptCorrido\";:local PSocial 0;:local Tplan 0;:local DPlan \"MikroTecRed\";:local planDias 0;:\ local planHoras 6;:local planMinutos 0;:local atime [ /system clock get time ];:local adate [ /system clock get date ];:local tempDia [:pick \$adate 4 6];:local tempMes [:pick \$adate 0 3];:local temp\ Ano [:pick \$adate 7 11];:local tempHoraCompleta [:pick \$atime 0 5];:local mesesArray (\"jan\",\"feb\",\"mar\",\"apr\",\"may\",\"jun\",\"jul\",\"aug\",\"sep\",\"oct\",\"nov\",\"dec\");:local diasArra\ y (\"31\",\"28\",\"31\",\"30\",\"31\",\"30\",\"31\",\"31\",\"30\",\"31\",\"30\",\"31\");:local anosbisArray (\"2020\",\"2024\",\"2028\",\"2032\",\"2036\",\"2040\",\"2044\",\"2048\",\"2052\",\"2056\",\ \"2060\");:local numMes ([:find \$mesesArray \$tempMes]);:local dia ([:pick \$diasArray \$numMes]);:if (\$numMes=1) do={:local numAnoBis ([:find \$anosbisArray \$tempAno]);:if (\$numAnoBis>=0) do={:se\ t \$dia 29;}}; /log info \"Usuario/Ficha= \$user fecha=\$adate hora=\$atime Dias=\$planDias Plan=PscriptCorrido\";:local tempHora [:pick \$atime 0 2];:local tempMinutos [:pick \$atime 3 5];:local temp\ Segundos [:pick \$atime 6 9];:if (\$tempSegundos>59) do={:if ((\$tempSegundos-60)<10) do={:set \$tempSegundos (\"0\".\$tempSegundos)};:set \$tempMinutos (\$tempMinutos+1)};:set \$tempMinutos (\$tempMi\ nutos+\$planMinutos);:if (\$tempMinutos>59) do={:set \$tempMinutos (\$tempMinutos-60);:set \$tempHora (\$tempHora+1)};:if (\$tempMinutos<10) do={:set \$tempMinutos (\"0\".\$tempMinutos)};:set \$tempHo\ ra (\$tempHora+\$planHoras);:if (\$tempHora>23) do={:set \$tempHora (\$tempHora-24);:set \$planDias (\$planDias+1);};:if (\$tempHora<10) do={:set \$tempHora (\"0\".\$tempHora)};:set \$atime (\$tempHor\ a.\":\".\$tempMinutos.\":\".\$tempSegundos);:local TMes 0;:local TAno 0;:local NdiasMes ([:pick \$diasArray \$numMes]);if ((\$planDias+\$tempDia)<=\$NdiasMes) do={:set \$tempDia (\$tempDia+\$planDias)\ ;} else={:local sumaDias (\$NdiasMes-\$tempDia);:while (\$sumaDias<\$planDias) do={:set \$numMes (\$numMes+1);:if (\$numMes>11) do={:set \$numMes (0);:set \$TAno (\$TAno+1)};:set \$NdiasMes ([:pick \$\ diasArray \$numMes]);:if (\$numMes=1) do={:local numAnoBis ([:find \$anosbisArray (\$tempAno+\$TAno)]);:if (\$numAnoBis>=0) do={:set \$NdiasMes 29}};:set \$sumaDias (\$sumaDias+\$NdiasMes);:if (\$suma\ Dias>=\$planDias) do={:set \$tempDia (\$NdiasMes-(\$sumaDias-\$planDias));:set \$tempMes ([:pick \$mesesArray \$numMes])}}};:set \$tempAno (\$tempAno+\$TAno);:if (\$tempDia < 10) do={:set \$tempDia (\ \"0\".\$tempDia)};:set \$adate (\$tempMes.\"/\".\$tempDia.\"/\".\$tempAno);:local comentario \"MikroTecRed\";:if (\$Tplan=0) do={:set \$DPlan \"MikroTecRed-Corrido\";} else={:if (\$Tplan=1) do={:set \ \$DPlan \"MikroTecRed-Pausado\"}};:if (\$PSocial=0) do={:set \$comentario (\"FeMTR:\".\$adate.\" \".\$atime.\"-\".\$DPlan);} else={:if (\$PSocial=1) do={:set \$comentario (\"FeMTR:\".\$adate.\" \".\$a\ time.\"-\".\$DPlan.\" Facebook\");} else={:if (\$PSocial=2) do={:set \$comentario (\"FeMTR:\".\$adate.\" \".\$atime.\"-\".\$DPlan.\" WhatsApp\")}}};:set \$DPlan \$comentario;:local tcomment [ /ip hots\ pot user get \$user comment ];:local EscribirLog (false);:local MesesAno (\"MTR\",\"jan\",\"feb\",\"mar\",\"apr\",\"may\",\"jun\",\"jul\",\"aug\",\"sep\",\"oct\",\"nov\",\"dec\");:if ( [:find \$tcomme\ nt \"FcMTR:\"]=0 ) do={:local FechaActual [ /system clock get date ];:local FechaCreacion [pick \$tcomment 6 16];:if ([:pick \$FechaActual 7 11] < [:pick \$FechaCreacion 6 10]) do={:set \$EscribirLog \ (true);} else={:if ([:pick \$FechaActual 7 11] = [:pick \$FechaCreacion 6 10]) do={:local MesActual ([:find \$MesesAno [:pick \$FechaActual 0 3]]);:if (\$MesActual < 10) do={set \$MesActual (\"0\".\$M\ esActual)};:if (\$MesActual < [:pick \$FechaCreacion 3 5]) do={:set \$EscribirLog (true);} else={:if (\$MesActual = [:pick \$FechaCreacion 3 5]) do={:local DiaActual ([ :pick \$FechaActual 4 6 ]);:if \ (\$DiaActual < 10) do={set \$DiaActual (\"0\".\$DiaActual)};:if (\$DiaActual < [ :pick \$FechaCreacion 0 2 ]) do={:set \$EscribirLog (true);} else={:if (\$DiaActual = [ :pick \$FechaCreacion 0 2 ]) do\ ={:local HoraActual [ /system clock get time ];:local HoraCreacion [:pick \$tcomment 17 25];:if ([:pick \$HoraActual 0 2] < [:pick \$HoraCreacion 0 2]) do={:set \$EscribirLog (true);} else={:if ([:pic\ k \$HoraActual 0 2] = [:pick \$HoraCreacion 0 2]) do={:if ([:pick \$HoraActual 3 5] < [:pick \$HoraCreacion 3 5]) do={:set \$EscribirLog (true);}}}}}}}}}};:if (\$EscribirLog=false) do={:if ( [:find \$\ tcomment \"Fe\"]!=26 ) do={:set \$tcomment ( \$tcomment.\" \".\$comentario );[ /ip hotspot user set \$user comment= \$tcomment ];}} else={ /log info \"ERROR: Usuario/Ficha= \$user creado con MikroTec\ Red no se le Coloco EL TIEMPO DE EXPIRACION en su Comentario porque la FECHA DEL MIKROTIK esta Desactualizada. Pero, sera Removida una vez que Cumpla su Tiempo Limite\"}}}}" rate-limit=10M/10M \ transparent-proxy=yes add keepalive-timeout=none mac-cookie-timeout=1d name="1 DIA" on-login="{:local DescripcionScriptPlan \"PscriptCorrido\";:local PSocial 0;:local Tplan 0;:local DPlan \"MikroTecRed\";:local planDias 1;:lo\ cal planHoras 0;:local planMinutos 0;:local atime [ /system clock get time ];:local adate [ /system clock get date ];:local tempDia [:pick \$adate 4 6];:local tempMes [:pick \$adate 0 3];:local tempAn\ o [:pick \$adate 7 11];:local tempHoraCompleta [:pick \$atime 0 5];:local mesesArray (\"jan\",\"feb\",\"mar\",\"apr\",\"may\",\"jun\",\"jul\",\"aug\",\"sep\",\"oct\",\"nov\",\"dec\");:local diasArray \ (\"31\",\"28\",\"31\",\"30\",\"31\",\"30\",\"31\",\"31\",\"30\",\"31\",\"30\",\"31\");:local anosbisArray (\"2020\",\"2024\",\"2028\",\"2032\",\"2036\",\"2040\",\"2044\",\"2048\",\"2052\",\"2056\",\"2\ 060\");:local numMes ([:find \$mesesArray \$tempMes]);:local dia ([:pick \$diasArray \$numMes]);:if (\$numMes=1) do={:local numAnoBis ([:find \$anosbisArray \$tempAno]);:if (\$numAnoBis>=0) do={:set \ \$dia 29;}}; /log info \"Usuario/Ficha= \$user fecha=\$adate hora=\$atime Dias=\$planDias Plan=PscriptCorrido\";:local tempHora [:pick \$atime 0 2];:local tempMinutos [:pick \$atime 3 5];:local tempSe\ gundos [:pick \$atime 6 9];:if (\$tempSegundos>59) do={:if ((\$tempSegundos-60)<10) do={:set \$tempSegundos (\"0\".\$tempSegundos)};:set \$tempMinutos (\$tempMinutos+1)};:set \$tempMinutos (\$tempMinu\ tos+\$planMinutos);:if (\$tempMinutos>59) do={:set \$tempMinutos (\$tempMinutos-60);:set \$tempHora (\$tempHora+1)};:if (\$tempMinutos<10) do={:set \$tempMinutos (\"0\".\$tempMinutos)};:set \$tempHora\ \_(\$tempHora+\$planHoras);:if (\$tempHora>23) do={:set \$tempHora (\$tempHora-24);:set \$planDias (\$planDias+1);};:if (\$tempHora<10) do={:set \$tempHora (\"0\".\$tempHora)};:set \$atime (\$tempHora\ .\":\".\$tempMinutos.\":\".\$tempSegundos);:local TMes 0;:local TAno 0;:local NdiasMes ([:pick \$diasArray \$numMes]);if ((\$planDias+\$tempDia)<=\$NdiasMes) do={:set \$tempDia (\$tempDia+\$planDias);\ } else={:local sumaDias (\$NdiasMes-\$tempDia);:while (\$sumaDias<\$planDias) do={:set \$numMes (\$numMes+1);:if (\$numMes>11) do={:set \$numMes (0);:set \$TAno (\$TAno+1)};:set \$NdiasMes ([:pick \$d\ iasArray \$numMes]);:if (\$numMes=1) do={:local numAnoBis ([:find \$anosbisArray (\$tempAno+\$TAno)]);:if (\$numAnoBis>=0) do={:set \$NdiasMes 29}};:set \$sumaDias (\$sumaDias+\$NdiasMes);:if (\$sumaD\ ias>=\$planDias) do={:set \$tempDia (\$NdiasMes-(\$sumaDias-\$planDias));:set \$tempMes ([:pick \$mesesArray \$numMes])}}};:set \$tempAno (\$tempAno+\$TAno);:if (\$tempDia < 10) do={:set \$tempDia (\"\ 0\".\$tempDia)};:set \$adate (\$tempMes.\"/\".\$tempDia.\"/\".\$tempAno);:local comentario \"MikroTecRed\";:if (\$Tplan=0) do={:set \$DPlan \"MikroTecRed-Corrido\";} else={:if (\$Tplan=1) do={:set \$D\ Plan \"MikroTecRed-Pausado\"}};:if (\$PSocial=0) do={:set \$comentario (\"FeMTR:\".\$adate.\" \".\$atime.\"-\".\$DPlan);} else={:if (\$PSocial=1) do={:set \$comentario (\"FeMTR:\".\$adate.\" \".\$atim\ e.\"-\".\$DPlan.\" Facebook\");} else={:if (\$PSocial=2) do={:set \$comentario (\"FeMTR:\".\$adate.\" \".\$atime.\"-\".\$DPlan.\" WhatsApp\")}}};:set \$DPlan \$comentario;:local tcomment [ /ip hotspot\ \_user get \$user comment ];:local EscribirLog (false);:local MesesAno (\"MTR\",\"jan\",\"feb\",\"mar\",\"apr\",\"may\",\"jun\",\"jul\",\"aug\",\"sep\",\"oct\",\"nov\",\"dec\");:if ( [:find \$tcomment\ \_\"FcMTR:\"]=0 ) do={:local FechaActual [ /system clock get date ];:local FechaCreacion [pick \$tcomment 6 16];:if ([:pick \$FechaActual 7 11] < [:pick \$FechaCreacion 6 10]) do={:set \$EscribirLog (\ true);} else={:if ([:pick \$FechaActual 7 11] = [:pick \$FechaCreacion 6 10]) do={:local MesActual ([:find \$MesesAno [:pick \$FechaActual 0 3]]);:if (\$MesActual < 10) do={set \$MesActual (\"0\".\$Me\ sActual)};:if (\$MesActual < [:pick \$FechaCreacion 3 5]) do={:set \$EscribirLog (true);} else={:if (\$MesActual = [:pick \$FechaCreacion 3 5]) do={:local DiaActual ([ :pick \$FechaActual 4 6 ]);:if (\ \$DiaActual < 10) do={set \$DiaActual (\"0\".\$DiaActual)};:if (\$DiaActual < [ :pick \$FechaCreacion 0 2 ]) do={:set \$EscribirLog (true);} else={:if (\$DiaActual = [ :pick \$FechaCreacion 0 2 ]) do=\ {:local HoraActual [ /system clock get time ];:local HoraCreacion [:pick \$tcomment 17 25];:if ([:pick \$HoraActual 0 2] < [:pick \$HoraCreacion 0 2]) do={:set \$EscribirLog (true);} else={:if ([:pick\ \_\$HoraActual 0 2] = [:pick \$HoraCreacion 0 2]) do={:if ([:pick \$HoraActual 3 5] < [:pick \$HoraCreacion 3 5]) do={:set \$EscribirLog (true);}}}}}}}}}};:if (\$EscribirLog=false) do={:if ( [:find \$\ tcomment \"Fe\"]!=26 ) do={:set \$tcomment ( \$tcomment.\" \".\$comentario );[ /ip hotspot user set \$user comment= \$tcomment ];}} else={ /log info \"ERROR: Usuario/Ficha= \$user creado con MikroTec\ Red no se le Coloco EL TIEMPO DE EXPIRACION en su Comentario porque la FECHA DEL MIKROTIK esta Desactualizada. Pero, sera Removida una vez que Cumpla su Tiempo Limite\"}}}}" rate-limit=10M/10M \ transparent-proxy=yes add keepalive-timeout=none mac-cookie-timeout=1w name="7 DIAS" on-login="{:local DescripcionScriptPlan \"PscriptCorrido\";:local PSocial 0;:local Tplan 0;:local DPlan \"MikroTecRed\";:local planDias 7;:l\ ocal planHoras 0;:local planMinutos 0;:local atime [ /system clock get time ];:local adate [ /system clock get date ];:local tempDia [:pick \$adate 4 6];:local tempMes [:pick \$adate 0 3];:local tempA\ no [:pick \$adate 7 11];:local tempHoraCompleta [:pick \$atime 0 5];:local mesesArray (\"jan\",\"feb\",\"mar\",\"apr\",\"may\",\"jun\",\"jul\",\"aug\",\"sep\",\"oct\",\"nov\",\"dec\");:local diasArray\ \_(\"31\",\"28\",\"31\",\"30\",\"31\",\"30\",\"31\",\"31\",\"30\",\"31\",\"30\",\"31\");:local anosbisArray (\"2020\",\"2024\",\"2028\",\"2032\",\"2036\",\"2040\",\"2044\",\"2048\",\"2052\",\"2056\",\ \"2060\");:local numMes ([:find \$mesesArray \$tempMes]);:local dia ([:pick \$diasArray \$numMes]);:if (\$numMes=1) do={:local numAnoBis ([:find \$anosbisArray \$tempAno]);:if (\$numAnoBis>=0) do={:se\ t \$dia 29;}}; /log info \"Usuario/Ficha= \$user fecha=\$adate hora=\$atime Dias=\$planDias Plan=PscriptCorrido\";:local tempHora [:pick \$atime 0 2];:local tempMinutos [:pick \$atime 3 5];:local temp\ Segundos [:pick \$atime 6 9];:if (\$tempSegundos>59) do={:if ((\$tempSegundos-60)<10) do={:set \$tempSegundos (\"0\".\$tempSegundos)};:set \$tempMinutos (\$tempMinutos+1)};:set \$tempMinutos (\$tempMi\ nutos+\$planMinutos);:if (\$tempMinutos>59) do={:set \$tempMinutos (\$tempMinutos-60);:set \$tempHora (\$tempHora+1)};:if (\$tempMinutos<10) do={:set \$tempMinutos (\"0\".\$tempMinutos)};:set \$tempHo\ ra (\$tempHora+\$planHoras);:if (\$tempHora>23) do={:set \$tempHora (\$tempHora-24);:set \$planDias (\$planDias+1);};:if (\$tempHora<10) do={:set \$tempHora (\"0\".\$tempHora)};:set \$atime (\$tempHor\ a.\":\".\$tempMinutos.\":\".\$tempSegundos);:local TMes 0;:local TAno 0;:local NdiasMes ([:pick \$diasArray \$numMes]);if ((\$planDias+\$tempDia)<=\$NdiasMes) do={:set \$tempDia (\$tempDia+\$planDias)\ ;} else={:local sumaDias (\$NdiasMes-\$tempDia);:while (\$sumaDias<\$planDias) do={:set \$numMes (\$numMes+1);:if (\$numMes>11) do={:set \$numMes (0);:set \$TAno (\$TAno+1)};:set \$NdiasMes ([:pick \$\ diasArray \$numMes]);:if (\$numMes=1) do={:local numAnoBis ([:find \$anosbisArray (\$tempAno+\$TAno)]);:if (\$numAnoBis>=0) do={:set \$NdiasMes 29}};:set \$sumaDias (\$sumaDias+\$NdiasMes);:if (\$suma\ Dias>=\$planDias) do={:set \$tempDia (\$NdiasMes-(\$sumaDias-\$planDias));:set \$tempMes ([:pick \$mesesArray \$numMes])}}};:set \$tempAno (\$tempAno+\$TAno);:if (\$tempDia < 10) do={:set \$tempDia (\ \"0\".\$tempDia)};:set \$adate (\$tempMes.\"/\".\$tempDia.\"/\".\$tempAno);:local comentario \"MikroTecRed\";:if (\$Tplan=0) do={:set \$DPlan \"MikroTecRed-Corrido\";} else={:if (\$Tplan=1) do={:set \ \$DPlan \"MikroTecRed-Pausado\"}};:if (\$PSocial=0) do={:set \$comentario (\"FeMTR:\".\$adate.\" \".\$atime.\"-\".\$DPlan);} else={:if (\$PSocial=1) do={:set \$comentario (\"FeMTR:\".\$adate.\" \".\$a\ time.\"-\".\$DPlan.\" Facebook\");} else={:if (\$PSocial=2) do={:set \$comentario (\"FeMTR:\".\$adate.\" \".\$atime.\"-\".\$DPlan.\" WhatsApp\")}}};:set \$DPlan \$comentario;:local tcomment [ /ip hots\ pot user get \$user comment ];:local EscribirLog (false);:local MesesAno (\"MTR\",\"jan\",\"feb\",\"mar\",\"apr\",\"may\",\"jun\",\"jul\",\"aug\",\"sep\",\"oct\",\"nov\",\"dec\");:if ( [:find \$tcomme\ nt \"FcMTR:\"]=0 ) do={:local FechaActual [ /system clock get date ];:local FechaCreacion [pick \$tcomment 6 16];:if ([:pick \$FechaActual 7 11] < [:pick \$FechaCreacion 6 10]) do={:set \$EscribirLog \ (true);} else={:if ([:pick \$FechaActual 7 11] = [:pick \$FechaCreacion 6 10]) do={:local MesActual ([:find \$MesesAno [:pick \$FechaActual 0 3]]);:if (\$MesActual < 10) do={set \$MesActual (\"0\".\$M\ esActual)};:if (\$MesActual < [:pick \$FechaCreacion 3 5]) do={:set \$EscribirLog (true);} else={:if (\$MesActual = [:pick \$FechaCreacion 3 5]) do={:local DiaActual ([ :pick \$FechaActual 4 6 ]);:if \ (\$DiaActual < 10) do={set \$DiaActual (\"0\".\$DiaActual)};:if (\$DiaActual < [ :pick \$FechaCreacion 0 2 ]) do={:set \$EscribirLog (true);} else={:if (\$DiaActual = [ :pick \$FechaCreacion 0 2 ]) do\ ={:local HoraActual [ /system clock get time ];:local HoraCreacion [:pick \$tcomment 17 25];:if ([:pick \$HoraActual 0 2] < [:pick \$HoraCreacion 0 2]) do={:set \$EscribirLog (true);} else={:if ([:pic\ k \$HoraActual 0 2] = [:pick \$HoraCreacion 0 2]) do={:if ([:pick \$HoraActual 3 5] < [:pick \$HoraCreacion 3 5]) do={:set \$EscribirLog (true);}}}}}}}}}};:if (\$EscribirLog=false) do={:if ( [:find \$\ tcomment \"Fe\"]!=26 ) do={:set \$tcomment ( \$tcomment.\" \".\$comentario );[ /ip hotspot user set \$user comment= \$tcomment ];}} else={ /log info \"ERROR: Usuario/Ficha= \$user creado con MikroTec\ Red no se le Coloco EL TIEMPO DE EXPIRACION en su Comentario porque la FECHA DEL MIKROTIK esta Desactualizada. Pero, sera Removida una vez que Cumpla su Tiempo Limite\"}}}}" rate-limit=10M/10M \ transparent-proxy=yes add keepalive-timeout=none mac-cookie-timeout=2w1d name="15 DIAS" on-login="{:local DescripcionScriptPlan \"PscriptCorrido\";:local PSocial 0;:local Tplan 0;:local DPlan \"MikroTecRed\";:local planDias 1\ 5;:local planHoras 0;:local planMinutos 0;:local atime [ /system clock get time ];:local adate [ /system clock get date ];:local tempDia [:pick \$adate 4 6];:local tempMes [:pick \$adate 0 3];:local t\ empAno [:pick \$adate 7 11];:local tempHoraCompleta [:pick \$atime 0 5];:local mesesArray (\"jan\",\"feb\",\"mar\",\"apr\",\"may\",\"jun\",\"jul\",\"aug\",\"sep\",\"oct\",\"nov\",\"dec\");:local diasA\ rray (\"31\",\"28\",\"31\",\"30\",\"31\",\"30\",\"31\",\"31\",\"30\",\"31\",\"30\",\"31\");:local anosbisArray (\"2020\",\"2024\",\"2028\",\"2032\",\"2036\",\"2040\",\"2044\",\"2048\",\"2052\",\"2056\ \",\"2060\");:local numMes ([:find \$mesesArray \$tempMes]);:local dia ([:pick \$diasArray \$numMes]);:if (\$numMes=1) do={:local numAnoBis ([:find \$anosbisArray \$tempAno]);:if (\$numAnoBis>=0) do={\ :set \$dia 29;}}; /log info \"Usuario/Ficha= \$user fecha=\$adate hora=\$atime Dias=\$planDias Plan=PscriptCorrido\";:local tempHora [:pick \$atime 0 2];:local tempMinutos [:pick \$atime 3 5];:local t\ empSegundos [:pick \$atime 6 9];:if (\$tempSegundos>59) do={:if ((\$tempSegundos-60)<10) do={:set \$tempSegundos (\"0\".\$tempSegundos)};:set \$tempMinutos (\$tempMinutos+1)};:set \$tempMinutos (\$tem\ pMinutos+\$planMinutos);:if (\$tempMinutos>59) do={:set \$tempMinutos (\$tempMinutos-60);:set \$tempHora (\$tempHora+1)};:if (\$tempMinutos<10) do={:set \$tempMinutos (\"0\".\$tempMinutos)};:set \$tem\ pHora (\$tempHora+\$planHoras);:if (\$tempHora>23) do={:set \$tempHora (\$tempHora-24);:set \$planDias (\$planDias+1);};:if (\$tempHora<10) do={:set \$tempHora (\"0\".\$tempHora)};:set \$atime (\$temp\ Hora.\":\".\$tempMinutos.\":\".\$tempSegundos);:local TMes 0;:local TAno 0;:local NdiasMes ([:pick \$diasArray \$numMes]);if ((\$planDias+\$tempDia)<=\$NdiasMes) do={:set \$tempDia (\$tempDia+\$planDi\ as);} else={:local sumaDias (\$NdiasMes-\$tempDia);:while (\$sumaDias<\$planDias) do={:set \$numMes (\$numMes+1);:if (\$numMes>11) do={:set \$numMes (0);:set \$TAno (\$TAno+1)};:set \$NdiasMes ([:pick\ \_\$diasArray \$numMes]);:if (\$numMes=1) do={:local numAnoBis ([:find \$anosbisArray (\$tempAno+\$TAno)]);:if (\$numAnoBis>=0) do={:set \$NdiasMes 29}};:set \$sumaDias (\$sumaDias+\$NdiasMes);:if (\$\ sumaDias>=\$planDias) do={:set \$tempDia (\$NdiasMes-(\$sumaDias-\$planDias));:set \$tempMes ([:pick \$mesesArray \$numMes])}}};:set \$tempAno (\$tempAno+\$TAno);:if (\$tempDia < 10) do={:set \$tempDi\ a (\"0\".\$tempDia)};:set \$adate (\$tempMes.\"/\".\$tempDia.\"/\".\$tempAno);:local comentario \"MikroTecRed\";:if (\$Tplan=0) do={:set \$DPlan \"MikroTecRed-Corrido\";} else={:if (\$Tplan=1) do={:se\ t \$DPlan \"MikroTecRed-Pausado\"}};:if (\$PSocial=0) do={:set \$comentario (\"FeMTR:\".\$adate.\" \".\$atime.\"-\".\$DPlan);} else={:if (\$PSocial=1) do={:set \$comentario (\"FeMTR:\".\$adate.\" \".\ \$atime.\"-\".\$DPlan.\" Facebook\");} else={:if (\$PSocial=2) do={:set \$comentario (\"FeMTR:\".\$adate.\" \".\$atime.\"-\".\$DPlan.\" WhatsApp\")}}};:set \$DPlan \$comentario;:local tcomment [ /ip h\ otspot user get \$user comment ];:local EscribirLog (false);:local MesesAno (\"MTR\",\"jan\",\"feb\",\"mar\",\"apr\",\"may\",\"jun\",\"jul\",\"aug\",\"sep\",\"oct\",\"nov\",\"dec\");:if ( [:find \$tco\ mment \"FcMTR:\"]=0 ) do={:local FechaActual [ /system clock get date ];:local FechaCreacion [pick \$tcomment 6 16];:if ([:pick \$FechaActual 7 11] < [:pick \$FechaCreacion 6 10]) do={:set \$EscribirL\ og (true);} else={:if ([:pick \$FechaActual 7 11] = [:pick \$FechaCreacion 6 10]) do={:local MesActual ([:find \$MesesAno [:pick \$FechaActual 0 3]]);:if (\$MesActual < 10) do={set \$MesActual (\"0\".\ \$MesActual)};:if (\$MesActual < [:pick \$FechaCreacion 3 5]) do={:set \$EscribirLog (true);} else={:if (\$MesActual = [:pick \$FechaCreacion 3 5]) do={:local DiaActual ([ :pick \$FechaActual 4 6 ]);:\ if (\$DiaActual < 10) do={set \$DiaActual (\"0\".\$DiaActual)};:if (\$DiaActual < [ :pick \$FechaCreacion 0 2 ]) do={:set \$EscribirLog (true);} else={:if (\$DiaActual = [ :pick \$FechaCreacion 0 2 ])\ \_do={:local HoraActual [ /system clock get time ];:local HoraCreacion [:pick \$tcomment 17 25];:if ([:pick \$HoraActual 0 2] < [:pick \$HoraCreacion 0 2]) do={:set \$EscribirLog (true);} else={:if ([\ :pick \$HoraActual 0 2] = [:pick \$HoraCreacion 0 2]) do={:if ([:pick \$HoraActual 3 5] < [:pick \$HoraCreacion 3 5]) do={:set \$EscribirLog (true);}}}}}}}}}};:if (\$EscribirLog=false) do={:if ( [:fin\ d \$tcomment \"Fe\"]!=26 ) do={:set \$tcomment ( \$tcomment.\" \".\$comentario );[ /ip hotspot user set \$user comment= \$tcomment ];}} else={ /log info \"ERROR: Usuario/Ficha= \$user creado con Mikr\ oTecRed no se le Coloco EL TIEMPO DE EXPIRACION en su Comentario porque la FECHA DEL MIKROTIK esta Desactualizada. Pero, sera Removida una vez que Cumpla su Tiempo Limite\"}}}}" rate-limit=10M/10M \ transparent-proxy=yes add keepalive-timeout=none mac-cookie-timeout=4w2d name="30 DIAS" on-login="{:local DescripcionScriptPlan \"PscriptCorrido\";:local PSocial 0;:local Tplan 0;:local DPlan \"MikroTecRed\";:local planDias 3\ 0;:local planHoras 0;:local planMinutos 0;:local atime [ /system clock get time ];:local adate [ /system clock get date ];:local tempDia [:pick \$adate 4 6];:local tempMes [:pick \$adate 0 3];:local t\ empAno [:pick \$adate 7 11];:local tempHoraCompleta [:pick \$atime 0 5];:local mesesArray (\"jan\",\"feb\",\"mar\",\"apr\",\"may\",\"jun\",\"jul\",\"aug\",\"sep\",\"oct\",\"nov\",\"dec\");:local diasA\ rray (\"31\",\"28\",\"31\",\"30\",\"31\",\"30\",\"31\",\"31\",\"30\",\"31\",\"30\",\"31\");:local anosbisArray (\"2020\",\"2024\",\"2028\",\"2032\",\"2036\",\"2040\",\"2044\",\"2048\",\"2052\",\"2056\ \",\"2060\");:local numMes ([:find \$mesesArray \$tempMes]);:local dia ([:pick \$diasArray \$numMes]);:if (\$numMes=1) do={:local numAnoBis ([:find \$anosbisArray \$tempAno]);:if (\$numAnoBis>=0) do={\ :set \$dia 29;}}; /log info \"Usuario/Ficha= \$user fecha=\$adate hora=\$atime Dias=\$planDias Plan=PscriptCorrido\";:local tempHora [:pick \$atime 0 2];:local tempMinutos [:pick \$atime 3 5];:local t\ empSegundos [:pick \$atime 6 9];:if (\$tempSegundos>59) do={:if ((\$tempSegundos-60)<10) do={:set \$tempSegundos (\"0\".\$tempSegundos)};:set \$tempMinutos (\$tempMinutos+1)};:set \$tempMinutos (\$tem\ pMinutos+\$planMinutos);:if (\$tempMinutos>59) do={:set \$tempMinutos (\$tempMinutos-60);:set \$tempHora (\$tempHora+1)};:if (\$tempMinutos<10) do={:set \$tempMinutos (\"0\".\$tempMinutos)};:set \$tem\ pHora (\$tempHora+\$planHoras);:if (\$tempHora>23) do={:set \$tempHora (\$tempHora-24);:set \$planDias (\$planDias+1);};:if (\$tempHora<10) do={:set \$tempHora (\"0\".\$tempHora)};:set \$atime (\$temp\ Hora.\":\".\$tempMinutos.\":\".\$tempSegundos);:local TMes 0;:local TAno 0;:local NdiasMes ([:pick \$diasArray \$numMes]);if ((\$planDias+\$tempDia)<=\$NdiasMes) do={:set \$tempDia (\$tempDia+\$planDi\ as);} else={:local sumaDias (\$NdiasMes-\$tempDia);:while (\$sumaDias<\$planDias) do={:set \$numMes (\$numMes+1);:if (\$numMes>11) do={:set \$numMes (0);:set \$TAno (\$TAno+1)};:set \$NdiasMes ([:pick\ \_\$diasArray \$numMes]);:if (\$numMes=1) do={:local numAnoBis ([:find \$anosbisArray (\$tempAno+\$TAno)]);:if (\$numAnoBis>=0) do={:set \$NdiasMes 29}};:set \$sumaDias (\$sumaDias+\$NdiasMes);:if (\$\ sumaDias>=\$planDias) do={:set \$tempDia (\$NdiasMes-(\$sumaDias-\$planDias));:set \$tempMes ([:pick \$mesesArray \$numMes])}}};:set \$tempAno (\$tempAno+\$TAno);:if (\$tempDia < 10) do={:set \$tempDi\ a (\"0\".\$tempDia)};:set \$adate (\$tempMes.\"/\".\$tempDia.\"/\".\$tempAno);:local comentario \"MikroTecRed\";:if (\$Tplan=0) do={:set \$DPlan \"MikroTecRed-Corrido\";} else={:if (\$Tplan=1) do={:se\ t \$DPlan \"MikroTecRed-Pausado\"}};:if (\$PSocial=0) do={:set \$comentario (\"FeMTR:\".\$adate.\" \".\$atime.\"-\".\$DPlan);} else={:if (\$PSocial=1) do={:set \$comentario (\"FeMTR:\".\$adate.\" \".\ \$atime.\"-\".\$DPlan.\" Facebook\");} else={:if (\$PSocial=2) do={:set \$comentario (\"FeMTR:\".\$adate.\" \".\$atime.\"-\".\$DPlan.\" WhatsApp\")}}};:set \$DPlan \$comentario;:local tcomment [ /ip h\ otspot user get \$user comment ];:local EscribirLog (false);:local MesesAno (\"MTR\",\"jan\",\"feb\",\"mar\",\"apr\",\"may\",\"jun\",\"jul\",\"aug\",\"sep\",\"oct\",\"nov\",\"dec\");:if ( [:find \$tco\ mment \"FcMTR:\"]=0 ) do={:local FechaActual [ /system clock get date ];:local FechaCreacion [pick \$tcomment 6 16];:if ([:pick \$FechaActual 7 11] < [:pick \$FechaCreacion 6 10]) do={:set \$EscribirL\ og (true);} else={:if ([:pick \$FechaActual 7 11] = [:pick \$FechaCreacion 6 10]) do={:local MesActual ([:find \$MesesAno [:pick \$FechaActual 0 3]]);:if (\$MesActual < 10) do={set \$MesActual (\"0\".\ \$MesActual)};:if (\$MesActual < [:pick \$FechaCreacion 3 5]) do={:set \$EscribirLog (true);} else={:if (\$MesActual = [:pick \$FechaCreacion 3 5]) do={:local DiaActual ([ :pick \$FechaActual 4 6 ]);:\ if (\$DiaActual < 10) do={set \$DiaActual (\"0\".\$DiaActual)};:if (\$DiaActual < [ :pick \$FechaCreacion 0 2 ]) do={:set \$EscribirLog (true);} else={:if (\$DiaActual = [ :pick \$FechaCreacion 0 2 ])\ \_do={:local HoraActual [ /system clock get time ];:local HoraCreacion [:pick \$tcomment 17 25];:if ([:pick \$HoraActual 0 2] < [:pick \$HoraCreacion 0 2]) do={:set \$EscribirLog (true);} else={:if ([\ :pick \$HoraActual 0 2] = [:pick \$HoraCreacion 0 2]) do={:if ([:pick \$HoraActual 3 5] < [:pick \$HoraCreacion 3 5]) do={:set \$EscribirLog (true);}}}}}}}}}};:if (\$EscribirLog=false) do={:if ( [:fin\ d \$tcomment \"Fe\"]!=26 ) do={:set \$tcomment ( \$tcomment.\" \".\$comentario );[ /ip hotspot user set \$user comment= \$tcomment ];}} else={ /log info \"ERROR: Usuario/Ficha= \$user creado con Mikr\ oTecRed no se le Coloco EL TIEMPO DE EXPIRACION en su Comentario porque la FECHA DEL MIKROTIK esta Desactualizada. Pero, sera Removida una vez que Cumpla su Tiempo Limite\"}}}}" rate-limit=10M/10M \ transparent-proxy=yes /ip hotspot walled-garden add comment="place hotspot rules here" disabled=yes add dst-host=*tawk.to add dst-host=*45.170.100.6 add dst-host=*gusof.com /ip hotspot walled-garden ip add action=accept disabled=no !dst-address !dst-address-list dst-host=tile.openstreetmap.org !dst-port !protocol !src-address !src-address-list add action=accept disabled=no !dst-address !dst-address-list dst-host=openstreetmap.org !dst-port !protocol !src-address !src-address-list add action=accept disabled=no !dst-address !dst-address-list dst-host=api.telegram.org !dst-port !protocol !src-address !src-address-list add action=accept disabled=no !dst-address !dst-address-list dst-host=10.10.11.3/ !dst-port !protocol !src-address !src-address-list add action=accept disabled=no !dst-address !dst-address-list dst-host=www.paypal.com !dst-port !protocol !src-address !src-address-list add action=accept disabled=no !dst-address !dst-address-list dst-host=www.sandbox.paypal.com !dst-port !protocol !src-address !src-address-list add action=accept disabled=no !dst-address !dst-address-list dst-host=www.paypalobjects !dst-port !protocol !src-address !src-address-list