Re: can you run 2 copies of Xy4 at once?

[cld@xxxxxxxx (Carl Distefano)]

Reply to note from Bill Troop  Sun, 03 Nov 2002
08:55:33 -0500

> Well, the moment has finally occurred: 9 open windows aren't
> enough for me. Can I safely run two copies of Xy4 in XP?

Why not? That's what multitasking OSes are for. I've done it in
OS/2 and NT; no problem.

A pitfall arises if the same file is open in both sessions. SAve
the file in one session and you may overwrite unSAved changes made
in the other. Several years ago I wrote a program that helps avoid
that. I haven't used it for a while, and never bothered adding it
to the public U2. Here it is, FWIW and as-is:

XPLeNCODE v2.0
b-gin [UNTITLED]
Open & Close Files for Use in Concurrent XyWrite Sessions[cr|
lf] -- C.L.Distefano rev. 6/5/98-A[cr|lf]For XyWrite 4 | XyW
rite for Windows[cr|lf] Running under any Multitasking OS[cr
|lf][cr|lf]Open[cr|lf]----[cr|lf]Displays a file in Read-Only
 mode if it is open in a[cr|lf]concurrent XyWrite session; ot
herwise CAlls the file[cr|lf][cr|lf]Usage:[cr|lf] OPEN[/#] [
filename][cr|lf] Optional command switch /# causes{032}
file to open in the specified[cr|lf] Display Type (100=eXPan
ded, 1=Draft, 2=PgLn, etc.)[cr|lf][cr|lf]Close[cr|lf]-----[cr
|lf]ABorts or STores a file opened in a concurrent XyWrite se
ssion[cr|lf]Use with frame Open is *mandatory*: Every file di
splayed with[cr|lf]Open *must* ABorted or STored with Close![
cr|lf][cr|lf]Usage:[cr|lf] CLOSE S[tore]|A[bort][cr
|lf][cr|lf]If argument is omitted, CLOSE will prompt you[cr|l
f]for the desired option.[cr|lf][cr|lf]For use by RENUMBER.PM
:[cr|lf]Default Save/Get range = 01-09[cr|lf]Renumber Open &{032}
Close (all frames together)[cr|lf] in PACK mode[cr|lf]Options
 (2): Freeze 50; Left$: % [cr|lf][cr|lf]{{;5GetFileList}} Fet
