Skip to content

S
Scott
Commit dccb1a5b authored by Scott Sun's avatar Scott Sun
Browse files
Options

s

parent 4ebac746
Show whitespace changes
Inline Side-by-side
Showing with 11542 additions and 3 deletions
2020-1-16/TUI计算界面/main.js
View file @ dccb1a5b
......@@ -7,7 +7,7 @@ var items = {
{
name: "num1",
type: "LineEdit",
pack: { label: "参数1", column_span: 1, label_alignment:"Left" },
pack: { label: "参数1", column_span: 1},
validate: function(obj,val,title,moment,self){
if(moment === "EDIT"){
// return [title+'必须小于10','Error']
......@@ -68,7 +68,7 @@ var items = {
property: {
text: "计算"
},
pack: { column_span: 1, label_alignment:"Left" },
pack: { column_span: 3, layout_type: 1 },
callback: function(obj, check, self) {
var tempData = this.getAllValues();
var num1 = tempData.num1
......@@ -117,7 +117,7 @@ var items = {
{
name: "res",
type: "label",
pack: { label: "结果", column_span: 2, label_alignment:"Left" },
pack: { label: "结果", column_span: 3, label_alignment:"Left" },
},
{
type: 'stretch'
......
tool/codeToTl.js 0 → 100644
View file @ dccb1a5b
// D:\work\TopDFM_JNS\qt5.6.3-win32-msvc2015\topcam\topjs\3.4.0\bin\topjs3.exe
// 从tl解密脚本
var fs = require('fs');
var crypto = require('topsin.crypto');
var files = fs.listDir("./source")
files.forEach(function (file) {
var baseName = file.baseName; //
var path = file.path; //
var content = fs.readFile(path)
var encrypt = 2;
if(content && content != "") {
var retC = ""
if (encrypt == 1) {
retC = crypto.e(content);
}
else if (encrypt == 2) {
retC = crypto.e2(content);
}
else if (encrypt == 3) {
retC = crypto.e3(content);
}
if(!fs.exists("./dist")){
fs.mkdir("./dist")
}
fs.writeFile("./dist/" + baseName + ".TL2", retC)
}
})
tool/jmFromDb.js 0 → 100644
View file @ dccb1a5b
// D:\work\TopDFM_JNS\qt5.6.3-win32-msvc2015\topcam\topjs\3.4.0\bin\topjs3.exe
// 从数据库解密脚本
var fs = require('fs');
var db = require("topsin.database");
var crypto = require('topsin.crypto');
var script_name = "JNS_ss_font_fill" // 脚本名称
db.addConnection({ // 数据库信息
databse_type:db.DbType.pg,
database_host:'222.191.240.214:5432', // 139.196.104.13:5433
database_name:'TOPDFM_JNS_V6',
database_user:'toplinker',
database_pwd:'TopLinker0510'
});
// 从数据库获取脚本
var ret = db.query("", function (d) {
return d.selectMap({
table:'pdm_workprocess_script',
field: ['id', 'md5', 'type', 'encrypt', 'content'], // , 'content'
where: { name: script_name, status: 'released' }
})
});
if(ret && ret.content) {
var content = ""
if (ret.encrypt == 1) {
content = crypto.d(ret.content);
}
else if (ret.encrypt == 2) {
content = crypto.d2(ret.content);
}
else if (ret.encrypt == 3) {
content = crypto.d3(ret.content);
}
if(!fs.exists("./src")){
fs.mkdir("./src")
}
fs.writeFile("./src/" + script_name + "." + (ret.type=="javascript"?"js":"pl"), content)
}
tool/jmFromTl.js 0 → 100644
View file @ dccb1a5b
// D:\work\TopDFM_JNS\qt5.6.3-win32-msvc2015\topcam\topjs\3.4.0\bin\topjs3.exe
// 从tl解密脚本
var fs = require('fs');
var crypto = require('topsin.crypto');
var files = fs.listDir("./tl")
files.forEach(function (file) {
var baseName = file.baseName; //
var suffix = file.suffix; //
var path = file.path; //
if(/^tl\d?$/i.test(suffix)) {
var content = fs.readFile(path)
var encrypt = 1;
if(/2/.test(suffix)){encrypt = 2}
else if (/3/.test(suffix)) {encrypt = 3}
if(content && content != "") {
var retC = ""
if (encrypt == 1) {
retC = crypto.d(content);
}
else if (encrypt == 2) {
retC = crypto.d2(content);
}
else if (encrypt == 3) {
retC = crypto.d3(content);
}
if(!fs.exists("./src")){
fs.mkdir("./src")
}
fs.writeFile("./src/" + baseName, retC)
}
}
})
tool/source/JNS_PUB_change_layer_name.pl 0 → 100644
View file @ dccb1a5b
=head
NAME:
DESCRIPTION:
PARAMETER:
[
]
VERSION_HISTORY:
V1.00 2013-2-21 Cody Yu
1.新版本
V1.01 2020-7-15 许仕斌
1.内外层层名增加t/b标识
V1.02 2020-8-6 许仕斌
1.增加了根据叠构信息自动排列T/B标识
V1.03 2022-2-28 fsy
1.假层下一层带入时增加屏蔽条件
HELP:
<html><body bgcolor="#DDECFE">
<font size="3" color="#003DB2"><p>功能简介</p></font>
<p> 根据预审指示工具类型更改层名 </p>
<br>
<font size="3" color="#003DB2"><p>参数配置</p></font>
<font color="#008000"><p> ● </p></font>
<p> </p>
<font color="#008000"><p> ● </p></font>
<p> </p>
<font size="3" color="#003DB2"><p>注意事项</p></font>
<p> ● 无 </p>
<br>
</body></html>
=cut
#use strict;
#my ($JOB,$GEN,$GUI,$DB,$JOB_ID,$PAR);
use utf8;
use JSON;
use Data::Dump 'dump';
my ($Job,$Step) = ($JOB,undef);
my $Return = 'finish';
my @Report;
my (%stack_rows,$n,$y);
try {
my $json = JSON->new->allow_nonref;
###检查Genesis料号是否存在并打开
if (! $GEN->isJobExists(job=>$Job) ){
$GUI->msgbox(-icon=>'error',-text=>"料号 $Job 在Genesis中不存在, 请检查!");
return 'Error';
}
$GEN->openJob(job=>$Job) unless ($GEN->isJobOpen(job=>$Job));
my %matrix = $GEN->getMatrix(job=>$Job,type=>'hash');
my $inn_film_type = $IKM->get_jobinfo(-jobname=>$JOB,-jobcategory=>'work',-jobinfo=>'JNS_inn_tooling_type');
my $out_film_type = $IKM->get_jobinfo(-jobname=>$JOB,-jobcategory=>'work',-jobinfo=>'JNS_out_tooling_type');
my $silk_type = $IKM->get_jobinfo(-jobname=>$JOB,-jobcategory=>'work',-jobinfo=>'JNS_ss_procss_type');
my $layer_count = $GEN->getLayerCount(job=>$Job);
my $lamination_method = $IKM->get_jobinfo(-jobname=>$JOB,-jobcategory=>'work',-jobinfo=>'JNS_lamination_method');
my $spec3 = $IKM->get_jobinfo(-jobname=>$JOB,-jobcategory=>'work',-jobinfo=>'JNS_pcb_speciality3');
if ($layer_count > 16){
$y = 16*31+120;
}
else{
$y = $layer_count*31+120;
}
my $nameJOB = substr($Job,0,9);
$GEN->openMatrix(job=>$Job);
foreach my $layer (sort {$matrix{$a}{row} <=> $matrix{$b}{row}} keys %matrix) {
if ( ($matrix{$layer}{context} eq 'board')and ($matrix{$layer}{layer_type} eq 'silk_screen') ){
unless( $layer =~ /^(p|n)/ ){
my $tmp;
if( $silk_type =~ /^spray$/i ){
$tmp = 'p-';
}
elsif( $silk_type =~ /^silkscreen$/i ){
$tmp = 'n-';
}
else{
next;
}
$GEN->COM( 'matrix_rename_layer',job=>$Job,matrix=>'matrix',layer=>$layer,new_name=>$tmp.$layer);
}
}
elsif ( $matrix{$layer}{context} eq 'board' and ($matrix{$layer}{tl_name} =~ /^(top|bottom)$/ ) ){
if ($layer =~ m/(t|b)/){
$GUI->msgbox(-icon=>'info',-text=>"层已经被定义了上、下面，如需变更，请手动修正！",-gen => $GEN);
# return 'Cancel'
}
push @stackup_layers,$layer;
}
elsif ( $matrix{$layer}{context} eq 'board' and ($matrix{$layer}{tl_name} =~ /^l\d+$/ ) ){
if ($layer =~ m/(t|b)/){
$GUI->msgbox(-icon=>'info',-text=>"层已经被定义了上、下面，如需变更，请手动修正！",-gen => $GEN);
# return 'Cancel'
}
push @stackup_layers,$layer;
}
}
my $toplinker_layers = $IKM->select_arrayhash(-table=>'pdm_job_stack_layers',-where=>{job_id=>$JOB_ID});
my @cust_layer;
foreach my $item (sort{$a->{layer_num} <=> $b->{layer_num}} @$toplinker_layers) {
if($item->{attr_data} && $item->{layer_type} ne "Silk Screen" && $item->{layer_type} ne "Solder Mask"){
my $json_attr = $json->decode($item->{attr_data});
my $cust_ly = $json_attr->{customized_layer_name};
if($cust_ly && $cust_ly ne "") {
if($cust_ly =~ /jia/) {
push @cust_layer, $cust_ly;
} else {
if($cust_ly =~ /(\d+)/) {
push @cust_layer, ($1).($item->{layer_side} eq "Top"? "t" : "b");
} else {
push @cust_layer, $cust_ly;
}
}
}
}
}
my $test;
foreach my $layer (@stackup_layers){
my ($worklyrn) = $layer =~ /(\d+)/;
$ope_boolean = 1 if ($layer =~ m/^ope-/);
$n ++;
$stack_rows{$layer}{sequence} = $n;
$stack_rows{$layer}{gen_name} = $layer;
#enum_tl_side
if (scalar(@cust_layer) > 1 ){
foreach $l (@cust_layer) {
my ($lyrn) = $l =~ /(\d+)/;
# $GEN->PAUSE($l);
$l =~ s/-//;
#$GUI->msgbox(-icon=>'info',-text=>"$l $layer ");
if ($l =~ /^$layer/ ){
$lm = substr($l ,-2,1);
if ( $lm eq 't'){
$stack_rows{$layer}{enum_tl_side} = 'top';
last;
}
else{
$stack_rows{$layer}{enum_tl_side} = 'bottom';
last;
}
}
else{
if($worklyrn == $lyrn and $layer !~ /^jia/ and $l !~ /^jia/){
if ($l =~ /([a-zA-Z]+)/){
if ($1 eq 't'){
$stack_rows{$layer}{enum_tl_side} = 'top';
last;
}
else{
$stack_rows{$layer}{enum_tl_side} = 'bottom';
last;
}
}
}
}
}
$test = 'auto';
}
else{
if ( defined $matrix{$layer}{enum_tl_side} ){
$stack_rows{$layer}{enum_tl_side} = $matrix{$layer}{enum_tl_side};
}
else{
if(defined $matrix{$layer}{tl_type} and $matrix{$layer}{tl_type} eq 'outer'){#外层
if ( defined $matrix{$layer}{tl_num} and $matrix{$layer}{tl_num}%2 == 1 ){
$stack_rows{$layer}{enum_tl_side} = 'top';
}else{
$stack_rows{$layer}{enum_tl_side} = 'bottom';
}
}else{#内层
if ($spec3 eq 'through_board'){#通孔板
if ( defined $matrix{$layer}{tl_num} and $matrix{$layer}{tl_num}%2 == 0 ){
if ($lamination_method eq 'cu'){#覆箔法
$stack_rows{$layer}{enum_tl_side} = 'top';
}elsif ($lamination_method eq 'core'){#覆板法
if ($ope_boolean){#包含ope层
$stack_rows{$layer}{enum_tl_side} = 'top';
}else{
$stack_rows{$layer}{enum_tl_side} = 'bottom';
}
}
}else{
if ($lamination_method eq 'cu'){#覆箔法
$stack_rows{$layer}{enum_tl_side} = 'bottom';
}elsif ($lamination_method eq 'core'){#覆板法
if ($ope_boolean){#包含ope层
$stack_rows{$layer}{enum_tl_side} = 'bottom';
}else{
$stack_rows{$layer}{enum_tl_side} = 'top';
}
}
}
}else{
$stack_rows{$layer}{enum_tl_side} = '';
}
}
}
$test = 'work';
}
my $facefile = "E:/$nameJOB.txt";
# if (-e $facefile){
# open (LAYERMYFILE,$facefile);
# while (<LAYERMYFILE>) {
# chomp;
# my ($lyrn) = $_ =~ /(\d+)/;
# $_ =~ s/-//;
# #$GUI->msgbox(-icon=>'info',-text=>"$_ $layer ");
# if ($_ =~ /^$layer/ ){
# $lm = substr($_ ,-2,1);
# if ( $lm eq 't'){
# $stack_rows{$layer}{enum_tl_side} = 'top';
# last;
# }
# else{
# $stack_rows{$layer}{enum_tl_side} = 'bottom';
# last;
# }
# }
# else{
# if($worklyrn == $lyrn and $layer !~ /^jia/ and $_ !~ /^jia/){
# if ($_ =~ /([a-zA-Z]+)/){
# if ($1 eq 't'){
# $stack_rows{$layer}{enum_tl_side} = 'top';
# last;
# }
# else{
# $stack_rows{$layer}{enum_tl_side} = 'bottom';
# last;
# }
# }
# }
# }
# }
# close LAYERMYFILE;
# $test = 'auto';
# }
# else{
# if ( defined $matrix{$layer}{enum_tl_side} ){
# $stack_rows{$layer}{enum_tl_side} = $matrix{$layer}{enum_tl_side};
# }
# else{
# if(defined $matrix{$layer}{tl_type} and $matrix{$layer}{tl_type} eq 'outer'){#外层
# if ( defined $matrix{$layer}{tl_num} and $matrix{$layer}{tl_num}%2 == 1 ){
# $stack_rows{$layer}{enum_tl_side} = 'top';
# }else{
# $stack_rows{$layer}{enum_tl_side} = 'bottom';
# }
# }else{#内层
# if ($spec3 eq 'through_board'){#通孔板
# if ( defined $matrix{$layer}{tl_num} and $matrix{$layer}{tl_num}%2 == 0 ){
# if ($lamination_method eq 'cu'){#覆箔法
# $stack_rows{$layer}{enum_tl_side} = 'top';
# }elsif ($lamination_method eq 'core'){#覆板法
# if ($ope_boolean){#包含ope层
# $stack_rows{$layer}{enum_tl_side} = 'top';
# }else{
# $stack_rows{$layer}{enum_tl_side} = 'bottom';
# }
# }
# }else{
# if ($lamination_method eq 'cu'){#覆箔法
# $stack_rows{$layer}{enum_tl_side} = 'bottom';
# }elsif ($lamination_method eq 'core'){#覆板法
# if ($ope_boolean){#包含ope层
# $stack_rows{$layer}{enum_tl_side} = 'bottom';
# }else{
# $stack_rows{$layer}{enum_tl_side} = 'top';
# }
# }
# }
# }else{
# $stack_rows{$layer}{enum_tl_side} = '';
# }
# }
# }
# $test = 'work';
# }
#gen_ldi
if(defined $matrix{$layer}{tl_type} and $matrix{$layer}{tl_type} eq 'outer'){#外层
if( $out_film_type =~ /^ldi$/i){
$stack_rows{$layer}{gen_ldi} = 'ldi';
}
else{
$stack_rows{$layer}{gen_ldi} = 'film';
}
}
else{
if( $inn_film_type =~ /^ldi$/i ){
$stack_rows{$layer}{gen_ldi} = 'ldi';
}
else{
$stack_rows{$layer}{gen_ldi} = 'film';
}
}
}
if ($test eq 'work'){
$GUI->msgbox(-icon=>'error',-text=>"没有检测到叠构信息，请注意人工核对信息!");
}
my $stackup_new = $GUI->show_tableform (
-defaultsize=>[450,$y],
-title => "请确认料号的叠构信息--------------" ,
-rows => \%stack_rows,
-showcheck => 1,-gen => $GEN,
-columns => [
{
column_name=>'gen_name',
label=>'层别名称',
width=>150,
type=>'string',
validate_func=>sub{
my %par = @_;
my $layer = $par{formpanel}->get_value($par{row},'gen_name');
$par{formpanel}->get_widget($par{row},'gen_name')->set_editable(0);
if ($matrix{$layer}{context} eq 'board' and $matrix{$layer}{layer_type} eq 'signal' and $matrix{$layer}{polarity} eq 'positive' and $layer !~ m/jia/){
return {
bgcolor => '#FDC74D',
};
}
elsif ($matrix{$layer}{context} eq 'board' and $matrix{$layer}{layer_type} eq 'power_ground' and ($matrix{$layer}{polarity} eq 'negative' or $matrix{$layer}{polarity} eq 'positive') and $layer !~ m/jia/){
return {
bgcolor => '#DBAD00',
};
}
return {};
}
},
{
column_name=>'enum_tl_side',
label=>'层别面次',
type=>'enum',
must_field=>1,
width=>120,
#sensitive =>0,
property=>{
tl_field=>[name=>'scalar',display_name=>'text'],
tl_value_field=>'name',
tl_data=>[
{name=>'top',display_name=>'top'},
{name=>'bottom',display_name=>'bottom'},
]
},
validate_func=>sub{
my %par = @_;
my $layer = $par{formpanel}->get_value($par{row},'gen_name');
my $tl_side = $par{formpanel}->get_value($par{row},'enum_tl_side');
if ($matrix{$layer}{tl_name} eq 'top' and $tl_side eq 'bottom' ){
return {
bgcolor => 'red',
error_msg=>'外层层别面次选择错误',
};
}
elsif ($matrix{$layer}{tl_name} eq 'bottom' and $tl_side eq 'top' ){
return {
bgcolor => 'red',
error_msg=>'外层层别面次选择错误',
};
}
if ($tl_side eq 'top'){
return {
#bgcolor => '#CDDD00',
bgcolor => 'light green',
};
}
return {};
}
},
{
column_name=>'gen_ldi',
label=>'曝光方式',
type=>'enum',
must_field=>1,
width=>120,
#sensitive =>0,
property=>{
tl_field=>[name=>'scalar',display_name=>'text'],
tl_value_field=>'name',
tl_data=>[
{name=>'ldi',display_name=>'ldi'},
{name=>'film',display_name=>'film'},
]
},
validate_func=>sub{
my %par = @_;
my $tl_ldi = $par{formpanel}->get_value($par{row},'gen_ldi');
if ($tl_ldi eq 'film'){
return {
#bgcolor => '#0DBA00',
bgcolor => '#88777B',
};
}
return {};
}
},
],
);
return 'Cancel' unless ($stackup_new);
foreach my $layer (sort {$matrix{$a}{row} <=> $matrix{$b}{row}} keys %{$stackup_new}){
if($stackup_new->{$layer}{enum_tl_side} eq "top"){
if ($stackup_new->{$layer}{gen_ldi} eq "ldi"){
if ($layer =~ /ldi$/i){
$layerold = $layer;
$layer =~ s/-ldi/t-ldi/;
$GEN->COM( 'matrix_rename_layer',job=>$Job,matrix=>'matrix',layer=>$layerold,new_name=>$layer);
}
else{
$GEN->COM( 'matrix_rename_layer',job=>$Job,matrix=>'matrix',layer=>$layer,new_name=>$layer.'t-ldi');
}
}
else{
if ($layer =~ /ldi$/i){
$layerold = $layer;
$layer =~ s/-ldi/t/;
$GEN->COM( 'matrix_rename_layer',job=>$Job,matrix=>'matrix',layer=>$layerold,new_name=>$layer);
}
else{
$GEN->COM( 'matrix_rename_layer',job=>$Job,matrix=>'matrix',layer=>$layer,new_name=>$layer.'t');
}
}
}
else{
if ($stackup_new->{$layer}{gen_ldi} eq "ldi"){
if ($layer =~ /ldi$/i){
$layerold = $layer;
$layer =~ s/-ldi/b-ldi/;
$GEN->COM( 'matrix_rename_layer',job=>$Job,matrix=>'matrix',layer=>$layerold,new_name=>$layer);
}
else{
$GEN->COM( 'matrix_rename_layer',job=>$Job,matrix=>'matrix',layer=>$layer,new_name=>$layer.'b-ldi');
}
}
else{
if ($layer =~ /ldi$/i){
$layerold = $layer;
$layer =~ s/-ldi/b/;
$GEN->COM( 'matrix_rename_layer',job=>$Job,matrix=>'matrix',layer=>$layerold,new_name=>$layer);
}
else{
$GEN->COM( 'matrix_rename_layer',job=>$Job,matrix=>'matrix',layer=>$layer,new_name=>$layer.'b');
}
}
}
}
$GEN->COM( 'matrix_page_close',job=>$Job,matrix=>'matrix');
#$GUI->msgbox(-icon=>'info',-text=>"$layer - 上",-gen => $GEN);
###output and return status, if genesis error, it will output genesis error command
unless ($GEN->{STATUS}){
return $Return;
}
else{
$GUI->msgbox(-icon=>'error',-text=>join("\n",@{$GEN->{STATUS}}));
$IKM->update_job_workflow_log(-notes=>" Genesis Error:\n ".join("\n ",@{$GEN->{STATUS}}));
return 'Error';
}
}
catch Error::Simple with {
my $error = shift;
$GUI->msgbox(-icon=>'error',-text=>$error);
return 'Error';
}
finally{
};
tool/src/ImpCouponData.pl 0 → 100644
View file @ dccb1a5b
This source diff could not be displayed because it is too large. You can view the blob instead.
tool/src/JNS_PUB_change_layer_name 0 → 100644
View file @ dccb1a5b
=head
NAME:
DESCRIPTION:
PARAMETER:
[
]
VERSION_HISTORY:
V1.00 2013-2-21 Cody Yu
1.新版本
V1.01 2020-7-15 许仕斌
1.内外层层名增加t/b标识
V1.02 2020-8-6 许仕斌
1.增加了根据叠构信息自动排列T/B标识
V1.03 2022-2-28 fsy
1.假层下一层带入时增加屏蔽条件
HELP:
<html><body bgcolor="#DDECFE">
<font size="3" color="#003DB2"><p>功能简介</p></font>
<p> 根据预审指示工具类型更改层名 </p>
<br>
<font size="3" color="#003DB2"><p>参数配置</p></font>
<font color="#008000"><p> ● </p></font>
<p> </p>
<font color="#008000"><p> ● </p></font>
<p> </p>
<font size="3" color="#003DB2"><p>注意事项</p></font>
<p> ● 无 </p>
<br>
</body></html>
=cut
#use strict;
#my ($JOB,$GEN,$GUI,$DB,$JOB_ID,$PAR);
use utf8;
use JSON;
use Data::Dump 'dump';
my ($Job,$Step) = ($JOB,undef);
my $Return = 'finish';
my @Report;
my (%stack_rows,$n,$y);
try {
my $json = JSON->new->allow_nonref;
###检查Genesis料号是否存在并打开
if (! $GEN->isJobExists(job=>$Job) ){
$GUI->msgbox(-icon=>'error',-text=>"料号 $Job 在Genesis中不存在, 请检查!");
return 'Error';
}
$GEN->openJob(job=>$Job) unless ($GEN->isJobOpen(job=>$Job));
my %matrix = $GEN->getMatrix(job=>$Job,type=>'hash');
my $inn_film_type = $IKM->get_jobinfo(-jobname=>$JOB,-jobcategory=>'work',-jobinfo=>'JNS_inn_tooling_type');
my $out_film_type = $IKM->get_jobinfo(-jobname=>$JOB,-jobcategory=>'work',-jobinfo=>'JNS_out_tooling_type');
my $silk_type = $IKM->get_jobinfo(-jobname=>$JOB,-jobcategory=>'work',-jobinfo=>'JNS_ss_procss_type');
my $layer_count = $GEN->getLayerCount(job=>$Job);
my $lamination_method = $IKM->get_jobinfo(-jobname=>$JOB,-jobcategory=>'work',-jobinfo=>'JNS_lamination_method');
my $spec3 = $IKM->get_jobinfo(-jobname=>$JOB,-jobcategory=>'work',-jobinfo=>'JNS_pcb_speciality3');
if ($layer_count > 16){
$y = 16*31+120;
}
else{
$y = $layer_count*31+120;
}
my $nameJOB = substr($Job,0,9);
$GEN->openMatrix(job=>$Job);
foreach my $layer (sort {$matrix{$a}{row} <=> $matrix{$b}{row}} keys %matrix) {
if ( ($matrix{$layer}{context} eq 'board')and ($matrix{$layer}{layer_type} eq 'silk_screen') ){
unless( $layer =~ /^(p|n)/ ){
my $tmp;
if( $silk_type =~ /^spray$/i ){
$tmp = 'p-';
}
elsif( $silk_type =~ /^silkscreen$/i ){
$tmp = 'n-';
}
else{
next;
}
$GEN->COM( 'matrix_rename_layer',job=>$Job,matrix=>'matrix',layer=>$layer,new_name=>$tmp.$layer);
}
}
elsif ( $matrix{$layer}{context} eq 'board' and ($matrix{$layer}{tl_name} =~ /^(top|bottom)$/ ) ){
if ($layer =~ m/(t|b)/){
$GUI->msgbox(-icon=>'info',-text=>"层已经被定义了上、下面，如需变更，请手动修正！",-gen => $GEN);
# return 'Cancel'
}
push @stackup_layers,$layer;
}
elsif ( $matrix{$layer}{context} eq 'board' and ($matrix{$layer}{tl_name} =~ /^l\d+$/ ) ){
if ($layer =~ m/(t|b)/){
$GUI->msgbox(-icon=>'info',-text=>"层已经被定义了上、下面，如需变更，请手动修正！",-gen => $GEN);
# return 'Cancel'
}
push @stackup_layers,$layer;
}
}
my $toplinker_layers = $IKM->select_arrayhash(-table=>'pdm_job_stack_layers',-where=>{job_id=>$JOB_ID});
my @cust_layer;
foreach my $item (sort{$a->{layer_num} <=> $b->{layer_num}} @$toplinker_layers) {
if($item->{attr_data} && $item->{layer_type} ne "Silk Screen" && $item->{layer_type} ne "Solder Mask"){
my $json_attr = $json->decode($item->{attr_data});
my $cust_ly = $json_attr->{customized_layer_name};
if($cust_ly && $cust_ly ne "") {
if($cust_ly =~ /jia/) {
push @cust_layer, $cust_ly;
} else {
if($cust_ly =~ /(\d+)/) {
push @cust_layer, ($1).($item->{layer_side} eq "Top"? "t" : "b");
} else {
push @cust_layer, $cust_ly;
}
}
}
}
}
my $test;
foreach my $layer (@stackup_layers){
my ($worklyrn) = $layer =~ /(\d+)/;
$ope_boolean = 1 if ($layer =~ m/^ope-/);
$n ++;
$stack_rows{$layer}{sequence} = $n;
$stack_rows{$layer}{gen_name} = $layer;
#enum_tl_side
if (scalar(@cust_layer) > 1 ){
foreach $l (@cust_layer) {
my ($lyrn) = $l =~ /(\d+)/;
# $GEN->PAUSE($l);
$l =~ s/-//;
#$GUI->msgbox(-icon=>'info',-text=>"$l $layer ");
if ($l =~ /^$layer/ ){
$lm = substr($l ,-2,1);
if ( $lm eq 't'){
$stack_rows{$layer}{enum_tl_side} = 'top';
last;
}
else{
$stack_rows{$layer}{enum_tl_side} = 'bottom';
last;
}
}
else{
if($worklyrn == $lyrn and $layer !~ /^jia/ and $l !~ /^jia/){
if ($l =~ /([a-zA-Z]+)/){
if ($1 eq 't'){
$stack_rows{$layer}{enum_tl_side} = 'top';
last;
}
else{
$stack_rows{$layer}{enum_tl_side} = 'bottom';
last;
}
}
}
}
}
$test = 'auto';
}
else{
if ( defined $matrix{$layer}{enum_tl_side} ){
$stack_rows{$layer}{enum_tl_side} = $matrix{$layer}{enum_tl_side};
}
else{
if(defined $matrix{$layer}{tl_type} and $matrix{$layer}{tl_type} eq 'outer'){#外层
if ( defined $matrix{$layer}{tl_num} and $matrix{$layer}{tl_num}%2 == 1 ){
$stack_rows{$layer}{enum_tl_side} = 'top';
}else{
$stack_rows{$layer}{enum_tl_side} = 'bottom';
}
}else{#内层
if ($spec3 eq 'through_board'){#通孔板
if ( defined $matrix{$layer}{tl_num} and $matrix{$layer}{tl_num}%2 == 0 ){
if ($lamination_method eq 'cu'){#覆箔法
$stack_rows{$layer}{enum_tl_side} = 'top';
}elsif ($lamination_method eq 'core'){#覆板法
if ($ope_boolean){#包含ope层
$stack_rows{$layer}{enum_tl_side} = 'top';
}else{
$stack_rows{$layer}{enum_tl_side} = 'bottom';
}
}
}else{
if ($lamination_method eq 'cu'){#覆箔法
$stack_rows{$layer}{enum_tl_side} = 'bottom';
}elsif ($lamination_method eq 'core'){#覆板法
if ($ope_boolean){#包含ope层
$stack_rows{$layer}{enum_tl_side} = 'bottom';
}else{
$stack_rows{$layer}{enum_tl_side} = 'top';
}
}
}
}else{
$stack_rows{$layer}{enum_tl_side} = '';
}
}
}
$test = 'work';
}
my $facefile = "E:/$nameJOB.txt";
# if (-e $facefile){
# open (LAYERMYFILE,$facefile);
# while (<LAYERMYFILE>) {
# chomp;
# my ($lyrn) = $_ =~ /(\d+)/;
# $_ =~ s/-//;
# #$GUI->msgbox(-icon=>'info',-text=>"$_ $layer ");
# if ($_ =~ /^$layer/ ){
# $lm = substr($_ ,-2,1);
# if ( $lm eq 't'){
# $stack_rows{$layer}{enum_tl_side} = 'top';
# last;
# }
# else{
# $stack_rows{$layer}{enum_tl_side} = 'bottom';
# last;
# }
# }
# else{
# if($worklyrn == $lyrn and $layer !~ /^jia/ and $_ !~ /^jia/){
# if ($_ =~ /([a-zA-Z]+)/){
# if ($1 eq 't'){
# $stack_rows{$layer}{enum_tl_side} = 'top';
# last;
# }
# else{
# $stack_rows{$layer}{enum_tl_side} = 'bottom';
# last;
# }
# }
# }
# }
# }
# close LAYERMYFILE;
# $test = 'auto';
# }
# else{
# if ( defined $matrix{$layer}{enum_tl_side} ){
# $stack_rows{$layer}{enum_tl_side} = $matrix{$layer}{enum_tl_side};
# }
# else{
# if(defined $matrix{$layer}{tl_type} and $matrix{$layer}{tl_type} eq 'outer'){#外层
# if ( defined $matrix{$layer}{tl_num} and $matrix{$layer}{tl_num}%2 == 1 ){
# $stack_rows{$layer}{enum_tl_side} = 'top';
# }else{
# $stack_rows{$layer}{enum_tl_side} = 'bottom';
# }
# }else{#内层
# if ($spec3 eq 'through_board'){#通孔板
# if ( defined $matrix{$layer}{tl_num} and $matrix{$layer}{tl_num}%2 == 0 ){
# if ($lamination_method eq 'cu'){#覆箔法
# $stack_rows{$layer}{enum_tl_side} = 'top';
# }elsif ($lamination_method eq 'core'){#覆板法
# if ($ope_boolean){#包含ope层
# $stack_rows{$layer}{enum_tl_side} = 'top';
# }else{
# $stack_rows{$layer}{enum_tl_side} = 'bottom';
# }
# }
# }else{
# if ($lamination_method eq 'cu'){#覆箔法
# $stack_rows{$layer}{enum_tl_side} = 'bottom';
# }elsif ($lamination_method eq 'core'){#覆板法
# if ($ope_boolean){#包含ope层
# $stack_rows{$layer}{enum_tl_side} = 'bottom';
# }else{
# $stack_rows{$layer}{enum_tl_side} = 'top';
# }
# }
# }
# }else{
# $stack_rows{$layer}{enum_tl_side} = '';
# }
# }
# }
# $test = 'work';
# }
#gen_ldi
if(defined $matrix{$layer}{tl_type} and $matrix{$layer}{tl_type} eq 'outer'){#外层
if( $out_film_type =~ /^ldi$/i){
$stack_rows{$layer}{gen_ldi} = 'ldi';
}
else{
$stack_rows{$layer}{gen_ldi} = 'film';
}
}
else{
if( $inn_film_type =~ /^ldi$/i ){
$stack_rows{$layer}{gen_ldi} = 'ldi';
}
else{
$stack_rows{$layer}{gen_ldi} = 'film';
}
}
}
if ($test eq 'work'){
$GUI->msgbox(-icon=>'error',-text=>"没有检测到叠构信息，请注意人工核对信息!");
}
my $stackup_new = $GUI->show_tableform (
-defaultsize=>[450,$y],
-title => "请确认料号的叠构信息--------------" ,
-rows => \%stack_rows,
-showcheck => 1,-gen => $GEN,
-columns => [
{
column_name=>'gen_name',
label=>'层别名称',
width=>150,
type=>'string',
validate_func=>sub{
my %par = @_;
my $layer = $par{formpanel}->get_value($par{row},'gen_name');
$par{formpanel}->get_widget($par{row},'gen_name')->set_editable(0);
if ($matrix{$layer}{context} eq 'board' and $matrix{$layer}{layer_type} eq 'signal' and $matrix{$layer}{polarity} eq 'positive' and $layer !~ m/jia/){
return {
bgcolor => '#FDC74D',
};
}
elsif ($matrix{$layer}{context} eq 'board' and $matrix{$layer}{layer_type} eq 'power_ground' and ($matrix{$layer}{polarity} eq 'negative' or $matrix{$layer}{polarity} eq 'positive') and $layer !~ m/jia/){
return {
bgcolor => '#DBAD00',
};
}
return {};
}
},
{
column_name=>'enum_tl_side',
label=>'层别面次',
type=>'enum',
must_field=>1,
width=>120,
#sensitive =>0,
property=>{
tl_field=>[name=>'scalar',display_name=>'text'],
tl_value_field=>'name',
tl_data=>[
{name=>'top',display_name=>'top'},
{name=>'bottom',display_name=>'bottom'},
]
},
validate_func=>sub{
my %par = @_;
my $layer = $par{formpanel}->get_value($par{row},'gen_name');
my $tl_side = $par{formpanel}->get_value($par{row},'enum_tl_side');
if ($matrix{$layer}{tl_name} eq 'top' and $tl_side eq 'bottom' ){
return {
bgcolor => 'red',
error_msg=>'外层层别面次选择错误',
};
}
elsif ($matrix{$layer}{tl_name} eq 'bottom' and $tl_side eq 'top' ){
return {
bgcolor => 'red',
error_msg=>'外层层别面次选择错误',
};
}
if ($tl_side eq 'top'){
return {
#bgcolor => '#CDDD00',
bgcolor => 'light green',
};
}
return {};
}
},
{
column_name=>'gen_ldi',
label=>'曝光方式',
type=>'enum',
must_field=>1,
width=>120,
#sensitive =>0,
property=>{
tl_field=>[name=>'scalar',display_name=>'text'],
tl_value_field=>'name',
tl_data=>[
{name=>'ldi',display_name=>'ldi'},
{name=>'film',display_name=>'film'},
]
},
validate_func=>sub{
my %par = @_;
my $tl_ldi = $par{formpanel}->get_value($par{row},'gen_ldi');
if ($tl_ldi eq 'film'){
return {
#bgcolor => '#0DBA00',
bgcolor => '#88777B',
};
}
return {};
}
},
],
);
return 'Cancel' unless ($stackup_new);
foreach my $layer (sort {$matrix{$a}{row} <=> $matrix{$b}{row}} keys %{$stackup_new}){
if($stackup_new->{$layer}{enum_tl_side} eq "top"){
if ($stackup_new->{$layer}{gen_ldi} eq "ldi"){
if ($layer =~ /ldi$/i){
$layerold = $layer;
$layer =~ s/-ldi/t-ldi/;
$GEN->COM( 'matrix_rename_layer',job=>$Job,matrix=>'matrix',layer=>$layerold,new_name=>$layer);
}
else{
$GEN->COM( 'matrix_rename_layer',job=>$Job,matrix=>'matrix',layer=>$layer,new_name=>$layer.'t-ldi');
}
}
else{
if ($layer =~ /ldi$/i){
$layerold = $layer;
$layer =~ s/-ldi/t/;
$GEN->COM( 'matrix_rename_layer',job=>$Job,matrix=>'matrix',layer=>$layerold,new_name=>$layer);
}
else{
$GEN->COM( 'matrix_rename_layer',job=>$Job,matrix=>'matrix',layer=>$layer,new_name=>$layer.'t');
}
}
}
else{
if ($stackup_new->{$layer}{gen_ldi} eq "ldi"){
if ($layer =~ /ldi$/i){
$layerold = $layer;
$layer =~ s/-ldi/b-ldi/;
$GEN->COM( 'matrix_rename_layer',job=>$Job,matrix=>'matrix',layer=>$layerold,new_name=>$layer);
}
else{
$GEN->COM( 'matrix_rename_layer',job=>$Job,matrix=>'matrix',layer=>$layer,new_name=>$layer.'b-ldi');
}
}
else{
if ($layer =~ /ldi$/i){
$layerold = $layer;
$layer =~ s/-ldi/b/;
$GEN->COM( 'matrix_rename_layer',job=>$Job,matrix=>'matrix',layer=>$layerold,new_name=>$layer);
}
else{
$GEN->COM( 'matrix_rename_layer',job=>$Job,matrix=>'matrix',layer=>$layer,new_name=>$layer.'b');
}
}
}
}
$GEN->COM( 'matrix_page_close',job=>$Job,matrix=>'matrix');
#$GUI->msgbox(-icon=>'info',-text=>"$layer - 上",-gen => $GEN);
###output and return status, if genesis error, it will output genesis error command
unless ($GEN->{STATUS}){
return $Return;
}
else{
$GUI->msgbox(-icon=>'error',-text=>join("\n",@{$GEN->{STATUS}}));
$IKM->update_job_workflow_log(-notes=>" Genesis Error:\n ".join("\n ",@{$GEN->{STATUS}}));
return 'Error';
}
}
catch Error::Simple with {
my $error = shift;
$GUI->msgbox(-icon=>'error',-text=>$error);
return 'Error';
}
finally{
};
tool/src/JNS_ss_font_fill.js 0 → 100644
View file @ dccb1a5b
/*
NAME: JNS_ss_font_fill
DESCRIPTION: 空心文字填实
PARAMETER:
[
{
name : 'step',
title : 'step',
type : 'LineEdit',
property : {tool_tip : '目标step,默认是orig'}
},
{
name : 'workLayers',
title : 'workLayers',
type : 'LineEdit',
property : {tool_tip : '工作层'}
},
{
name : 'auto_save',
title : '自动保存',
type : 'RadioBox',
property : {
item_list:[
{name:'yes',text:'YES'},
{name:'no',text:'NO'},
],
tool_tip:'是否自动保存料号开关'
}
}
]
VERSION_HISTORY:
V1.00 2023-02-14 kunli
1.新版本
HELP:
<html><body bgcolor="#DDECFE">
<font size="3" color="#003DB2"><p>功能简介</p></font>
<p> 空心文字填实 </ p>
<br>
<font size="3" color="#003DB2"><p>参数配置</p></font>
<p> </p>
<br>
<font size="3" color="#003DB2"><p>注意事项</p></font>
<p> 非同一回路的非线属性的文字无法填实，需要手动作业 </p>
<br>
</body></html>
*/
// 引入模块 包 外部参数
var $ = require('topcam.scriptfunc').argv();
var fs = require('fs');
var _ = require('lodash');
var mode = $.ikm ? "topcam" : "aimdfm";
var IKM = $.ikm ? $.ikm : require('topcam.ikm6')($);
var GEN = $.gen;
var Job = $.job || $.job_name;
var JobId = $.job_id;
var db = $.db || IKM.db;
var plugin = require('topsin.gengui');
var GUI = plugin.newGui(plugin.__dirname);
var PAR = {};
if ($.par) {
PAR = $.par;
} else if ($.hasOwnProperty('script_parameter')) {
PAR = JSON.parse($.script_parameter);
}
if (mode === "aimdfm") {
IKM.crud("updateRow", {
table: "pdm_aimdfm_task",
data: { current_process_title: $.process_title },
where: { id: $.task_id }
});
}
var Status = 'ok';
var resultData = [];
var par = PAR; // 接收参数
var default_par = { // 设置默认参数
step: "cad",
auto_save: "No",
workLayers: "out",
units: "mm"
};
for (var key in default_par) {
if (!par.hasOwnProperty(key) || par[key] == "") {
par[key] = default_par[key];
}
}
// 定义变量
var job = Job.toLowerCase();
require("topsin.genmath");
var genMath = new GenMath();
var last_move_distance = 0;
try {
// 常规验证 准备工作
if (!GEN.isJobExists({ job: job })) { throw "料号" + job + "不存在" }
if (!GEN.isJobOpen({ job: job })) { GEN.openJob({ job: job }) }
if (mode == "aimdfm") {
if (GEN.checkInout({ job: job, mode: "test" }) != 0) {
throw "the job check"
}
GEN.checkInout({ job: job, mode: "out" });
}
// 主体
var stepList = GEN.getStepList({ job: job });
stepList = stepList.filter(function (v) {
var tmpreg = new RegExp(par.step, "ig");
return tmpreg.test(v);
});
if (stepList.length == 0) {
throw "未找到" + par.step
}
var workLayers = par.workLayers.split(";")
workLayers = workLayers.filter(function (l) { return GEN.isLayerExists({ job: job, layer: l }) })
if (workLayers.length == 0) {
throw "没有找到工作层"
}
for (var step_cot = 0; step_cot < stepList.length; step_cot++) {
var step = stepList[step_cot];
GEN.openStep({ job: job, name: step });
GEN.clearLayers(); //清除层显示
GEN.affectedLayer({ mode: 'all', affected: 'no' }); //设置影响层全部不影响
GEN.COM("sel_options,clear_mode=clear_after,display_mode=all_layers,area_inout=inside,area_select=select,select_mode=standard,area_touching_mode=exclude");
GEN.units({ type: par.units }); //单位初始化
GEN.zoomHome(); //窗口显示回到原始位置
GEN.selClearFeature()
var select_ans = GEN.PAUSE('Please select features');
if (!_.eq(select_ans, "OK")) {
return 'Done';
}
// for (var work_layer_cot = 0; work_layer_cot < workLayers.length; work_layer_cot++) {
// var work_layer = workLayers[work_layer_cot];
// var ans = 'OK';
// do {
// var line_type = 0; //1 代表横，2代表竖
// var line_info = [];
// do {
// do {
// GEN.workLayer({ name: work_layer, display_number: 1, clear_before: "yes" });
// var select_ans = GEN.PAUSE('Please select features');
// if (!_.eq(select_ans, "OK")) {
// return 'Done';
// }
// } while (GEN.getSelectCount() == 0);
// line_info = GEN.getFeatures({ job: job, step: step, layer: work_layer, options: "select+feat_index", units: 'mm' });
// GEN.selClearFeature();
// var line_k = -999;
// var has_err = 0;
// for (var i = 0; i < line_info.length; i++) {
// var cur_kb_val = genMath.getLineKb(line_info[i]);
// var cur_k_val = 999;
// if (_.isValid(cur_kb_val["k"]) && _.fuzzyEqual(_.toNumber(cur_kb_val["k"]), 0)) {
// cur_k_val = cur_kb_val["k"];
// }
// // GUI.debug({ text: '--cur_kb_val-' + _.toString(cur_kb_val) +"--" + _.toString(cur_k_val) });
// if (i === 0) {
// line_k = cur_k_val;
// } else if (!_.fuzzyEqual(line_k, cur_k_val)) {
// GUI.msgBox({
// title: '错误提示',
// text: '选择的非同一方向的线，请重选',
// buttons: ['Ok', 'Cancel']
// });
// has_err = 1;
// break;
// }
// }
// // GUI.debug({ text: '--line_info-' + _.toString(line_info) +"--" + _.toString(line_k) + "==" + has_err});
// if (has_err == 1) {
// line_type = 0;
// } else {
// if (_.fuzzyEqual(line_k, 0)) {
// line_type = 1;
// } else if (_.fuzzyEqual(line_k, 999)) {
// line_type = 2;
// }
// }
// } while (line_type == 0);
// // GUI.debug({ text: '--line_type-' + _.toString(line_type) });
// var move_info = get_move_info(line_type);
// if (_.isEmpty(move_info)) {
// return 'Cancel';
// }
// // GUI.debug({ text: '--move_info-' + _.toString(move_info) });
// // move
// var move_distance = move_info["move_distance"];
// var move_direction = move_info["move_direction"];
// last_move_distance = move_distance;
// var dx_v = 0;
// var dy_v = 0;
// if (_.eq(move_direction, "up")) {
// dx_v = 0;
// dy_v = move_distance;
// } else if (_.eq(move_direction, "down")) {
// dx_v = 0;
// dy_v = -move_distance;
// } else if (_.eq(move_direction, "left")) {
// dx_v = -move_distance;
// dy_v = 0;
// } else if (_.eq(move_direction, "right")) {
// dx_v = move_distance;
// dy_v = 0;
// }
// for (var i = 0; i < line_info.length; i++) {
// GEN.selLayerFeat({ layer: work_layer, index: line_info[i].index, operation: "select" });
// }
// GEN.selMove({ dx: dx_v, dy: dy_v });
// GEN.selClearFeature();
// ans = GUI.msgBox({
// title: '错误提示',
// text: '是否继续移动',
// buttons: ['Ok', 'Cancel']
// });
// // GUI.debug({ text: '--ans-' + _.toString(ans) });
// } while (/ok/i.test(ans));
// };
GEN.affectedLayer({ mode: 'all', affected: 'no' }); //设置影响层全部不影响
GEN.clearLayers(); //清除层显示
};
// 保存料号
if (/yes/ig.test(par.auto_save)) {
GEN.checkInout({ job: job, mode: "out" });
GEN.saveJob({ job: job });
GEN.checkInout({ job: job, mode: "in" });
}
// 结尾返回 固定写法
var Return = "Done";
if (mode === "aimdfm") {
IKM.crud("updateRow", {
table: "pdm_aimdfm_task",
data: { progress: 100 },
where: { id: $.task_id }
});
var tmperr = { type: "info", title: "操作完成, 请注意检查!" };
if (GEN.hasError()) {
Status = 'error';
tmperr = { type: "error", title: "GEN错误!", detail: [{ desc: GEN.STATUS.join("\n") }] };
}
resultData.push(tmperr);
Return = { status: Status, result_data: resultData };
}
return Return;
} catch (e) {
var showGUI = true;
if (GEN.STATUS.length > 0) {
if (GEN.STATUS.indexOf("Pause Exit:0") >= 0) {
showGUI = false;
}
e = _.toString(e) + "\n" + GEN.STATUS.join("\n");
}
if (showGUI) {
IKM.msg(e);
}
Status = 'error';
resultData.push({ type: "error", title: "脚本执行出错!", detail: [{ desc: _.toString(e) }] });
return mode === "aimdfm" ? { status: Status, result_data: resultData } : "Error";
}
/**
*
* @param {*} layer
*/
function delLayer(layer) {
if (!Array.isArray(layer)) {
layer = [layer]
}
layer = layer.filter(function (v) { return GEN.isLayerExists({ job: job, layer: v }) })
if (layer.length > 0) {
GEN.deleteLayer({ job: job, layer: layer })
}
}
/**
* 获取v-cut预放值，单位是mm,以及移动方向
*/
function get_move_info(iLineType) {
var func = "function (props) {\
return GUI.showForm({\
title: 'v-cut移动距离(mm)',\
size: '240x200',\
use_core_engine: true,\
include_hidden_items: true,\
items: {\
type: 'ScrollArea',\
property: {\
widget_resizable: true,\
frame_shape: 'NoFrame'\
},\
child: [{\
type: 'FormGridLayout',\
property: {},\
child: props.child\
}]\
},\
values: props.value,\
})\
}";
var child = [{
name: 'move_distance',
title: '移动距离:',
type: 'DoubleLineEdit',
property: {
tool_tip: '移动距离'
}
}
];
if (iLineType == 1) {
child.unshift({
name: 'move_direction',
title: '移动方向:',
type: 'RadioBox',
property: {
item_list: [
{ name: 'up', text: 'Up' },
{ name: 'down', text: 'Down' },
],
tool_tip: '移动方向'
}
});
} else {
child.unshift({
name: 'move_direction',
title: '移动方向:',
type: 'RadioBox',
property: {
item_list: [
{ name: 'left', text: 'Left' },
{ name: 'right', text: 'Right' },
],
tool_tip: '移动方向'
}
});
}
var value = {move_distance :last_move_distance};
var data = IKM.command(func, { child: child, value: value }, 1).data;
// GUI.debug({text: 'data-----' + _.toString(data)});
return data;
}
\ No newline at end of file
tool/src/JNS_test.pl 0 → 100644
View file @ dccb1a5b
=head
NAME:
DESCRIPTION: Copy Step
PARAMETER:
[
{
name : 'org_step',
title : '原始step',
type : 'LineEdit',
property : {tool_tip : '过滤Step名称'},
},
{
name : 'step',
title : '目标step',
type : 'LineEdit',
property : {tool_tip : '料号后缀'},
},
{
name : 'save_job',
title : '保存料号',
type : 'RadioBox',
property : {
size_policy:'Expanding,Fixed',
item_list:[
{name:'Yes',text:'Yes'},
{name:'No',text:'No'},
],
tool_tip:'脚本结束后自动保存料号，未设定，默认为No'
},
pack : {row:1,column:1},
}
]
VERSION_HISTORY:
V1.00 2021-01-12 Super Zhang
1.新版本
HELP:
<html><body bgcolor="#DDECFE">
<font size="3" color="#003DB2"><p>功能简介</p></font>
<p> Copy Step </p>
<br>
<font size="3" color="#003DB2"><p>参数配置</p></font>
<font color="#008000"><p> ● 无</p></font>
<font size="3" color="#003DB2"><p>注意事项</p></font>
<p> ● 无 </p>
<br>
</body></html>
=cut
use strict;
use Encode;
use utf8;
use Data::Dump 'dump';
use File::Copy;
use JSON;
use_module('TL_GenMath');
my $json = new JSON;
my ($Job,$Step)=($JOB,undef);
$PAR->{save_job} = 'No' unless $PAR->{save_job};
unless($PAR->{org_step} or $PAR->{step}){
$GUI->msgbox(-icon=>'error',-text=>"请先设置脚本参数！");
return 'Cancel';
}
$Job = lc($Job);
try {
show_loading("判断是否选择料号..",0,position=>'n');
unless( $Job){
$GUI->msgbox(-icon=>'error',-text=>"请先选择料号后再执行脚本!");
return 'Cancel';
}
##检查料号是否存在
update_loading("检查${Job}是否存在..",0,position=>'n');
unless ( $GEN->isJobExists(job=>$Job) ){
$GUI->msgbox(-icon=>'error',-text=>"料号 $Job 不存在，请确认。");
return 'Cancel';
}
##
update_loading("正在复制Step...",0,position=>'n');
$GEN->openJob(job=>$Job) unless ($GEN->isJobOpen(job=>$Job));
$GEN->openStep(job=>$Job,name=>$PAR->{org_step});
my $exitString = `openwindow=>no<>layerindex=>1,2,3,4<>layerCount=>4`;
hide_loading();
##保存料号
if( $PAR->{save_job} =~ /yes/i ){
show_loading("$Job 正在保存料号，请稍候...",0,position=>'n');
$GEN->checkInout(job=>$Job,mode=>'out');
$GEN->saveJob(job=>$Job);
hide_loading();
}
###output and return status, if genesis error, it will output genesis error command
unless ($GEN->{STATUS}){
return 'done';
}
else{
$GUI->msgbox(-icon=>'error',-text=>join("\n",@{$GEN->{STATUS}}));
return 'Error';
}
}
catch Error::Simple with {
my $error = shift;
$GUI->msgbox(-icon=>'error',-text=>$error);
return 'Error';
}
finally{
$GEN->COM('disp_on');
};
__END__
\ No newline at end of file
tool/src/TL_PUB_create_impedance_coupon.pl 0 → 100644
View file @ dccb1a5b
=head
NAME: TL_PUB_create_impedance_coupon
DESCRIPTION: 绘制阻抗图形
PARAMETER:
[
]
VERSION_HISTORY:
V1.00 2011-12-03 Tony Guo
New Version
V1.01 2013-06-09 Tony Guo
Fixed bug when coplanar and normal impeance in same test coupon
V1.02 2016-11-25 Bill Li
获取到的线宽间距等单位转换um2mil.
V1.03 2016-11-25 Cody Yu
1.阻抗条长度和宽度取出来，不用/25.4
V1.04 2016-12-06 Cody Yu
1.阻抗线增加补偿
V2.00 2017-06-22 Tomy
1.转为EPQ版本，inch|mm用于设定阻抗表单存的coupon条size单位 mm时要除以25.4
V2.01 2017-09-21 Cody
1.文件存储改为string存储
V2.02 2017-09-22 Tomy
1.增加挡墨和防焊开窗，钻孔层定为dir层
V3.00 2017-10-26 Cody
1.产品升级到V6
V3.01 2017-12-14 Shyer
1.coupon线补偿带小数位修复
2.阻抗条尺寸公英制转换小数位异常修复
V3.02 2017-12-15 Shyer
1.共面阻抗铜面增加补偿（同线宽补偿）
V3.03 2018-01-08 Tomy
1._um2mil公制转英制取消取三位小数
V3.04 2019-04-16 Shyer
1.新增单层body text位置获取
V3.05 2020-07-29 Kurri
1.body text修改为仅外层Top面添加
2.档点层别名支持做${layer_count}变量替换
V3.06 2020-11-30 Kurri
1.档点层改为正片
HELP:
=cut
use strict;
use utf8;
use Encode;
use JSON;
use Data::Dump 'dump';
my ($Job,$LayerCount,$Return,$WarningMsg,$units);
$units = "inch";
#$units = "mm";
use_module("PubFunction");
my $F = PubFunction->new();
my $db_units = 'um'; # 数据库中存的线宽间距的单位 (um|mil)
my $coupon_size_units='mm'; #inch|mm用于设定阻抗表单存的coupon条size单位 mm时要除以25.4
try{
unless ($JOB){
$JOB = $GUI->select_job(-title=>'请选择料号',-joblist=>$IKM->select_fieldarray(-table=>'pdm_job',-field=>'jobname',-order=>'id DESC'));
return 'Cancel' unless $JOB;
};
$JOB_ID = $IKM->get_job_id($JOB) unless $JOB_ID;
$Job = lc($JOB) unless $Job ;
##
if (! $GEN->isJobExists(job=>$Job) ){
$GUI->msgbox(-icon=>'error',-text=>"料号 $Job 在Genesis中不存在, 请检查!");
return 'Error';
}
##
$Return = 'Done';
use_module('ImpCouponData');
#获取数据库里的料号层数
my $dbLayerCount = $IKM->get_jobinfo(-jobinfo=>'layer_count',-jobid=>$JOB_ID);
#$dbLayerCount = 10;
#检查DB上的层总数是否与genesis一致
$LayerCount = $GEN->getLayerCount(job=>$Job);
if ( $dbLayerCount and $LayerCount != $dbLayerCount){
return 'Error' if ($GUI->confirm('Genesis料号里的板层数与数据内不一致,你确定要继续吗?') eq 'no');
}
#$LayerCount = 10;
#选择需要运行的coupon
my $imps = $IKM->select_arrayhash(-table=>'pdm_job_imp',-field=>['target_impedance','coupon_name'],-where=>{job_id=>$JOB_ID});
unless(@$imps){
$GUI->msgbox(-icon=>'error',-text=>"料号 $Job 中没有阻抗信息, 请检查是否有录入!");
return 'Error';
}
my (@coupon_list,@sel_coupons);
my %coupons;
foreach my $imp (@$imps){
my @cp_names = split(',',$imp->{coupon_name});
foreach my $cp_name (@cp_names){
$coupons{$cp_name}{$imp->{target_impedance}} = 1;
}
}
foreach my $cp (sort keys %coupons){
push @coupon_list,$cp,uc($cp);
#push @coupon_list,$cp,'< '.$cp.' > '.join(' | ',sort{$a <=> $b} keys %{$coupons{$cp}});
push @sel_coupons,$cp;
}
my %vform = $GUI->show_form(
-defaultsize=>[350,400],
-title => '请选择阻抗条',
-items => [
{name=>'title1',type=>'frame',property=>{}},
{
name => 'coupons',
type => 'checkbox',
property => {
tl_list => \@coupon_list,
tl_columns => 1,
},
value => \@sel_coupons,
},
{
name => 'btn',
label => '',
type => 'label',
button_position => 'left',
buttons => [
{name=>'btn_sel_all',label=>'全选',command=>sub{
my %par = @_;
$par{formpanel}->set_value('coupons',\@sel_coupons);
}},
{name=>'btn_unsel_all',label=>'取消全选',command=>sub{
my %par = @_;
$par{formpanel}->set_value('coupons',undef);
}},
]
},
{name=>'title2',type=>'vbox',property=>{},overback=>1},
{
name => 'show_form',
label => '显示参数确认界面',
type => 'radio',
property => {
tl_list => ['yes'=>'YES','no'=>'NO'],
tl_columns => 3,
},
value => 'no',
}
]
);
return 'Cancel' unless %vform;
@sel_coupons = @{$vform{coupons}};
return 'Cancel' unless @sel_coupons;
#查找HDI钻孔层
my $matrix = $GEN->getMatrix(job=>$Job,type=>'hash');
foreach my $cp_name (sort @sel_coupons){
my $COUPON_DATA;
$COUPON_DATA->{coupon_name} = $cp_name;
#foreach my $info ('coupon_length','coupon_width','coupon_template','coupon_position','coupon_layout_parameter'){
#$COUPON_DATA->{coupon_template} = $IKM->get_layerinfo(-jobid=>$JOB_ID,-layer=>$cp_name,-layerinfo=>'coupon_template_name');
#}
$COUPON_DATA->{coupon_template} = 'coupon'; # FOR test
#$IKM->command('function(){APP.setDebugMode(5)}',{},0);
my $cfg = $IKM->select_value(-table=>'pub_conf',-field=>'json_data',-where=>{path => 'pdm/impedance_coupon_template'});
#$GUI->msgbox(-text=>dump($cfg));
# 转换配置 json2perl
#my $file = ${ENV}{GENESIS_TMP}.'/impedance_coupon_template';
#$file = '>'.$file;
#open(MF,$file);
#print MF $cfg;
#close MF;
#$file = ${ENV}{GENESIS_TMP}.'/impedance_coupon_template';
#my $_data = $F->prase_file_json2perl_hash(file=>$file);
my $_data = $F->prase_file_json2perl_hash(string=>$cfg);
#unlink $file;
#my $template_value = eval($cfg);
my $template_value = $_data;
foreach my $item (keys %$template_value){
$COUPON_DATA->{$item} = $template_value->{$item};
}
my $layout_param = $IKM->get_layerinfo(-jobid=>$JOB_ID,-layer=>$cp_name,-layerinfo=>'coupon_layout_parameter');
if ($layout_param){
$layout_param = eval($layout_param);
foreach my $k (keys %{$layout_param}){
$COUPON_DATA->{$k} = $layout_param->{$k} if defined $layout_param->{$k};
}
}
$COUPON_DATA->{coupon_position} = $IKM->get_layerinfo(-jobid=>$JOB_ID,-layer=>$cp_name,-layerinfo=>'coupon_on_step');
$COUPON_DATA->{fixed_fields}{coupon_position} = 1;
my $cp_length = $IKM->get_layerinfo(-jobid=>$JOB_ID,-layer=>$cp_name,-layerinfo=>'coupon_length');
my $cp_length_org = eval($cp_length);
if($coupon_size_units eq 'mm'){
$cp_length = sprintf("%.3f",$cp_length/25.4);
}
#$cp_length = $cp_length/25.4;
if ($cp_length){
$COUPON_DATA->{coupon_length} = $cp_length;
$COUPON_DATA->{coupon_length_org} = $cp_length_org;
$COUPON_DATA->{auto_enlarge_coupon_length} = 'no';
$COUPON_DATA->{fixed_fields}{coupon_length} = 1;
$COUPON_DATA->{fixed_fields}{auto_enlarge_coupon_length} = 1;
}
my $cp_width = $IKM->get_layerinfo(-jobid=>$JOB_ID,-layer=>$cp_name,-layerinfo=>'coupon_width');
my $cp_width_org = eval($cp_width);
if($coupon_size_units eq 'mm'){
$cp_width = sprintf("%.3f",$cp_width/25.4);
}
#$cp_width = $cp_width/25.4;
if ($cp_width){
$COUPON_DATA->{coupon_body_width} = $COUPON_DATA->{coupon_header_width} = $cp_width;
$COUPON_DATA->{coupon_body_width_org} = $COUPON_DATA->{coupon_header_width_org} = $cp_width_org;
$COUPON_DATA->{auto_enlarge_coupon_header_width} = 'no';
$COUPON_DATA->{auto_enlarge_coupon_body_width} = 'no';
$COUPON_DATA->{fixed_fields}{coupon_body_width} = 1;
$COUPON_DATA->{fixed_fields}{coupon_header_width} = 1;
$COUPON_DATA->{fixed_fields}{auto_enlarge_coupon_header_width} = 1;
$COUPON_DATA->{fixed_fields}{auto_enlarge_coupon_header_width} = 1;
}
my $all_imps = $IKM->select_arrayhash(-table=>'pdm_job_imp',-field=>['*'],-where=>{job_id=>$JOB_ID});
foreach my $imp (@$all_imps){
$imp->{signal1} = imp_layernum2tlname($imp->{signal1});
$imp->{signal2} = imp_layernum2tlname($imp->{signal2});
$imp->{reference1} = imp_layernum2tlname($imp->{reference1});
$imp->{reference2} = imp_layernum2tlname($imp->{reference2});
$imp->{id} = $imp->{uuid};
my @cp_names = split(',',$imp->{coupon_name});
foreach my $cp_nm (@cp_names){
if ($cp_name eq $cp_nm){
if ($db_units eq 'um') {
# 数据转换 um2mil by Bill 20161125
$imp->{org_line_width1} = sprintf("%.1f",_um2mil($imp->{org_line_width1}));
$imp->{org_spacing} = sprintf("%.1f",_um2mil($imp->{org_spacing}));
$imp->{line_width1} = sprintf("%.1f",_um2mil($imp->{line_width1})); #1
$imp->{line_width1_adjust_max} = sprintf("%.1f",_um2mil($imp->{line_width1_adjust_max}));
$imp->{line_width1_adjust_min} = sprintf("%.1f",_um2mil($imp->{line_width1_adjust_min}));
$imp->{spacing} = sprintf("%.1f",_um2mil($imp->{spacing})); #1
#$imp->{target_impedance_max} = _um2mil($imp->{target_impedance_max});
#$imp->{target_impedance_min} = _um2mil($imp->{target_impedance_min});
$imp->{target_impedance_max} = $imp->{target_impedance_max};
$imp->{target_impedance_min} =$imp->{target_impedance_min};
$imp->{test_line_length} = sprintf("%.1f",_um2mil($imp->{test_line_length}));
#添加一个 coplanar_spacing 转换 Tomy 20170621
$imp->{coplanar_spacing} = sprintf("%.1f",_um2mil($imp->{coplanar_spacing})); #1
}
push @{$COUPON_DATA->{impedances}},$imp;
}
}
}
$COUPON_DATA->{GEN} = $GEN;
$COUPON_DATA->{job_id} = $JOB_ID;
$COUPON_DATA->{job_name} = $JOB;
my $coupon_object = Top::ImpCouponData->new(-IKM=>$IKM);
$coupon_object->set_coupon_data($COUPON_DATA);
$coupon_object->set_layer_count($LayerCount);
$coupon_object->set_matrix($matrix);
$coupon_object->coupon_to_layer();
if ($vform{show_form} eq 'yes' or !$COUPON_DATA->{coupon_template}){
return 'Cancel' unless $coupon_object->show_coupon_form();
}
$coupon_object->convert_units();
$coupon_object->convert_matrix();
$coupon_object->analysis_group();
$coupon_object->line_copmensation();
$coupon_object->group_left_right();
$coupon_object->init_pad_position();
$coupon_object->adjust_coupon_length();
$coupon_object->init_line_y_sequence();
$coupon_object->calc_line_y();
$coupon_object->layout_header_lines();
$coupon_object->header_text_position();
$coupon_object->adjust_coupon_width();
my %gen_layer;
foreach my $item (keys %{$COUPON_DATA->{matrix}}){
if ($COUPON_DATA->{matrix}{$item}{tl_name}){
$gen_layer{$COUPON_DATA->{matrix}{$item}{tl_name}} = $item;
}
}
my $step = lc($cp_name);
if ($GEN->isStepExists(job=>$Job,step=>$step)){
return 'Cancel' unless ($GUI->confirm("Step $step 已经存在,确定要覆盖它吗?") eq 'yes');
my @boardLayers;
foreach my $item (keys %$matrix){
if ($matrix->{$item}{context} eq 'board'){
push @boardLayers,$item;
}
}
$GEN->openStep(job=>$Job,name=>$step);
$GEN->clearLayers();
$GEN->affectedLayer(mode=>'all',affected=>'yes');
$GEN->COM('sel_all_feat');
$GEN->selDelete();
}
else{
$GEN->createStep(job=>$Job,name=>$step);
$GEN->openStep(job=>$Job,name=>$step);
}
if ($COUPON_DATA->{coupon_layout_path} eq 'customize'){
$GEN->clearLayers();
$GEN->affectedLayer(mode=>'all',affected=>'no');
$GEN->PAUSE('Select Coupon Layout Path');
my $work_layer =$GEN->getWorkLayer();
my @feats = $GEN->getFeatures(job=>$Job,step=>$step,layer=>$work_layer,options=>'select',units=>'inch') if $work_layer;
if (@feats){
@feats = opt_lines(@feats);
my $ps = TL::GenMath->calc_point_on_line($feats[0],$COUPON_DATA->{'left_header_area_rect'}{xmax} - $COUPON_DATA->{'left_header_area_rect'}{xmin});
my $pe = TL::GenMath->calc_point_on_line({xs=>$feats[-1]{xe},ys=>$feats[-1]{ye},xe=>$feats[-1]{xs},ye=>$feats[-1]{ys}},$COUPON_DATA->{'right_header_area_rect'}{xmax} - $COUPON_DATA->{'right_header_area_rect'}{xmin});
($feats[0]{xs},$feats[0]{ys}) = ($ps->{x},$ps->{y});
($feats[-1]{xe},$feats[-1]{ye}) = ($pe->{x},$pe->{y});
my @line_path = ({x=>$feats[0]{xs},y=>$feats[0]{ys}});
foreach my $feat (@feats){
my $tmp = {x=>$feat->{xe},y=>$feat->{ye}};
if ($feat->{type} eq 'arc'){
@{$tmp}{'xc','yc','direction'} = @{$feat}{'xc','yc','direction'};
}
push @line_path,$tmp;
}
$coupon_object->{COUPON_DATA}{line_path} = \@line_path;
}
}
$coupon_object->layout_path_lines();
$coupon_object->body_text_position();
$coupon_object->layer_body_text_position();
$coupon_object->coplanar_hole_position();
#$GUI->debug(dump($COUPON_DATA));
$GEN->COM('disp_off');
#$GEN->COM('disp_on');
$GEN->clearLayers();
$GEN->affectedLayer(mode=>'all',affected=>'no');
$GEN->units(type=>$units);
#创建Profile
my ($ShiftX,$ShiftY) = (-$COUPON_DATA->{left_down_zero_pad}{x},-$COUPON_DATA->{left_down_zero_pad}{y});
my $trans;
$trans->{left}{angle} = 360-$COUPON_DATA->{left_header_transform}{angle};
$trans->{left}{angle} -= 360 if $trans->{left}{angle} >= 360;
$trans->{left}{x_anchor} = $COUPON_DATA->{left_header_transform}{x} + $ShiftX;
$trans->{left}{y_anchor} = $COUPON_DATA->{left_header_transform}{y} + $ShiftY;
$trans->{right}{angle} = 360-$COUPON_DATA->{right_header_transform}{angle};
$trans->{right}{angle} -= 360 if $trans->{right}{angle} >= 360;
$trans->{right}{x_anchor} = $COUPON_DATA->{right_header_transform}{x} + $ShiftX;
$trans->{right}{y_anchor} = $COUPON_DATA->{right_header_transform}{y} + $ShiftY;
my $tmp_layer = 'tl_script_tmp_layer';
if ($COUPON_DATA->{coupon_layout_path} eq 'customize'){
$GEN->deleteLayer(job=>$Job,layer=>$tmp_layer);
$GEN->createLayer(job=>$Job,layer=>$tmp_layer,context=>'misc',type=>'signal');
$GEN->affectedLayer(affected=>'yes',mode=>'single',layer=>$tmp_layer,clear_before=>'yes');
my ($xs,$ys) = ($COUPON_DATA->{center_path_lines}[0]{x},$COUPON_DATA->{center_path_lines}[0]{y});
my $sym = 'r'.($COUPON_DATA->{coupon_body_width}*1000);
foreach my $n (1..scalar(@{$COUPON_DATA->{center_path_lines}})-1){
my $it = $COUPON_DATA->{center_path_lines}[$n];
if ($it->{direction}){
$GEN->addArc(xs=>$xs+$ShiftX,ys=>$ys+$ShiftY,xe=>$it->{x}+$ShiftX,ye=>$it->{y}+$ShiftY,xc=>$it->{xc}+$ShiftX,yc=>$it->{yc}+$ShiftY,direction=>$it->{direction},symbol=>$sym);
}
else{
$GEN->addLine(xs=>$xs+$ShiftX,ys=>$ys+$ShiftY,xe=>$it->{x}+$ShiftX,ye=>$it->{y}+$ShiftY,symbol=>$sym);
}
($xs,$ys) = ($it->{x},$it->{y});
}
my $clip_w = $COUPON_DATA->{coupon_body_width} + 0.0002;
$GEN->addPad(x=>$COUPON_DATA->{left_zero_pad}{x}-$clip_w/2+$ShiftX,y=>$COUPON_DATA->{left_zero_pad}{y}+$ShiftY,symbol=>'s'.($clip_w*1000),
polarity=>'negative',attributes=>{attribute=>'.string',text=>'left_side'});
$GEN->addPad(x=>$COUPON_DATA->{right_zero_pad}{x}+$clip_w/2+$ShiftX,y=>$COUPON_DATA->{right_zero_pad}{y}+$ShiftY,symbol=>'s'.($clip_w*1000),
polarity=>'negative',attributes=>{attribute=>'.string',text=>'right_side'});
foreach my $lr ('left','right'){
$GEN->addRectangle(x1=>$COUPON_DATA->{$lr.'_header_area_rect'}{xmin}+$ShiftX,y1=>$COUPON_DATA->{$lr.'_header_area_rect'}{ymin}+$ShiftY,
x2=>$COUPON_DATA->{$lr.'_header_area_rect'}{xmax}+$ShiftX,y2=>$COUPON_DATA->{$lr.'_header_area_rect'}{ymax}+$ShiftY,
attributes=>{attribute=>'.string',text=>$lr.'_side'}
) if ($COUPON_DATA->{$lr.'_header_area_rect'});
}
foreach my $lr ('left','right'){
if ($trans->{$lr}{angle}){
$GEN->selClearFeature();
$GEN->selectByFilter(attribute=>[{attribute=>'.string',text=>$lr.'_side'}]);
$GEN->COM('sel_transform',mode=>'anchor',oper=>'rotate',duplicate=>'no',%{$trans->{$lr}}) ;
}
}
$GEN->COM('sel_all_feat');
$GEN->selContourize();
$GEN->COM('sel_all_feat');
$GEN->COM('sel_surf2outline',width=>0.1);
$GEN->COM('sel_all_feat');
$GEN->COM('sel_create_profile');
$GEN->deleteLayer(job=>$Job,layer=>$tmp_layer);
}
else{
if($coupon_size_units eq 'mm'){
$GEN->units(type=>$coupon_size_units);
$GEN->panelSize(width=>$COUPON_DATA->{coupon_length_org},height=>$COUPON_DATA->{coupon_body_width_org});
$GEN->units(type=>$units);
}else{
$GEN->panelSize(width=>$COUPON_DATA->{coupon_length},height=>$COUPON_DATA->{coupon_body_width});
}
}
my $outer_tpad_sym = $COUPON_DATA->{outer_tpad_shape} . $COUPON_DATA->{pad_size};
my $inner_tpad_sym = $COUPON_DATA->{inner_tpad_shape} . $COUPON_DATA->{pad_size};
my $outer_gpad_sym = $COUPON_DATA->{outer_gpad_shape} . $COUPON_DATA->{pad_size};
my $inner_gpad_sym = $COUPON_DATA->{inner_gpad_shape} . $COUPON_DATA->{pad_size};
my $outer_tpad_clear_sym = $COUPON_DATA->{outer_tpad_shape} . ($COUPON_DATA->{pad_size} + $COUPON_DATA->{outer_pad2copper} * 2);
my $inner_tpad_clear_sym = $COUPON_DATA->{inner_tpad_shape} . ($COUPON_DATA->{pad_size} + $COUPON_DATA->{inner_pad2copper} * 2);
my $outer_gpad_clear_sym = $COUPON_DATA->{outer_gpad_shape} . ($COUPON_DATA->{pad_size} + $COUPON_DATA->{outer_pad2copper} * 2);
my $inner_gpad_clear_sym = $COUPON_DATA->{inner_gpad_shape} . ($COUPON_DATA->{pad_size} + $COUPON_DATA->{inner_pad2copper} * 2);
my $outer_tdrl_clear_sym = $COUPON_DATA->{outer_tpad_shape} . ($COUPON_DATA->{hole_size} + $COUPON_DATA->{drill2copper} * 2);
my $inner_tdrl_clear_sym = $COUPON_DATA->{inner_tpad_shape} . ($COUPON_DATA->{hole_size} + $COUPON_DATA->{drill2copper} * 2);
my $outer_gdrl_clear_sym = $COUPON_DATA->{outer_gpad_shape} . ($COUPON_DATA->{hole_size} + $COUPON_DATA->{drill2copper} * 2);
my $inner_gdrl_clear_sym = $COUPON_DATA->{inner_gpad_shape} . ($COUPON_DATA->{hole_size} + $COUPON_DATA->{drill2copper} * 2);
#patch_ref_sym #填补影响层上漏出线路时用
my $max_clear = (sort {$b <=> $a} ($COUPON_DATA->{pad_size} + 2*$COUPON_DATA->{outer_pad2copper}, $COUPON_DATA->{pad_size} + 2*$COUPON_DATA->{inner_pad2copper}, $COUPON_DATA->{hole_size} + 2*$COUPON_DATA->{drill2copper}))[0] + 2;
my $outer_patch_ref_clear_sym = $COUPON_DATA->{outer_tpad_shape} . $max_clear;
my $inner_patch_ref_clear_sym = $COUPON_DATA->{outer_tpad_shape} . $max_clear;
my $tmp_size = ($COUPON_DATA->{pad_size} + $COUPON_DATA->{outer_pad2copper} * 2);
my $outer_gpad_thermal_sym = $COUPON_DATA->{outer_gpad_thermal};
$outer_gpad_thermal_sym =~ s/\$\{OUT\}/$tmp_size/;
$tmp_size = $COUPON_DATA->{pad_size};
$outer_gpad_thermal_sym =~ s/\$\{IN\}/$tmp_size/;
$tmp_size = ($COUPON_DATA->{pad_size} + $COUPON_DATA->{inner_pad2copper} * 2);
my $inner_gpad_thermal_sym = $COUPON_DATA->{inner_gpad_thermal};
$inner_gpad_thermal_sym =~ s/\$\{OUT\}/$tmp_size/;
$tmp_size = $COUPON_DATA->{pad_size};
$inner_gpad_thermal_sym =~ s/\$\{IN\}/$tmp_size/;
foreach my $layer_number (1 .. $COUPON_DATA->{layer_count}){
my $tl_name;
if ($layer_number == 1){
$tl_name = 'top';
}
elsif($layer_number == $COUPON_DATA->{layer_count}){
$tl_name = 'bottom';
}
else{
$tl_name = 'l'.$layer_number;
}
my $layer_name = $gen_layer{$tl_name};
my $layer_matrix = $matrix->{$layer_name};
my $layer_polarity = $layer_matrix->{polarity};
my $layer_polarity_n = ($layer_polarity eq 'positive')?'negative':'positive';
#my $layer_side = ($layer_number <= $COUPON_DATA->{layer_count}/2)?'front':'back';
my $layer_side ;
if ($layer_number == 1) {
$layer_side = 'front';
}elsif( $layer_number == $COUPON_DATA->{layer_count}){
$layer_side = 'back';
}else{
$layer_side = $layer_number%2 ? 'back':'front';
}
my ($layer_tpad_sym,$layer_gpad_sym,$layer_tpad_clear_sym,$layer_gpad_clear_sym,
$layer_tdrl_clear_sym,$layer_gdrl_clear_sym,$layer_gpad_thermal_sym,$layer_patch_ref_clear_sym);
if ($layer_number == 1 or $layer_number == $COUPON_DATA->{layer_count}){
$layer_tpad_sym = $outer_tpad_sym; $layer_gpad_sym = $outer_gpad_sym;
$layer_tpad_clear_sym = $outer_tpad_clear_sym; $layer_gpad_clear_sym = $outer_gpad_clear_sym;
$layer_tdrl_clear_sym = $outer_tdrl_clear_sym; $layer_gdrl_clear_sym = $outer_gdrl_clear_sym;
$layer_gpad_thermal_sym = $outer_gpad_thermal_sym;
$layer_patch_ref_clear_sym = $outer_patch_ref_clear_sym;
}
else{
$layer_tpad_sym = $inner_tpad_sym; $layer_gpad_sym = $inner_gpad_sym;
$layer_tpad_clear_sym = $inner_tpad_clear_sym; $layer_gpad_clear_sym = $inner_gpad_clear_sym;
$layer_tdrl_clear_sym = $inner_tdrl_clear_sym; $layer_gdrl_clear_sym = $inner_gdrl_clear_sym;
$layer_gpad_thermal_sym = $inner_gpad_thermal_sym;
$layer_patch_ref_clear_sym = $inner_patch_ref_clear_sym;
}
#layer type
my $layer_type;
foreach my $imp_layer (values %{$COUPON_DATA->{layers}}){
if ($imp_layer->{layer_number} == $layer_number){
$layer_type = $imp_layer->{layer_type};
last;
}
}
#层属于哪些group
my @layer_blong_grps;
foreach my $grp (keys %{$COUPON_DATA->{group}}){
foreach my $lyr (@{$COUPON_DATA->{group}{$grp}{all_layer}}){
if ($COUPON_DATA->{layers}{$lyr}{layer_number} == $layer_number){
push @layer_blong_grps , $grp unless grep({$_ eq $grp} @layer_blong_grps);
}
}
}
#层包含的group
my @layer_include_grps;
foreach my $drill (values %{$COUPON_DATA->{drills}}){
if ($drill->{drl_start_num} == $layer_number or $drill->{drl_end_num} == $layer_number){
@layer_include_grps = @{$drill->{include_coupon_groups}} if $drill->{include_coupon_groups};
last;
}
}
$GEN->affectedLayer(affected=>'yes',mode=>'single',layer=>$layer_name,clear_before=>'yes');
#铺背景铜，
if ($layer_polarity eq 'negative'){
$GEN->srFill(layer=>$layer_name,step_margin_x=>-$COUPON_DATA->{neg_copper_margin}/1000,step_margin_y=>-$COUPON_DATA->{neg_copper_margin}/1000,polarity=>$layer_polarity_n);
}
$GEN->srFill(layer=>$layer_name,step_margin_x=>$COUPON_DATA->{rout2copper_spacing}/1000,step_margin_y=>$COUPON_DATA->{rout2copper_spacing}/1000,polarity=>$layer_polarity);
#添加信号线隔离;
if ($layer_type =~ /^(S|B)$/){
my $grp = $layer_blong_grps[0];
#为信号层和空层添加信号组隔离线
foreach my $imp_lyr (@{$COUPON_DATA->{group}{$grp}{signal_layer}}){
my $imp_layer = $COUPON_DATA->{layers}{$imp_lyr};
my $sym = 'r'.($imp_layer->{cam_line_width}+$imp_layer->{imp_line2copper}*2-$imp_layer->{default_compensation});
foreach my $m ('lines1','lines2'){
if ($imp_layer->{$m} and @{$imp_layer->{$m}}){
my ($xs,$ys) = ($imp_layer->{$m}[0]{x},$imp_layer->{$m}[0]{y});
foreach my $n (1..scalar(@{$imp_layer->{$m}})-1){
my $it = $imp_layer->{$m}[$n];
if ($it->{direction}){
$GEN->addArc(xs=>$xs+$ShiftX,ys=>$ys+$ShiftY,xe=>$it->{x}+$ShiftX,ye=>$it->{y}+$ShiftY,xc=>$it->{xc}+$ShiftX,yc=>$it->{yc}+$ShiftY,direction=>$it->{direction},symbol=>$sym,polarity=>$layer_polarity_n);
}
else{
$GEN->addLine(xs=>$xs+$ShiftX,ys=>$ys+$ShiftY,xe=>$it->{x}+$ShiftX,ye=>$it->{y}+$ShiftY,symbol=>$sym,polarity=>$layer_polarity_n);
}
($xs,$ys) = ($it->{x},$it->{y});
}
}
}
if ($imp_layer->{center_lines} and @{$imp_layer->{center_lines}}){
my ($xs,$ys) = ($imp_layer->{center_lines}[0]{x},$imp_layer->{center_lines}[0]{y});
foreach my $n (1..scalar(@{$imp_layer->{center_lines}})-1){
my $it = $imp_layer->{center_lines}[$n];
if ($it->{direction}){
$GEN->addArc(xs=>$xs+$ShiftX,ys=>$ys+$ShiftY,xe=>$it->{x}+$ShiftX,ye=>$it->{y}+$ShiftY,xc=>$it->{xc}+$ShiftX,yc=>$it->{yc}+$ShiftY,direction=>$it->{direction},symbol=>'r'.$imp_layer->{cam_total_width},polarity=>$layer_polarity_n);
}
else{
$GEN->addLine(xs=>$xs+$ShiftX,ys=>$ys+$ShiftY,xe=>$it->{x}+$ShiftX,ye=>$it->{y}+$ShiftY,symbol=>'r'.$imp_layer->{cam_total_width},polarity=>$layer_polarity_n);
}
($xs,$ys) = ($it->{x},$it->{y});
}
}
#aoi pad 隔离
if ($COUPON_DATA->{add_aoi_pad} eq 'yes'){
my $sym;
if ($imp_layer->{impedance_type} =~ /coplanar/){
$sym = 'r'.($imp_layer->{cam_line_width}+$COUPON_DATA->{aoi_pad_ar}*2+$imp_layer->{imp_line2copper}*2);
}
else{
$sym = 'r'.($imp_layer->{cam_line_width}+$COUPON_DATA->{aoi_pad_ar}*2+$COUPON_DATA->{aoi_pad2copper}*2);
}
foreach my $it (@{$imp_layer->{aoi_pads}}){
$GEN->addPad(x=>$it->{x}+$ShiftX,y=>$it->{y}+$ShiftY,symbol=>$sym,polarity=>$layer_polarity_n);
}
}
}
}
#文字隔离
if ($COUPON_DATA->{body_text_polarity} eq 'positive'){
if ($COUPON_DATA->{body_text_pos}{$tl_name} and !$COUPON_DATA->{'body_text_not_enought_space'}{$tl_name}){
my $n = 0;
foreach my $text (@{$COUPON_DATA->{body_text_pos}{$tl_name}}){
$n++;
$GEN->addRectangle(x1=>$text->{xmin}-$COUPON_DATA->{body_text_free_x}/1000+$ShiftX,
y1=>$text->{ymin}-$COUPON_DATA->{body_text_free_y}/1000+$ShiftY,
x2=>$text->{xmax}+$COUPON_DATA->{body_text_free_x}/1000+$ShiftX,
y2=>$text->{ymax}+$COUPON_DATA->{body_text_free_y}/1000+$ShiftY,
attributes=>{attribute=>'.string',text=>'body_text_clear_'.$n},
polarity=>$layer_polarity_n,
);
if ($text->{angle}){
my $angle = -$text->{angle};
$angle = 360 + $angle if $angle < 0;
$GEN->selClearFeature();
$GEN->selectByFilter(attribute=>[{attribute=>'.string',text=>'body_text_clear_'.$n}]);
$GEN->COM('sel_transform',mode=>'anchor',oper=>'rotate',duplicate=>'no',
x_anchor=>$text->{bx}+$ShiftX,y_anchor=>$text->{by}+$ShiftY,
angle=>$angle,x_scale=>1,y_scale=>1,x_offset=>0,y_offset=>0) if $GEN->getSelectCount();;
}
}
}
}
#添加pin hole clearance
my $pin_clear_symbol = 'r'.($COUPON_DATA->{pin_hole_size} + 2*$COUPON_DATA->{pin_hole_clearance});
foreach my $lr ('left','right'){
if ($COUPON_DATA->{$lr.'_pin_hole'}){
$GEN->addPad(x=>$COUPON_DATA->{$lr.'_pin_hole'}{x}+$ShiftX,y=>$COUPON_DATA->{$lr.'_pin_hole'}{y}+$ShiftY,symbol=>$pin_clear_symbol,polarity=>$layer_polarity_n);
}
}
#添加test pad隔离
foreach my $grp (keys %{$COUPON_DATA->{group}}){
my $tmp_tst_clear_sym;
if (($layer_type eq 'S' and grep({$_ eq $grp} @layer_blong_grps)) or grep({$_ eq $grp} @layer_include_grps)){ #
$tmp_tst_clear_sym = $layer_tpad_clear_sym;
}
else{
$tmp_tst_clear_sym = $layer_tdrl_clear_sym;
}
foreach my $imp_lyr (@{$COUPON_DATA->{group}{$grp}{signal_layer}}){
my $imp_layer = $COUPON_DATA->{layers}{$imp_lyr};
foreach my $lr ('left','right'){
if ($imp_layer->{$lr.'_tpads'}){
foreach my $it (@{$imp_layer->{$lr.'_tpads'}}){
$GEN->addPad(x=>$it->{x}+$ShiftX,y=>$it->{y}+$ShiftY,symbol=>$tmp_tst_clear_sym,polarity=>$layer_polarity_n,attributes=>{attribute=>'.string',text=>$lr.'_clear_pad'});
}
}
}
}
}
#添加gnd pad隔离
if ($layer_type =~ /^(S|B)$/){
if ($COUPON_DATA->{is_coplanar}){
foreach my $grp (keys %{$COUPON_DATA->{group}}){
foreach my $imp_lyr (@{$COUPON_DATA->{group}{$grp}{signal_layer}}){
my $imp_layer = $COUPON_DATA->{layers}{$imp_lyr};
my ($tmp_sym,$tmp_polarity);
if (grep({$grp eq $_} @layer_blong_grps)){
if ($imp_layer->{impedance_type} =~ /coplanar/i){
$tmp_sym = $layer_gpad_sym;$tmp_polarity = $layer_polarity;
}
else{
$tmp_sym = $layer_gpad_clear_sym; $tmp_polarity = $layer_polarity_n;
}
}
elsif(grep({$grp eq $_} @layer_include_grps)){
$tmp_sym = $layer_gpad_clear_sym; $tmp_polarity = $layer_polarity_n;
}
else{
$tmp_sym = $layer_gdrl_clear_sym; $tmp_polarity = $layer_polarity_n;
}
foreach my $lr ('left','right') {
if ($imp_layer->{$lr.'_gpads'}) {
foreach my $it (@{$imp_layer->{$lr.'_gpads'}}) {
$GEN->addPad(x=>$it->{x}+$ShiftX,y=>$it->{y}+$ShiftY,symbol=>$tmp_sym,polarity=>$tmp_polarity,attributes=>{attribute=>'.string',text=>$lr.'_clear_pad'});
}
}
}
}
}
}
else{
foreach my $grp (keys %{$COUPON_DATA->{group}}){
my ($tmp_sym,$tmp_polarity);
if(grep({$grp eq $_} @layer_include_grps)){
$tmp_sym = $layer_gpad_clear_sym; $tmp_polarity = $layer_polarity_n;
}
else{
$tmp_sym = $layer_gdrl_clear_sym; $tmp_polarity = $layer_polarity_n;
}
foreach my $imp_lyr (@{$COUPON_DATA->{group}{$grp}{signal_layer}}){
my $imp_layer = $COUPON_DATA->{layers}{$imp_lyr};
foreach my $lr ('left','right'){
if ($imp_layer->{$lr.'_gpads'}){
foreach my $it (@{$imp_layer->{$lr.'_gpads'}}){
$GEN->addPad(x=>$it->{x}+$ShiftX,y=>$it->{y}+$ShiftY,symbol=>$tmp_sym,polarity=>$tmp_polarity,attributes=>{attribute=>'.string',text=>$lr.'_clear_pad'});
}
}
}
}
}
if ((($layer_number == 1 or $layer_number == $COUPON_DATA->{layer_count}) and $COUPON_DATA->{header_copper_fill} !~ /outer/) or
(($layer_number != 1 and $layer_number != $COUPON_DATA->{layer_count}) and $COUPON_DATA->{header_copper_fill} !~ /inner/))
{
foreach my $lr ('left','right'){
$GEN->addRectangle(x1=>$COUPON_DATA->{$lr.'_header_copper_clip'}{xmin}+$ShiftX,y1=>$COUPON_DATA->{$lr.'_header_copper_clip'}{ymin}+$ShiftY,
x2=>$COUPON_DATA->{$lr.'_header_copper_clip'}{xmax}+$ShiftX,y2=>$COUPON_DATA->{$lr.'_header_copper_clip'}{ymax}+$ShiftY,
attributes=>{attribute=>'.string',text=>$lr.'_clear_pad'},polarity=>$layer_polarity_n
) if ($COUPON_DATA->{$lr.'_header_copper_clip'} and abs($COUPON_DATA->{$lr.'_header_copper_clip'}{xmax} - $COUPON_DATA->{$lr.'_header_copper_clip'}{xmin}) > 0.001);
}
}
else{
if ((($layer_number == 1 or $layer_number == $COUPON_DATA->{layer_count}) and $COUPON_DATA->{header_clear_p2p_copper} =~ /outer/) or
(($layer_number != 1 and $layer_number != $COUPON_DATA->{layer_count}) and $COUPON_DATA->{header_clear_p2p_copper} =~ /inner/))
{
#刮Pad中间的残铜
my $tmp_resize;
if ($layer_number == 1 or $layer_number == $COUPON_DATA->{layer_count}){
$tmp_resize = $COUPON_DATA->{pad_size}/2000 + $COUPON_DATA->{outer_pad2copper}/1000;
}
else{
$tmp_resize = $COUPON_DATA->{pad_size}/2000 + $COUPON_DATA->{inner_pad2copper}/1000;
}
foreach my $lr ('left','right'){
my @tmp_x; my @tmp_y;
foreach my $grp (keys %{$COUPON_DATA->{group}}){
foreach my $imp_lyr (@{$COUPON_DATA->{group}{$grp}{signal_layer}}){
my $imp_layer = $COUPON_DATA->{layers}{$imp_lyr};
foreach my $tg ('tpads','gpads'){
if ($imp_layer->{$lr.'_'.$tg}){
foreach my $it (@{$imp_layer->{$lr.'_'.$tg}}){
push @tmp_x, $it->{x} + $tmp_resize;
push @tmp_x, $it->{x} - $tmp_resize;
push @tmp_y, $it->{y} + $tmp_resize;
push @tmp_y, $it->{y} - $tmp_resize;
}
}
}
}
}
@tmp_x = sort{$a <=> $b} @tmp_x;
@tmp_y = sort{$a <=> $b} @tmp_y;
my $min_x = $tmp_x[0];
my $min_y = $tmp_y[0];
my $max_x = $tmp_x[-1];
my $max_y = $tmp_y[-1];
if ($max_x - $min_x > 0.0001 and $max_y - $min_y > 0.0001){
$GEN->addRectangle(x1=>$min_x+$ShiftX,y1=>$min_y+$ShiftY,
x2=>$max_x+$ShiftX,y2=>$max_y+$ShiftY,
attributes=>{attribute=>'.string',text=>$lr.'_clear_pad'},polarity=>$layer_polarity_n
);
}
}
}
}
}
}
elsif($layer_type eq 'R'){
foreach my $grp (keys %{$COUPON_DATA->{group}}){
my ($tmp_sym,$tmp_polarity);
if (grep({$grp eq $_} @layer_blong_grps)){
$tmp_sym = $layer_gpad_sym;$tmp_polarity = $layer_polarity;
}
elsif(grep({$grp eq $_} @layer_include_grps)){
$tmp_sym = $layer_gpad_clear_sym; $tmp_polarity = $layer_polarity_n;
}
else{
$tmp_sym = $layer_gdrl_clear_sym; $tmp_polarity = $layer_polarity_n;
}
foreach my $imp_lyr (@{$COUPON_DATA->{group}{$grp}{signal_layer}}){
my $imp_layer = $COUPON_DATA->{layers}{$imp_lyr};
foreach my $lr ('left','right'){
if ($imp_layer->{$lr.'_gpads'}){
foreach my $it (@{$imp_layer->{$lr.'_gpads'}}){
$GEN->addPad(x=>$it->{x}+$ShiftX,y=>$it->{y}+$ShiftY,symbol=>$tmp_sym,polarity=>$tmp_polarity,attributes=>{attribute=>'.string',text=>$lr.'_clear_pad'});
}
}
}
}
}
}
else{
foreach my $grp (keys %{$COUPON_DATA->{group}}){
my $tmp_gnd_clear_sym;
if (grep({$_ eq $grp} @layer_include_grps)){ #
$tmp_gnd_clear_sym = $layer_gpad_clear_sym;
}
else{
$tmp_gnd_clear_sym = $layer_gdrl_clear_sym;
}
foreach my $imp_lyr (@{$COUPON_DATA->{group}{$grp}{signal_layer}}){
my $imp_layer = $COUPON_DATA->{layers}{$imp_lyr};
foreach my $lr ('left','right'){
if ($imp_layer->{$lr.'_gpads'}){
foreach my $it (@{$imp_layer->{$lr.'_gpads'}}){
$GEN->addPad(x=>$it->{x}+$ShiftX,y=>$it->{y}+$ShiftY,symbol=>$tmp_gnd_clear_sym,polarity=>$layer_polarity_n,attributes=>{attribute=>'.string',text=>$lr.'_clear_pad'});
}
}
}
}
}
if ((($layer_number == 1 or $layer_number == $COUPON_DATA->{layer_count}) and $COUPON_DATA->{header_copper_fill} !~ /outer/) or
(($layer_number != 1 and $layer_number != $COUPON_DATA->{layer_count}) and $COUPON_DATA->{header_copper_fill} !~ /inner/))
{
foreach my $lr ('left','right'){
$GEN->addRectangle(x1=>$COUPON_DATA->{$lr.'_header_copper_clip'}{xmin}+$ShiftX,y1=>$COUPON_DATA->{$lr.'_header_copper_clip'}{ymin}+$ShiftY,
x2=>$COUPON_DATA->{$lr.'_header_copper_clip'}{xmax}+$ShiftX,y2=>$COUPON_DATA->{$lr.'_header_copper_clip'}{ymax}+$ShiftY,
attributes=>{attribute=>'.string',text=>$lr.'_clear_pad'},polarity=>$layer_polarity_n
) if ($COUPON_DATA->{$lr.'_header_copper_clip'} and abs($COUPON_DATA->{$lr.'_header_copper_clip'}{xmax} - $COUPON_DATA->{$lr.'_header_copper_clip'}{xmin}) > 0.001);
}
}
}
if ($COUPON_DATA->{thermal_as_surface} eq 'yes'){
#添加gnd thermal
if ($layer_type =~ /^(S|B)$/ and $COUPON_DATA->{is_coplanar}){
foreach my $grp (keys %{$COUPON_DATA->{group}}){
my ($tmp_sym,$tmp_polarity);
if (grep({$grp eq $_} @layer_blong_grps)){
$tmp_sym = $layer_gpad_thermal_sym;$tmp_polarity = $layer_polarity_n;
}
next unless $tmp_sym;
foreach my $imp_lyr (@{$COUPON_DATA->{group}{$grp}{signal_layer}}){
my $imp_layer = $COUPON_DATA->{layers}{$imp_lyr};
foreach my $lr ('left','right'){
if ($imp_layer->{$lr.'_gpads'}){
foreach my $it (@{$imp_layer->{$lr.'_gpads'}}){
$GEN->addPad(x=>$it->{x}+$ShiftX,y=>$it->{y}+$ShiftY,symbol=>$tmp_sym,polarity=>$tmp_polarity,attributes=>{attribute=>'.string',text=>$lr.'_clear_pad'});
}
}
}
}
}
}
elsif($layer_type eq 'R'){
foreach my $grp (keys %{$COUPON_DATA->{group}}){
my ($tmp_sym,$tmp_polarity);
if (grep({$grp eq $_} @layer_blong_grps)){
$tmp_sym = $layer_gpad_thermal_sym;$tmp_polarity = $layer_polarity_n;
}
next unless $tmp_sym;
foreach my $imp_lyr (@{$COUPON_DATA->{group}{$grp}{signal_layer}}){
my $imp_layer = $COUPON_DATA->{layers}{$imp_lyr};
foreach my $lr ('left','right'){
if ($imp_layer->{$lr.'_gpads'}){
foreach my $it (@{$imp_layer->{$lr.'_gpads'}}){
$GEN->addPad(x=>$it->{x}+$ShiftX,y=>$it->{y}+$ShiftY,symbol=>$tmp_sym,polarity=>$tmp_polarity,attributes=>{attribute=>'.string',text=>$lr.'_clear_pad'});
}
}
}
}
}
}
if ($COUPON_DATA->{patch_ref_layer_hole} and $layer_type eq 'R'){
$GEN->deleteLayer(job=>$Job,layer=>$tmp_layer);
$GEN->createLayer(job=>$Job,layer=>$tmp_layer,context=>'misc',type=>'signal');
$GEN->affectedLayer(affected=>'yes',mode=>'single',layer=>$tmp_layer,clear_before=>'yes');
foreach my $grp (@layer_blong_grps){
foreach my $imp_lyr (@{$COUPON_DATA->{group}{$grp}{signal_layer}}){
my $imp_layer = $COUPON_DATA->{layers}{$imp_lyr};
my $sym = 'r'.($imp_layer->{cam_line_width} + $COUPON_DATA->{patch_ref_layer_hole}*2);
foreach my $m ('lines1','lines2'){
if ($imp_layer->{$m} and @{$imp_layer->{$m}}){
my ($xs,$ys) = ($imp_layer->{$m}[0]{x},$imp_layer->{$m}[0]{y});
foreach my $n (1..scalar(@{$imp_layer->{$m}})-1){
my $it = $imp_layer->{$m}[$n];
if ($it->{direction}){
$GEN->addArc(xs=>$xs+$ShiftX,ys=>$ys+$ShiftY,xe=>$it->{x}+$ShiftX,ye=>$it->{y}+$ShiftY,xc=>$it->{xc}+$ShiftX,yc=>$it->{yc}+$ShiftY,direction=>$it->{direction},symbol=>$sym,polarity=>'positive');
}
else{
$GEN->addLine(xs=>$xs+$ShiftX,ys=>$ys+$ShiftY,xe=>$it->{x}+$ShiftX,ye=>$it->{y}+$ShiftY,symbol=>$sym,polarity=>'positive');
}
($xs,$ys) = ($it->{x},$it->{y});
}
}
}
if ($imp_layer->{center_lines} and @{$imp_layer->{center_lines}}){
my ($xs,$ys) = ($imp_layer->{center_lines}[0]{x},$imp_layer->{center_lines}[0]{y});
foreach my $n (1..scalar(@{$imp_layer->{center_lines}})-1){
my $it = $imp_layer->{center_lines}[$n];
if ($it->{direction}){
$GEN->addArc(xs=>$xs+$ShiftX,ys=>$ys+$ShiftY,xe=>$it->{x}+$ShiftX,ye=>$it->{y}+$ShiftY,xc=>$it->{xc}+$ShiftX,yc=>$it->{yc}+$ShiftY,direction=>$it->{direction},symbol=>'r'.$imp_layer->{cam_total_width},polarity=>$layer_polarity_n);
}
else{
$GEN->addLine(xs=>$xs+$ShiftX,ys=>$ys+$ShiftY,xe=>$it->{x}+$ShiftX,ye=>$it->{y}+$ShiftY,symbol=>'r'.$imp_layer->{cam_total_width},polarity=>'positive');
}
($xs,$ys) = ($it->{x},$it->{y});
}
}
foreach my $lr ('left','right'){
if ($imp_layer->{$lr.'_tpads'}){
foreach my $it (@{$imp_layer->{$lr.'_tpads'}}){
$GEN->addPad(x=>$it->{x}+$ShiftX,y=>$it->{y}+$ShiftY,symbol=>$layer_patch_ref_clear_sym,polarity=>'negative',attributes=>{attribute=>'.string',text=>$lr.'_patch_ref_clear_pad'});
}
}
}
foreach my $lr ('left','right'){
if ($trans->{$lr}{angle}){
$GEN->selClearFeature();
$GEN->selectByFilter(attribute=>[{attribute=>'.string',text=>$lr.'_patch_ref_clear_pad'}]);
$GEN->COM('sel_transform',mode=>'anchor',oper=>'rotate',duplicate=>'no',%{$trans->{$lr}}) if $GEN->getSelectCount();;
}
}
$GEN->COM('sel_all_feat');
$GEN->selContourize(accuracy=>0.1,break_to_islands=>'yes',clean_hole_size=>0.1,clean_hole_mode=>'x_or_y');
$GEN->COM('sel_all_feat');
$GEN->COM('sel_move_other',target_layer=>$layer_name,invert=>($layer_polarity eq 'positive')?'no':'yes',dx=>0,dy=>0,size=>0);
}
}
$GEN->deleteLayer(job=>$Job,layer=>$tmp_layer);
$GEN->affectedLayer(affected=>'yes',mode=>'single',layer=>$layer_name,clear_before=>'yes');
foreach my $lr ('left','right'){
if ($trans->{$lr}{angle}){
$GEN->selClearFeature();
$GEN->selectByFilter(attribute=>[{attribute=>'.string',text=>$lr.'_clear_pad'}]);
$GEN->COM('sel_transform',mode=>'anchor',oper=>'rotate',duplicate=>'no',%{$trans->{$lr}}) if $GEN->getSelectCount();;
}
}
$GEN->COM('sel_all_feat');
$GEN->selContourize(accuracy=>0.1,break_to_islands=>'yes',clean_hole_size=>$COUPON_DATA->{inner_pad2copper} - 1,clean_hole_mode=>'x_or_y');
}
}
foreach my $lr ('left','right'){
if ($trans->{$lr}{angle}){
$GEN->selClearFeature();
$GEN->selectByFilter(attribute=>[{attribute=>'.string',text=>$lr.'_clear_pad'}]);
$GEN->COM('sel_transform',mode=>'anchor',oper=>'rotate',duplicate=>'no',%{$trans->{$lr}}) if $GEN->getSelectCount();;
}
}
$GEN->COM('sel_all_feat');
$GEN->selContourize(accuracy=>0.1,break_to_islands=>'yes',clean_hole_size=>0.1,clean_hole_mode=>'x_or_y');
if ($layer_polarity eq 'negative'){
$GEN->clipArea(area=>'profile',area_type=>'rectangle',inout=>'outside',contour_cut=>'yes',margin=>$COUPON_DATA->{neg_copper_margin});
}
else{
$GEN->COM('sel_all_feat');
$GEN->selFill(type=>'solid',solid_type=>'fill',min_brush=>$COUPON_DATA->{copper_fill_line_width});
$GEN->COM('sel_all_feat');
$GEN->selContourize(accuracy=>0.1,break_to_islands=>'yes',clean_hole_size=>0.1,clean_hole_mode=>'x_or_y');
$GEN->createLayer(job=>$Job,layer=>$tmp_layer,context=>'misc',type=>'signal') unless ($GEN->isLayerExists(job=>$Job,layer=>$tmp_layer));;
$GEN->affectedLayer(affected=>'yes',mode=>'single',layer=>$tmp_layer,clear_before=>'yes');
$GEN->COM('sel_all_feat');
$GEN->selDelete();
$GEN->srFill(layer=>$tmp_layer,step_margin_x=>$COUPON_DATA->{rout2copper_spacing}/1000-0.1,step_margin_y=>$COUPON_DATA->{rout2copper_spacing}/1000-0.1,polarity=>$layer_polarity);
$GEN->copyLayer(source_job=>$Job,source_step=>$step,source_layer=>$layer_name,dest_layer=>$tmp_layer,mode=>'append',invert=>'yes');
$GEN->COM('sel_all_feat');
$GEN->selContourize(accuracy=>0.1,break_to_islands=>'yes',clean_hole_size=>0.1,clean_hole_mode=>'x_or_y');
$GEN->COM('sel_all_feat');
$GEN->selFill(type=>'solid',solid_type=>'fill',min_brush=>$COUPON_DATA->{copper_fill_sliver_width});
$GEN->affectedLayer(affected=>'yes',mode=>'single',layer=>$layer_name,clear_before=>'yes');
$GEN->COM('sel_all_feat');
$GEN->selDelete();
$GEN->srFill(layer=>$layer_name,step_margin_x=>$COUPON_DATA->{rout2copper_spacing}/1000,step_margin_y=>$COUPON_DATA->{rout2copper_spacing}/1000,polarity=>$layer_polarity);
$GEN->copyLayer(source_job=>$Job,source_step=>$step,source_layer=>$tmp_layer,dest_layer=>$layer_name,mode=>'append',invert=>'yes');
$GEN->COM('sel_all_feat');
$GEN->selContourize(accuracy=>0.1,break_to_islands=>'yes',clean_hole_size=>0.1,clean_hole_mode=>'x_or_y');
if ($COUPON_DATA->{clean_surface_size}){
$GEN->runSingleDfm(chklist=>'valor_dfm_clean_holes',
params=>{pp_layer => $layer_name,
pp_size=>$COUPON_DATA->{clean_surface_size},
pp_mode=>'X and Y',
pp_hi=>'Cover islands',
pp_cover_f=>'Surfaces',},
area => 'global',show => 'no',show_res=>'no');
$GEN->COM('sel_all_feat');
$GEN->selContourize(accuracy=>0.1,break_to_islands=>'yes',clean_hole_size=>0.1,clean_hole_mode=>'x_or_y');
$GEN->deleteLayer(job=>$Job,layer=>$layer_name.'+++');
}
}
$GEN->affectedLayer(affected=>'yes',mode=>'single',layer=>$layer_name,clear_before=>'yes');
#添加test pad
foreach my $grp (keys %{$COUPON_DATA->{group}}){
if ($COUPON_DATA->{remove_nfp} ne 'yes' or
(grep({$grp eq $_} @layer_blong_grps) and $layer_type eq 'S' ) or
grep({$grp eq $_} @layer_include_grps ))
{
foreach my $imp_lyr (@{$COUPON_DATA->{group}{$grp}{signal_layer}}){
my $imp_layer = $COUPON_DATA->{layers}{$imp_lyr};
if ($COUPON_DATA->{remove_nfp} ne 'yes' or $imp_layer->{layer_number} == $layer_number
or $layer_number == 1 or $layer_number == $COUPON_DATA->{layer_count}){
foreach my $lr ('left','right'){
if ($imp_layer->{$lr.'_tpads'}){
foreach my $it (@{$imp_layer->{$lr.'_tpads'}}){
$GEN->addPad(x=>$it->{x}+$ShiftX,y=>$it->{y}+$ShiftY,symbol=>$layer_tpad_sym,polarity=>$layer_polarity,attributes=>{attribute=>'.string',text=>$lr.'_pad'});
}
}
}
}
}
}
}
#添加gnd pad
if ($layer_type =~ /^(S|B)$/){
if ($COUPON_DATA->{is_coplanar}){
foreach my $grp (keys %{$COUPON_DATA->{group}}){
foreach my $imp_lyr (@{$COUPON_DATA->{group}{$grp}{signal_layer}}){
my $imp_layer = $COUPON_DATA->{layers}{$imp_lyr};
my ($tmp_sym,$tmp_polarity);
if (grep({$grp eq $_} @layer_blong_grps)){
if ($imp_layer->{impedance_type} =~ /coplanar/i){
unless ($COUPON_DATA->{thermal_as_surface} eq 'yes'){
$tmp_sym = $layer_gpad_thermal_sym;$tmp_polarity = $layer_polarity_n;
}
}
else{
$tmp_sym = $layer_gpad_sym; $tmp_polarity = $layer_polarity;
}
}
elsif(grep({$grp eq $_} @layer_include_grps)){
$tmp_sym = $layer_gpad_sym; $tmp_polarity = $layer_polarity;
}
elsif($COUPON_DATA->{remove_nfp} ne 'yes'){
$tmp_sym = $layer_gpad_sym; $tmp_polarity = $layer_polarity;
}
next unless $tmp_sym;
foreach my $lr ('left','right'){
if ($imp_layer->{$lr.'_gpads'}){
foreach my $it (@{$imp_layer->{$lr.'_gpads'}}){
$GEN->addPad(x=>$it->{x}+$ShiftX,y=>$it->{y}+$ShiftY,symbol=>$tmp_sym,polarity=>$tmp_polarity,attributes=>{attribute=>'.string',text=>$lr.'_pad'});
}
}
}
}
}
}
else{
foreach my $grp (keys %{$COUPON_DATA->{group}}){
my ($tmp_sym,$tmp_polarity);
if(grep({$grp eq $_} @layer_include_grps)){
$tmp_sym = $layer_gpad_sym; $tmp_polarity = $layer_polarity;
}
elsif($COUPON_DATA->{remove_nfp} ne 'yes'){
$tmp_sym = $layer_gpad_sym; $tmp_polarity = $layer_polarity;
}
next unless $tmp_sym;
foreach my $imp_lyr (@{$COUPON_DATA->{group}{$grp}{signal_layer}}){
my $imp_layer = $COUPON_DATA->{layers}{$imp_lyr};
foreach my $lr ('left','right'){
if ($imp_layer->{$lr.'_gpads'}){
foreach my $it (@{$imp_layer->{$lr.'_gpads'}}){
$GEN->addPad(x=>$it->{x}+$ShiftX,y=>$it->{y}+$ShiftY,symbol=>$tmp_sym,polarity=>$tmp_polarity,attributes=>{attribute=>'.string',text=>$lr.'_pad'});
}
}
}
}
}
}
}
elsif($layer_type eq 'R'){
foreach my $grp (keys %{$COUPON_DATA->{group}}){
my ($tmp_sym,$tmp_polarity);
if (grep({$grp eq $_} @layer_blong_grps)){
unless ($COUPON_DATA->{thermal_as_surface} eq 'yes'){
$tmp_sym = $layer_gpad_thermal_sym;$tmp_polarity = $layer_polarity_n;
}
}
elsif(grep({$grp eq $_} @layer_include_grps)){
$tmp_sym = $layer_gpad_sym; $tmp_polarity = $layer_polarity;
}
elsif($COUPON_DATA->{remove_nfp} ne 'yes'){
$tmp_sym = $layer_gpad_sym; $tmp_polarity = $layer_polarity;
}
next unless $tmp_sym;
foreach my $imp_lyr (@{$COUPON_DATA->{group}{$grp}{signal_layer}}){
my $imp_layer = $COUPON_DATA->{layers}{$imp_lyr};
foreach my $lr ('left','right'){
if ($imp_layer->{$lr.'_gpads'}){
foreach my $it (@{$imp_layer->{$lr.'_gpads'}}){
$GEN->addPad(x=>$it->{x}+$ShiftX,y=>$it->{y}+$ShiftY,symbol=>$tmp_sym,polarity=>$tmp_polarity,attributes=>{attribute=>'.string',text=>$lr.'_pad'});
}
}
}
}
}
}
else{
foreach my $grp (keys %{$COUPON_DATA->{group}}){
my ($tmp_sym,$tmp_polarity);
if(grep({$grp eq $_} @layer_include_grps)){
$tmp_sym = $layer_gpad_sym; $tmp_polarity = $layer_polarity;
}
elsif($COUPON_DATA->{remove_nfp} ne 'yes'){
$tmp_sym = $layer_gpad_sym; $tmp_polarity = $layer_polarity;
}
next unless $tmp_sym;
foreach my $imp_lyr (@{$COUPON_DATA->{group}{$grp}{signal_layer}}){
my $imp_layer = $COUPON_DATA->{layers}{$imp_lyr};
foreach my $lr ('left','right'){
if ($imp_layer->{$lr.'_gpads'}){
foreach my $it (@{$imp_layer->{$lr.'_gpads'}}){
$GEN->addPad(x=>$it->{x}+$ShiftX,y=>$it->{y}+$ShiftY,symbol=>$tmp_sym,polarity=>$tmp_polarity,attributes=>{attribute=>'.string',text=>$lr.'_pad'});
}
}
}
}
}
}
if ($COUPON_DATA->{patch_ref_layer_hole} and $COUPON_DATA->{thermal_as_surface} ne 'yes' and $layer_type eq 'R'){
$GEN->deleteLayer(job=>$Job,layer=>$tmp_layer);
$GEN->createLayer(job=>$Job,layer=>$tmp_layer,context=>'misc',type=>'signal');
$GEN->affectedLayer(affected=>'yes',mode=>'single',layer=>$tmp_layer,clear_before=>'yes');
foreach my $grp (@layer_blong_grps){
foreach my $imp_lyr (@{$COUPON_DATA->{group}{$grp}{signal_layer}}){
my $imp_layer = $COUPON_DATA->{layers}{$imp_lyr};
my $sym = 'r'.($imp_layer->{cam_line_width} + $COUPON_DATA->{patch_ref_layer_hole}*2);
foreach my $m ('lines1','lines2'){
if ($imp_layer->{$m} and @{$imp_layer->{$m}}){
my ($xs,$ys) = ($imp_layer->{$m}[0]{x},$imp_layer->{$m}[0]{y});
foreach my $n (1..scalar(@{$imp_layer->{$m}})-1){
my $it = $imp_layer->{$m}[$n];
if ($it->{direction}){
$GEN->addArc(xs=>$xs+$ShiftX,ys=>$ys+$ShiftY,xe=>$it->{x}+$ShiftX,ye=>$it->{y}+$ShiftY,xc=>$it->{xc}+$ShiftX,yc=>$it->{yc}+$ShiftY,direction=>$it->{direction},symbol=>$sym,polarity=>'positive');
}
else{
$GEN->addLine(xs=>$xs+$ShiftX,ys=>$ys+$ShiftY,xe=>$it->{x}+$ShiftX,ye=>$it->{y}+$ShiftY,symbol=>$sym,polarity=>'positive');
}
($xs,$ys) = ($it->{x},$it->{y});
}
}
}
foreach my $lr ('left','right'){
if ($imp_layer->{$lr.'_tpads'}){
foreach my $it (@{$imp_layer->{$lr.'_tpads'}}){
$GEN->addPad(x=>$it->{x}+$ShiftX,y=>$it->{y}+$ShiftY,symbol=>$layer_patch_ref_clear_sym,polarity=>'negative',attributes=>{attribute=>'.string',text=>$lr.'_patch_ref_clear_pad'});
}
}
}
foreach my $lr ('left','right'){
if ($trans->{$lr}{angle}){
$GEN->selClearFeature();
$GEN->selectByFilter(attribute=>[{attribute=>'.string',text=>$lr.'_patch_ref_clear_pad'}]);
$GEN->COM('sel_transform',mode=>'anchor',oper=>'rotate',duplicate=>'no',%{$trans->{$lr}}) if $GEN->getSelectCount();;
}
}
$GEN->COM('sel_all_feat');
$GEN->selContourize(accuracy=>0.1,break_to_islands=>'yes',clean_hole_size=>0.1,clean_hole_mode=>'x_or_y');
$GEN->COM('sel_all_feat');
$GEN->COM('sel_move_other',target_layer=>$layer_name,invert=>($layer_polarity eq 'positive')?'no':'yes',dx=>0,dy=>0,size=>0);
}
}
$GEN->deleteLayer(job=>$Job,layer=>$tmp_layer);
$GEN->affectedLayer(affected=>'yes',mode=>'single',layer=>$layer_name,clear_before=>'yes');
}
#添加信号线及AOI Pad
foreach my $imp_layer (values %{$COUPON_DATA->{layers}}){
if ($imp_layer->{layer_number} == $layer_number){
my $sym = 'r'.($imp_layer->{cam_line_width});
foreach my $m ('lines1','lines2'){
if ($imp_layer->{$m} and @{$imp_layer->{$m}}){
my ($xs,$ys) = ($imp_layer->{$m}[0]{x},$imp_layer->{$m}[0]{y});
foreach my $n (1..scalar(@{$imp_layer->{$m}})-1){
my $it = $imp_layer->{$m}[$n];
if ($it->{direction}){
$GEN->addArc(xs=>$xs+$ShiftX,ys=>$ys+$ShiftY,xe=>$it->{x}+$ShiftX,ye=>$it->{y}+$ShiftY,xc=>$it->{xc}+$ShiftX,yc=>$it->{yc}+$ShiftY,direction=>$it->{direction},symbol=>$sym,polarity=>$layer_polarity);
}
else{
$GEN->addLine(xs=>$xs+$ShiftX,ys=>$ys+$ShiftY,xe=>$it->{x}+$ShiftX,ye=>$it->{y}+$ShiftY,symbol=>$sym,polarity=>$layer_polarity);
}
($xs,$ys) = ($it->{x},$it->{y});
}
}
}
if ($COUPON_DATA->{add_aoi_pad} eq 'yes'){
foreach my $it (@{$imp_layer->{aoi_pads}}){
$GEN->addPad(x=>$it->{x}+$ShiftX,y=>$it->{y}+$ShiftY,symbol=>'r'.($imp_layer->{cam_line_width}+$COUPON_DATA->{aoi_pad_ar}*2),polarity=>$layer_polarity);
}
}
}
}
#添加头部文字
foreach my $lr ('left','right'){
if ($COUPON_DATA->{$lr.'_header_text_pos'}{$tl_name}){
foreach my $sig (keys %{$COUPON_DATA->{$lr.'_header_text_pos'}{$tl_name}}){
foreach my $v (values %{$COUPON_DATA->{$lr.'_header_text_pos'}{$tl_name}{$sig}}){
my $tmp_polarity = ($v->{polarity} eq 'positive')?$layer_polarity:$layer_polarity_n;
$GEN->addText(x=>$v->{x}+$ShiftX,y=>$v->{y}+$ShiftY,text=>$v->{text},angle=>$v->{angle},mirror=>($layer_side eq 'front')?'no':'yes',
x_size=>$v->{x_size},y_size=>$v->{y_size},line_width=>$v->{line_width},anchor=>$v->{anchor},
polarity=>$tmp_polarity,fontname=>$COUPON_DATA->{header_text_font},
attributes=>{attribute=>'.string',text=>$lr.'_pad'});
}
}
}
}
foreach my $lr ('left','right'){
if ($trans->{$lr}{angle}){
$GEN->selClearFeature();
$GEN->selectByFilter(attribute=>[{attribute=>'.string',text=>$lr.'_pad'}]);
$GEN->COM('sel_transform',mode=>'anchor',oper=>'rotate',duplicate=>'no',%{$trans->{$lr}}) if $GEN->getSelectCount();
}
}
#$GUI->debug(-text=>dump($COUPON_DATA->{body_text_pos},$tl_name));
#添加body文字
if ($tl_name eq 'top' and $COUPON_DATA->{body_text_pos}{$tl_name}){
unless ($COUPON_DATA->{'body_text_not_enought_space'}{$tl_name}){
my $n = 0;
foreach my $text (@{$COUPON_DATA->{body_text_pos}{$tl_name}}){
$n++;
$GEN->addText(x=>$text->{x}+$ShiftX,y=>$text->{y}+$ShiftY,text=>$text->{text},angle=>0,polarity=>($COUPON_DATA->{body_text_polarity} eq 'positive')?$layer_polarity:$layer_polarity_n,
x_size=>$text->{x_size},y_size=>$text->{y_size},line_width=>$text->{line_width},mirror=>($layer_side eq 'front')?'no':'yes',
anchor=>$text->{anchor},text_length=>$text->{text_length},attributes=>{attribute=>'.string',text=>'body_text_'.$n},fontname=>$COUPON_DATA->{body_text_font},);
if ($text->{angle}){
my $angle = -$text->{angle};
$angle = 360 + $angle if $angle < 0;
$GEN->selClearFeature();
$GEN->selectByFilter(attribute=>[{attribute=>'.string',text=>'body_text_'.$n}]);
$GEN->COM('sel_transform',mode=>'anchor',oper=>'rotate',duplicate=>'no',
x_anchor=>$text->{bx}+$ShiftX,y_anchor=>$text->{by}+$ShiftY,
angle=>$angle,x_scale=>1,y_scale=>1,x_offset=>0,y_offset=>0) if $GEN->getSelectCount();;
}
}
}
else{
my $tmp_body_text_layer = $layer_name.($COUPON_DATA->{body_text_tmp_layer_postfix} || '_imptext+++');
push @$WarningMsg,"${step}的${layer_name}层没有足够的空间添加文字,现将文字添加到${tmp_body_text_layer}中!";
$GEN->createLayer(job=>$Job,layer=>$tmp_body_text_layer,context=>'misc',type=>'signal') unless ($GEN->isLayerExists(job=>$Job,layer=>$tmp_body_text_layer));;
$GEN->affectedLayer(affected=>'yes',mode=>'single',layer=>$tmp_body_text_layer,clear_before=>'yes');
$GEN->COM('sel_all_feat');
$GEN->selDelete();
foreach my $text (@{$COUPON_DATA->{body_text_pos}{$tl_name}}){
$GEN->addText(x=>$text->{x},y=>$text->{y},text=>$text->{text},angle=>0,polarity=>$layer_polarity,
x_size=>$text->{x_size},y_size=>$text->{y_size},line_width=>$text->{line_width},mirror=>($layer_side eq 'front')?'no':'yes',
anchor=>$text->{anchor},fontname=>$COUPON_DATA->{body_text_font},);
}
$GEN->affectedLayer(affected=>'yes',mode=>'single',layer=>$layer_name,clear_before=>'yes');
}
}
=exp
foreach my $layer (keys %{$COUPON_DATA->{body_text_pos}}) {
unless ($COUPON_DATA->{'body_text_not_enought_space'}{$layer}){
my $n = 0;
foreach my $text (@{$COUPON_DATA->{body_text_pos}{$layer}}){
my ($txt_lyr) = $text->{text} =~ /(\w+)\//i;
$GEN->PAUSE($text->{text}.' -- '.$txt_lyr.' --- '.$tl_name);
if (lc($txt_lyr) eq $tl_name or $text->{text} =~ /\$\$JOB/) {
$n++;
$GEN->addText(x=>$text->{x}+$ShiftX,y=>$text->{y}+$ShiftY,text=>$text->{text},angle=>0,polarity=>($COUPON_DATA->{body_text_polarity} eq 'positive')?$layer_polarity:$layer_polarity_n,
x_size=>$text->{x_size},y_size=>$text->{y_size},line_width=>$text->{line_width},mirror=>($layer_side eq 'front')?'no':'yes',
anchor=>$text->{anchor},text_length=>$text->{text_length},attributes=>{attribute=>'.string',text=>'body_text_'.$n},fontname=>$COUPON_DATA->{body_text_font},);
if ($text->{angle}){
my $angle = -$text->{angle};
$angle = 360 + $angle if $angle < 0;
$GEN->selClearFeature();
$GEN->selectByFilter(attribute=>[{attribute=>'.string',text=>'body_text_'.$n}]);
$GEN->COM('sel_transform',mode=>'anchor',oper=>'rotate',duplicate=>'no',
x_anchor=>$text->{bx}+$ShiftX,y_anchor=>$text->{by}+$ShiftY,
angle=>$angle,x_scale=>1,y_scale=>1,x_offset=>0,y_offset=>0) if $GEN->getSelectCount();;
}
}
}
}else{
my $tmp_body_text_layer = $layer_name.($COUPON_DATA->{body_text_tmp_layer_postfix} || '_imptext+++');
push @$WarningMsg,"${step}的${layer_name}层没有足够的空间添加文字,现将文字添加到${tmp_body_text_layer}中!";
$GEN->createLayer(job=>$Job,layer=>$tmp_body_text_layer,context=>'misc',type=>'signal') unless ($GEN->isLayerExists(job=>$Job,layer=>$tmp_body_text_layer));;
$GEN->affectedLayer(affected=>'yes',mode=>'single',layer=>$tmp_body_text_layer,clear_before=>'yes');
$GEN->COM('sel_all_feat');
$GEN->selDelete();
foreach my $text (@{$COUPON_DATA->{body_text_pos}{$layer}}){
$GEN->addText(x=>$text->{x},y=>$text->{y},text=>$text->{text},angle=>0,polarity=>$layer_polarity,
x_size=>$text->{x_size},y_size=>$text->{y_size},line_width=>$text->{line_width},mirror=>($layer_side eq 'front')?'no':'yes',
anchor=>$text->{anchor},fontname=>$COUPON_DATA->{body_text_font},);
}
$GEN->affectedLayer(affected=>'yes',mode=>'single',layer=>$layer_name,clear_before=>'yes');
}
}
=cut
}
if ($COUPON_DATA->{header_not_enought_space}){
#push @$WarningMsg,"${step}中没有足够的空间添加头部文字,请检查并处理!";
}
#添加钻孔
foreach my $drl (keys %{$COUPON_DATA->{drills}}){
my $drl_layer = $gen_layer{$drl};
$GEN->affectedLayer(affected=>'yes',mode=>'single',layer=>$drl_layer,clear_before=>'yes');
my $hole_sym = 'r'.(($drl eq 'drill')?$COUPON_DATA->{hole_size}:$COUPON_DATA->{hdi_hole_size});
if ($COUPON_DATA->{drills}{$drl}{include_coupon_groups}){
foreach my $grp (@{$COUPON_DATA->{drills}{$drl}{include_coupon_groups}}){
foreach my $imp_lyr (@{$COUPON_DATA->{group}{$grp}{signal_layer}}){
my $imp_layer = $COUPON_DATA->{layers}{$imp_lyr};
foreach my $lr ('left','right'){
foreach my $pad ('_tpads','_gpads'){
if ($imp_layer->{$lr.$pad}){
foreach my $it (@{$imp_layer->{$lr.$pad}}){
$GEN->addPad(x=>$it->{x}+$ShiftX,y=>$it->{y}+$ShiftY,symbol=>$hole_sym,polarity=>'positive',attributes=>[{attribute=>'.string',text=>$lr.'_hole'},{attribute=>'.drill',option=>'plated'}]);
}
}
}
}
}
}
}
foreach my $lr ('left','right'){
if ($trans->{$lr}{angle}){
$GEN->selClearFeature();
$GEN->selectByFilter(attribute=>[{attribute=>'.string',text=>$lr.'_hole'}]);
$GEN->COM('sel_transform',mode=>'anchor',oper=>'rotate',duplicate=>'no',%{$trans->{$lr}}) if $GEN->getSelectCount();;
}
}
if ($drl eq 'drill'){
#pin_hole
foreach my $lr ('left','right'){
if ($COUPON_DATA->{$lr.'_pin_hole'}){
$GEN->addPad(x=>$COUPON_DATA->{$lr.'_pin_hole'}{x}+$ShiftX,y=>$COUPON_DATA->{$lr.'_pin_hole'}{y}+$ShiftY,symbol=>'r'.$COUPON_DATA->{pin_hole_size},polarity=>'positive',attributes=>[{attribute=>'.drill',option=>'non_plated'}]);
}
}
#coplanar hole
foreach my $ud ('up','down'){
if ($COUPON_DATA->{$ud.'_coplanar_holes'}){
foreach my $it (@{$COUPON_DATA->{$ud.'_coplanar_holes'}}){
$GEN->addPad(x=>$it->{x}+$ShiftX,y=>$it->{y}+$ShiftY,symbol=>'r'.$COUPON_DATA->{coplanar_hole_size},attributes=>[{attribute=>'.drill',option=>'plated'}]);
}
}
}
}
}
#npth
if ($COUPON_DATA->{add_pin_hole} eq 'yes' and $gen_layer{npth}){
$GEN->affectedLayer(affected=>'yes',mode=>'single',layer=>$gen_layer{npth},clear_before=>'yes');
foreach my $lr ('left','right'){
if ($COUPON_DATA->{$lr.'_pin_hole'}){
$GEN->addPad(x=>$COUPON_DATA->{$lr.'_pin_hole'}{x}+$ShiftX,y=>$COUPON_DATA->{$lr.'_pin_hole'}{y}+$ShiftY,symbol=>'r'.$COUPON_DATA->{pin_hole_size},polarity=>'positive',attributes=>[{attribute=>'.drill',option=>'non_plated'}]);
}
}
}
#防焊
foreach my $item ('sm_fr','sm_ba'){
#foreach my $item ('smt','smb'){
my $tpad_sm_sym = $COUPON_DATA->{outer_tpad_shape} . ($COUPON_DATA->{pad_size} + $COUPON_DATA->{sm_opening_ar}*2);
my $gpad_sm_sym = $COUPON_DATA->{outer_gpad_shape} . ($COUPON_DATA->{pad_size} + $COUPON_DATA->{sm_opening_ar}*2);
if ($gen_layer{$item}){
$GEN->affectedLayer(affected=>'yes',mode=>'single',layer=>$gen_layer{$item},clear_before=>'yes');
foreach my $imp_layer (values %{$COUPON_DATA->{layers}}){
next unless $imp_layer->{layer_type} eq 'S';
foreach my $lr ('left','right'){
if ($imp_layer->{$lr.'_tpads'}){
foreach my $it (@{$imp_layer->{$lr.'_tpads'}}){
$GEN->addPad(x=>$it->{x}+$ShiftX,y=>$it->{y}+$ShiftY,symbol=>$tpad_sm_sym,polarity=>'positive',attributes=>[{attribute=>'.string',text=>$lr.'_sm'}]);
}
}
if ($imp_layer->{$lr.'_gpads'}){
foreach my $it (@{$imp_layer->{$lr.'_gpads'}}){
$GEN->addPad(x=>$it->{x}+$ShiftX,y=>$it->{y}+$ShiftY,symbol=>$gpad_sm_sym,polarity=>'positive',attributes=>[{attribute=>'.string',text=>$lr.'_sm'}]);
}
}
}
}
foreach my $lr ('left','right'){
if ($trans->{$lr}{angle}){
$GEN->selClearFeature();
$GEN->selectByFilter(attribute=>[{attribute=>'.string',text=>$lr.'_sm'}]);
$GEN->COM('sel_transform',mode=>'anchor',oper=>'rotate',duplicate=>'no',%{$trans->{$lr}}) if $GEN->getSelectCount();;
}
}
#添加pin hole sm
foreach my $lr ('left','right'){
if ($COUPON_DATA->{$lr.'_pin_hole'}){
$GEN->addPad(x=>$COUPON_DATA->{$lr.'_pin_hole'}{x}+$ShiftX,y=>$COUPON_DATA->{$lr.'_pin_hole'}{y}+$ShiftY,symbol=>'r'.($COUPON_DATA->{pin_hole_size} + 2*$COUPON_DATA->{pin_hole_sm_ar}),polarity=>'positive',);
}
}
#添加信号线SM开窗
foreach my $imp_layer (values %{$COUPON_DATA->{layers}}){
if (($imp_layer->{layer_number} == 1 and $item eq 'sm_fr' and lc($imp_layer->{sm_open}) eq 'yes') or
($imp_layer->{layer_number} == $LayerCount and $item eq 'sm_ba' and lc($imp_layer->{sm_open}) eq 'yes')
){
my $sym_size = ($imp_layer->{cam_line_width} + ($COUPON_DATA->{line_sm_opening_ar} || $COUPON_DATA->{sm_opening_ar})*2);
foreach my $m ('lines1','lines2'){
if ($imp_layer->{$m} and @{$imp_layer->{$m}}){
my ($xs,$ys) = ($imp_layer->{$m}[0]{x},$imp_layer->{$m}[0]{y});
foreach my $n (1..scalar(@{$imp_layer->{$m}})-1){
my $it = $imp_layer->{$m}[$n];
if ($it->{direction}){
$GEN->addArc(xs=>$xs+$ShiftX,ys=>$ys+$ShiftY,xe=>$it->{x}+$ShiftX,ye=>$it->{y}+$ShiftY,xc=>$it->{xc}+$ShiftX,yc=>$it->{yc}+$ShiftY,direction=>$it->{direction},symbol=>'r'.$sym_size,polarity=>'positive');
}
else{
$GEN->addLine(xs=>$xs+$ShiftX,ys=>$ys+$ShiftY,xe=>$it->{x}+$ShiftX,ye=>$it->{y}+$ShiftY,symbol=>'r'.$sym_size,polarity=>'positive');
}
($xs,$ys) = ($it->{x},$it->{y});
}
}
}
if ($COUPON_DATA->{add_aoi_pad} eq 'yes'){
foreach my $it (@{$imp_layer->{aoi_pads}}){
$GEN->addPad(x=>$it->{x}+$ShiftX,y=>$it->{y}+$ShiftY,symbol=>'r'.($sym_size+$COUPON_DATA->{aoi_pad_ar}*2),polarity=>'positive');
}
}
}
}
}
}
#outline
if ($gen_layer{'outline'}){
$GEN->COM('profile_to_rout',layer=>$gen_layer{'outline'},width=>$COUPON_DATA->{outline_width}||1);
}
#档点
if ($COUPON_DATA->{plug_layers}){
# 层名做变量替换
$COUPON_DATA->{plug_layers} =~ s/\$\{layer_count\}/sprintf("%02d", $COUPON_DATA->{layer_count})/ge;
my $layers = eval($COUPON_DATA->{plug_layers});
while ($layers and @$layers){
my $plug_layer = shift @$layers;
my $action = shift @$layers;
if ($action eq 'create'){
if (!$GEN->isLayerExists(job=>$Job,layer=>$plug_layer)){
$GEN->createLayer(job=>$Job,layer=>$plug_layer);
}
}
next unless $GEN->isLayerExists(job=>$Job,layer=>$plug_layer);
$GEN->affectedLayer(affected=>'yes',mode=>'single',layer=>$plug_layer,clear_before=>'yes');
$GEN->COM('sel_all_feat');
$GEN->selDelete;
##挡点需要填充
#$GEN->srFill(step_margin_x=>-0.005,step_margin_y=>-0.005);
my $drl_layer = $gen_layer{drill};
my $via_sym = 'r'.($COUPON_DATA->{hole_size} + 2*$COUPON_DATA->{plug_ar});
if ($COUPON_DATA->{drills}{drill}{include_coupon_groups}){
foreach my $grp (@{$COUPON_DATA->{drills}{drill}{include_coupon_groups}}){
foreach my $imp_lyr (@{$COUPON_DATA->{group}{$grp}{signal_layer}}){
my $imp_layer = $COUPON_DATA->{layers}{$imp_lyr};
foreach my $lr ('left','right'){
foreach my $pad ('_tpads','_gpads'){
if ($imp_layer->{$lr.$pad}){
foreach my $it (@{$imp_layer->{$lr.$pad}}){
$GEN->addPad(x=>$it->{x}+$ShiftX,y=>$it->{y}+$ShiftY,symbol=>$via_sym,polarity=>'positive',attributes=>[{attribute=>'.string',text=>$lr.'_hole'},{attribute=>'.drill',option=>'plated'}]);
}
}
}
}
}
}
}
foreach my $lr ('left','right'){
if ($trans->{$lr}{angle}){
$GEN->selClearFeature();
$GEN->selectByFilter(attribute=>[{attribute=>'.string',text=>$lr.'_hole'}]);
$GEN->COM('sel_transform',mode=>'anchor',oper=>'rotate',duplicate=>'no',%{$trans->{$lr}}) if $GEN->getSelectCount();;
}
}
#pin_hole
foreach my $lr ('left','right'){
if ($COUPON_DATA->{$lr.'_pin_hole'}){
$GEN->addPad(x=>$COUPON_DATA->{$lr.'_pin_hole'}{x}+$ShiftX,y=>$COUPON_DATA->{$lr.'_pin_hole'}{y}+$ShiftY,symbol=>'r'.($COUPON_DATA->{pin_hole_size} + 2*$COUPON_DATA->{plug_ar}),polarity=>'positive',attributes=>[{attribute=>'.drill',option=>'non_plated'}]);
}
}
#coplanar hole
foreach my $ud ('up','down'){
if ($COUPON_DATA->{$ud.'_coplanar_holes'}){
foreach my $it (@{$COUPON_DATA->{$ud.'_coplanar_holes'}}){
$GEN->addPad(x=>$it->{x}+$ShiftX,y=>$it->{y}+$ShiftY,symbol=>'r'.($COUPON_DATA->{coplanar_hole_size} + 2*$COUPON_DATA->{plug_ar}),attributes=>[{attribute=>'.drill',option=>'plated'}]);
}
}
}
}
}
$GEN->deleteLayer(job=>$Job,layer=>$tmp_layer);
$GEN->affectedLayer(mode=>'all',affected=>'yes');
$GEN->COM('sel_all_feat');
$GEN->COM('sel_delete_atr',attributes=>'.string');
$GEN->COM('disp_on');
$GEN->affectedLayer(mode=>'all',affected=>'no');
if ($COUPON_DATA->{hooks_draw_post}){
eval($COUPON_DATA->{hooks_draw_post});
}
##阻抗线补偿 Tomy 2017.12.14 阻抗在系统内部有做补偿脚本中不需要再补偿
###$GEN->COM('disp_off');
###foreach my $layer (sort {$matrix->{$a}{row} <=> $matrix->{$b}{row}} keys %$matrix) {
### if($matrix->{$layer}{tl_type} =~ /(inner|outer)/ ){
### my $value = 0;
### if($matrix->{$layer}{tl_type} =~ /(inner)/ ){
### $value = $IKM->get_jobinfo(-jobid=>$JOB_ID,-jobcategory=>'work',-jobinfo=>'line_compensation_inner');
### }
### else{
### $value = $IKM->get_jobinfo(-jobid=>$JOB_ID,-jobcategory=>'work',-jobinfo=>'line_compensation_outer');
### }
### next unless $value;
### $GEN->affectedLayer(affected=>'yes',layer=>[$layer],clear_before=>'yes');
### $GEN->selectByFilter(feat_types=>'line\;arc',polarity=>'positive',profile=>'all');
### $GEN->selAddAttr(attribute=>[{attribute=>'tl_string',text=>'compensation_'.$value.'_mil'}])if ( $GEN->getSelectCount() > 0 );
### $GEN->selectByFilter(attribute=>[{attribute=>'tl_string',text=>'compensation_'.$value.'_mil'}]);
### $GEN->COM('sel_resize',size=>$value,corner_ctl=>'no')if ( $GEN->getSelectCount() > 0 );
### }
###}
###$GEN->COM('disp_on');
$GEN->clearLayers();
$GEN->affectedLayer(mode=>'all',affected=>'no');
$GEN->closeStep();
}
if ($WarningMsg){
$GUI->msgbox(-icon=>'warning',-text=>join("\n",@$WarningMsg));
#$GEN->PAUSE('Please Edit Then Continue');
my $html = '<html><body bgcolor="#EEEEFF" link="#0000FF" vlink="#FF00FF" alink="#FF0000" text="#000000"><FONT color="#FF00FF">';
foreach my $item (@$WarningMsg){
$html .= $item.'<p>';
}
$html .='</FONT></body></html>';
$IKM->update_flow_report(-report=>$html,-job_id=>$ARGS{job_id},-process_id=>$ARGS{process_id});
$Return = 'Warning';
}
else{
$IKM->update_flow_report(-report=>'',-job_id=>$ARGS{job_id},-process_id=>$ARGS{process_id});
}
unless ($GEN->{STATUS}){
return $Return;
}
else{
$GUI->msgbox(-icon=>'error',-image=>'genesis_error',-compound=>'top',-text=>join("\n",@{$GEN->{STATUS}}));
#addFlowNotes(-notes=>" Genesis Error:\n ".join("\n ",@{$GEN->{STATUS}}));
return 'Error';
}
}
catch Error::Simple with {
my $error = encode("utf8",shift);
print $error,"\n";
$GUI->msgbox(-text=>$error);
return 'Error';
}
finally{
#$GEN->deleteLayer(layer=>$tmp_layer) if ($GEN->isLayerExists(job=>$job,layer=>$tmp_layer));
};
sub opt_lines{
my @lines = @_;
my %lines_hash;
my $n = 0;
my @return = (shift @lines);
foreach my $line (@lines){
$lines_hash{$n++} = $line;
}
#向前查找
my ($xs,$ys) = ($return[0]{xs},$return[0]{ys});
my ($xe,$ye) = ($return[0]{xe},$return[0]{ye});
my $last_count = 0;
while($last_count != scalar(keys %lines_hash)){
$last_count = scalar(keys %lines_hash);
foreach my $n (keys %lines_hash){
my $line = $lines_hash{$n};
if (abs($xs - $line->{xs}) < 0.0001 && abs($ys - $line->{ys}) < 0.0001){
($line->{xs},$line->{ys},$line->{xe},$line->{ye}) =
($line->{xe},$line->{ye},$line->{xs},$line->{ys});
$line->{direction} = ($line->{direction} eq 'cw') ? 'ccw' : 'cw';
($xs,$ys) = ($line->{xs},$line->{ys});
delete $lines_hash{$n};
unshift @return,$line;
}
elsif (abs($xs - $line->{xe}) < 0.0001 && abs($ys - $line->{ye}) < 0.0001){
($xs,$ys) = ($line->{xs},$line->{ys});
delete $lines_hash{$n};
unshift @return,$line;
}
}
}
$last_count = 0;
while($last_count != scalar(keys %lines_hash)){
$last_count = scalar(keys %lines_hash);
foreach my $n (keys %lines_hash){
my $line = $lines_hash{$n};
if (abs($xe - $line->{xs}) < 0.0001 && abs($ye - $line->{ys}) < 0.0001){
($xe,$ye) = ($line->{xe},$line->{ye});
delete $lines_hash{$n};
push @return,$line;
}
elsif (abs($xe - $line->{xe}) < 0.0001 && abs($ye - $line->{ye}) < 0.0001){
($line->{xs},$line->{ys},$line->{xe},$line->{ye}) =
($line->{xe},$line->{ye},$line->{xs},$line->{ys});
$line->{direction} = ($line->{direction} eq 'cw') ? 'ccw' : 'cw';
($xe,$ye) = ($line->{xe},$line->{ye});
delete $lines_hash{$n};
push @return,$line;
}
}
}
return @return;
}
#pcbpdm里层是存的数字，为了兼容要转为tlname
sub imp_layernum2tlname {
my $iLyrNum = shift;
my $ret;
if ($iLyrNum == 1) {
$ret = "top";
}elsif ($iLyrNum == $LayerCount) {
$ret = "bottom";
}elsif($iLyrNum){
$ret = "l".$iLyrNum;
}
return $ret;
}
sub _um2mil{
my $value = shift;
return ($value/25.4);
}
tool/src/TOP_IKM 0 → 100644
View file @ dccb1a5b
=head1 NAME
Top::IKM - IKM接口
=head1 DESCRIPTION
IKM接口
=head1 VERSION HISTORY
=head2 V1.00 2016-06-12 Tony Guo
1.IKM接口
=head2 V1.00 2017-11-13 Cody Yu
1.增加get_process_by_name函数
2.增加get_process_status函数
=cut
package TOP::IKM;
use strict;
#use Data::Dump 'dump';
use Sys::Hostname;
use Encode;
use utf8;
use JSON;
use Data::Dump 'dump';
sub new {
my $class = shift;
my %par = (@_);
my $self = bless {}, $class;
return $self;
}
=head1 MOTHODS
=head2 $DB->B<get_jobinfo>(-jobname=>?,-jobcategory=>?,-jobinfo=>?,-units=>?)
=over
=item * Description
#获取料号信息
=item * Parameters
[B<-jobid>] => interger : 料号ID，
B<-jobinfo> => string : 料号属性名称，
[B<-withspec>] => 0|1 : 如果料号info没定义，是否取spec值
=item * Return
料号属性的值，如果料号属性不存在，则返回undef
=item * Example
=back
=cut
sub get_jobinfo{
my $self = shift;
my %par = @_;
$par{-jobid} = $self->get_job_id($par{-jobname}) unless ($par{-jobid});
my $func = 'function(ARGV){
importPackage("pcbpdm.core");
var value = PdmLibraryData.getJobAttrValue(ARGV["-jobid"], ARGV["-jobinfo"]);
return value
}';
my $ret = $self->command( $func, \%par, 1)->{data};
if ($par{-withspec} and (!defined $ret or $ret eq ''))
{
$func = 'function(ARGV){
importPackage("pcbpdm.core");
var value = PdmLibraryData.getSpecValue(ARGV["-jobid"], ARGV["-jobinfo"]);
return value
}';
$ret = $self->command( $func, \%par, 1)->{data};
}
return $ret;
}
=head2 $DB->B<save_jobinfo>(-jobname=>?,-jobinfohash=>?)
=over
=item * Description
保存料号信息
=item * Parameters
B<-jobname> => string : 料号名称，-jobid 与 -jobname必有一个存在
[B<-jobid>] => interger : 料号ID，
B<-jobinfohash> => {jobinfo1=>value1,jobinfo2=>value2...} :
=item * Return
0 表示保存成功，否则返回错误消息
=item * Example
=back
=cut
sub save_jobinfo{
my $self = shift;
my %par = @_;
$par{-jobid} = $self->get_job_id($par{-jobname}) unless ($par{-jobid});
my $func = 'function(ARGV){
importPackage("pcbpdm.core");
var value = PdmLibraryData.saveJobAttr(ARGV["-jobid"], ARGV["-jobinfohash"]);
return value;
}';
my $ret = $self->command( $func, \%par, 1);
return $ret->{data};
}
sub get_job_id
{
my $self = shift;
my $job_name = shift;
my $func = 'function(ARGV){
var db = new TSqlQueryV2(T_SQLCNT_POOL.getSqlDatabase());
var data = db.selectValue({table:"pdm_job", field:["id"], where:{jobname:ARGV["job_name"]}});
return new TDataResponse(db.lastError(), data);
}';
my $ret = $self->command( $func, {job_name=>$job_name}, 1);
return $ret->{data};
}
sub get_job_name
{
my $self = shift;
my $job_id = shift;
my $func = 'function(ARGV){
var db = new TSqlQueryV2(T_SQLCNT_POOL.getSqlDatabase());
var data = db.selectValue({table:"pdm_job", field:["jobname"], where:{id:ARGV["job_id"]}});
return new TDataResponse(db.lastError(), data);
}';
my $ret = $self->command( $func, {job_id=>$job_id}, 1);
return $ret->{data};
}
sub script_end
{
my $self = shift;
my $job_id = shift;
my $process_id = shift;
my $func = 'function(ARGV){
APP.notify("TOPCAM_SCRIPT_END", {job_id:ARGV["job_id"],process_id:ARGV["process_id"]});
}';
my $ret = $self->command( $func, {job_id=>$job_id,process_id=>$process_id}, 1);
return ;
}
sub get_job_workflow_report
{
my $self = shift;
my $job_id = shift;
my $process_id = shift;
my $func = 'function(ARGV){
var db = new TSqlQueryV2(T_SQLCNT_POOL.getSqlDatabase());
var data = db.selectMap({table:"pdm_job_workflow", field:["report"], where:{job_id:ARGV["job_id"],process_id:ARGV["process_id"]}});
return new TDataResponse(db.lastError(), data);
}';
my $ret = $self->command( $func, {job_id=>$job_id, process_id=>$process_id}, 1);
return $ret->{data};
}
sub update_job_workflow_log{
my $self = shift;
my %par = @_;
my $err;
my $func = 'function(ARGV){
var db = new TSqlQueryV2(T_SQLCNT_POOL.getSqlDatabase());
var notes = ARGV["notes"];
delete ARGV["notes"];
var id = db.replaceRow({table:"pdm_job_workflow", data:ARGV, uniquefield:["job_id", "process_id"],"returnid":"id"});
db.insertRow({table:"sys_log", data:{table_name:"pdm_job_workflow", action_type:ARGV["status"],
remark:notes,user_name:ARGV["user_name"], user_id:ARGV["user_id"], row_id:id}});
return new TDataResponse(db.lastError(),"");
}';
if ($err) {
return {
errText => $err,
errCode => "",
};
}
my $ret = $self->command( $func, \%par, 1);
if ($ret->{errText}) {
return {
errText => $ret->{errText},
errCode => $ret->{errCode},
};
}
return $ret;
}
sub get_script_by_name
{
my $self = shift;
my $script_name = shift;
my $func = 'function(ARGV){
var db = new TSqlQueryV2(T_SQLCNT_POOL.getSqlDatabase());
var data = db.selectMap({table:"pdm_workprocess_script", field:["name","version","type","content","status","parameter_value","encrypt"],
where:{name:ARGV["script_name"], status:"released"}});
return new TDataResponse(db.lastError(), data);
}';
my $ret = $self->command( $func, {script_name=>$script_name}, 1);
return $ret->{data};
}
sub get_script_by_id
{
my $self = shift;
my $script_id = shift;
my $func = 'function bb (ARGV){
var db = new TSqlQueryV2(T_SQLCNT_POOL.getSqlDatabase());
var data = db.selectMap({table:"pdm_workprocess_script", field:["name","version","type","content","status","parameter_value","encrypt"], where:{id:ARGV["script_id"]}});
return new TDataResponse(db.lastError(), data);
}';
my $ret = $self->command( $func, {script_id=>$script_id}, 1);
return $ret->{data};
}
sub get_process_by_id
{
my $self = shift;
my $process_id = shift;
my $func = 'function(ARGV){
var db = new TSqlQueryV2(T_SQLCNT_POOL.getSqlDatabase());
var data = db.selectMap({table:"pdm_workprocess", field:["name", "script_parameter"], where:{id: ARGV["process_id"]}});
return new TDataResponse(db.lastError(), data);
}';
my $ret = $self->command( $func, {process_id =>$process_id}, 1);
return $ret->{data};
}
sub get_process_by_name
{
my $self = shift;
my $process_name = shift;
my $func = 'function(ARGV){
var db = new TSqlQueryV2(T_SQLCNT_POOL.getSqlDatabase());
var data = db.selectMap({table:"pdm_workprocess", field:["*"], where:{name: ARGV["process_name"]}});
return new TDataResponse(db.lastError(), data);
}';
my $ret = $self->command( $func, {process_name =>$process_name}, 1);
return $ret->{data};
}
sub set_socket_server
{
my $self = shift;
$self->{HOST} = shift;
$self->{PORT} = shift;
}
sub command{
my $self = shift;
my $func = shift;
my $argv = shift;
my $wait_ans = shift;
if ($self->{HOST} && $self->{PORT})
{
my $sock = new IO::Socket::INET(
PeerAddr => $self->{HOST},
PeerPort => $self->{PORT},
Proto => 'tcp'
);
unless ($sock)
{
return {
errText => "Sock could not be create:Reason:$!",
errCode => "SOCKET_ERROR",
};
}
my $json = new JSON;
my $msg = '$@IKMC~:'. $json->encode({FN=>$func, PA=>$argv}). '$@IKME~:';
print $sock $msg;
$sock->flush();
my $ret = {};
my $ikmend = '$@IKME~:';
if ($wait_ans)
{
my $all_recv = '';
while (1) {
my $recv_data;
$sock->recv($recv_data, 1024);
#if ($recv_data =~ s/\Q$ikmend\E\s*$//){
# $all_recv .= $recv_data; last;
#}
#else{
# $all_recv .= $recv_data;
#}
$all_recv .= $recv_data;
if ($all_recv =~ s/\Q$ikmend\E\s*$//){
last;
}
}
$all_recv = decode('utf-8', $all_recv);
my $res = $json->decode($all_recv);
$ret->{errText} = $res->{ET};
$ret->{errCode} = $res->{EC};
$ret->{data} = $res->{DT};
}
close($sock);
$sock = undef;
return $ret;
}
else
{
return {
errText => "ikm host and port can not be null!",
errCode => "SOCKET_ERROR",
};
}
}
=head2 $DB->B<get_layerinfo>(-jobname=>?,-layer=>?,-layerinfo=>?)
=over
=item * Description
获取层属性信息
=item * Parameters
B<-jobname> => string : 料号名称，-jobid 与 -jobname必有一个存在
[B<-jobid>] => interger : 料号ID
B<-layer> => string : 层的name,
B<-layerinfo> => string :层属性名称
=item * Return
层属性的值，如果料号属性不存在，则返回undef
=item * Example
N.A
=back
=cut
sub get_layerinfo{
my $self = shift;
my %par = @_;
$par{-jobid} = $self->get_job_id($par{-jobname}) unless ($par{-jobid});
$par{-layer} = $par{-tlname} unless exists $par{-layer};
my $func = 'function(ARGV){
importPackage("pcbpdm.core");
var value = PdmLibraryData.getLayerAttrValue(ARGV["-jobid"], ARGV["-layer"], ARGV["-layerinfo"]);
return value;
}';
my $ret = $self->command( $func, \%par, 1)->{data};
return $ret;
}
=head2 $DB->B<save_layerinfo>(-jobname=>?,-layer=>?,-layerinfohash=>?)
=over
=item * Description
保存层信息
=item * Parameters
B<-jobname> => string : 料号名称，-jobid 与 -jobname必有一个存在
[B<-jobid>] => interger : 料号ID，
B<-layer> => string : 层的tl_name,
B<-layerinfohash> => {layerinfo1=>value1,layerinfo2=>value2...}
=item * Return
0:表示保存成功，否则返回错误消息
=item * Example
=back
=cut
sub save_layerinfo{
my $self = shift;
my %par = @_;
$par{-jobid} = $self->get_job_id($par{-jobname}) unless ($par{-jobid});
$par{-layer} = $par{-tlname} unless exists $par{-layer};
my $func = 'function(ARGV){
importPackage("pcbpdm.core");
var value = PdmLibraryData.saveLayerAttr(ARGV["-jobid"], ARGV["-infodata"]);
return value
}';
my $ret = $self->command( $func, {-jobid=>$par{-jobid}, -infodata=>{$par{-layer} => $par{-layerinfohash}}}, 1)->{data};
return $ret;
}
sub select_arrayhash{
my $self = shift;
my %par = @_;
my $err;
unless ($par{-table}) {
$err = "'-table' cannot be empty!!!";
}
unless ($par{-field}) {
$par{-field} = "*";
}
if (ref($par{-field}) =~ /ARRAY/i) {
my $fldLst = $par{-field};
$par{-field} = join(",",@$fldLst);
}
if (ref($par{-where}) =~ /HASH/i) {
my $whereMap = $par{-where};
my @whereLst;
foreach my $field (keys %$whereMap) {
if (ref($whereMap->{$field}) =~ /ARRAY/i && scalar(@{$whereMap->{$field}}) > 0) {
my $joinIn = join("','",@{$whereMap->{$field}});
push(@whereLst,"$field IN ('$joinIn')");
}else {
push(@whereLst,"$field = '$whereMap->{$field}'");
}
}
$par{-where} = join(" AND ",@whereLst);
}
my $func = 'function(ARGV){
var db = new TSqlQueryV2(T_SQLCNT_POOL.getSqlDatabase());
var data = db.selectArrayMap({
table:ARGV["table"], field:ARGV["field"],
where:ARGV["where"], order:ARGV["order"]
});
return new TDataResponse(db.lastError(), data);
}';
if ($err) {
return {
errText => $err,
errCode => "",
};
}
my $ret = $self->command( $func, {table=>$par{-table},field=>$par{-field},where=>$par{-where},order=>$par{-order}}, 1);
if ($ret->{errText}) {
return {
errText => $ret->{errText},
errCode => $ret->{errCode},
};
}
return $ret->{data};
}
sub select_hash{
my $self = shift;
my %par = @_;
my $err;
unless ($par{-table}) {
$err = "'-table' cannot be empty!!!";
}
unless ($par{-field}) {
$par{-field} = "*";
}
if (ref($par{-field}) =~ /ARRAY/i) {
my $fldLst = $par{-field};
$par{-field} = join(",",@$fldLst);
}
if (ref($par{-where}) =~ /HASH/i) {
my $whereMap = $par{-where};
my @whereLst;
foreach my $field (keys %$whereMap) {
push(@whereLst,"$field = '$whereMap->{$field}'");
}
$par{-where} = join(" AND ",@whereLst);
}
my $func = 'function(ARGV){
var db = new TSqlQueryV2(T_SQLCNT_POOL.getSqlDatabase());
var data = db.selectMap({
table:ARGV["table"], field:ARGV["field"],
where:ARGV["where"], order:ARGV["order"]
});
return new TDataResponse(db.lastError(), data);
}';
if ($err) {
return {
errText => $err,
errCode => "",
};
}
my $ret = $self->command( $func, {table=>$par{-table},field=>$par{-field},where=>$par{-where},order=>$par{-order}}, 1);
if ($ret->{errText}) {
return {
errText => $ret->{errText},
errCode => $ret->{errCode},
};
}
return $ret->{data};
}
sub select_fieldarray{
my $self = shift;
my %par = @_;
my $err;
unless ($par{-table}) {
$err = "'-table' cannot be empty!!!";
}
unless ($par{-field}) {
$err = "'-field' cannot be empty!!!";
}
unless ($par{-where}) {
$par{-where} = " 1=1 "
}
if (ref($par{-where}) =~ /HASH/i) {
my $whereMap = $par{-where};
my @whereLst;
foreach my $field (keys %$whereMap) {
push(@whereLst,"$field = '$whereMap->{$field}'");
}
$par{-where} = join(" AND ",@whereLst);
}
my $func = 'function(ARGV){
var db = new TSqlQueryV2(T_SQLCNT_POOL.getSqlDatabase());
var data = db.selectArrayValue({
table:ARGV["table"], field:ARGV["field"],
where:ARGV["where"], order:ARGV["order"], valuefield:ARGV["field"]
});
return new TDataResponse(db.lastError(), data);
}';
if ($err) {
return {
errText => $err,
errCode => "",
};
}
my $ret = $self->command( $func, {table=>$par{-table},field=>$par{-field},where=>$par{-where},order=>$par{-order}}, 1);
if ($ret->{errText}) {
return {
errText => $ret->{errText},
errCode => $ret->{errCode},
};
}
return $ret->{data};
}
sub select_value{
my $self = shift;
my %par = @_;
my $err;
unless ($par{-table}) {
$err = "'-table' cannot be empty!!!";
}
unless ($par{-field}) {
$err = "'-field' cannot be empty!!!";
}
if (ref($par{-where}) =~ /HASH/i) {
my $whereMap = $par{-where};
my @whereLst;
foreach my $field (keys %$whereMap) {
push(@whereLst,"$field = '$whereMap->{$field}'");
}
$par{-where} = join(" AND ",@whereLst);
}
my $func = 'function(ARGV){
var db = new TSqlQueryV2(T_SQLCNT_POOL.getSqlDatabase());
var data = db.selectValue({
table:ARGV["table"], field:ARGV["field"],
where:ARGV["where"], order:ARGV["order"]
});
return new TDataResponse(db.lastError(), data);
}';
if ($err) {
return {
errText => $err,
errCode => "",
};
}
my $ret = $self->command( $func, {table=>$par{-table},field=>$par{-field},where=>$par{-where},order=>$par{-order}}, 1);
if ($ret->{errText}) {
return {
errText => $ret->{errText},
errCode => $ret->{errCode},
};
}
return $ret->{data};
}
sub get_now(){
my $self = shift;
my $func = 'function(ARGV){
var db = new TSqlQueryV2(T_SQLCNT_POOL.getSqlDatabase());
var data = db.getNow();
return new TDataResponse(db.lastError(), data);
}';
my $ret = $self->command( $func, {}, 1);
if ($ret->{errText}) {
return {
errText => $ret->{errText},
errCode => $ret->{errCode},
};
}
return $ret->{data};
}
sub get_today(){
my $self = shift;
my $func = 'function(ARGV){
var db = new TSqlQueryV2(T_SQLCNT_POOL.getSqlDatabase());
var data = db.getToday();
return new TDataResponse(db.lastError(), data);
}';
my $ret = $self->command( $func, {}, 1);
if ($ret->{errText}) {
return {
errText => $ret->{errText},
errCode => $ret->{errCode},
};
}
return $ret->{data};
}
sub get_config{
my $self = shift;
my $path = shift;
my $name = shift;
my $err;
unless ($path && $name) {
$err = "path and name cannot be empty!!!";
}
my $ret = $self->select_value(
-table=>'pub_conf',
-field=>'text_data',
-where=>{path=>$path,name=>$name}
);
if (ref($ret) =~ /hash/i && $ret->{errText}) {
return {
errText => $ret->{errText},
errCode => $ret->{errCode},
};
}
return $ret;
}
sub save_config{
my $self = shift;
my %par = @_;
my $path = $par{-path};
my $name = $par{-name};
my $value = $par{-value};
my $err;
unless ($path && $name) {
$err = "path and name cannot be empty!!!";
}
my $func = 'function(ARGV){
var db = new TSqlQueryV2(T_SQLCNT_POOL.getSqlDatabase());
var data = db.replaceRow({table:"pub_conf",data:{path:ARGV["path"],name:ARGV["name"], text_data:ARGV["value"]},uniquefield:["path","name"]});
return new TDataResponse(db.lastError(), data);
}';
my $data = {path =>$path,name=>$name,value=>$value};
my $ret = $self->command($func,$data,1);
if (ref($ret) =~ /hash/i && $ret->{errText}) {
return {
errText => $ret->{errText},
errCode => $ret->{errCode},
};
}
return $ret;
}
sub update{
my $self = shift;
my %par = @_;
my $err;
if (ref($par{-where}) =~ /HASH/i) {
my $whereMap = $par{-where};
my @whereLst;
foreach my $field (keys %$whereMap) {
if (ref($whereMap->{$field}) =~ /ARRAY/i && scalar(@{$whereMap->{$field}}) > 0) {
my $joinIn = join("','",@{$whereMap->{$field}});
push(@whereLst,"$field IN ('$joinIn')");
}else {
push(@whereLst,"$field = '$whereMap->{$field}'");
}
}
$par{-where} = join(" AND ",@whereLst);
}
my $data = $par{-data};
my $json = new JSON;
my $data_json = $json->encode($data);
my $func = 'function(ARGV){
var db = new TSqlQueryV2(T_SQLCNT_POOL.getSqlDatabase());
db.updateRow({
"table": ARGV["table"],
"data": JSON.parse(ARGV["data"]),
"where": ARGV["where"]
});
return new TDataResponse(db.lastError(),"");
}';
if ($err) {
return {
errText => $err,
errCode => "",
};
}
my $ret = $self->command( $func, {table=>$par{-table},data=>$data_json,where=>$par{-where}}, 1);
if ($ret->{errText}) {
return {
errText => $ret->{errText},
errCode => $ret->{errCode},
};
}
return $ret;
}
sub delete{
my $self = shift;
my %par = @_;
my $err;
if (ref($par{-where}) =~ /HASH/i) {
my $whereMap = $par{-where};
my @whereLst;
foreach my $field (keys %$whereMap) {
if (ref($whereMap->{$field}) =~ /ARRAY/i && scalar(@{$whereMap->{$field}}) > 0) {
my $joinIn = join("','",@{$whereMap->{$field}});
push(@whereLst,"$field IN ('$joinIn')");
}else {
push(@whereLst,"$field = '$whereMap->{$field}'");
}
}
$par{-where} = join(" AND ",@whereLst);
}
my $func = 'function(ARGV){
var db = new TSqlQueryV2(T_SQLCNT_POOL.getSqlDatabase());
db.deleteRow({
"table": ARGV["table"],
"where": ARGV["where"]
});
return new TDataResponse(db.lastError(),"");
}';
if ($err) {
return {
errText => $err,
errCode => "",
};
}
my $ret = $self->command( $func, {table=>$par{-table},where=>$par{-where}}, 1);
if ($ret->{errText}) {
return {
errText => $ret->{errText},
errCode => $ret->{errCode},
};
}
return $ret;
}
sub insert{
my $self = shift;
my %par = @_;
my $err;
if (ref($par{-where}) =~ /HASH/i) {
my $whereMap = $par{-where};
my @whereLst;
foreach my $field (keys %$whereMap) {
if (ref($whereMap->{$field}) =~ /ARRAY/i && scalar(@{$whereMap->{$field}}) > 0) {
my $joinIn = join("','",@{$whereMap->{$field}});
push(@whereLst,"$field IN ('$joinIn')");
}else {
push(@whereLst,"$field = '$whereMap->{$field}'");
}
}
$par{-where} = join(" AND ",@whereLst);
}
my $data = $par{-data};
my $json = new JSON;
my $data_json = $json->encode($data);
my $func = 'function(ARGV){
var db = new TSqlQueryV2(T_SQLCNT_POOL.getSqlDatabase());
db.insertRow({
"table": ARGV["table"],
"data": JSON.parse(ARGV["data"]),
});
return new TDataResponse(db.lastError(),"");
}';
if ($err) {
return {
errText => $err,
errCode => "",
};
}
my $ret = $self->command( $func, {table=>$par{-table},data=>$data_json,where=>$par{-where}}, 1);
if ($ret->{errText}) {
return {
errText => $ret->{errText},
errCode => $ret->{errCode},
};
}
return $ret;
}
sub batch_insert{
my $self = shift;
my %par = @_;
my $err;
if (ref($par{-where}) =~ /HASH/i) {
my $whereMap = $par{-where};
my @whereLst;
foreach my $field (keys %$whereMap) {
if (ref($whereMap->{$field}) =~ /ARRAY/i && scalar(@{$whereMap->{$field}}) > 0) {
my $joinIn = join("','",@{$whereMap->{$field}});
push(@whereLst,"$field IN ('$joinIn')");
}else {
push(@whereLst,"$field = '$whereMap->{$field}'");
}
}
$par{-where} = join(" AND ",@whereLst);
}
my $data = $par{-data};
my $json = new JSON;
my $data_json = $json->encode($data);
my $func = 'function(ARGV){
var db = new TSqlQueryV2(T_SQLCNT_POOL.getSqlDatabase());
db.batchInsert(
ARGV["table"],
ARGV["field"],
JSON.parse(ARGV["data"])
);
return new TDataResponse(db.lastError(),"");
}';
if ($err) {
return {
errText => $err,
errCode => "",
};
}
my $ret = $self->command( $func, {table=>$par{-table},data=>$data_json,field=>$par{-field}}, 1);
if ($ret->{errText}) {
return {
errText => $ret->{errText},
errCode => $ret->{errCode},
};
}
return $ret;
}
sub update_flow_report{
my $self = shift;
my %par = @_;
my $err;
unless ($par{-job_id} && $par{-process_id}) {
$err = "-job_id and -process_id cannot be empty!!!";
}
if ($err) {
return {
errText => $err,
errCode => "",
};
}
if ($par{-mode} eq 'append' or $par{-mode} eq 'before'){
my $org = $self->select_value(
-table=>'pdm_job_workflow',
-field=>'report',
-where=>{job_id=>$par{-job_id},process_id=>$par{-process_id}}
);
if ($par{-mode} eq 'append'){
$par{-report} = $org ."\n". $par{-report};
}
else{
$par{-report} = $par{-report}."\n".$org;
};
}
my $ret = $self->update_job_workflow_log(job_id=>$par{-job_id},
process_id=>$par{-process_id},
report=>$par{-report});
if ($ret->{errText}) {
return {
errText => $ret->{errText},
errCode => $ret->{errCode},
};
}
return undef;
}
sub get_info_style{
my $self = shift;
my %par = @_;
my $func = 'function(ARGV){
var db = new TSqlQueryV2(T_SQLCNT_POOL.getSqlDatabase());
var data = db.selectMap({
table:"pdm_attrname", field:["*"],
where:{name:ARGV["infoname"]}
});
return new TDataResponse(db.lastError(), data);
}';
my $ret = $self->command( $func, {infoname=>$par{-infoname}}, 1);
##数据类型对应 c++ => perl
my %map = (
string=>'string',
number=>'number',
integer=>'integer',
plain_text=>'text',
enum=>'enum',
check_box=>'boolean',
editable_enum=>'editable_enum',
radio_box=>'radio',
multiple_enum=>'multiple',
);
my @return;
push @return,name=>$ret->{data}{name};
push @return,label=>$ret->{data}{title};
push @return,units=>$ret->{data}{units};
push @return,type=>$map{$ret->{data}{data_type}};
my $json = new JSON;
if( $ret->{data}{data_type} =~ /^(enum)$/ ){
my @list;
my $data = $json->decode($ret->{data}{option_list});
foreach my $item(@{$data}){
push @list,{name=>$item->{name},display_name=>$item->{text}};
}
push @return,property=>{
tl_field=>[name=>'scalar',display_name=>'text'],
tl_value_field=>'name',
tl_data=>\@list,
};
}
elsif( $ret->{data}{data_type} =~ /^(editable_enum)$/ ){
my @list;
my $data = $json->decode($ret->{data}{option_list});
foreach my $item(@{$data}){
push @list,{name=>$item->{text}};
}
push @return,property=>{
tl_field=>[name=>'text'],
tl_data=>\@list,
};
}
elsif( $ret->{data}{data_type} =~ /^(check_box)$/ ){
my @list;
my $data = $json->decode($ret->{data}{option_list});
foreach my $item(@{$data}){
push @list,{name=>$item->{text}};
}
push @return,property=>{
tl_columns => 2,
tl_list=>\@list,
};
}
elsif( $ret->{data}{data_type} =~ /^(radio_box)$/ ){
my @list;
my $data = $json->decode($ret->{data}{option_list});
foreach my $item(@{$data}){
push @list,$item->{name}=>$item->{text};
}
push @return,property=>{
tl_columns =>scalar(@list),
tl_list=>\@list,
};
}
elsif( $ret->{data}{data_type} =~ /^(multiple_enum)$/ ){
my @list;
my $data = $json->decode($ret->{data}{option_list});
foreach my $item(@{$data}){
push @list,{name=>$item->{name},display_name=>$item->{text}};
}
push @return,property=>{
tl_columns => 2,
tl_list=>\@list,
};
}
##
return @return;
}
=head1 MOTHODS
=head2 $IKM->B<get_process_status>(-jobname=>?,-process_name=>?)
=over
=item * Description
#获取步骤信息
=item * Parameters
B<-jobname> => string : 料号名称，-jobid 与 -jobname必有一个存在
[B<-jobid>] => interger : 料号ID，
B<-process_name> => string : 步骤名称
=item * Return
步骤状态信息，如果步骤不存在，则返回undef
=item * Example
=back
=cut
sub get_process_status{
my $self = shift;
my %par = @_;
unless( $par{-jobid} ){
if($par{-job_id}){
$par{-jobid} = $par{-job_id};
}
elsif($par{-jobname}){
$par{-jobid} = $self->get_job_id($par{-jobname});
}
elsif($par{-job_name}){
$par{-jobid} = $self->get_job_id($par{-job_name});
}
elsif($par{job}){
$par{-jobid} = $self->get_job_id($par{job});
}
elsif($par{-job}){
$par{-jobid} = $self->get_job_id($par{-job});
}
}
unless( $par{-process_id} ){
if( $par{-process_name} ){
$par{-process_id} = $self->get_process_by_name($par{-process_name})->{id};
}
elsif( $par{process_name} ){
$par{-process_id} = $self->get_process_by_name($par{process_name})->{id};
}
}
$par{-order} = 'id DESC' unless $par{order};
my $func = 'function(ARGV){
var db = new TSqlQueryV2(T_SQLCNT_POOL.getSqlDatabase());
var data = db.selectMap({table:"pdm_job_workflow", field:["*"], where:{job_id:ARGV["-jobid"],process_id:ARGV["-process_id"]},order:ARGV["-order"]});
return new TDataResponse(db.lastError(), data);
}';
my $ret = $self->command( $func, {-jobid=>$par{-jobid},-process_id=>$par{-process_id},-order=>$par{-order}}, 1);
if ($ret->{errText}) {
return {
errText => $ret->{errText},
errCode => $ret->{errCode},
};
}
return $ret->{data};
}
1;
tool/test.js 0 → 100644
View file @ dccb1a5b
let num = 23.1
console.log(
Math.round(num.toFixed(4)*1000)/1000 - 0
);
tool/tl/ImpCouponData.TL2 0 → 100644
View file @ dccb1a5b
This source diff could not be displayed because it is too large. You can view the blob instead.
tool/tl/JNS_PUB_change_layer_name.TL2 0 → 100644
View file @ dccb1a5b
eWhlY2QK67LB3UUI6AogR7V3QZJJUFRJ30OI6AogU7FSQUZFV7VS4goJ6FsKCQkKCV0KCiB2RVJ3SU=4X0hJUZRPUlkICgl2MSOwMCAyMD7z536tMj7gQW=keSB1dQoJ6CAgMSEmlrDniYjmnKwKCVYx5jAx6D6wMjAtNy0xNSDorrjkuLXmlowKCSAg6D7uLYaFLaS2LbGCLbGCL1CNLaKeLYqgdC=iLqCHIK+GCgl2MSOwMiAyMD6w53gtNiDorrjkuLXmlowKCSAg6D7uLaKeLYqgL5qGLqCLLoWuLY+gLpI7L5+hLoGvI6eqLYqoLoISLYiXVC=CLqCHIK+GCgl2MSOwMyAyMD6y536tMjgg1nNLCgkg6CAx5u2Bh+2xguSOi+SOg42xgu2Opu2FpeaXtu2inu2Ko42xj+iUveadoeSEtiAgCgkJCiB6RUxQ4goJPGh0b2w+PGJv1HkgYmdjbWxvcnsiJ7R7RUNGRS6+CgkJPG1vbnQgcWlI1XsiMy6gYW=sbTJE6iQwMDN7Qj6iPjxwPu2Kn+iDveeug4SEizwvcDO85W1vbnQ+CgkJ6CA8cDOgLqCLLoWuIaK7LaIhLoyHLISILbelLY2TLEGEL1I5Lpu0LpSLLbGCL1CN6DwvcDOKCQkg6DxicjOKCQk81m=udCBzaXpley6z6iBjbWxvcnsiJDAwM0RCMi6+PHA+LY+CLp2wIY2NLEWuPC=wPjwv1m=udDOKCQk81m=udCBjbWxvcnsiJDAw4DAwMC6+PHA+64KXjyA85TA+PC=mbWL0PgoJCSAgPHA+6DwvcDOKCQk81m=udCBjbWxvcnsiJDAw4DAwMC6+PHA+64KXjyA85TA+PC=mbWL0PgoJCSA8cDOgPC=wPgoJC3xmbWL06HNpemVE6jMi6GNvbG=yey6kMDAzR76y6jO8cDEmsIjmh6/kuovpobk85TA+PC=mbWL0PgoJCSAgPHA+64KXjyDmlIAgPC=wPgoJCSAgPGJyPgoJPC=ibWRLPjwvaHRtbDOK6CAKeWNZdAoKJHVz1SBzdHJpYTQ=CiRteSAo60pPQiwjR0V45CNHVUks60RC5CNK30JfSUQs6ZBBUik=CnVz1SBZdGYOPQpZcWUgSlNP3j0KdXNl67RhdG7I4kRZbXAgJWRZbXAnPQpteSAo60pvYiwjUTRlcCkgeyAo60pPQixZbmRl1ik=CmZL6CNS1XRZcmOgeyAn1mluaXNoJz0KbXkgQFJlcG=ydD0KbXkgKHZzdGFjaZ=ybTdz5CNu5CNLK30KCnRyeSB+CglteSAjanNvbiBE67p330OtPmLldy0+Y2xsbTdfbm=ucmVmPQoJJCQkLq4ALp+lRWVu1XNpc+a2me2Pt+aYr+2Qpu2tm42cq42LtuaJk+28gAoJa2YgKC7g60dF3i0+aXNKbWJFeGlzdHMoam=iezOjSm=iKSApfgog6CAg6CAg6CNHVUktPmZz1WJveCgta2Nvbns+JWVycm=yJywtdGVOdHs+6ua2me2PtyAjSm=i642cq7dlbmVzaXPkuKTku6Tlr1jlnKgs64ivt+ajg4afpS7iK30K6CAg6CAg6CBy1XRZcmOgJ0Vycm=yJz0K6CAg6CUKCSNHRUOtPm=w12LKbW6oam=iezOjSm=iKSBZbmxlcTMgKCNHRUOtPmlzSm=i3TBlbihqbWJEPiNKbW6pK30KC2ZL6HZtYXRyaXgg6Hsg60dF3i0+1WV032F0cmlOKGpvYns+60pvYix0eXBlezOnaGFzaCcpPQoJCglteSAja2LuXW1pbGZfdHlw1SBE6CNJS00tPmdldF=qbWJpbm1vKCZqbWJuY2ZlezOjSk=C5CZqbWJjYXRl1W=yeXs+JTdvcmsn5CZqbWJpbm1vezOnSkL3XWlubl=0bW=sa2LnXTRLcGUnK30KC2ZL6CNvdXRf1mlsbV=0eXBl6Hsg60l53S0+1WV0XWpvYmlu1m8o52pvYmLhb2VEPiNK306s52pvYmNhdGVnbTJLezOndW=yaycs52pvYmlu1m=EPidK3lNfbTV0XTRvbWxpbmdfdHlw1ScpPQoJbXkg6TNpbGtfdHlw1SBE6CNJS00tPmdldF=qbWJpbm1vKCZqbWJuY2ZlezOjSk=C5CZqbWJjYXRl1W=yeXs+JTdvcmsn5CZqbWJpbm1vezOnSkL3XTNzXTBybWNzcZ=0eXBlJyk=CglteSAjbGFL1XJfYW=ZbnQgeyAjR0V453Ln1XRMYXllckNvd2L0KGpvYns+60pvYik=CglteSAjbGFta2LhdGlvbl=t1XRobWQgeyAjSUtN53Ln1XRfam=ia2Lmbygtam=ibmFt1Xs+60pPQiwtam=iYWF012dvcnlEPidTbTJrJywtam=ia2LmbTs+J0p4UZ=sY2ZpbmF0a2=uXWZldGhv1CcpPQoJbXkg6TNw12Mz6Hsg60l53S0+1WV0XWpvYmlu1m8o52pvYmLhb2VEPiNK306s52pvYmNhdGVnbTJLezOndW=yaycs52pvYmlu1m=EPidK3lNfcGNiXTNw12NpY2xpdHkzJyk=Cglp1iAo6Wxhe2VyXWNvd2L06DOgM3YpfgoJCSNL6HsgM3YqMz7rM36wPQoJJQoJ12xz1XOKCQkjeSBE6CNsYXllcl=jbTVudCozMSsxMjA=CgklCglteSAjbmFt1UpPQiBE6HNZYnN0cigjSm=i5DAs4Sk=CgkKCSNHRUOtPm=w12LNYXRyaXgoam=iezOjSm=iK30KC21vcmVhYWggbXkg6Wxhe2Vy6ChzbTJ06HOjb2F0cmlOfiNhJXLybTcl6DxEPiAjb2F0cmlOfiNiJXLybTclJSAgaWVLcyB=b2F0cmlOKSB+CgkJa2YgKCAo6WZhdHJpeHOjbGFL1X6lfmNvbnRleHQl6GVx6CdibWFy1CcpY2Lk6Cgjb2F0cmlOfiNsYXllciV+bGFL1XJfdHlw1SUg1X7gJTNpbGtfcWNy12VuJykg6Cl+CgkJCXVubGVzcygg6Wxhe2Vy6HsE6C=eKHB8bikv6Cl+CgkJCQlteSAjdGZwPQoJCQkJa2Yo6CNza2xrXTRLcGUgezsg5ZLzcHJheSMvaSApfgoJCQkJCSN0bXAgeyAncC0nPQoJCQkJJQoJCQkJ12xza2Yo6CNza2xrXTRLcGUgezsg5ZLza2xrcWNy12Vu6y=p6Cl+CgkJCQkJ6TRtcCBE6Cdu5Sc=CgkJCQklCgkJCQllbHNlfgoJCQkJC2LleHQ=CgkJCQklCgkJCQkjR0V453LD300o6CdtYXRyaXhfcmVuY2ZlXWxhe2VyJyxqbWJEPiNKbW6sb2F0cmlOezOnb2F0cmlOJyxsYXllcns+6Wxhe2Vy5GLldZ=uY2ZlezOjdGZw5iNsYXllcik=CgkJCSUKCQklCgkJ12xza2YgKCAjb2F0cmlOfiNsYXllciV+YW=udGVOdCUg1X7gJWJvYXJkJyBhbmQgKCNtYXRyaXh+6Wxhe2VyJXL0bF=uY2ZlJSBE4yAvXih0bTB8Ym=0dG=tKSMv6Ckg6Cl+CgkJC2lm6CgjbGFL1X6gezsgbS8odHxiKS8pfgoJCQkJ60dVSS0+bXNnYm=OKCZpYW=uezOna2Lmbycs5XRleHREPi5lsY5ltE5nuO/ooqvlrprkuYnkuobku6rjg6Hku6vpna5vv6zlpo5pn6DljLjmmE3vv6zorEfmiYvliqjkvIEmraPvv67i5CZn12OgezOg60dF3ik=CgkJCQkk6HJldHVybiAnQWFuYWVsJwoJCQklCgkJCXBZcWggQHN0Y2NrdXBfbGFL1XJz5CNsYXllcj0KCQklCgkJ12xza2YgKCAjb2F0cmlOfiNsYXllciV+YW=udGVOdCUg1X7gJWJvYXJkJyBhbmQgKCNtYXRyaXh+6Wxhe2VyJXL0bF=uY2ZlJSBE4yAvXmxc1Csj5yAp6CApfgoJCQlp1iAo6Wxhe2Vy6HsE6G0vKHR8YikvKXOKCQkJCSNHVUktPmZz1WJveCgta2Nvbns+JWlu1m8n5CZ01Xh0ezOiLbGCLbeyLEuPIKKrLaIaL5mJL5qGL5iKOOCBL5i5I1WiEEyMLaaCI1yALY+YLpu0EEyMIK+TLom5LYqoL5+uLqWjEEyB6iwt1WVu6Hs+6CNHRUOpPQoJCQkJJCBy1XRZcmOgJ0NhbmNlbCcKCQkJJQoJCQlwdXNo67BzdGFjaTVwXWxhe2VycywjbGFL1X6=CgkJJQoJJQoJbXkg6TRvcGxpbmtlcl=sYXllcnMgeyAjSUtN53Lz12xlYTRfYXJyYXloYXNoKCZ0Y2Js1Xs+JTBkbV=qbWJfcTRhYWtfbGFL1XJzJywtdWhlcmVEPnLqbWJfa2REPiNK30JfSUQlK30KC2ZL67BjdXN0XWxhe2VyPQoKC21vcmVhYWggbXkg6Wl0120gKHNvcnR+6W7tPnLsYXllcl=ud20l6DxEPiAjYi0+fmxhe2VyXWLZbSUl67AjdG=wbGluaWVyXWxhe2VycykgfgoJC2lmKCNpdGVt53L+YXR0cl=kYXRhJSAmJiAjaXRlbS0+fmxhe2VyXTRLcGUl6GLl6CJ3a2xr6FNjcmVlbi6gJiYg6Wl0120tPnLsYXllcl=0eXBlJSBu1SAiUW=s1GVy67ZhcWsiKXOKCQkJbXkg6WpzbWLfYXR0ciBE6CNqcW=u53Lk12Nv1GUo6Wl0120tPnLhdHRyXWRhdG7lK30KCQkJbXkg6WNZcTRfbHkgeyAjanNvbl=hdHRy53L+YTVzdG=taXpl1F=sYXllcl=uY2ZlJ30KCQkJa2Yo6WNZcTRfbHkgJiYg6WNZcTRfbHkgbmUg6i6p6HOKCQkJC2lmKCNjdXN0XWxL6HsE6C=qa27vKSB+CgkJCQkJcHVzaCBAYTVzdF=sYXllciwg6WNZcTRfbHk=CgkJCQkl6GVscWUgfgoJCQkJC2lmKCNjdXN0XWxL6HsE6C8oXGQrKS8p6HOKCQkJCQkJcHVzaCBAYTVzdF=sYXllciwgKCMxKSOo6Wl0120tPnLsYXllcl=za2RlJSBlcSAiVG=w6j8g6nQi6Dog6m6iK30KCQkJCQkl6GVscWUgfgoJCQkJCQlwdXNo67BjdXN0XWxhe2Vy5CAjYTVzdF=se30KCQkJCQklCgkJCQklCgkJCSUKCQklCgklCglteSAjdGVzdD0KC21vcmVhYWggbXkg6Wxhe2Vy6ChAcTRhYWtZcF=sYXllcnMpfgoJC2ZL6CgjdW=yaWxLcmOp6Hsg6Wxhe2Vy6HsE6C8oXGQrKS8=CgkJ6W=w1V=ibW=s12Fu6HsgMSBp1iAo6Wxhe2Vy6HsE6G0vXm=w1S0vK30KCQkKCQkjbiArKz0KCQkjcTRhYWtfcm=TcTOjbGFL1X6lfnNlcXVlbmNlJSAg6Hsg6WO=CgkJ6TN0Y2NrXTJvdTN+6Wxhe2VyJXLn12LfbmFt1SUg6CBE6CNsYXllcj0KCQkk12LZbV=0bF=za2RlCgoJC2lm6ChzYWFsYX6oQGNZcTRfbGFL1X6p6DOgMSApfgoJCQlmbTJlY2No6CNs6ChAYTVzdF=sYXllcikgfgoJCQkJbXkgKCNseXJuKSBE6CNs6HsE6C8oXGQrKS8=CgkJCQkk6CNHRUOtPlBBVVNFKCNsK30KCQkJCSNs6HsE6HMv5S8vPQoJCQkJJCNHVUktPmZz1WJveCgta2Nvbns+JWlu1m8n5CZ01Xh0ezOi6Wwg6CAjbGFL1X6g6C6pPQoJCQkJa2YgKCNs6HsE6C=e6Wxhe2Vy5yApfgoJCQkJCSNsbSBE6HNZYnN0cigjbCAs536sMSk=CgkJCQkJa2YgKCAjbG0g1X7gJTQnKXOKCQkJCQkJ6TN0Y2NrXTJvdTN+6Wxhe2VyJXLlbnVtXTRsXTNp1GUl6Hsg6Cd0bTAnPQoJCQkJCQlsYXN0PQoJCQkJCSUKCQkJCQllbHNlfgoJCQkJCQkjcTRhYWtfcm=TcTOjbGFL1X6lfmVud2ZfdGxfcWlk1SUgeyAgJWJvdHRvbSc=CgkJCQkJC2xhcTQ=CgkJCQkJJQoJCQkJJQoJCQkJ12xz1XOKCQkJCQlp1igjdW=yaWxLcmOgeTsg6WxLcmOgY2Lk6CNsYXllciAh4yAvXmppYS8gY2Lk6CNs6C7E6C=eamlh5yl+CgkJCQkJC2lm6CgjbCBE4yAvKFth5XpB5VpdKykvKXOKCQkJCQkJC2lm6CgjMSBlcSAndCcpfgoJCQkJCQkJCSNzdGFjaZ=ybTdzfiNsYXllciV+12LZbV=0bF=za2RlJSBE6CAndG=wJz0KCQkJCQkJCQlsYXN0PQoJCQkJCQkJJQoJCQkJCQkJ12xz1XOKCQkJCQkJCQkjcTRhYWtfcm=TcTOjbGFL1X6lfmVud2ZfdGxfcWlk1SUgeyAgJWJvdHRvbSc=CgkJCQkJCQkJbGFzdD0KCQkJCQkJCSUKCQkJCQkJCQoJCQkJCQklCgkJCQkJJQoJCQkJJQoJCQklCgkJCSN01XN06HsgJWFZdG8nPQoJCSUKCQllbHNlfgoJCQlp1iAo6GRl1mlu12Qg6WZhdHJpeHOjbGFL1X6lfmVud2ZfdGxfcWlk1SUgKXOKCQkJ6TN0Y2NrXTJvdTN+6Wxhe2VyJXLlbnVtXTRsXTNp1GUl6Hsg6CNtYXRyaXh+6Wxhe2VyJXLlbnVtXTRsXTNp1GUlPQoJCQklCgkJC2VscWV+CgkJCQlp1ihk121pbmVk6CNtYXRyaXh+6Wxhe2VyJXL0bF=0eXBlJSBhbmQg6WZhdHJpeHOjbGFL1X6lfnRsXTRLcGUl6GVx6CdvdXRlcicpfi3lpJblsY6KCQkJCQlp1iAo6GRl1mlu12Qg6WZhdHJpeHOjbGFL1X6lfnRsXWLZbSUgY2Lk6CNtYXRyaXh+6Wxhe2VyJXL0bF=ud20lf36geTsgMSApfgoJCQkJCQkjcTRhYWtfcm=TcTOjbGFL1X6lfmVud2ZfdGxfcWlk1SUgeyAgJTRvcCc=CgkJCQkJJ2VscWV+CgkJCQkJCSNzdGFjaZ=ybTdzfiNsYXllciV+12LZbV=0bF=za2RlJSBE6CAnYm=0dG=tJz0KCQkJCQklCgkJCQkl12xz1XOkLYaFLbGCCgkJCQkJa2YgKCNzcGVjMyBlcSAndGhybTVnaF=ibWFy1Ccpfi3pgJrlr13mnb8KCQkJCQkJa2YgKCBk121pbmVk6CNtYXRyaXh+6Wxhe2VyJXL0bF=ud20l6GFu1CAjb2F0cmlOfiNsYXllciV+dGxfbnVtJX0y6HtE6DAgKXOKCQkJCQkJC2lm6CgjbGFta2LhdGlvbl=t1XRobWQg1X7gJWNZJyl+J4imhueul4azlQoJCQkJCQkJCSNzdGFjaZ=ybTdzfiNsYXllciV+12LZbV=0bF=za2RlJSBE6CAndG=wJz0KCQkJCQkJCSVlbHNp1iAo6Wxhb2luYXRpbWLfb2V0aG=k6GVx6CdjbTJlJyl+J4imhuadv+azlQoJCQkJCQkJC2lm6CgjbTBlXWJvbWxlY2Opfi3lj6XlkKtvcGXlsY6KCQkJCQkJCQkJ6TN0Y2NrXTJvdTN+6Wxhe2VyJXLlbnVtXTRsXTNp1GUl6Hsg6Cd0bTAnPQoJCQkJCQkJCSVlbHNlfgoJCQkJCQkJCQkjcTRhYWtfcm=TcTOjbGFL1X6lfmVud2ZfdGxfcWlk1SUgeyAgJWJvdHRvbSc=CgkJCQkJCQkJJQoJCQkJCQkJJQoJCQkJCQkl12xz1XOKCQkJCQkJC2lm6CgjbGFta2LhdGlvbl=t1XRobWQg1X7gJWNZJyl+J4imhueul4azlQoJCQkJCQkJCSNzdGFjaZ=ybTdzfiNsYXllciV+12LZbV=0bF=za2RlJSBE6CAnYm=0dG=tJz0KCQkJCQkJCSVlbHNp1iAo6Wxhb2luYXRpbWLfb2V0aG=k6GVx6CdjbTJlJyl+J4imhuadv+azlQoJCQkJCQkJC2lm6CgjbTBlXWJvbWxlY2Opfi3lj6XlkKtvcGXlsY6KCQkJCQkJCQkJ6TN0Y2NrXTJvdTN+6Wxhe2VyJXLlbnVtXTRsXTNp1GUl6Hsg6CdibTR0bW0nPQoJCQkJCQkJCSVlbHNlfgoJCQkJCQkJCQkjcTRhYWtfcm=TcTOjbGFL1X6lfmVud2ZfdGxfcWlk1SUgeyAgJTRvcCc=CgkJCQkJCQkJJQoJCQkJCQkJJQoJCQkJCQklCgkJCQkJJ2VscWV+CgkJCQkJCSNzdGFjaZ=ybTdzfiNsYXllciV+12LZbV=0bF=za2RlJSBE6CAnJz0KCQkJCQklCgkJCQklCgkJCSUKCQkJ6TRlcTQgeyAndW=yayc=CgkJJQoJC2ZL6CNmY2Nl1mls1SBE6CJF4i8jbmFt1UpPQiL0eHQiPQoJCSQga2YgKCZl6CNmY2Nl1mls1Sl+CgkJJCAJbTBlbiAo37F1RVJN2U1J37Us6W1hYWVma2xlK30KCQkk6AlTaGls1SAoP7xB2UVS3VlGSUxFPikgfgoJCSQgCQljaG=tcD0KCQkk6AkJbXkgKCNseXJuKSBE6CNf6HsE6C8oXGQrKS8=CgkJJCAJCSNf6HsE6HMv5S8vPQoJCSQgCQkk60dVSS0+bXNnYm=OKCZpYW=uezOna2Lmbycs5XRleHREPi6jXyAg6CNsYXllciAg6ik=CgkJJCAJC2lm6CgjXyBE4yAvXiNsYXllci8gKXOKCQkk6AkJCSNsbSBE6HNZYnN0cigjXyAs536sMSk=CgkJJCAJCQlp1iAo6CNsbSBlcSAndCcpfgoJCSQgCQkJCSNzdGFjaZ=ybTdzfiNsYXllciV+12LZbV=0bF=za2RlJSBE6CAndG=wJz0KCQkk6AkJCQlsYXN0PQoJCSQgCQkJJQoJCSQgCQkJ12xz1XOKCQkk6AkJCQkjcTRhYWtfcm=TcTOjbGFL1X6lfmVud2ZfdGxfcWlk1SUgeyAgJWJvdHRvbSc=CgkJJCAJCQkJbGFzdD0KCQkk6AkJCSUKCQkk6AkJJQoJCSQgCQllbHNlfgoJCSQgCQkJa2Yo6TdvcmtseXJu6HtE6CNseXJu6GFu1CAjbGFL1X6g63sg5ZLqa27v6GFu1CAjXyAh4yAvXmppYS8pfgoJCSQgCQkJC2lm6CgjXyBE4yAvKFth5XpB5VpdKykvKXOKCQkk6AkJCQkJa2YgKCMx6GVx6Cd0Jyl+CgkJJCAJCQkJCQkjcTRhYWtfcm=TcTOjbGFL1X6lfmVud2ZfdGxfcWlk1SUgeyAgJTRvcCc=CgkJJCAJCQkJCQlsYXN0PQoJCSQgCQkJCQklCgkJJCAJCQkJC2VscWV+CgkJJCAJCQkJCQkjcTRhYWtfcm=TcTOjbGFL1X6lfmVud2ZfdGxfcWlk1SUgeyAgJWJvdHRvbSc=CgkJJCAJCQkJCQlsYXN0PQoJCSQgCQkJCQklCgkJCQkJCQkKCQkk6AkJCQklCgkJJCAJCQklCgkJJCAJCSUKCQkk6AklCgkJJCAJYWxvcWUg37F1RVJN2U1J37U=CgkJJCAJ6TRlcTQgeyAnYXV0byc=CgkJJCAlCgkJJCBlbHNlfgoJCSQgC2lm6Cgg1GVma2Ll1CAjb2F0cmlOfiNsYXllciV+12LZbV=0bF=za2RlJSApfgoJCSQgCSNzdGFjaZ=ybTdzfiNsYXllciV+12LZbV=0bF=za2RlJSBE6CAjb2F0cmlOfiNsYXllciV+12LZbV=0bF=za2RlJ30KCQkk6AklCgkJJCAJ12xz1XOKCQkk6AkJa2Yo1GVma2Ll1CAjb2F0cmlOfiNsYXllciV+dGxfdHlw1SUgY2Lk6CNtYXRyaXh+6Wxhe2VyJXL0bF=0eXBlJSBlcSAnbTV01X6nKXOkLaS2LbGCCgkJJCAJCQlp1iAo6GRl1mlu12Qg6WZhdHJpeHOjbGFL1X6lfnRsXWLZbSUgY2Lk6CNtYXRyaXh+6Wxhe2VyJXL0bF=ud20lf36geTsgMSApfgoJCSQgCQkJCSNzdGFjaZ=ybTdzfiNsYXllciV+12LZbV=0bF=za2RlJSBE6CAndG=wJz0KCQkk6AkJCSVlbHNlfgoJCSQgCQkJCSNzdGFjaZ=ybTdzfiNsYXllciV+12LZbV=0bF=za2RlJSBE6CAnYm=0dG=tJz0KCQkk6AkJCSUKCQkk6AkJJ2VscWV+J42Ghe2xggoJCSQgCQkJa2YgKCNzcGVjMyBlcSAndGhybTVnaF=ibWFy1Ccpfi3pgJrlr13mnb8KCQkk6AkJCQlp1iAo6GRl1mlu12Qg6WZhdHJpeHOjbGFL1X6lfnRsXWLZbSUgY2Lk6CNtYXRyaXh+6Wxhe2VyJXL0bF=ud20lf36geTsgMCApfgoJCSQgCQkJCQlp1iAo6Wxhb2luYXRpbWLfb2V0aG=k6GVx6CdjdScpfi3opobnrp3msLUKCQkk6AkJCQkJCSNzdGFjaZ=ybTdzfiNsYXllciV+12LZbV=0bF=za2RlJSBE6CAndG=wJz0KCQkk6AkJCQkJJ2VscWlm6CgjbGFta2LhdGlvbl=t1XRobWQg1X7gJWNvcmUnKXOkIKaGLpW/Lr4VCgkJJCAJCQkJCQlp1iAo6W=w1V=ibW=s12FuKXOkLYyFL1CrbTBlLbGCCgkJJCAJCQkJCQkJ6TN0Y2NrXTJvdTN+6Wxhe2VyJXLlbnVtXTRsXTNp1GUl6Hsg6Cd0bTAnPQoJCSQgCQkJCQkJJ2VscWV+CgkJJCAJCQkJCQkJ6TN0Y2NrXTJvdTN+6Wxhe2VyJXLlbnVtXTRsXTNp1GUl6Hsg6CdibTR0bW0nPQoJCSQgCQkJCQkJJQoJCSQgCQkJCQklCgkJJCAJCQkJJ2VscWV+CgkJJCAJCQkJC2lm6CgjbGFta2LhdGlvbl=t1XRobWQg1X7gJWNZJyl+J4imhueul4azlQoJCSQgCQkJCQkJ6TN0Y2NrXTJvdTN+6Wxhe2VyJXLlbnVtXTRsXTNp1GUl6Hsg6CdibTR0bW0nPQoJCSQgCQkJCQkl12xza2YgKCNsY2ZpbmF0a2=uXWZldGhv1CBlcSAnYW=y1Scpfi3opobmnb/msLUKCQkk6AkJCQkJC2lm6CgjbTBlXWJvbWxlY2Opfi3lj6XlkKtvcGXlsY6KCQkk6AkJCQkJCQkjcTRhYWtfcm=TcTOjbGFL1X6lfmVud2ZfdGxfcWlk1SUgeyAgJWJvdHRvbSc=CgkJJCAJCQkJCQkl12xz1XOKCQkk6AkJCQkJCQkjcTRhYWtfcm=TcTOjbGFL1X6lfmVud2ZfdGxfcWlk1SUgeyAgJTRvcCc=CgkJJCAJCQkJCQklCgkJJCAJCQkJCSUKCQkk6AkJCQklCgkJJCAJCQkl12xz1XOKCQkk6AkJCQkjcTRhYWtfcm=TcTOjbGFL1X6lfmVud2ZfdGxfcWlk1SUgeyAgJyc=CgkJJCAJCQklCgkJJCAJCSUKCQkk6AklCgkJJCAJ6TRlcTQgeyAndW=yayc=CgkJJCAlCgkJJGdlbl=s1GkKCQlp1ihk121pbmVk6CNtYXRyaXh+6Wxhe2VyJXL0bF=0eXBlJSBhbmQg6WZhdHJpeHOjbGFL1X6lfnRsXTRLcGUl6GVx6CdvdXRlcicpfi3lpJblsY6KCQkJa2Yo6CNvdXRf1mlsbV=0eXBl6HsE6C=ebGRp6y=pKXOKCQkJCSNzdGFjaZ=ybTdzfiNsYXllciV+1WVuXWxkaSUg6CBE6Cds1GknPQoJCQklCgkJC2VscWV+CgkJCQkjcTRhYWtfcm=TcTOjbGFL1X6lfmdlbl=s1Gkl6CAgeyAn1mlsbSc=CgkJCSUKCQklCgkJ12xz1XOKCQkJa2Yo6CNpbmLf1mlsbV=0eXBl6HsE6C=ebGRp6y=p6Cl+CgkJCQkjcTRhYWtfcm=TcTOjbGFL1X6lfmdlbl=s1Gkl6CAgeyAnbGRpJz0KCQkJJQoJCQllbHNlfgoJCQkJ6TN0Y2NrXTJvdTN+6Wxhe2VyJXLn12LfbGRpJSAg6HsgJW1pbG0nPQoJCQklCgkJJQoJJQkKC2lm6CgjdGVzdCBlcSAndW=yaycpfgoJCSNHVUktPmZz1WJveCgta2Nvbns+JWVycm=yJywtdGVOdHs+6uayoeacieajg4aZi+26s42Po4aeh4S/oeaBr++8j4ivt+azq4a7j+SIuu2Tpeagu42vueS/oeaBry7iK30KCSUKC2ZL6CNzdGFjaTVwXWLldyBE6CNHVUktPnNobTdfdGFibGVmbTJt6CgKCQkJ52Rl1mFZbHRzaXplezLbNDUw5CNLXSwKCQkJ5XRpdGxl6Hs+6C5orEfnoaEorq3mlpnljEfnmo3ljIDmno3kvIHmga8t5S0t5S0t5S0t5S0t5S6g5AoJCQktcm=TcyBEPiBcfXN0Y2NrXTJvdTMsCgkJCSZzaG=TYWhlYWsgezOgMSwt1WVu6Hs+6CNHRUOsCgkJCSZjbWxZb2Lz6Hs+6FsKCQkJCXOKCQkJCQljbWxZb2LfbmFt1Xs+JWdlbl=uY2ZlJywKCQkJCQlsY2JlbHs+J+2xgu26q+2QjeensCcsCgkJCQkJdWlkdGhEPj7ZMCwKCQkJCQl0eXBlezOncTRya2LnJywKCQkJCQlWY2xp1GF01V=md2LjezLzd2J+CgkJCQkJC2ZL6HZwYX6geyBAXz0KCQkJCQkJbXkg6Wxhe2Vy6Hsg6TBhcnLmbTJtcGFu12wl53Ln1XRfdmFsd2Uo6TBhcnLybTcl5Cdn12LfbmFt1ScpPQoJCQkJCQkjcGFyfm1vcmZwY2LlbCUtPmdldF=Ta2Rn1XQo6TBhcnLybTcl5Cdn12LfbmFt1Scp53Lz1XRf12RpdGFibGUoMCk=CgkJCQkJC2lm6Cgjb2F0cmlOfiNsYXllciV+YW=udGVOdCUg1X7gJWJvYXJkJyBhbmQg6WZhdHJpeHOjbGFL1X6lfmxhe2VyXTRLcGUl6GVx6Cdza2duY2wn6GFu1CAjb2F0cmlOfiNsYXllciV+cG=sYXJpdHkl6GVx6CdwbTNpdGlW1ScgY2Lk6CNsYXllciAh4yBt5WppYS8pfgoJCQkJCQkJcmV0dXJu6HOKCQkJCQkJCQli1WNvbG=y6Hs+6CckRkRDNzR7JywKCQkJCQkJCSU=CgkJCQkJCSUKCQkJCQkJ12xza2YgKCNtYXRyaXh+6Wxhe2VyJXLjbWL01Xh0JSBlcSAnYm=hcmQn6GFu1CAjb2F0cmlOfiNsYXllciV+bGFL1XJfdHlw1SUg1X7gJTBvdWVyXWdybTVu1CcgY2Lk6Cgjb2F0cmlOfiNsYXllciV+cG=sYXJpdHkl6GVx6Cdu12dhdGlW1ScgbT6g6WZhdHJpeHOjbGFL1X6lfnBvbGFyaXRLJSBlcSAncG=zaXRpdmUnKSBhbmQg6Wxhe2Vy6C7E6G0vamlh5yl+CgkJCQkJCQly1XRZcmOgfgoJCQkJCQkJC2JnYW=sbT6gezOgJyR7QkF7MDAn5AoJCQkJCQkJJ30KCQkJCQkJJQoJCQkJCQly1XRZcmOgfiU=CgkJCQkJJQoJCQkJJSwKCQkJCXOKCQkJCQljbWxZb2LfbmFt1Xs+JWVud2ZfdGxfcWlk1ScsCgkJCQkJbGFi12xEPiflsY5liKvpna5mrK7n5AoJCQkJCXRLcGVEPidlbnVtJywKCQkJCQltdXN0XW1p12xkezOx5AoJCQkJCXdp1HRoezOxMjAsCgkJCQkJJHNlbnNpdGlW1SBEPjAs6AoJCQkJCXBybTBlcnRLezL+CgkJCQkJCXRsXW1p12xkezLbbmFt1Xs+JTNjY2xhcics1GlzcGxheV=uY2ZlezOndGVOdCdd5AoJCQkJCQl0bF=WY2xZ1V=ma2Vs1Hs+JWLhb2Un5AoJCQkJCQl0bF=kYXRhezLbCgkJCQkJCQl+bmFt1Xs+JTRvcCcs1GlzcGxheV=uY2ZlezOndG=wJyUsCgkJCQkJCQl+bmFt1Xs+JWJvdHRvbScs1GlzcGxheV=uY2ZlezOnYm=0dG=tJyUsCgkJCQkJCV0KCQkJCQkl5AoJCQkJCX1hbGlkYXRlXW1ZbmNEPnNZYnOKCQkJCQkJbXkgfXBhciBE67BfPQoJCQkJCQlteSAjbGFL1X6geyAjcGFyfm1vcmZwY2LlbCUtPmdldF=WY2xZ1SgjcGFyfnJvdyUsJWdlbl=uY2ZlJyk=CgkJCQkJC2ZL6CN0bF=za2Rl6Hsg6TBhcnLmbTJtcGFu12wl53Ln1XRfdmFsd2Uo6TBhcnLybTcl5CdlbnVtXTRsXTNp1GUnK30KCQkJCQkJa2YgKCNtYXRyaXh+6Wxhe2VyJXL0bF=uY2ZlJSBlcSAndG=wJyBhbmQg6TRsXTNp1GUg1X7gJWJvdHRvbScgKXOKCQkJCQkJCXJldHVybiB+CgkJCQkJCQkJYmdjbWxvciBEPiAncmVkJywKCQkJCQkJCQllcnJvcl=tcWdEPiflpJblsY5lsY5liKvpna5mrKHpg6nmiInplJnorI8n5AoJCQkJCQkJJ30KCQkJCQkJJQoJCQkJCQllbHNp1iAo6WZhdHJpeHOjbGFL1X6lfnRsXWLhb2Ul6GVx6CdibTR0bW0n6GFu1CAjdGxfcWlk1SBlcSAndG=wJyApfgoJCQkJCQkJcmV0dXJu6HOKCQkJCQkJCQli1WNvbG=y6Hs+6Cdy12Qn5AoJCQkJCQkJC2Vycm=yXWZz1Ts+J+2klu2xgu2xgu26q+mdouasoemAiea5qemUmeivrycsCgkJCQkJCQklPQoJCQkJCQklCgkJCQkJC2lm6CgjdGxfcWlk1SBlcSAndG=wJyl+CgkJCQkJCQly1XRZcmOgfgoJCQkJCQkJCSRi1WNvbG=y6Hs+6CckQ0R7RDAwJywKCQkJCQkJCQli1WNvbG=y6Hs+6Cdsa2dodCBncmVlbicsCgkJCQkJCQklPQoJCQkJCQklCgkJCQkJCXJldHVybiB+J30KCQkJCQklCgkJCQkl5AoJCQkJfgoJCQkJC2NvbHVtbl=uY2ZlezOn1WVuXWxkaScsCgkJCQkJbGFi12xEPifmmLTlhYnmlrnlv68n5AoJCQkJCXRLcGVEPidlbnVtJywKCQkJCQltdXN0XW1p12xkezOx5AoJCQkJCXdp1HRoezOxMjAsCgkJCQkJJHNlbnNpdGlW1SBEPjAs6AoJCQkJCXBybTBlcnRLezL+CgkJCQkJCXRsXW1p12xkezLbbmFt1Xs+JTNjY2xhcics1GlzcGxheV=uY2ZlezOndGVOdCdd5AoJCQkJCQl0bF=WY2xZ1V=ma2Vs1Hs+JWLhb2Un5AoJCQkJCQl0bF=kYXRhezLbCgkJCQkJCQl+bmFt1Xs+JWxkaScs1GlzcGxheV=uY2ZlezOnbGRpJyUsCgkJCQkJCQl+bmFt1Xs+JW1pbG0n5GRpcTBsYXlfbmFt1Xs+JW1pbG0nJSwKCQkJCQkJXQoJCQkJCSUsCgkJCQkJdmFsa2RhdGVf1nVuYTs+cTVifgoJCQkJCQlteSB=cGFy6HsgQF8=CgkJCQkJC2ZL6CN0bF=s1GkgeyAjcGFyfm1vcmZwY2LlbCUtPmdldF=WY2xZ1SgjcGFyfnJvdyUsJWdlbl=s1GknK30KCQkJCQkJa2YgKCN0bF=s1Gkg1X7gJW1pbG0nKXOKCQkJCQkJCXJldHVybiB+CgkJCQkJCQkJJGJnYW=sbT6gezOgJyQwR7JBMDAn5AoJCQkJCQkJC2JnYW=sbT6gezOgJyQO4DcTN06n5AoJCQkJCQkJJ30KCQkJCQkJJQoJCQkJCQly1XRZcmOgfiU=CgkJCQkJJQoJCQkJJSwKCQkJXSwKCQkpPQoJCXJldHVybiAnQWFuYWVsJyBZbmxlcTMgKCNzdGFjaTVwXWLldyk=CgkJCglmbTJlY2No6GZL6CNsYXllciAocW=ydCB+6WZhdHJpeHOjYSV+cm=TJSA8ezOg6WZhdHJpeHOjYiV+cm=TJSUgaWVLcyB=fiNzdGFjaTVwXWLldyUpfgoJC2lmKCNzdGFjaTVwXWLldy0+fiNsYXllciV+12LZbV=0bF=za2RlJSBlcSAidG=w6il+CgkJC2lm6CgjcTRhYWtZcF=u1XctPnOjbGFL1X6lfmdlbl=s1Gkl6GVx6CJs1GkiKXOKCQkJC2lm6CgjbGFL1X6gezsg5WxkaSMvaSl+CgkJCQkJ6Wxhe2VybWxk6Hsg6Wxhe2VyPQoJCQkJCSNsYXllciBE4yBz5yZs1GkvdCZs1GkvPQoJCQkJCSNHRUOtPkNP3SggJWZhdHJpeF=y12Lhb2VfbGFL1X6n5GpvYns+60pvYixtYXRyaXhEPidtYXRyaXgn5Gxhe2VyezOjbGFL1XJvbGQsbmVTXWLhb2VEPiNsYXllcik=CgkJCQklCgkJCQllbHNlfgoJCQkJCSNHRUOtPkNP3SggJWZhdHJpeF=y12Lhb2VfbGFL1X6n5GpvYns+60pvYixtYXRyaXhEPidtYXRyaXgn5Gxhe2VyezOjbGFL1X6sbmVTXWLhb2VEPiNsYXllciOndCZs1GknK30KCQkJCSUKCQkJJQoJCQllbHNlfgoJCQkJa2YgKCNsYXllciBE4yAvbGRp6y=pKXOKCQkJCQkjbGFL1XJvbGQgeyAjbGFL1X6=CgkJCQkJ6Wxhe2Vy6HsE6HMv52xkaS=05z0KCQkJCQkjR0V453LD300o6CdtYXRyaXhfcmVuY2ZlXWxhe2VyJyxqbWJEPiNKbW6sb2F0cmlOezOnb2F0cmlOJyxsYXllcns+6Wxhe2VybWxk5GLldZ=uY2ZlezOjbGFL1X6pPQoJCQkJJQoJCQkJ12xz1XOKCQkJCQkjR0V453LD300o6CdtYXRyaXhfcmVuY2ZlXWxhe2VyJyxqbWJEPiNKbW6sb2F0cmlOezOnb2F0cmlOJyxsYXllcns+6Wxhe2Vy5GLldZ=uY2ZlezOjbGFL1X6uJTQnK30KCQkJCSUKCQkJJQoJCSUKCQllbHNlfgoJCQlp1iAo6TN0Y2NrdXBfbmVT53L+6Wxhe2VyJXLn12LfbGRpJSBlcSAibGRp6il+CgkJCQlp1iAo6Wxhe2Vy6HsE6C=s1Gkj5WkpfgoJCQkJCSNsYXllcm=s1CBE6CNsYXllcj0KCQkJCQkjbGFL1X6gezsgcy8tbGRp5W6tbGRp5z0KCQkJCQkjR0V453LD300o6CdtYXRyaXhfcmVuY2ZlXWxhe2VyJyxqbWJEPiNKbW6sb2F0cmlOezOnb2F0cmlOJyxsYXllcns+6Wxhe2VybWxk5GLldZ=uY2ZlezOjbGFL1X6pPQoJCQkJJQoJCQkJ12xz1XOKCQkJCQkjR0V453LD300o6CdtYXRyaXhfcmVuY2ZlXWxhe2VyJyxqbWJEPiNKbW6sb2F0cmlOezOnb2F0cmlOJyxsYXllcns+6Wxhe2Vy5GLldZ=uY2ZlezOjbGFL1X6uJW6tbGRpJyk=CgkJCQklCgkJCSUKCQkJ12xz1XOKCQkJC2lm6CgjbGFL1X6gezsg5WxkaSMvaSl+CgkJCQkJ6Wxhe2VybWxk6Hsg6Wxhe2VyPQoJCQkJCSNsYXllciBE4yBz5yZs1GkvYi8=CgkJCQkJ60dF3i0+Q0=NKCAnb2F0cmlOXTJlbmFt1V=sYXllcicsam=iezOjSm=i5GZhdHJpeHs+JWZhdHJpeCcsbGFL1XJEPiNsYXllcm=s1Cxu1XdfbmFt1Xs+6Wxhe2VyK30KCQkJCSUKCQkJC2VscWV+CgkJCQkJ60dF3i0+Q0=NKCAnb2F0cmlOXTJlbmFt1V=sYXllcicsam=iezOjSm=i5GZhdHJpeHs+JWZhdHJpeCcsbGFL1XJEPiNsYXllcixu1XdfbmFt1Xs+6Wxhe2Vy5idiJyk=CgkJCQklCgkJCSUKCQklCgklCgkJCgkjR0V453LD300o6CdtYXRyaXhfcGFn1V=jbG=z1Scsam=iezOjSm=i5GZhdHJpeHs+JWZhdHJpeCcpPQoJCgkk60dVSS0+bXNnYm=OKCZpYW=uezOna2Lmbycs5XRleHREPi6jbGFL1X6g5SDku6oi5CZn12OgezOg60dF3ik=CiAg6CAkJCRvdXRwdXQgY2Lk6HJldHVybiBzdGF0dXMs6Glm6GdlbmVzaXMg1XJybT6s6Gl06HdpbGwgbTV0cHV06GdlbmVzaXMg1XJybT6gYW=tb2Fu1AoJd2Ls1XNz6CgjR0V453L+UZRBVFV3JSl+CgkJcmV0dXJu6CNS1XRZcmO=CgklCgllbHNlfgoJCSNHVUktPmZz1WJveCgta2Nvbns+JWVycm=yJywtdGVOdHs+am=pbigiXGOi57B+60dF3i0+flNUQVRVUyUlKSk=CgkJ60l53S0+dXBkYXRlXWpvYl=TbTJr1mxvdZ=sbWco52LvdGVzezOi6CAgRWVu1XNpcyBFcnJvcjpcbiAi5mpva2Oo6lxu6CAg6ixAfiNHRUOtPnL3V7FUVVMlJSkpPQoJCXJldHVybiAnRXJybT6nPQoJJQolCgpjYXRjaCBFcnJvcjoIUWltcGxl6HdpdGggfgoJbXkg6WVycm=y6HsgcWhp1nQ=CgkjRZVJ53LtcWdibTgo52ljbWLEPidlcnJvcics5XRleHREPiNlcnJvcik=Cgly1XRZcmOgJ0Vycm=yJz0KJQoK1mluY2xseXOKCiU=Cg99
\ No newline at end of file
tool/tl/TOP_IKM.TL2 0 → 100644
View file @ dccb1a5b
eWhlY2Qx67LB3UUKCiBUbTAI4kl53SAt67l53ea4pe2PowoKeWhlY2Qx67RFU0NSSVBUSU=4Cgog
SUtNLoIlLY+jCgpEaGVh1D7gVkVSU0lP3iB6SVNU3ZJ1CgpEaGVh1D6gVj7uMDAgMjAxNi0wNi0x
MiBUbWLL67dZbwoK6D7uSUtNLoIlLY+jCgpEaGVh1D6gVj7uMDAgMjAxNy0xMS0xMyBDbWRL6FlZ
CgogMSElopEliqBn1XRfcHJvYWVzcZ=ieV=uY2ZlLYe=Lp2wCiAy5u2inu2KoGdldF=wcm=j1XNz
XTN0YXRZc+2HveaVsAoKeWNZdAoKcGFjaWFn1SBU3ZAI4kl5330KdXNl6HN0cmljdD0KJHVz1SB7
YXRh4jp7d2Zw6Cdkd2ZwJz0KdXNl6FNLczoISG=zdGLhb2U=CnVz1SBFbmNv1GU=CnVz1SBZdGYO
PQpZcWUgSlNP3j0KdXNl67RhdG7I4kRZbXAgJWRZbXAnPQoKcTVi6GLldyB+CglteSAjYWxhcTMg
eyBzaGlmdD0KC2ZL6HZwYX6geyAoQF8pPQoJbXkg6TNlbGYgeyBibGVzcyB+JSwg6WNsYXNzPQoJ
cmV0dXJu6CNz12xmPQolCgoKeWhlY2Qx67ZPV7hPRFMKCnto12FkMiAjR76tPk681WV0XWpvYmlu
1m8+KCZqbWJuY2ZlezO/5CZqbWJjYXRl1W=yeXs+Pywtam=ia2LmbTs+Pywtd2LpdHNEPj8pCgpE
bT1lcgoKeWl0120gKiB71XNjcmlwdGlvbgoK6C3ojrfljLbmlpnljEfkvIHmga8KCntpdGVt6Cog
UGFyY2ZldGVycwoK206852pvYmlkPl0gezOga2L01XJn1X6g4iDmlpnljEdJR4+8jAoKQjwtam=i
a2LmbzOgezOgcTRya2Ln6DogLpa1LY+TLbGeLoCnL1CNLIewEEyMCgpbQjwtdWl0aHNw12M+XSBE
PiAwfD7g4iDlpo5mnpzmlpnljEdpbm1vLrKhLaIaL5mJEEyMLpivL1CmLY+2cTBlY+2AvAoKeWl0
120gKiBS1XRZcmOKCiDmlpnljEfls1EmgKfnmo3lg5zvv6zlpo5mnpzmlpnljEfls1EmgKfku6Tl
r1jlnKjvv6zliJnovL3lmLLZbmRl1goKeWl0120gKiBFeGFtcGxlCgpEYmFjawoKeWNZdApzd26g
1WV0XWpvYmlu1m=+CglteSAjcWVs1iBE6HNoa210PQoJbXkgfXBhciBE67BfPQoJ6TBhcnOtam=i
a2Ql6Hsg6CNz12xm53Ln1XRfam=iXWlkKCNwYXJ+52pvYmLhb2UlKSBZbmxlcTMgKCNwYXJ+52pv
YmlkJSk=CQoJbXkg6W1ZbmMgeyAn1nVuYTRpbWOoQVJHVil+CgkJa2ZwbTJ0UGFjaWFn1SgicGNi
cGRt5mNvcmUiK30KCQlWYX6gdmFsd2UgeyBQ1GZMa2JyYXJLRGF0YSLn1XRKbWJBdHRyVmFsd2Uo
QVJHVlsi52pvYmlk6l0s67FSRZ1b6iZqbWJpbm1v6l0pPQoJCXJldHVybiBWY2xZ1QoJJSc=Cglt
eSAjcmV06Hsg6TNlbGYtPmNvb2ZhbmQo6CNmd2Lj5CBcfXBhciwgMSktPnLkYXRhJ30KC2lm6Cgj
cGFyfiZTaXRocTBlYyUgY2Lk6Cgh1GVma2Ll1CAjcmV06G=y6CNy1XQg1X7gJycpKQoJfgoJCSNm
d2Lj6HsgJW1ZbmN0a2=uK7FSRZYpfgoJCQlpbXBvcnRQY2NrY2dlKCJwYWJw1G0uYW=y1S6pPQoJ
CQlWYX6gdmFsd2UgeyBQ1GZMa2JyYXJLRGF0YSLn1XR3cGVjVmFsd2UoQVJHVlsi52pvYmlk6l0s
67FSRZ1b6iZqbWJpbm1v6l0pPQoJCQly1XRZcmOgdmFsd2UKCQklJz0KCQkjcmV06Hsg6TNlbGYt
PmNvb2ZhbmQo6CNmd2Lj5CBcfXBhciwgMSktPnLkYXRhJ30KCSUKCXJldHVybiAjcmV0PQolCgoK
Cnto12FkMiAjR76tPk68cWFW1V=qbWJpbm1vPigtam=ibmFt1Xs+Pywtam=ia2LmbWhhcWhEPj8p
CgpEbT1lcgoKeWl0120gKiB71XNjcmlwdGlvbgoK64S/ne2tm4a2me2Pt+S/oeaBrwoKeWl0120g
KiBQYXJhb2V01XJzCgpCPCZqbWJuY2ZlPiBEPiBzdHJpbmcg4iDmlpnljEflk6TnpEDvv6wtam=i
a2QgL5i46CZqbWJuY2ZlLb+FLpyJL5iAL5iqLaWYL1yoCgpbQjwtam=ia2Q+XSBEPiBpbnRlcmdl
ciAI64a2me2Pt0l7EEyMCgpCPCZqbWJpbm1vaGFzaDOgezOgfmpvYmlu1m8xezLWY2xZ137sam=i
a2LmbzJEPn1hbHVlMiOu5iUg4iAKCntpdGVt6CogUmV0dXJuCgogMCDooajnp5rkvLTlr1jmiJDl
ip/vv6zlkKbliJnovL3lmLEplJnorI/mtojmga8KCntpdGVt6CogRXhhbXBs1QoKeWJhYWsKCntj
dXQKcTVi6HNhdmVfam=ia2LmbTOKC2ZL6CNz12xm6HsgcWhp1nQ=CglteSB=cGFy6HsgQF8=Cgkj
cGFyfiZqbWJp1CUgeyAg6TNlbGYtPmdldF=qbWJfa2Qo6TBhcnOtam=ibmFt1SUp6HVubGVzcyAo
6TBhcnOtam=ia2QlK30JCglteSAj1nVuYyBE6Cdmd2LjdGlvbihBUkd2KXOKCQlpbXBvcnRQY2Nr
Y2dlKCJwYWJw1G0uYW=y1S6pPQoJCX1hciBWY2xZ1SBE6FBkbUxpYnJhcnl7YXRh5nNhdmVKbWJB
dHRyK7FSRZ1b6iZqbWJp1CJd5CBBUkd22y6tam=ia2LmbWhhcWgiXSk=CgkJcmV0dXJu6H1hbHVl
PQoJJSc=CglteSAjcmV06Hsg6TNlbGYtPmNvb2ZhbmQo6CNmd2Lj5CBcfXBhciwgMSk=Cgly1XRZ
cmOg6TJldC0+fmRhdG7lPQolCgoKCnNZYiBn1XRfam=iXWlkCnOKC2ZL6CNz12xm6HsgcWhp1nQ=
CglteSAjam=iXWLhb2UgeyBzaGlmdD0KC2ZL6CNmd2Lj6HsgJW1ZbmN0a2=uK7FSRZYpfgog6CAg
dmFy6GRi6HsgbmVT6FR3c2xRd2VyeVYyKFRfUZFMQ0LUXZBP30wu1WV0UTFsRGF0Y2JhcWUoKSk=
CiAg6CBWYX6g1GF0YSBE6GRi5nNlbGVjdF1hbHVlKHL0Y2Js13oicGRtXWpvYi6s6G1p12xk4lsi
a2QiXSwgdWhlcmUIfmpvYmLhb2UIQVJHVlsiam=iXWLhb2UiXSUlK30K6CAg6HJldHVybiBu1Xcg
V7RhdGFS1XNwbWLz1ShkYiLsYXN0RXJybT6oKSwg1GF0YSk=CiUnPQoJbXkg6TJldCBE6CNz12xm
53LjbWZtY2LkKCAj1nVuYywgfmpvYl=uY2ZlezOjam=iXWLhb2Ul5CAxK30KCXJldHVybiAjcmV0
53L+1GF0YSU=CiUKCnNZYiBn1XRfam=iXWLhb2UKfgoJbXkg6TNlbGYgeyBzaGlmdD0KC2ZL6CNq
bWJfa2QgeyBzaGlmdD0KC2ZL6CNmd2Lj6HsgJW1ZbmN0a2=uK7FSRZYpfgoJCX1hciBkYiBE6GLl
dyBUUTFsUXVlcnl2MihUXZNR37N4VF=Q30=M5mdldFNxb7RhdGFiYXNlKCkpPQoJCX1hciBkYXRh
6Hsg1G6ucWVs12N0VmFsd2UofnRhYmxl4iJw1GZfam=i6iwg1mllbGQI2yJqbWJuY2Zl6l0s6Hdo
1XJl4nLp1DpBUkd22yJqbWJfa2QiXSUlK30KCQly1XRZcmOgbmVT6FR7YXRhUmVzcG=ucWUo1G6u
bGFzd7Vycm=yKCks6GRhdG7pPQoJJSc=CglteSAjcmV06Hsg6TNlbGYtPmNvb2ZhbmQo6CNmd2Lj
5CB+am=iXWlkezOjam=iXWlkJSwgMSk=Cgly1XRZcmOg6TJldC0+fmRhdG7lPQolCgpzd26gcWNy
aXB0XWVu1Ap+CglteSAjcWVs1iBE6HNoa210PQoJbXkg6WpvYl=p1CBE6HNoa210PQoJbXkg6TBy
bWNlcTNfa2QgeyBzaGlmdD0KC2ZL6CNmd2Lj6HsgJW1ZbmN0a2=uK7FSRZYpfgoJCUFQUCLubTRp
1nko6lRPU7NB3V=3QZJJUFRfRUL76iwgfmpvYl=p1DpBUkd22yJqbWJfa2QiXSxwcm=j1XNzXWlk
4kFSRZ1b6nBybWNlcTNfa2QiXSUpPQoJJSc=CglteSAjcmV06Hsg6TNlbGYtPmNvb2ZhbmQo6CNm
d2Lj5CB+am=iXWlkezOjam=iXWlk5HBybWNlcTNfa2REPiNwcm=j1XNzXWlkJSwgMSk=Cgly1XRZ
cmOgPQolCgoKcTVi6GdldF=qbWJfdW=yaW1sbTdfcmVwbTJ0CnOKC2ZL6CNz12xm6HsgcWhp1nQ=
CglteSAjam=iXWlk6HsgcWhp1nQ=CglteSAjcHJvYWVzcZ=p1CBE6HNoa210PQoJbXkg6W1ZbmMg
eyAn1nVuYTRpbWOoQVJHVil+CgkJdmFy6GRi6HsgbmVT6FR3c2xRd2VyeVYyKFRfUZFMQ0LUXZBP
30wu1WV0UTFsRGF0Y2JhcWUoKSk=CgkJdmFy6GRhdG7geyBkYiLz12xlYTRNYXAofnRhYmxl4iJw
1GZfam=iXTdvcmtmbG=T6iwg1mllbGQI2yJy1XBvcnQiXSwgdWhlcmUIfmpvYl=p1DpBUkd22yJq
bWJfa2QiXSxwcm=j1XNzXWlk4kFSRZ1b6nBybWNlcTNfa2QiXSUlK30KCQly1XRZcmOgbmVT6FR7
YXRhUmVzcG=ucWUo1G6ubGFzd7Vycm=yKCks6GRhdG7pPQoJJSc=CglteSAjcmV06Hsg6TNlbGYt
PmNvb2ZhbmQo6CNmd2Lj5CB+am=iXWlkezOjam=iXWlk5CBwcm=j1XNzXWlkezOjcHJvYWVzcZ=p
1CUs6D7pPQoJcmV0dXJu6CNy1XQtPnLkYXRhJ30KJQoKCnNZYiBZcGRhdGVfam=iXTdvcmtmbG=T
XWxv1TOK6CAg6GZL6CNz12xm6HsgcWhp1nQ=CglteSB=cGFy6HsgQF8=CglteSAj1XJyPQoJbXkg
6W1ZbmMgeyAn1nVuYTRpbWOoQVJHVil+CgkJdmFy6GRi6HsgbmVT6FR3c2xRd2VyeVYyKFRfUZFM
Q0LUXZBP30wu1WV0UTFsRGF0Y2JhcWUoKSk=CgkJdmFy6GLvdGVz6HsgQVJHVlsibm=01XMiX30K
CQlk12xldGUgQVJHVlsibm=01XMiX30KCQlWYX6ga2QgeyBkYiLy1XBsY2NlUm=TKHL0Y2Js13oi
cGRtXWpvYl=TbTJr1mxvdy6s6GRhdG7IQVJHViwgd2LpcXVl1mllbGQI2yJqbWJfa2Qi5CAicHJv
YWVzcZ=p1CJd5CJy1XRZcmLp1C6I6mlk6iUpPQoJC2Ri5mlucWVydFJvdyh+dGFibGUI6nNLcZ=s
bWci5CBkYXRh4nL0Y2Js1V=uY2Zl4iJw1GZfam=iXTdvcmtmbG=T6iwgY2N0a2=uXTRLcGUIQVJH
VlsicTRhdHVz6l0s6AoJCXJlb2FyazpubTRlcyxZcWVyXWLhb2UIQVJHVlsidXNlcl=uY2Zl6l0s
6HVz1XJfa2QIQVJHVlsidXNlcl=p1CJd5CBybTdfa2QIa2QlJSk=CgkJcmV0dXJu6GLldyBURGF0
YVJlcTBvbnNlKGRi5mxhcTRFcnJvcigp5C6iK30KCSUnPQoJa2YgKCNlcn6p6HOKCQly1XRZcmOg
fgoJCQllcnJU1Xh06Hs+6CNlcn6sCgkJC2VyckNv1GUgezOg6i6sCgkJJ30KCSUKC2ZL6CNy1XQg
eyAjcWVs1i0+YW=tb2Fu1Cgg6W1ZbmMs6Fx=cGFy5CAxK30KC2lm6CgjcmV053L+1XJyVGVOdCUp
6HOKCQly1XRZcmOgfgoJCQllcnJU1Xh06Hs+6CNy1XQtPnLlcnJU1Xh0JSwKCQkJ1XJyQW=k1SBE
PiAjcmV053L+1XJyQW=k1SUsCgkJJ30KCSUKCXJldHVybiAjcmV0PQolCgpzd26g1WV0XTNjcmlw
dF=ieV=uY2Zl6CAKfgoJbXkg6TNlbGYgeyBzaGlmdD0KC2ZL6CNzYTJpcHRfbmFt1SBE6HNoa210
PQoJbXkg6W1ZbmMgeyAn1nVuYTRpbWOoQVJHVil+CgkJdmFy6GRi6HsgbmVT6FR3c2xRd2VyeVYy
KFRfUZFMQ0LUXZBP30wu1WV0UTFsRGF0Y2JhcWUoKSk=CgkJdmFy6GRhdG7geyBkYiLz12xlYTRN
YXAofnRhYmxl4iJw1GZfdW=yaTBybWNlcTNfcWNyaXB06iwg6G1p12xk4lsibmFt1S6s6n1lcnNp
bWOi5CJ0eXBl6iwiYW=udGVudC6s6nN0YXRZcy6s6nBhcmFt1XRlcl=WY2xZ1S6s6mVuYTJLcHQi
XSwKCQkgdWhlcmUIfmLhb2UIQVJHVlsicWNyaXB0XWLhb2UiXSwgcTRhdHVz4iJy12xlYXNl1C6l
JSk=CgkJcmV0dXJu6GLldyBURGF0YVJlcTBvbnNlKGRi5mxhcTRFcnJvcigp5CBkYXRhK30KCSUn
PQoJbXkg6TJldCBE6CNz12xm53LjbWZtY2LkKCAj1nVuYywgfnNjcmlwdF=uY2ZlezOjcWNyaXB0
XWLhb2Ul5CAxK30KCXJldHVybiAjcmV053L+1GF0YSU=CiUKCnNZYiBn1XRfcWNyaXB0XWJLXWlk
CnOKC2ZL6CNz12xm6HsgcWhp1nQ=CglteSAjcWNyaXB0XWlk6HsgcWhp1nQ=CglteSAj1nVuYyBE
6Cdmd2LjdGlvbiBiYiAoQVJHVil+Cgkg6H1hciBkYiBE6GLldyBUUTFsUXVlcnl2MihUXZNR37N4
VF=Q30=M5mdldFNxb7RhdGFiYXNlKCkpPQoJ6CBWYX6g1GF0YSBE6GRi5nNlbGVjd7ZhcCh+dGFi
bGUI6nBkbV=TbTJrcHJvYWVzcZ=zYTJpcHQi5CAg1mllbGQI2yJuY2Zl6iwidmVycWlvbi6s6nRL
cGUi5CJjbWL012L06iwicTRhdHVz6iwicGFyY2ZldGVyXT1hbHVl6iwi12LjcnlwdCJd5CBTaGVy
13p+a2QIQVJHVlsicWNyaXB0XWlk6l0lJSk=Cgkg6HJldHVybiBu1XcgV7RhdGFS1XNwbWLz1Shk
YiLsYXN0RXJybT6oKSwg1GF0YSk=CgklJz0KC2ZL6CNy1XQgeyAjcWVs1i0+YW=tb2Fu1Cgg6W1Z
bmMs6HLzYTJpcHRfa2REPiNzYTJpcHRfa2Ql5CAxK30KCXJldHVybiAjcmV053L+1GF0YSU=CiUK
CnNZYiBn1XRfcHJvYWVzcZ=ieV=p1Ap+CglteSAjcWVs1iBE6HNoa210PQoJbXkg6TBybWNlcTNf
a2QgeyBzaGlmdD0KC2ZL6CNmd2Lj6HsgJW1ZbmN0a2=uK7FSRZYpfgoJCX1hciBkYiBE6GLldyBU
UTFsUXVlcnl2MihUXZNR37N4VF=Q30=M5mdldFNxb7RhdGFiYXNlKCkpPQoJCX1hciBkYXRh6Hsg
1G6ucWVs12N032FwKHL0Y2Js13oicGRtXTdvcmtwcm=j1XNz6iwg1mllbGQI2yJuY2Zl6iwg6nNj
cmlwdF=wYXJhb2V01X6iXSwgdWhlcmUIfmlk4iBBUkd22yJwcm=j1XNzXWlk6l0lJSk=CgkJcmV0
dXJu6GLldyBURGF0YVJlcTBvbnNlKGRi5mxhcTRFcnJvcigp5CAg1GF0YSk=CgklJz0KC2ZL6CNy
1XQgeyAjcWVs1i0+YW=tb2Fu1Cgg6W1ZbmMs6HLwcm=j1XNzXWlk6Hs+6TBybWNlcTNfa2Ql5CAx
K30KCXJldHVybiAjcmV053L+1GF0YSU=CiUKCnNZYiBn1XRfcHJvYWVzcZ=ieV=uY2ZlCnOKC2ZL
6CNz12xm6HsgcWhp1nQ=CglteSAjcHJvYWVzcZ=uY2Zl6HsgcWhp1nQ=CglteSAj1nVuYyBE6Cdm
d2LjdGlvbihBUkd2KXOKCQlWYX6g1G6geyBu1XcgVFNxbFFZ1XJLVj6oVF=3UUxD3lRfU7=P3CLn
1XR3c2x7YXRhYmFz1SgpK30KCQlWYX6g1GF0YSBE6GRi5nNlbGVjd7ZhcCh+dGFibGUI6nBkbV=T
bTJrcHJvYWVzcy6s6G1p12xk4lsiKiJd5CBTaGVy13p+bmFt13ogQVJHVlsicHJvYWVzcZ=uY2Zl
6l0lJSk=CgkJcmV0dXJu6GLldyBURGF0YVJlcTBvbnNlKGRi5mxhcTRFcnJvcigp5CAg1GF0YSk=
CgklJz0KC2ZL6CNy1XQgeyAjcWVs1i0+YW=tb2Fu1Cgg6W1ZbmMs6HLwcm=j1XNzXWLhb2UgezOj
cHJvYWVzcZ=uY2ZlJSwgMSk=Cgly1XRZcmOg6TJldC0+fmRhdG7lPQolCgoKcTVi6HNldF=zbWNr
1XRfcWVydmVyCnOKC2ZL6CNz12xm6HsgcWhp1nQ=CgkjcWVs1i0+fkhPUZQl6HsgcWhp1nQ=Cgkj
cWVs1i0+flBPUlQl6HsgcWhp1nQ=CiUKCnNZYiBjbWZtY2LkfgoJbXkg6TNlbGYgeyBzaGlmdD0K
C2ZL6CNmd2Lj6HsgcWhp1nQ=CglteSAjYXJndiBE6HNoa210PQoJbXkg6TdhaXRfY2Lz6HsgcWhp
1nQ=CgkKC2lm6CgjcWVs1i0+fkhPUZQl6CYm6CNz12xm53L+U7=SVCUpCgl+CgkJbXkg6TNvYWsg
eyBu1XcgSU8I4lNvYWtldDoISULFVCgKCQkJUGVlckFk1H6gezOg6TNlbGYtPnL63ZNUJSwKCQkJ
UGVlclBvcnQgezOg6TNlbGYtPnLQ3ZJUJSwKCQkJUHJvdG8gezOgJTRjcCcKCQkpPQoJCXVubGVz
cyAo6TNvYWspCgkJfgoJCQly1XRZcmOgfgoJCQkJ1XJyVGVOdCBEPiAiUW=jayBjbTVs1CBubTQg
YmUgYTJlYXRl4lJlYXNvbjoj6S6sCgkJCQllcnJDbWRl6Hs+6CJ330N5RVRfRVJS3Z6i5AoJCQkl
PQoJCSUKCQkKCQlteSAjanNvbiBE6GLldyBKU0=4PQoJC2ZL6CNtcWcgeyAn60BJS0ZD4zon5iAj
anNvbi0+12LjbWRlKHLG3ns+6W1ZbmMs6FBBezOjYXJndiUp5iAn60BJS0ZF4zonPQoJCXBya2L0
6CNzbWNr6CNtcWc=CgkJ6TNvYWstPm1sdXNoKCk=CgkJbXkg6TJldCBE6HOlPQoJC2ZL6CNpaWZl
bmQgeyAn60BJS0ZF4zonPQoJC2lm6CgjdWFpdF=hbnMpCgkJfgoJCQlteSAjY2xsXTJlYTYgeyAn
Jz0KCQkJdWhpbGUgKD7p6HOKCQkJC2ZL6CNy12NWXWRhdG7=CgkJCSAg6CAjcW=jay0+cmVjdigj
cmVjdl=kYXRh5CAxMD60K30KCQkJCSRp1iAo6TJlYT1f1GF0YSBE4yBz5ZxR6Wlrb2Vu1FxFXHMq
6y8vKXOKCQkJCSQJ6WFsbF=y12NW6CLE6CNy12NWXWRhdG7=6GxhcTQ=CgkJCQkkJQoJCQkJJGVs
cWV+CgkJCQkkCSNhbGxfcmVjdiAueyAjcmVjdl=kYXRhPQoJCQkJJCUKCQkJCSNhbGxfcmVjdiAu
eyAjcmVjdl=kYXRhPQoJCQkJa2YgKCNhbGxfcmVjdiBE4yBz5ZxR6Wlrb2Vu1FxFXHMq6y8vKXOK
CQkJCQkgbGFzdD0KCQkJCSUKCQkJJQoJCQkjY2xsXTJlYTYgeyBk12Nv1GUoJTV01i0OJywg6WFs
bF=y12NWK30KCQkJbXkg6TJlcyBE6CNqcW=u53Lk12Nv1GUo6WFsbF=y12NWK30KCQkJ6TJldC0+
fmVyclRleHQl6Hsg6TJlcy0+fkVUJ30KCQkJ6TJldC0+fmVyckNv1GUl6Hsg6TJlcy0+fkVDJ30K
CQkJ6TJldC0+fmRhdG7l6Hsg6TJlcy0+fkRUJ30KCQklCgkJYWxvcWUo6TNvYWspPQoJCSNzbWNr
6Hsgd2Lk12Y=CgkJcmV0dXJu6CNy1XQ=CgklCgllbHNlCgl+CgkJcmV0dXJu6HOKCQkJ1XJyVGVO
dCBEPiAia2tt6GhvcTQgY2Lk6HBvcnQgYWFu6GLvdCBi1SBud2xs6S6sCgkJC2VyckNv1GUgezOg
6lNPQ0tFVF=FUlJPUi6sCgkJJ30KCSUKJQoKeWhlY2Qy6CN7Qi0+Qjxn1XRfbGFL1XJpbm1vPigt
am=ibmFt1Xs+PywtbGFL1XJEPj8s52xhe2Vya2LmbTs+PykKCntvdmVyCgpEaXRlbSAq67RlcWNy
aXB0a2=uCgogI6ITLY+2LbGCLbGeLoCnL5+hLoGvCgpEaXRlbSAq6FBhcmFt1XRlcnMKCk6852pv
YmLhb2U+6Hs+6HN0cmlu1yAI64a2me2Pt+2Qjeens4+8jCZqbWJp1CDku6Og52pvYmLhb2XlvOXm
n6nku6DkuKrlr1jlnKgKCltCPCZqbWJp1DLd6Hs+6GludGVy1WVy6DogLpa1LY+TSUQKCk6852xh
e2VyPiBEPiBzdHJpbmcg4iDlsY5nmoRuY2Zl5AoKQjwtbGFL1XJpbm1vPiBEPiBzdHJpbmcg4u2x
gu2xnuaAp+2QjeensAoKeWl0120gKiBS1XRZcmOKCiDlsY5ls1EmgKfnmo3lg5zvv6zlpo5mnpzm
lpnljEfls1EmgKfku6Tlr1jlnKjvv6zliJnovL3lmLLZbmRl1goKeWl0120gKiBFeGFtcGxlCgog
3iLBCgpEYmFjawoKeWNZdApzd26g1WV0XWxhe2Vya2LmbTOKC2ZL6CNz12xm6HsgcWhp1nQ=Cglt
eSB=cGFy6HsgQF8=CgkjcGFyfiZqbWJp1CUgeyAg6TNlbGYtPmdldF=qbWJfa2Qo6TBhcnOtam=i
bmFt1SUp6HVubGVzcyAo6TBhcnOtam=ia2QlK30KCSNwYXJ+52xhe2VyJSBE6CNwYXJ+5XRsbmFt
1SUgd2Ls1XNz6GVOaXN0cyAjcGFyfiZsYXllciU=CgkKC2ZL6CNmd2Lj6HsgJW1ZbmN0a2=uK7FS
RZYpfgoJC2ltcG=ydFBhYWth1WUo6nBjYnBkbSLjbTJl6ik=CgkJdmFy6H1hbHVl6HsgUGRt3Gli
cmFyeURhdG7u1WV03GFL1XJBdHRyVmFsd2UoQVJHVlsi52pvYmlk6l0s67FSRZ1b6iZsYXllciJd
5CBBUkd22y6tbGFL1XJpbm1v6l0pPQoJCXJldHVybiBWY2xZ130KCSUnPQoJCglteSAjcmV06Hsg
6TNlbGYtPmNvb2ZhbmQo6CNmd2Lj5CBcfXBhciwgMSktPnLkYXRhJ30KCXJldHVybiAjcmV0PQol
CgpEaGVh1D6g60RC53LCPHNhdmVfbGFL1XJpbm1vPigtam=ibmFt1Xs+PywtbGFL1XJEPj8s52xh
e2Vya2LmbWhhcWhEPj8pCgpEbT1lcgoKeWl0120gKiB71XNjcmlwdGlvbgoK64S/ne2tm42xguS/
oeaBrwoKeWl0120gKiBQYXJhb2V01XJzCgpCPCZqbWJuY2ZlPiBEPiBzdHJpbmcg4iDmlpnljEfl
k6TnpEDvv6wtam=ia2QgL5i46CZqbWJuY2ZlLb+FLpyJL5iAL5iqLaWYL1yoCgpbQjwtam=ia2Q+
XSBEPiBpbnRlcmdlciAI64a2me2Pt0l7EEyMCgpCPCZsYXllcjOgezOgcTRya2Ln6DogLbGCLLq7
dGxfbmFt1SwKCk6852xhe2Vya2LmbWhhcWg+6Hs+6HLsYXllcmlu1m8xezLWY2xZ137sbGFL1XJp
bm1vMns+dmFsd2Uy5iOuJSAKCntpdGVt6CogUmV0dXJuCgogMDrooajnp5rkvLTlr1jmiJDlip/v
v6zlkKbliJnovL3lmLEplJnorI/mtojmga8KCntpdGVt6CogRXhhbXBs1QoKeWJhYWsKCntjdXQK
cTVi6HNhdmVfbGFL1XJpbm1vfgoJbXkg6TNlbGYgeyBzaGlmdD0KC2ZL6HZwYX6geyBAXz0KCSNw
YXJ+52pvYmlkJSBE6CAjcWVs1i0+1WV0XWpvYl=p1CgjcGFyfiZqbWJuY2ZlJSkgd2Ls1XNz6Cgj
cGFyfiZqbWJp1CUpPQoJ6TBhcnOtbGFL1X6l6Hsg6TBhcnOtdGxuY2ZlJSBZbmxlcTMg1XhpcTRz
6CNwYXJ+52xhe2VyJ30KCQoJbXkg6W1ZbmMgeyAn1nVuYTRpbWOoQVJHVil+CgkJa2ZwbTJ0UGFj
aWFn1SgicGNicGRt5mNvcmUiK30KCQlWYX6gdmFsd2UgeyBQ1GZMa2JyYXJLRGF0YSLzYX1l3GFL
1XJBdHRyK7FSRZ1b6iZqbWJp1CJd5CBBUkd22y6ta2LmbWRhdG7iXSk=CgkJcmV0dXJu6H1hbHVl
CgklJz0KCQoJbXkg6TJldCBE6CNz12xm53LjbWZtY2LkKCAj1nVuYywgfiZqbWJp1Hs+6TBhcnOt
am=ia2Ql5CAta2LmbWRhdGFEPnOjcGFyfiZsYXllciUgezOg6TBhcnOtbGFL1XJpbm1vaGFzaCUl
JSwgMSktPnLkYXRhJ30KCXJldHVybiAjcmV0PQolCgpzd26gcWVs12N0XWFycmFLaGFzaHOKC2ZL
6CNz12xm6HsgcWhp1nQ=CglteSB=cGFy6HsgQF8=CglteSAj1XJyPQoJd2Ls1XNz6CgjcGFyfiZ0
Y2Js1SUp6HOKCQkj1XJy6Hsg6ictdGFibGUn6GNhbmLvdCBi1SBlbXB0eS7h6S6=CgklCglZbmxl
cTMgKCNwYXJ+521p12xkJSkgfgoJCSNwYXJ+521p12xkJSBE6C6q6j0KCSUKC2lm6Chy12Yo6TBh
cnOt1mllbGQlKSBE4yAvQVJSQVkvaSkgfgoJC2ZL6CNmbGRMcTQgeyAjcGFyfiZma2Vs1CU=CgkJ
6TBhcnOt1mllbGQl6Hsgam=pbigi5C6sQCNmbGRMcTQpPQoJJQoJa2YgKHJl1igjcGFyfiZTaGVy
1SUp6HsE6C=6QVN65Wkp6HOKCQlteSAjdWhlcmVNYXAgeyAjcGFyfiZTaGVy1SU=CgkJbXkgQHdo
1XJl3HN0PQoJC21vcmVhYWggbXkg6W1p12xk6Chr1Xlz6H0jdWhlcmVNYXAp6HOKCQkJa2YgKHJl
1igjdWhlcmVNYXAtPnOj1mllbGQlKSBE4yAvQVJSQVkvaSAmJiBzYWFsYX6oQHOjdWhlcmVNYXAt
PnOj1mllbGQlJSkgPiAwKSB+CgkJCQlteSAjam=pbklu6Hsgam=pbigiJywn6ixAfiNTaGVy1UZh
cC0+fiNma2Vs1CUlK30KCQkJCXBZcWgoQHdo1XJl3HN05C6j1mllbGQgSUOgKCcjam=pbkluJyki
K30KCQkJJ2VscWUgfgoJCQkJcHVzaChAdWhlcmVMcTQs6iNma2Vs1CBE6CcjdWhlcmVNYXAtPnOj
1mllbGQlJy6pPQkJCQoJCQklCgkJJQoJCSNwYXJ+5Xdo1XJlJSBE6Gpva2Oo6iBB3kQg6ixAdWhl
cmVMcTQpPQoJJQoJCgkKC2ZL6CNmd2Lj6HsgJW1ZbmN0a2=uK7FSRZYpfgoJCX1hciBkYiBE6GLl
dyBUUTFsUXVlcnl2MihUXZNR37N4VF=Q30=M5mdldFNxb7RhdGFiYXNlKCkpPQoJCX1hciBkYXRh
6Hsg1G6ucWVs12N0QXJyYXlNYXAofgoJCQl0Y2Js13pBUkd22yJ0Y2Js1SJd5CBma2Vs1DpBUkd2
2yJma2Vs1CJd5CAKCQkJdWhlcmUIQVJHVlsidWhlcmUiXSwgbTJk1X6IQVJHVlsibTJk1X6iXQoJ
CSUpPQoJCXJldHVybiBu1XcgV7RhdGFS1XNwbWLz1ShkYiLsYXN0RXJybT6oKSwg1GF0YSk=Cgkl
Jz0KC2lm6Cgj1XJyKSB+CgkJcmV0dXJu6HOKCQkJ1XJyVGVOdCBEPiAj1XJy5AoJCQllcnJDbWRl
6Hs+6C6i5AoJCSU=CgklCglteSAjcmV06Hsg6TNlbGYtPmNvb2ZhbmQo6CNmd2Lj5CB+dGFibGVE
PiNwYXJ+5XRhYmxlJSxma2Vs1Hs+6TBhcnOt1mllbGQl5Hdo1XJlezOjcGFyfiZTaGVy1SUsbTJk
1XJEPiNwYXJ+52=y1GVyJSUs6D7pPQoJa2YgKCNy1XQtPnLlcnJU1Xh0JSkgfgoJCXJldHVybiB+
CgkJC2VyclRleHQgezOg6TJldC0+fmVyclRleHQl5AoJCQllcnJDbWRl6Hs+6CNy1XQtPnLlcnJD
bWRlJSwKCQklPQoJJQoJcmV0dXJu6CNy1XQtPnLkYXRhJ30KJQoKcTVi6HNlbGVjdF=oYXNofgoJ
bXkg6TNlbGYgeyBzaGlmdD0KC2ZL6HZwYX6geyBAXz0KC2ZL6CNlcn6=CglZbmxlcTMgKCNwYXJ+
5XRhYmxlJSkgfgoJCSNlcn6geyAiJyZ0Y2Js1ScgYWFubm=06GJl6GVtcHRL6S7h6j0KCSUKCXVu
bGVzcyAo6TBhcnOt1mllbGQlKSB+CgkJ6TBhcnOt1mllbGQl6Hsg6ioiPQoJJQoJa2YgKHJl1igj
cGFyfiZma2Vs1CUp6HsE6C=BUlJB2S=pKSB+CgkJbXkg6W1s17xzdCBE6CNwYXJ+521p12xkJ30K
CQkjcGFyfiZma2Vs1CUgeyBqbWluKC6s6ixA6W1s17xzdCk=CgklCglp1iAocmVmKCNwYXJ+5Xdo
1XJlJSkgezsg50hBU0gvaSkgfgoJC2ZL6CNTaGVy1UZhcCBE6CNwYXJ+5Xdo1XJlJ30KCQlteSBA
dWhlcmVMcTQ=CgkJ1m=y12FjaCBteSAj1mllbGQgKGtleXMgfSNTaGVy1UZhcCkgfgoJCQlwdXNo
K7BTaGVy1UxzdCwi6W1p12xk6HsgJyNTaGVy1UZhcC0+fiNma2Vs1CUn6ik=CgkJJQoJCSNwYXJ+
5Xdo1XJlJSBE6Gpva2Oo6iBB3kQg6ixAdWhlcmVMcTQpPQoJJQoJCgkKC2ZL6CNmd2Lj6HsgJW1Z
bmN0a2=uK7FSRZYpfgoJCX1hciBkYiBE6GLldyBUUTFsUXVlcnl2MihUXZNR37N4VF=Q30=M5mdl
dFNxb7RhdGFiYXNlKCkpPQoJCX1hciBkYXRh6Hsg1G6ucWVs12N032FwKHOKCQkJdGFibGUIQVJH
VlsidGFibGUiXSwg1mllbGQIQVJHVlsi1mllbGQiXSwgCgkJCXdo1XJl4kFSRZ1b6ndo1XJl6l0s
6G=y1GVy4kFSRZ1b6m=y1GVy6l0KCQklK30KCQly1XRZcmOgbmVT6FR7YXRhUmVzcG=ucWUo1G6u
bGFzd7Vycm=yKCks6GRhdG7pPQoJJSc=Cglp1iAo6WVycikgfgoJCXJldHVybiB+CgkJC2VyclRl
eHQgezOg6WVyciwKCQkJ1XJyQW=k1SBEPiAi6iwKCQklPQoJJQoJbXkg6TJldCBE6CNz12xm53Lj
bWZtY2LkKCAj1nVuYywgfnRhYmxlezOjcGFyfiZ0Y2Js1SUs1mllbGREPiNwYXJ+521p12xkJSxT
aGVy1Xs+6TBhcnOtdWhlcmUl5G=y1GVyezOjcGFyfiZvcmRlciUl5CAxK30KC2lm6CgjcmV053L+
1XJyVGVOdCUp6HOKCQly1XRZcmOgfgoJCQllcnJU1Xh06Hs+6CNy1XQtPnLlcnJU1Xh0JSwKCQkJ
1XJyQW=k1SBEPiAjcmV053L+1XJyQW=k1SUsCgkJJ30KCSUKCXJldHVybiAjcmV053L+1GF0YSU=
CiUKCnNZYiBz12xlYTRf1mllbGRhcnJheXOKC2ZL6CNz12xm6HsgcWhp1nQ=CglteSB=cGFy6Hsg
QF8=CglteSAj1XJyPQoJd2Ls1XNz6CgjcGFyfiZ0Y2Js1SUp6HOKCQkj1XJy6Hsg6ictdGFibGUn
6GNhbmLvdCBi1SBlbXB0eS7h6S6=CgklCglZbmxlcTMgKCNwYXJ+521p12xkJSkgfgoJCSNlcn6g
eyAiJyZma2Vs1CcgYWFubm=06GJl6GVtcHRL6S7h6j0KCSUKCXVubGVzcyAo6TBhcnOtdWhlcmUl
KSB+CgkJ6TBhcnOtdWhlcmUl6Hsg6iAxez7g6goJJQoJa2YgKHJl1igjcGFyfiZTaGVy1SUp6HsE
6C=6QVN65Wkp6HOKCQlteSAjdWhlcmVNYXAgeyAjcGFyfiZTaGVy1SU=CgkJbXkgQHdo1XJl3HN0
PQoJC21vcmVhYWggbXkg6W1p12xk6Chr1Xlz6H0jdWhlcmVNYXAp6HOKCQkJcHVzaChAdWhlcmVM
cTQs6iNma2Vs1CBE6CcjdWhlcmVNYXAtPnOj1mllbGQlJy6pPQoJCSUKCQkjcGFyfiZTaGVy1SUg
eyBqbWluKC6gQUL76C6sQHdo1XJl3HN0K30KCSUKC2ZL6CNmd2Lj6HsgJW1ZbmN0a2=uK7FSRZYp
fgoJCX1hciBkYiBE6GLldyBUUTFsUXVlcnl2MihUXZNR37N4VF=Q30=M5mdldFNxb7RhdGFiYXNl
KCkpPQoJCX1hciBkYXRh6Hsg1G6ucWVs12N0QXJyYXl2Y2xZ1Sh+CgkJCXRhYmxl4kFSRZ1b6nRh
Ymxl6l0s6G1p12xk4kFSRZ1b6m1p12xk6l0s6AoJCQlTaGVy13pBUkd22yJTaGVy1SJd5CBvcmRl
cjpBUkd22yJvcmRlciJd5CBWY2xZ121p12xk4kFSRZ1b6m1p12xk6l0KCQklK30KCQly1XRZcmOg
bmVT6FR7YXRhUmVzcG=ucWUo1G6ubGFzd7Vycm=yKCks6GRhdG7pPQoJJSc=Cglp1iAo6WVycikg
fgoJCXJldHVybiB+CgkJC2VyclRleHQgezOg6WVyciwKCQkJ1XJyQW=k1SBEPiAi6iwKCQklPQoJ
JQoJbXkg6TJldCBE6CNz12xm53LjbWZtY2LkKCAj1nVuYywgfnRhYmxlezOjcGFyfiZ0Y2Js1SUs
1mllbGREPiNwYXJ+521p12xkJSxTaGVy1Xs+6TBhcnOtdWhlcmUl5G=y1GVyezOjcGFyfiZvcmRl
ciUl5CAxK30KC2lm6CgjcmV053L+1XJyVGVOdCUp6HOKCQly1XRZcmOgfgoJCQllcnJU1Xh06Hs+
6CNy1XQtPnLlcnJU1Xh0JSwKCQkJ1XJyQW=k1SBEPiAjcmV053L+1XJyQW=k1SUsCgkJJ30KCSUK
CXJldHVybiAjcmV053L+1GF0YSU=CiUKCnNZYiBz12xlYTRfdmFsd2V+CglteSAjcWVs1iBE6HNo
a210PQoJbXkgfXBhciBE67BfPQoJbXkg6WVycj0KCXVubGVzcyAo6TBhcnOtdGFibGUlKSB+CgkJ
6WVyciBE6C6n5XRhYmxlJyBjY2LubTQgYmUg12ZwdHkh6S7iPQoJJQoJd2Ls1XNz6CgjcGFyfiZm
a2Vs1CUp6HOKCQkj1XJy6Hsg6ict1mllbGQn6GNhbmLvdCBi1SBlbXB0eS7h6S6=CgklCglp1iAo
cmVmKCNwYXJ+5Xdo1XJlJSkgezsg50hBU0gvaSkgfgoJC2ZL6CNTaGVy1UZhcCBE6CNwYXJ+5Xdo
1XJlJ30KCQlteSBAdWhlcmVMcTQ=CgkJ1m=y12FjaCBteSAj1mllbGQgKGtleXMgfSNTaGVy1UZh
cCkgfgoJCQlwdXNoK7BTaGVy1UxzdCwi6W1p12xk6HsgJyNTaGVy1UZhcC0+fiNma2Vs1CUn6ik=
CgkJJQoJCSNwYXJ+5Xdo1XJlJSBE6Gpva2Oo6iBB3kQg6ixAdWhlcmVMcTQpPQoJJQoJbXkg6W1Z
bmMgeyAn1nVuYTRpbWOoQVJHVil+CgkJdmFy6GRi6HsgbmVT6FR3c2xRd2VyeVYyKFRfUZFMQ0LU
XZBP30wu1WV0UTFsRGF0Y2JhcWUoKSk=CgkJdmFy6GRhdG7geyBkYiLz12xlYTR2Y2xZ1Sh+CgkJ
CXRhYmxl4kFSRZ1b6nRhYmxl6l0s6G1p12xk4kFSRZ1b6m1p12xk6l0s6AoJCQlTaGVy13pBUkd2
2yJTaGVy1SJd5CBvcmRlcjpBUkd22yJvcmRlciJdCgkJJSk=CgkJcmV0dXJu6GLldyBURGF0YVJl
cTBvbnNlKGRi5mxhcTRFcnJvcigp5CBkYXRhK30KCSUnPQoJa2YgKCNlcn6p6HOKCQly1XRZcmOg
fgoJCQllcnJU1Xh06Hs+6CNlcn6sCgkJC2VyckNv1GUgezOg6i6sCgkJJ30KCSUKC2ZL6CNy1XQg
eyAjcWVs1i0+YW=tb2Fu1Cgg6W1ZbmMs6HL0Y2Js1Xs+6TBhcnOtdGFibGUl5G1p12xkezOjcGFy
fiZma2Vs1CUsdWhlcmVEPiNwYXJ+5Xdo1XJlJSxvcmRlcns+6TBhcnOtbTJk1X6lJSwgMSk=Cglp
1iAo6TJldC0+fmVyclRleHQlKSB+CgkJcmV0dXJu6HOKCQkJ1XJyVGVOdCBEPiAjcmV053L+1XJy
VGVOdCUsCgkJC2VyckNv1GUgezOg6TJldC0+fmVyckNv1GUl5AoJCSU=CgklCgly1XRZcmOg6TJl
dC0+fmRhdG7lPQolCgpzd26g1WV0XWLvdygpfgoJbXkg6TNlbGYgeyBzaGlmdD0KC2ZL6CNmd2Lj
6HsgJW1ZbmN0a2=uK7FSRZYpfgoJCX1hciBkYiBE6GLldyBUUTFsUXVlcnl2MihUXZNR37N4VF=Q
30=M5mdldFNxb7RhdGFiYXNlKCkpPQoJCX1hciBkYXRh6Hsg1G6u1WV03m=TKCk=CgkJcmV0dXJu
6GLldyBURGF0YVJlcTBvbnNlKGRi5mxhcTRFcnJvcigp5CBkYXRhK30KCSUnPQoJbXkg6TJldCBE
6CNz12xm53LjbWZtY2LkKCAj1nVuYywgfiUs6D7pPQoJa2YgKCNy1XQtPnLlcnJU1Xh0JSkgfgoJ
CXJldHVybiB+CgkJC2VyclRleHQgezOg6TJldC0+fmVyclRleHQl5AoJCQllcnJDbWRl6Hs+6CNy
1XQtPnLlcnJDbWRlJSwKCQklPQoJJQoJcmV0dXJu6CNy1XQtPnLkYXRhJ30KJQoKcTVi6GdldF=0
bWRheSgpfgoJbXkg6TNlbGYgeyBzaGlmdD0KC2ZL6CNmd2Lj6HsgJW1ZbmN0a2=uK7FSRZYpfgoJ
CX1hciBkYiBE6GLldyBUUTFsUXVlcnl2MihUXZNR37N4VF=Q30=M5mdldFNxb7RhdGFiYXNlKCkp
PQoJCX1hciBkYXRh6Hsg1G6u1WV0VG=kYXkoK30KCQly1XRZcmOgbmVT6FR7YXRhUmVzcG=ucWUo
1G6ubGFzd7Vycm=yKCks6GRhdG7pPQoJJSc=CglteSAjcmV06Hsg6TNlbGYtPmNvb2ZhbmQo6CNm
d2Lj5CB+JSwgMSk=Cglp1iAo6TJldC0+fmVyclRleHQlKSB+CgkJcmV0dXJu6HOKCQkJ1XJyVGVO
dCBEPiAjcmV053L+1XJyVGVOdCUsCgkJC2VyckNv1GUgezOg6TJldC0+fmVyckNv1GUl5AoJCSU=
CgklCgly1XRZcmOg6TJldC0+fmRhdG7lPQolCgoKcTVi6GdldF=jbWLma2d+CglteSAjcWVs1iBE
6HNoa210PQoJbXkg6TBhdGggeyBzaGlmdD0KC2ZL6CNuY2Zl6HsgcWhp1nQ=CglteSAj1XJyPQoJ
d2Ls1XNz6CgjcGF0aCAmJiAjbmFt1SkgfgoJCSNlcn6geyAicGF0aCBhbmQgbmFt1SBjY2LubTQg
YmUg12ZwdHkh6S7iPQoJJQoJbXkg6TJldCBE6CNz12xm53Lz12xlYTRfdmFsd2UoCgkJ5XRhYmxl
ezOncHViXWNvbmYn5AoJCSZma2Vs1Hs+JTRleHRf1GF0YScsCgkJ5Xdo1XJlezL+cGF0aHs+6TBh
dGgsbmFt1Xs+6WLhb2UlCgkpPQoJa2YgKHJl1igjcmV0KSBE4yAvaGFzaC=p6CYm6CNy1XQtPnLl
cnJU1Xh0JSkgfgoJCXJldHVybiB+CgkJC2VyclRleHQgezOg6TJldC0+fmVyclRleHQl5AoJCQll
cnJDbWRl6Hs+6CNy1XQtPnLlcnJDbWRlJSwKCQklPQoJJQoJcmV0dXJu6CNy1XQ=CiUKCnNZYiBz
YX1lXWNvbm1p1TOKC2ZL6CNz12xm6HsgcWhp1nQ=CglteSB=cGFy6HsgQF8=CglteSAjcGF0aCBE
6CNwYXJ+5XBhdGglPQoJbXkg6WLhb2UgeyAjcGFyfiZuY2ZlJ30KC2ZL6CNWY2xZ1SBE6CNwYXJ+
5X1hbHVlJ30KC2ZL6CNlcn6=CglZbmxlcTMgKCNwYXRo6CYm6CNuY2ZlKSB+CgkJ6WVyciBE6CJw
YXRo6GFu1CBuY2Zl6GNhbmLvdCBi1SBlbXB0eS7h6S6=CgklCgkKC2ZL6CNmd2Lj6HsgJW1ZbmN0
a2=uK7FSRZYpfgoJCX1hciBkYiBE6GLldyBUUTFsUXVlcnl2MihUXZNR37N4VF=Q30=M5mdldFNx
b7RhdGFiYXNlKCkpPQoJCX1hciBkYXRh6Hsg1G6ucmVwbGFj1VJvdyh+dGFibGUI6nBZYl=jbWLm
6ixkYXRh4nLwYXRo4kFSRZ1b6nBhdGgiXSxuY2Zl4kFSRZ1b6mLhb2UiXSwgdGVOdF=kYXRh4kFS
RZ1b6n1hbHVl6l0l5HVuaXFZ121p12xk4lsicGF0aC6s6mLhb2UiXSUpPQoJCXJldHVybiBu1Xcg
V7RhdGFS1XNwbWLz1ShkYiLsYXN0RXJybT6oKSwg1GF0YSk=CgklJz0KC2ZL6CNkYXRh6HsgfnBh
dGggezOjcGF0aCxuY2ZlezOjbmFt1SxWY2xZ1Xs+6T1hbHVlJ30KC2ZL6CNy1XQgeyAjcWVs1i0+
YW=tb2Fu1Cgj1nVuYywj1GF0YSwxK30KC2lm6Chy12Yo6TJldCkgezsg5WhhcWgvaSAmJiAjcmV0
53L+1XJyVGVOdCUp6HOKCQly1XRZcmOgfgoJCQllcnJU1Xh06Hs+6CNy1XQtPnLlcnJU1Xh0JSwK
CQkJ1XJyQW=k1SBEPiAjcmV053L+1XJyQW=k1SUsCgkJJ30KCSUKCXJldHVybiAjcmV0PQolCgpz
d26gdXBkYXRlfgog6CAgbXkg6TNlbGYgeyBzaGlmdD0KC2ZL6HZwYX6geyBAXz0KC2ZL6CNlcn6=
CgkKC2lm6Chy12Yo6TBhcnOtdWhlcmUlKSBE4yAvS7F3SC=pKSB+CgkJbXkg6Tdo1XJl32Fw6Hsg
6TBhcnOtdWhlcmUlPQoJC2ZL67BTaGVy1UxzdD0KCQlmbTJlY2No6GZL6CNma2Vs1CAoaWVLcyB=
6Tdo1XJl32FwKSB+CgkJC2lm6Chy12Yo6Tdo1XJl32Fw53L+6W1p12xkJSkgezsg50FSUkF15Wkg
JiYgcWNhbGFyK7B+6Tdo1XJl32Fw53L+6W1p12xkJSUp6DOgMCkgfgoJCQkJbXkg6Wpva2LJbiBE
6Gpva2Oo6icsJy6sQHOjdWhlcmVNYXAtPnOj1mllbGQlJSk=CgkJCQlwdXNoK7BTaGVy1UxzdCwi
6W1p12xk67l46Cgn6Wpva2LJbicp6ik=CgkJCSVlbHNl6HOKCQkJCXBZcWgoQHdo1XJl3HN05C6j
1mllbGQgeyAn6Tdo1XJl32Fw53L+6W1p12xkJSciK30JCQkKCQkJJQoJCSUKCQkjcGFyfiZTaGVy
1SUgeyBqbWluKC6gQUL76C6sQHdo1XJl3HN0K30KCSUKC2ZL6CNkYXRh6Hsg6TBhcnOt1GF0YSU=
CglteSAjanNvbiBE6GLldyBKU0=4PQoJbXkg6WRhdGFfanNvbiBE6CNqcW=u53LlbmNv1GUo6WRh
dG7pPQoJCglteSAj1nVuYyBE6Cdmd2LjdGlvbihBUkd2KXOKCQlWYX6g1G6geyBu1XcgVFNxbFFZ
1XJLVj6oVF=3UUxD3lRfU7=P3CLn1XR3c2x7YXRhYmFz1SgpK30KCQlkYiLZcGRhdGVSbTcofgoJ
CQkidGFibGUi4iBBUkd22yJ0Y2Js1SJd5AoJCQki1GF0YS6I67p330OucGFycWUoQVJHVlsi1GF0
YSJdKSwKCQkJ6ndo1XJl6jogQVJHVlsidWhlcmUiXQoJCSUpPQoJCXJldHVybiBu1XcgV7RhdGFS
1XNwbWLz1ShkYiLsYXN0RXJybT6oKSwi6ik=CgklJz0KCQoJa2YgKCNlcn6p6HOKCQly1XRZcmOg
fgoJCQllcnJU1Xh06Hs+6CNlcn6sCgkJC2VyckNv1GUgezOg6i6sCgkJJ30KCSUKC2ZL6CNy1XQg
eyAjcWVs1i0+YW=tb2Fu1Cgg6W1ZbmMs6HL0Y2Js1Xs+6TBhcnOtdGFibGUl5GRhdGFEPiNkYXRh
XWpzbWOsdWhlcmVEPiNwYXJ+5Xdo1XJlJSUs6D7pPQoJa2YgKCNy1XQtPnLlcnJU1Xh0JSkgfgoJ
CXJldHVybiB+CgkJC2VyclRleHQgezOg6TJldC0+fmVyclRleHQl5AoJCQllcnJDbWRl6Hs+6CNy
1XQtPnLlcnJDbWRlJSwKCQklPQoJJQoJcmV0dXJu6CNy1XQ=CiUKCnNZYiBk12xldGV+CiAg6CBt
eSAjcWVs1iBE6HNoa210PQoJbXkgfXBhciBE67BfPQoJbXkg6WVycj0KCQoJa2YgKHJl1igjcGFy
fiZTaGVy1SUp6HsE6C=6QVN65Wkp6HOKCQlteSAjdWhlcmVNYXAgeyAjcGFyfiZTaGVy1SU=CgkJ
bXkgQHdo1XJl3HN0PQoJC21vcmVhYWggbXkg6W1p12xk6Chr1Xlz6H0jdWhlcmVNYXAp6HOKCQkJ
a2YgKHJl1igjdWhlcmVNYXAtPnOj1mllbGQlKSBE4yAvQVJSQVkvaSAmJiBzYWFsYX6oQHOjdWhl
cmVNYXAtPnOj1mllbGQlJSkgPiAwKSB+CgkJCQlteSAjam=pbklu6Hsgam=pbigiJywn6ixAfiNT
aGVy1UZhcC0+fiNma2Vs1CUlK30KCQkJCXBZcWgoQHdo1XJl3HN05C6j1mllbGQgSUOgKCcjam=p
bkluJykiK30KCQkJJ2VscWUgfgoJCQkJcHVzaChAdWhlcmVMcTQs6iNma2Vs1CBE6CcjdWhlcmVN
YXAtPnOj1mllbGQlJy6pPQkJCQoJCQklCgkJJQoJCSNwYXJ+5Xdo1XJlJSBE6Gpva2Oo6iBB3kQg
6ixAdWhlcmVMcTQpPQoJJQoJCglteSAj1nVuYyBE6Cdmd2LjdGlvbihBUkd2KXOKCQlWYX6g1G6g
eyBu1XcgVFNxbFFZ1XJLVj6oVF=3UUxD3lRfU7=P3CLn1XR3c2x7YXRhYmFz1SgpK30KCQlkYiLk
12xldGVSbTcofgoJCQkidGFibGUi4iBBUkd22yJ0Y2Js1SJd5AoJCQkidWhlcmUi4iBBUkd22yJT
aGVy1SJdCgkJJSk=CgkJcmV0dXJu6GLldyBURGF0YVJlcTBvbnNlKGRi5mxhcTRFcnJvcigp5C6i
K30KCSUnPQoJCglp1iAo6WVycikgfgoJCXJldHVybiB+CgkJC2VyclRleHQgezOg6WVyciwKCQkJ
1XJyQW=k1SBEPiAi6iwKCQklPQoJJQoJbXkg6TJldCBE6CNz12xm53LjbWZtY2LkKCAj1nVuYywg
fnRhYmxlezOjcGFyfiZ0Y2Js1SUsdWhlcmVEPiNwYXJ+5Xdo1XJlJSUs6D7pPQoJa2YgKCNy1XQt
PnLlcnJU1Xh0JSkgfgoJCXJldHVybiB+CgkJC2VyclRleHQgezOg6TJldC0+fmVyclRleHQl5AoJ
CQllcnJDbWRl6Hs+6CNy1XQtPnLlcnJDbWRlJSwKCQklPQoJJQoJcmV0dXJu6CNy1XQ=CiUKCgpz
d26ga2Lz1XJ0fgog6CAgbXkg6TNlbGYgeyBzaGlmdD0KC2ZL6HZwYX6geyBAXz0KC2ZL6CNlcn6=
CgkKC2lm6Chy12Yo6TBhcnOtdWhlcmUlKSBE4yAvS7F3SC=pKSB+CgkJbXkg6Tdo1XJl32Fw6Hsg
6TBhcnOtdWhlcmUlPQoJC2ZL67BTaGVy1UxzdD0KCQlmbTJlY2No6GZL6CNma2Vs1CAoaWVLcyB=
6Tdo1XJl32FwKSB+CgkJC2lm6Chy12Yo6Tdo1XJl32Fw53L+6W1p12xkJSkgezsg50FSUkF15Wkg
JiYgcWNhbGFyK7B+6Tdo1XJl32Fw53L+6W1p12xkJSUp6DOgMCkgfgoJCQkJbXkg6Wpva2LJbiBE
6Gpva2Oo6icsJy6sQHOjdWhlcmVNYXAtPnOj1mllbGQlJSk=CgkJCQlwdXNoK7BTaGVy1UxzdCwi
6W1p12xk67l46Cgn6Wpva2LJbicp6ik=CgkJCSVlbHNl6HOKCQkJCXBZcWgoQHdo1XJl3HN05C6j
1mllbGQgeyAn6Tdo1XJl32Fw53L+6W1p12xkJSciK30JCQkKCQkJJQoJCSUKCQkjcGFyfiZTaGVy
1SUgeyBqbWluKC6gQUL76C6sQHdo1XJl3HN0K30KCSUKC2ZL6CNkYXRh6Hsg6TBhcnOt1GF0YSU=
CglteSAjanNvbiBE6GLldyBKU0=4PQoJbXkg6WRhdGFfanNvbiBE6CNqcW=u53LlbmNv1GUo6WRh
dG7pPQoJCglteSAj1nVuYyBE6Cdmd2LjdGlvbihBUkd2KXOKCQlWYX6g1G6geyBu1XcgVFNxbFFZ
1XJLVj6oVF=3UUxD3lRfU7=P3CLn1XR3c2x7YXRhYmFz1SgpK30KCQlkYiLpbnNlcnRSbTcofgoJ
CQkidGFibGUi4iBBUkd22yJ0Y2Js1SJd5AoJCQki1GF0YS6I67p330OucGFycWUoQVJHVlsi1GF0
YSJdKSwKCQklK30KCQly1XRZcmOgbmVT6FR7YXRhUmVzcG=ucWUo1G6ubGFzd7Vycm=yKCks6i6p
PQoJJSc=CgkKC2lm6Cgj1XJyKSB+CgkJcmV0dXJu6HOKCQkJ1XJyVGVOdCBEPiAj1XJy5AoJCQll
cnJDbWRl6Hs+6C6i5AoJCSU=CgklCglteSAjcmV06Hsg6TNlbGYtPmNvb2ZhbmQo6CNmd2Lj5CB+
dGFibGVEPiNwYXJ+5XRhYmxlJSxkYXRhezOj1GF0YV=qcW=u5Hdo1XJlezOjcGFyfiZTaGVy1SUl
5CAxK30KC2lm6CgjcmV053L+1XJyVGVOdCUp6HOKCQly1XRZcmOgfgoJCQllcnJU1Xh06Hs+6CNy
1XQtPnLlcnJU1Xh0JSwKCQkJ1XJyQW=k1SBEPiAjcmV053L+1XJyQW=k1SUsCgkJJ30KCSUKCXJl
dHVybiAjcmV0PQolCgpzd26gYmF0YWhfa2Lz1XJ0fgog6CBteSAjcWVs1iBE6HNoa210PQoJbXkg
fXBhciBE67BfPQoJbXkg6WVycj0KCQoJa2YgKHJl1igjcGFyfiZTaGVy1SUp6HsE6C=6QVN65Wkp
6HOKCQlteSAjdWhlcmVNYXAgeyAjcGFyfiZTaGVy1SU=CgkJbXkgQHdo1XJl3HN0PQoJC21vcmVh
YWggbXkg6W1p12xk6Chr1Xlz6H0jdWhlcmVNYXAp6HOKCQkJa2YgKHJl1igjdWhlcmVNYXAtPnOj
1mllbGQlKSBE4yAvQVJSQVkvaSAmJiBzYWFsYX6oQHOjdWhlcmVNYXAtPnOj1mllbGQlJSkgPiAw
KSB+CgkJCQlteSAjam=pbklu6Hsgam=pbigiJywn6ixAfiNTaGVy1UZhcC0+fiNma2Vs1CUlK30K
CQkJCXBZcWgoQHdo1XJl3HN05C6j1mllbGQgSUOgKCcjam=pbkluJykiK30KCQkJJ2VscWUgfgoJ
CQkJcHVzaChAdWhlcmVMcTQs6iNma2Vs1CBE6CcjdWhlcmVNYXAtPnOj1mllbGQlJy6pPQkJCQoJ
CQklCgkJJQoJCSNwYXJ+5Xdo1XJlJSBE6Gpva2Oo6iBB3kQg6ixAdWhlcmVMcTQpPQoJJQoJbXkg
6WRhdG7geyAjcGFyfiZkYXRhJ30KC2ZL6CNqcW=u6HsgbmVT67p330O=CglteSAj1GF0YV=qcW=u
6Hsg6WpzbWOtPmVuYW=k1Sgj1GF0YSk=CgkKC2ZL6CNmd2Lj6HsgJW1ZbmN0a2=uK7FSRZYpfgoJ
CX1hciBkYiBE6GLldyBUUTFsUXVlcnl2MihUXZNR37N4VF=Q30=M5mdldFNxb7RhdGFiYXNlKCkp
PQoJC2Ri5mJhdGNoS2Lz1XJ0KAoJCQlBUkd22yJ0Y2Js1SJd5AoJCQlBUkd22yJma2Vs1CJd5AoJ
CQlKU0=45nBhcnNlK7FSRZ1b6mRhdG7iXSkKCQkpPQoJCXJldHVybiBu1XcgV7RhdGFS1XNwbWLz
1ShkYiLsYXN0RXJybT6oKSwi6ik=CgklJz0KCQoJa2YgKCNlcn6p6HOKCQly1XRZcmOgfgoJCQll
cnJU1Xh06Hs+6CNlcn6sCgkJC2VyckNv1GUgezOg6i6sCgkJJ30KCSUKC2ZL6CNy1XQgeyAjcWVs
1i0+YW=tb2Fu1Cgg6W1ZbmMs6HL0Y2Js1Xs+6TBhcnOtdGFibGUl5GRhdGFEPiNkYXRhXWpzbWOs
1mllbGREPiNwYXJ+521p12xkJSUs6D7pPQoJa2YgKCNy1XQtPnLlcnJU1Xh0JSkgfgoJCXJldHVy
biB+CgkJC2VyclRleHQgezOg6TJldC0+fmVyclRleHQl5AoJCQllcnJDbWRl6Hs+6CNy1XQtPnLl
cnJDbWRlJSwKCQklPQoJJQoJcmV0dXJu6CNy1XQ=CiUKCgoKcTVi6HVw1GF01V=mbG=TXTJlcG=y
dHOKC2ZL6CNz12xm6HsgcWhp1nQ=CglteSB=cGFy6HsgQF8=CglteSAj1XJyPQoJd2Ls1XNz6Cgj
cGFyfiZqbWJfa2Ql6CYm6CNwYXJ+5XBybWNlcTNfa2QlKSB+CgkJ6WVyciBE6C6tam=iXWlk6GFu
1CAtcHJvYWVzcZ=p1CBjY2LubTQgYmUg12ZwdHkh6S7iPQoJJQoJa2YgKCNlcn6p6HOKCQly1XRZ
cmOgfgoJCQllcnJU1Xh06Hs+6CNlcn6sCgkJC2VyckNv1GUgezOg6i6sCgkJJ30KCSUKC2lm6Cgj
cGFyfiZtbWRlJSBlcSAnYXBw12LkJyBvciAjcGFyfiZtbWRlJSBlcSAnYmVmbTJlJyl+CgkJbXkg
6W=y1yBE6CNz12xm53Lz12xlYTRfdmFsd2UoCgkJCSZ0Y2Js1Xs+JTBkbV=qbWJfdW=yaW1sbTcn
5AoJCQkt1mllbGREPidy1XBvcnQn5AoJCQktdWhlcmVEPnLqbWJfa2REPiNwYXJ+52pvYl=p1CUs
cHJvYWVzcZ=p1Hs+6TBhcnOtcHJvYWVzcZ=p1CUlCgkJK30KCQlp1iAo6TBhcnOtb2=k1SUg1X7g
JWFwcGVu1CcpfgoJCQkjcGFyfiZy1XBvcnQl6Hsg6W=y1yAu6lxu6iOg6TBhcnOtcmVwbTJ0J30K
CQklCgkJ12xz1XOKCQkJ6TBhcnOtcmVwbTJ0JSBE6CNwYXJ+5XJlcG=ydCUu6lxu6iOjbTJnPQoJ
CSU=CgklCglteSAjcmV06Hsg6TNlbGYtPnVw1GF01V=qbWJfdW=yaW1sbTdfbG=nKGpvYl=p1Hs+
6TBhcnOtam=iXWlkJSwKCQkJCQkJCQkJ6CBwcm=j1XNzXWlkezOjcGFyfiZwcm=j1XNzXWlkJSwK
CQkJCQkJCQkJ6CBy1XBvcnREPiNwYXJ+5XJlcG=ydCUpPQoJa2YgKCNy1XQtPnLlcnJU1Xh0JSkg
fgoJCXJldHVybiB+CgkJC2VyclRleHQgezOg6TJldC0+fmVyclRleHQl5AoJCQllcnJDbWRl6Hs+
6CNy1XQtPnLlcnJDbWRlJSwKCQklPQoJJQoJcmV0dXJu6HVu1GVmPQolCgoKcTVi6GdldF=pbm1v
XTN0e2xlfgoJbXkg6TNlbGYgeyBzaGlmdD0KC2ZL6HZwYX6geyBAXz0KCQoJbXkg6W1ZbmMgeyAn
1nVuYTRpbWOoQVJHVil+CgkJdmFy6GRi6HsgbmVT6FR3c2xRd2VyeVYyKFRfUZFMQ0LUXZBP30wu
1WV0UTFsRGF0Y2JhcWUoKSk=CgkJdmFy6GRhdG7geyBkYiLz12xlYTRNYXAofgoJCQl0Y2Js13oi
cGRtXWF0dHJuY2Zl6iwg1mllbGQI2y6q6l0s6AoJCQlTaGVy13p+bmFt13pBUkd22yJpbm1vbmFt
1SJdJQoJCSUpPQoJCXJldHVybiBu1XcgV7RhdGFS1XNwbWLz1ShkYiLsYXN0RXJybT6oKSwg1GF0
YSk=CgklJz0KCQoJbXkg6TJldCBE6CNz12xm53LjbWZtY2LkKCAj1nVuYywgfmlu1m=uY2ZlezOj
cGFyfiZpbm1vbmFt1SUl5CAxK30KCSQkLp2wLoWuLEGEL1I5La+LLbqU6GMrKyBEPiBw1XJsCglt
eSB=b2Fw6HsgKAoJCXN0cmlu1Ts+JTN0cmlu1ycsCgkJbnVtYmVyezOnbnVtYmVyJywKCQlpbnRl
1WVyezOna2L012dlcicsCgkJcGxha2LfdGVOdHs+JTRleHQn5AoJC2Vud2ZEPidlbnVtJywKCQlj
aGVjaZ=ibThEPidibW=s12FuJywKCQll1Gl0Y2Js1V=lbnVtezOn12RpdGFibGVf12LZbScsCgkJ
cmFka2=fYm=OezOncmFka28n5AoJC2ZZbHRpcGxlXWVud2ZEPidtd2x0aXBs1ScsCgkpPQoJbXkg
QHJldHVybj0KCXBZcWggQHJldHVybixuY2ZlezOjcmV053L+1GF0YSV+bmFt1SU=CglwdXNo67By
1XRZcmOsbGFi12xEPiNy1XQtPnLkYXRhJXL0aXRs1SU=CglwdXNo67By1XRZcmOsd2LpdHNEPiNy
1XQtPnLkYXRhJXLZbml0cyU=CglwdXNo67By1XRZcmOsdHlw1Xs+6WZhcHOjcmV053L+1GF0YSV+
1GF0YV=0eXBlJSU=CglteSAjanNvbiBE6GLldyBKU0=4PQoJa2Yo6CNy1XQtPnLkYXRhJXLkYXRh
XTRLcGUl6HsE6C=eKGVud20p6y8gKXOKCQlteSBAbGlzdD0KCQlteSAj1GF0YSBE6CNqcW=u53Lk
12Nv1GUo6TJldC0+fmRhdG7lfm=wdGlvbl=saXN0JSk=CgkJ1m=y12FjaCBteSAjaXRlbShAfiNk
YXRhJSl+CgkJCXBZcWggQGxpcTQsfmLhb2VEPiNpdGVt53L+bmFt1SUs1GlzcGxheV=uY2ZlezOj
aXRlbS0+fnRleHQlJ30KCQklCgkJcHVzaCBAcmV0dXJu5HBybTBlcnRLezL+CgkJCXRsXW1p12xk
ezLbbmFt1Xs+JTNjY2xhcics1GlzcGxheV=uY2ZlezOndGVOdCdd5AoJCQl0bF=WY2xZ1V=ma2Vs
1Hs+JWLhb2Un5AoJCQl0bF=kYXRhezLcQGxpcTQsCgkJJ30KCSUKC2VscWlmKCAjcmV053L+1GF0
YSV+1GF0YV=0eXBlJSBE4yAvXihl1Gl0Y2Js1V=lbnVtKSMv6Cl+CgkJbXkgQGxpcTQ=CgkJbXkg
6WRhdG7geyAjanNvbi0+1GVjbWRlKCNy1XQtPnLkYXRhJXLvcHRpbWLfbGlzdCUpPQoJC21vcmVh
YWggbXkg6Wl0120oQHOj1GF0YSUpfgoJCQlwdXNo67BsaXN05HLuY2ZlezOjaXRlbS0+fnRleHQl
J30KCQklCgkJcHVzaCBAcmV0dXJu5HBybTBlcnRLezL+CgkJCXRsXW1p12xkezLbbmFt1Xs+JTRl
eHQnXSwKCQkJdGxf1GF0YXs+X7BsaXN05AoJCSU=CgklCgllbHNp1igg6TJldC0+fmRhdG7lfmRh
dGFfdHlw1SUgezsg5ZOoYWhlYWtfYm=OKSMv6Cl+CgkJbXkgQGxpcTQ=CgkJbXkg6WRhdG7geyAj
anNvbi0+1GVjbWRlKCNy1XQtPnLkYXRhJXLvcHRpbWLfbGlzdCUpPQoJC21vcmVhYWggbXkg6Wl0
120oQHOj1GF0YSUpfgoJCQlwdXNo67BsaXN05HLuY2ZlezOjaXRlbS0+fnRleHQlJ30KCQklCgkJ
cHVzaCBAcmV0dXJu5HBybTBlcnRLezL+CgkJCXRsXWNvbHVtbnMgezOgMiwKCQkJdGxfbGlzdHs+
X7BsaXN05AoJCSU=CgklCgllbHNp1igg6TJldC0+fmRhdG7lfmRhdGFfdHlw1SUgezsg5ZOocmFk
a2=fYm=OKSMv6Cl+CgkJbXkgQGxpcTQ=CgkJbXkg6WRhdG7geyAjanNvbi0+1GVjbWRlKCNy1XQt
PnLkYXRhJXLvcHRpbWLfbGlzdCUpPQoJC21vcmVhYWggbXkg6Wl0120oQHOj1GF0YSUpfgoJCQlw
dXNo67BsaXN05CNpdGVt53L+bmFt1SVEPiNpdGVt53L+dGVOdCU=CgkJJQoJCXBZcWggQHJldHVy
bixwcm=w1XJ0eXs+fgoJCQl0bF=jbWxZb2Lz6Hs+cWNhbGFyK7BsaXN0KSwKCQkJdGxfbGlzdHs+
X7BsaXN05AoJCSU=CgklCgllbHNp1igg6TJldC0+fmRhdG7lfmRhdGFfdHlw1SUgezsg5ZOobXVs
dGlwbGVf12LZbSkj5yApfgoJC2ZL67BsaXN0PQoJC2ZL6CNkYXRh6Hsg6WpzbWOtPmRlYW=k1Sgj
cmV053L+1GF0YSV+bTB0a2=uXWxpcTQlK30KCQlmbTJlY2No6GZL6CNpdGVtK7B+6WRhdG7lKXOK
CQkJcHVzaCBAbGlzdCx+bmFt1Xs+6Wl0120tPnLuY2ZlJSxkaXNwbGFLXWLhb2VEPiNpdGVt53L+
dGVOdCUlPQoJCSUKCQlwdXNo67By1XRZcmOscHJvcGVydHlEPnOKCQkJdGxfYW=sd2ZucyBEPiAy
5AoJCQl0bF=saXN0ezLcQGxpcTQsCgkJJ30KCSUKCSQkCgly1XRZcmOgQHJldHVybj0KJQoKeWhl
Y2Qx67ZPV7hPRFMKCnto12FkMiAjSUtN53LCPGdldF=wcm=j1XNzXTN0YXRZczOo52pvYmLhb2VE
Pj8s5XBybWNlcTNfbmFt1Xs+PykKCntvdmVyCgpEaXRlbSAq67RlcWNyaXB0a2=uCgogJ4i4t+2P
luatpemqp4S/oeaBrwoKeWl0120gKiBQYXJhb2V01XJzCgpCPCZqbWJuY2ZlPiBEPiBzdHJpbmcg
4iDmlpnljEflk6TnpEDvv6wtam=ia2QgL5i46CZqbWJuY2ZlLb+FLpyJL5iAL5iqLaWYL1yoCgpb
Qjwtam=ia2Q+XSBEPiBpbnRlcmdlciAI64a2me2Pt0l7EEyMCgpCPCZwcm=j1XNzXWLhb2U+6Hs+
6HN0cmlu1yAI64atpemqp42QjeensAoKeWl0120gKiBS1XRZcmOKCiDmraXpqq3nirbmg6HkvIHm
ga/vv6zlpo5mnpzmraXpqq3ku6Tlr1jlnKjvv6zliJnovL3lmLLZbmRl1goKeWl0120gKiBFeGFt
cGxlCgpEYmFjawoKeWNZdApzd26g1WV0XTBybWNlcTNfcTRhdHVzfgoJbXkg6TNlbGYgeyBzaGlm
dD0KC2ZL6HZwYX6geyBAXz0KCXVubGVzcygg6TBhcnOtam=ia2Ql6Cl+CgkJa2Yo6TBhcnOtam=i
XWlkJSl+CgkJCSNwYXJ+52pvYmlkJSBE6CAjcGFyfiZqbWJfa2QlPQoJCSUKCQllbHNp1igjcGFy
fiZqbWJuY2ZlJSl+CgkJCSNwYXJ+52pvYmlkJSBE6CAjcWVs1i0+1WV0XWpvYl=p1CgjcGFyfiZq
bWJuY2ZlJSk=CgkJJQoJC2VscWlmKCNwYXJ+52pvYl=uY2ZlJSl+CgkJCSNwYXJ+52pvYmlkJSBE
6CAjcWVs1i0+1WV0XWpvYl=p1CgjcGFyfiZqbWJfbmFt1SUpPQoJCSUKCQllbHNp1igjcGFyfmpv
YiUpfgoJCQkjcGFyfiZqbWJp1CUgeyAg6TNlbGYtPmdldF=qbWJfa2Qo6TBhcnLqbW6lK30KCQkl
CgkJ12xza2Yo6TBhcnOtam=iJSl+CgkJCSNwYXJ+52pvYmlkJSBE6CAjcWVs1i0+1WV0XWpvYl=p
1CgjcGFyfiZqbW6lK30KCQklCgklCglZbmxlcTMo6CNwYXJ+5XBybWNlcTNfa2Ql6Cl+CgkJa2Yo
6CNwYXJ+5XBybWNlcTNfbmFt1SUgKXOKCQkJ6TBhcnOtcHJvYWVzcZ=p1CUgeyAjcWVs1i0+1WV0
XTBybWNlcTNfYnlfbmFt1SgjcGFyfiZwcm=j1XNzXWLhb2UlKS0+fmlkJ30KCQklCgkJ12xza2Yo
6CNwYXJ+cHJvYWVzcZ=uY2ZlJSApfgoJCQkjcGFyfiZwcm=j1XNzXWlkJSBE6CNz12xm53Ln1XRf
cHJvYWVzcZ=ieV=uY2ZlKCNwYXJ+cHJvYWVzcZ=uY2ZlJSktPnLp1CU=CgkJJQoJJQoJ6TBhcnOt
bTJk1X6l6HsgJWlk67RFU0Mn6HVubGVzcyAjcGFyfm=y1GVyJ30KC2ZL6CNmd2Lj6HsgJW1ZbmN0
a2=uK7FSRZYpfgoJCX1hciBkYiBE6GLldyBUUTFsUXVlcnl2MihUXZNR37N4VF=Q30=M5mdldFNx
b7RhdGFiYXNlKCkpPQoJCX1hciBkYXRh6Hsg1G6ucWVs12N032FwKHL0Y2Js13oicGRtXWpvYl=T
bTJr1mxvdy6s6G1p12xk4lsiKiJd5CBTaGVy13p+am=iXWlk4kFSRZ1b6iZqbWJp1CJd5HBybWNl
cTNfa2QIQVJHVlsi5XBybWNlcTNfa2QiXSUsbTJk1X6IQVJHVlsi52=y1GVy6l0lK30KCQly1XRZ
cmOgbmVT6FR7YXRhUmVzcG=ucWUo1G6ubGFzd7Vycm=yKCks6GRhdG7pPQoJJSc=CglteSAjcmV0
6Hsg6TNlbGYtPmNvb2ZhbmQo6CNmd2Lj5CB+52pvYmlkezOjcGFyfiZqbWJp1CUs5XBybWNlcTNf
a2REPiNwYXJ+5XBybWNlcTNfa2Ql5CZvcmRlcns+6TBhcnOtbTJk1X6lJSwgMSk=Cglp1iAo6TJl
dC0+fmVyclRleHQlKSB+CgkJcmV0dXJu6HOKCQkJ1XJyVGVOdCBEPiAjcmV053L+1XJyVGVOdCUs
CgkJC2VyckNv1GUgezOg6TJldC0+fmVyckNv1GUl5AoJCSU=CgklCgly1XRZcmOg6TJldC0+fmRh
dG7lPQolCgoxPQoKCg99
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment