%
% Mosaicer - mosaic 2 phase product driver
%
% first phase is to fill the number of sockets past
% the first socket with angled inserts of the first socket
%
% for product 1
%
% stack: continue prod-type sockets
%
!Xhead.Sockets
!Xhead.ProdType
!Xhead.Cont

"Psm.png" ofxact
"xact1\Psm.png" ofsnap
copyfile

"
function XactSrc()
{
 SourceImage = [ " "Psm.png" ofxact tojsquo & &", ] ;
 SourceText = [ " _Shooter.Caption *textjsxr & &"
 ];
 MaxOrdinal = " 
 _Xhead.Sockets + & &";
 Xact = " xact quoter & &";
 SourcePath = " empty oftem jsfend
 &" TargetPath = " empty ofxact jsfend
 &" Coloring = '"
 &_Shooter.Color
 &"';
 ProdType = '"
 &_Xhead.ProdType
 &"';
 OriginalLet = '" _Shooter.Twi & &"';
 OriginalNum = " _Shooter.Tem quoter & &";
 Template = SourcePath + "
 _Xhead.ProdType *mosaiceq
"++++Template" log)(
 psd quoter & &';
 Backgr = SourcePath + "Backs/" + '
 _Shooter.Tem "-" right$ png quoter & jsend
%
% additional inside XactSrc settings created here
%
&_Shooter.InSrc
&"
}
"
%
% additional settings outside XactSrc created here
%
&_Shooter.ExSrc
dup "XactSrc" jsx!desk
"XactSr" &_Xhead.ProdType jsx!desk

"//+Mosaid
//*

Mosaic('" &_Xhead.Cont &"', " &_Xhead.Sockets jspend

*phocperf