ch file list (as S/G 05) for Open and Close [CLD rev.2/16/01]
[cr|lf]{002}{<}SX01,{<}VADR{>}+"OPENCLOS.TMP"{>}[BX_]exist {<
}PV01{>}[Q2_]{<}IF{<}ER{>}{>}{<}SV02,[cr|lf]{>}[BX_]sa %02,{<
}PV01{>}[Q2_]{<}IF{<}ER{>}{>}{<}LBa{>}{<}SX03,{<}VA$ER{>}{>}{
<}SX03,"{<}VA\"+{<}IS03{>}+"{>}"{>}{<}SX03,{<}PV03{>}{>}{<}PR
@03{>}{<}EX1{>}{<}EI{>}{<}EI{>}[BX_]wait[Q2_]{<}SX50,"05,"+{<
}IS01{>}{>}[JM_]2.SVfile[Q2_]{<}IF{<}VA|05{>}<2{>}{<}SV05,[cr
|lf]{>}{<}EI{>}{002}[cr|lf][cr|lf]{{;5open,open/#*}} CAll|REa
d file in concurrent Xy session [CLD][cr|lf]{002}{<}SX00,{<}I
S50{>}{>}[XH_][BX_]es 1[Q2_]{<}IF{<}VA$WA{>}<1{>}{<}PRNo wind
ow{>}{<}EX{>}{<}EI{>};*;[cr|lf]{<}SX03,{<}IS00{>}{>}{<}IF{<}V
A$WS{>}+{<}VA$TX{>}>2{>}{<}SX03,{<}VA$DR{>}{>}{<}EI{>}{<}
IF{<}VA|03{>}<1{>}{<}PR\414{>}{<}EX{>}{<}EI{>}{<}SX08,{<}IS03
{>}{>}{<}IF{<}IS03{>}{240}":"{>}{<}SX03,{<}VA@03:2{>}{>}{<}EI
{>}{<}LBb{>}{<}IF{<}IS03{>}{240}"\"{>}{<}SV01,\{>}{<}XS03,01,
02,,04{>}{<}SX03,{<}IS04{>}{>}{<}GLb{>}{<}EI{>}{<}SX03,@upr({
<}IS03{>}){>}{<}SX09,{<}VA$FR{>}{>}{<}SX09,{<}VA@09/2{>}{>}{<
}IF{<}IS09{>}=="0"{>}{<}SX09,100{>}{<}EI{>};*;[cr|lf];*;[cr|l
f][JM_]2.GetFileList[Q2_];*; <== Loads list of open files to{032}
S/G 05[cr|lf];*;[cr|lf][BX_]gofile {<}PV08{>}[Q2_]{<}IF@not({
<}ER{>}){>}{<}IF("[cr|lf]"+{<}IS03{>}+"[cr|lf]"){238}{<}IS05{
>}<0{>}{<}GLd{>}{<}EI{>}{<}GLf{>}{<}EI{>}{<}SV02,ca{>}{<}LB {
<}IF{<}IS05{>}{240}("[cr|lf]"+{<}IS03{>}+"[cr|lf]"){>}{<}SV02
,re{>}{<}EI{>}{>}[BX_]{<}PV02{>}{<}IF{<}VA|09{>}>0{>}/{<}PV09
{>}{<}EI{>} {<}PV08{>}[Q2_]{<}IF{<}ER{>}{>}{<}LBc{>}{<}SX03,{
<}VA$ER{>}{>}{<}SX03,"{<}VA\"+{<}IS03{>}+"{>}"{>}{<}SX03,{<}P
V03{>}{>}{<}PR@03{>}{<}EX1{>}{<}EI{>}[BX_]wait[Q2_];*;[cr|lf]
{<}IF{<}VA$RE{>}>0{>}{<}GLe{>}{<}EI{>}{<}LBd{>}{<}SX05,{<}IS0
5{>}+{<}VA$FI{>}+"[cr|lf]"{>}{<}LBe{>}[BX_]sa %05,{<}PV01{>}[
Q2_]{<}IF{<}ER{>}{>}{<}GLc{>}{<}EI{>}[BX_]wait[Q2_]{<}LBf{>}{
<}SX03,{<}VA$MG{>}{>}{<}PR@03{>}{<}EX{>}{002}[cr|lf][cr|lf]{{
;5close}} ABort|STore file in concurrent Xy session [CLD][cr|
lf]{002}{<}SX00,{<}IS50{>}{>}{<}IF{<}VA$WS{>}<>1{>}{<}PRNo fi
le{>}{<}EX{>}{<}EI{>}{<}SX03,{<}IS00{>}{>}{<}IF{<}VA|03{>}<1{
>}{<}IF{<}VA$MO{>}<1{>}{<}GLg{>}{<}EI{>}{<}PR|ABandon changes
? (y|n){>}{<}SX03,{<}RK{>}{>}{<}IF{<}VA$KC{>}==21{>}{<}LBg{>}
{<}SV03,A{>}{<}GLh{>}{<}EI{>}{<}SV03,S{>}{<}EI{>}{<}LBh{>}{<}
SV08,ab/nv{>}{<}IF"S"{238}@upr({<}IS03{>})==0{>}{<}SV08,st{>}
{<}EI{>}{<}SX03,"[cr|lf]"+{<}VA$FI{>}+"[cr|lf]"{>}{<}SX09,{<}
VA$RE{>}{>}[BX_]{<}PV08{>}[Q2_]{<}IF{<}ER{>}{>}{<}LBi{>}{<}SX
03,{<}VA$ER{>}{>}{<}SX03,"{<}VA\"+{<}IS03{>}+"{>}"{>}{<}SX03,
{<}PV03{>}{>}{<}PR@03{>}{<}EX1{>}{<}EI{>};*;[cr|lf];*;[cr|lf]
{<}IF{<}PV09{>}<1{>}[JM_]2.GetFileList[Q2_];*;[cr|lf];*;[cr|l
f]{<}IF{<}IS05{>}{240}{<}IS03{>}{>}{<}SV02,{>}{<}XS05,03,08,,
02{>}{<}SX05,{<}IS08{>}+"[cr|lf]"+{<}IS02{>}{>}{<}EI{>}[BX_]s
a %05,{<}PV01{>}[Q2_]{<}IF{<}ER{>}{>}{<}GLi{>}{<}EI{>}[BX_]wa
it[Q2_]{<}EI{>}{<}SX03,{<}VA$MG{>}{>}{<}PR@03{>}{<}EX{>}{002}
[cr|lf][cr|lf]
-nd
XPLeNCODE

--
Carl Distefano
cld@xxxxxxxx
http://users.datarealm.com/xywwweb/