１）データ欄の囲み線を破線ではなく実線ににしたいです。
２）印刷文字を、Osaka−等幅に変更したいです。
３）Rmksに常に相手方のお名前が入るように又は、お名前がわからない時の
　　印刷をしたいです。Rｍｋｓが空欄になる事が有ります。
４）交信証明の印の印刷で、移動先等が無い時ジャンプできません。
　　と出て連続印刷が止まります。交信証明印をQSL PSEの下に印字したいです。
5)その他アイデアが有れば、教えてください。

以上よろしくお願いします。

#SetXY x, y
#FontName="ＭＳ ゴシック"
#FontSize=9
#FontColor=0x00000000
#FontStyle=0
#SetXY x, y

; 既成の白紙カードに直接印刷する by JG1MOU
#SetXY -40, -30
#FontName="Osaka−等幅"
#FontSize=13
#FontColor=0
#FontStyle=3
#Print 80, 80, "To Radio"
#FontName="Osaka−等幅"
#FontSize=9
#FontColor=0x00000000
#FontStyle=0
#FontName="Osaka−等幅"
#FontSize=14
#FontStyle=0
#Print 90, 150, "!cp"; To Radio
#LineS 1, 0, 0
#LineX 50, 200, 270; To Radioにアンダーラインを引く
#Mark = "*"
#LineS 2, 0, 255; JARL転送枠
#LineR 395, 112, 465, 205
#LineR 485, 112, 555, 205
#LineR 575, 112, 645, 205
#LineR 665, 112, 735, 205
#LineR 755, 112, 825, 205
#LineR 845, 112, 915, 205
#FontSize = 20
#Print 394, 125, "!C1"; JARL転送枠１文字目
#Print 484, 125, "!C2"
#Print 574, 125, "!C3"
#Print 664, 125, "!C4"
#Print 754, 125, "!C5"
#Print 844, 125, "!C6"

#FontName="ＭＳ 明朝"
#FontSize=10
#FontColor=0
#FontStyle=2
? Potbl ;ポータブルか否か
#Print 10,210, "運用地!cp!QT" ;コールサイン／エリア 移動地

#Print 10, 250, "Confirming Our QSO"
#FontName="ＭＳ ゴシック"
#FontSize=11
#FontColor=0
#FontStyle=0,
#LineS, 1, 0,
#LineR 8, 290, 960, 450,
#LineX 8, 350, 955,
#Print 140, 300, "Date"
#Print 416, 300, "Time"
#Print 560, 300, "RST"
#Print 680, 300, "MHz"
#Print 850, 300, "2Way"
#LineS, 1, 0
#LineY 155, 350, 100,
#LineY 285, 350, 100,
#LineY 390, 290, 160,
#LineY 530, 290, 160,
#LineY 640, 290, 160,
#LineY 840, 290, 160,

#FontName="Century Oldstyle Bold"
#FontSize=7
#Print 30, 350, "Year"
#Print 173, 350, "Month"
#Print 300, 350, "Day"
? UTC!
#Print 405,350,"JST"
? UTC
#Print 405,350,"UTC"

#FontName="ＭＳ 明朝"
#FontSize=12
#FontColor=0
#FontStyle=0
#Print 45, 390, "!DY"; 年 97
#Print 190, 390, "!DJ"; 月 Apr.
#Print 320, 390, "!Dd"; 日 14
#Print 410, 390, "!TH:!TM"; 時間 08:30
#Print 555, 390, "!HR" ; RST
#Print 655, 390, "!Fr" ; 周波数帯
#Print 850, 390, "!MD" ; モード
#LineS, 1, 0,
#FontName="ＭＳ 明朝"
#FontSize=11
#FontColor=0
#FontStyle=2

#Print 20, 460, "Rig: !RG" ;リグ
#Print 680, 460, "INPUT !Pw W" ;入力
? Space! "!Hi"
#Print 20, 510, "Ant: !HimH !AN" ;アンテナ
? Space "!Hi"
#Print 20, 510, "Ant: !AN" ;アンテナ

#Print 20, 564, "Rmks: "
#Print 80, 625, "!Co"
#Print 200, 690, "QSL#:!NO"; QSL No.印刷

? Rcv! ;ＱＳＬカードの送受
#Print 600, 690, "QSL PSE"; QSL Pse
? Rcv
#Print 600, 690, "QSL TNX"; QSL Tnx

#Print 315, 950, "by Turbo HAMLOG/Win !Vr"

#FontName="MS ゴシック"
#FontSize=42
#FontColor=8421504
#FontStyle=0
#PrintL 20, 860, 10,"JF1AWS" ; コールサイン全角で入力
#FontColor=16711680
#PrintL 10, 850, 10,"JF1AWS" ; コールサインの影文字全角で入力

#FontName="ＭＳ Ｐ明朝"
#FontSize=14
#FontColor=255
#FontStyle=0

#Print 0, 1080, "CQ Zone:25 ITU Zone:45 IOTA Zone:AS007"
#Print 200, 1020, "天満　道文"
#Print 0, 1140, "GL:PM95UT JCC#1324 Toda-City Saitama" ;QTH

? Space "!R2"; Remarks２に%移動先%が無かったらジャンプ
#Goto *99
#FontColor=0
#FontSize=12
#Print 20, 1180, "--------------------------------------------"
#FontSize=13
#Print 25, 1260, "!R2"
*99; ジャンプ先

? Space "!R1"; Remarks１に%移動先%が無かったらジャンプ
#Goto *100
#FontColor=0
#FontSize=12
#Print 20, 1180, "--------------------------------------------"
#FontSize=13
#Print 25, 1220, "!R1 "

?RmStr "1st"
?Name　　　　　　　　　　　　　　　　　　　　　　　；1stQSOの時で名前が有る時
#goto *120 　　　　　　　　　 　　　　　　　　　　　　　　
?RmStr"1st"
?Name!　　　　　　　　　　　　　　　　　　　　　　　1stQSOの時で名前が無い時
#Print 150,560,"1st QSO TNX CU AGN"
#goto *121
*120
#Print 150,560, "!NA 様　1st QSO TNX CU AGN"
*121

?RmStr"1st" ;1stQSOで無い時
#Goto *123
#FontColor=0x00000000
?RmStr! "1st"
?Name　　　　　　　　　　　　　　　　　　　　　　　；名前が有る時
#Goto *81
?RmStr!"1st"
?Name!　　　　　　　　　　　　　　　　　　　　　　；名前が無い時
#Goto *80
*81
#Print 150, 560, "!NA 様 FB QSO TNX CU AGN"
#Goto *122
*80
#Print 150,560,"FB QSO TNX CU AGN"
*122
*123
#LineS 1, 0, 255 　　　　　　　　　　　　　　　　　　;交信証明の印
#LineC 713,1218, 858, 1363, 145,145
#FontName="ＭＳ 明朝"
#FontSize=8
#FontColor=255
#FontStyle=1
#Print 720,1253, "ア"
#Print 730,1236, "マ"
#Print 750,1229, "チ"
#Print 766,1225, "ュ"
#Print 785,1225, "ア"
#FontSize=6
#Print 789,1226, ""
#Print 809,1237, "無"
#Print 822,1260, "線"
#FontSize=7
#Print 729,1307, "交"
#Print 755,1328, "信"
#Print 786,1328, "証"
#Print 815,1307, "明"
#FontSize=6
#FontColor=25591
#Print 763,1252, "局"
#Print 787,1252, "長"
#Print 763,1306, "之"
#Print 787,1306, "印"
#FontSize=10
#FontColor=255
#FontStyle=1
#Print 727,1273, "JF1AWS"

【2017/03/29(Wed) 03:15:00 投稿者により修正されました。】

> １）データ欄の囲み線を破線ではなく実線ににしたいです。

> ４）交信証明の印の印刷で、移動先等が無い時ジャンプできませんと出て連続印刷が止まります。
> 　　交信証明印をQSL PSEの下に印字したいです。
●これらに関して、下記ではいかがですか。

; 既成の白紙カードに直接印刷する by JG1MOU
#SetXY -40, -30
#FontName="Osaka−等幅"
#FontSize=14
#FontStyle=0
#Print 90, 150, "!cp"; To Radio
#LineS 1, 0, 0
#LineX 50, 200, 270; To Radioにアンダーラインを引く
#Mark = "*"
#LineS 2, 0, 255; JARL転送枠
#LineR 395, 112, 465, 205
#LineR 485, 112, 555, 205
#LineR 575, 112, 645, 205
#LineR 665, 112, 735, 205
#LineR 755, 112, 825, 205
#LineR 845, 112, 915, 205
#FontSize = 20
#Print 394, 125, "!C1"; JARL転送枠１文字目
#Print 484, 125, "!C2"
#Print 574, 125, "!C3"
#Print 664, 125, "!C4"
#Print 754, 125, "!C5"
#Print 844, 125, "!C6"

#FontName="ＭＳ 明朝"
#FontSize=10
#FontColor=0
#FontStyle=2
? Potbl ;ポータブルか否か
#Print 10,210, "運用地!cp!QT" ;コールサイン／エリア 移動地

#Print 10, 250, "Confirming Our QSO"
#FontName="ＭＳ ゴシック"
#FontSize=11
#FontColor=0
#FontStyle=0,
#LineS 1, 0, 0
#LineR 8, 290, 960, 450
#LineX 8, 350, 955
#Print 140, 300, "Date"
#Print 416, 300, "Time"
#Print 560, 300, "RST"
#Print 680, 300, "MHz"
#Print 850, 300, "2Way"
#LineS 1, 0 ,0
#LineY 155, 350, 100,
#LineY 285, 350, 100,
#LineY 390, 290, 160,
#LineY 530, 290, 160,
#LineY 640, 290, 160,
#LineY 840, 290, 160,

#FontName="Century Oldstyle Bold"
#FontSize=7
#Print 30, 350, "Year"
#Print 173, 350, "Month"
#Print 300, 350, "Day"
? UTC!
#Print 405, 350,"JST"
? UTC
#Print 405, 350,"UTC"

#FontName="ＭＳ 明朝"
#FontSize=12
#FontColor=0
#FontStyle=0
#Print 45, 390, "!DY"; 年 97
#Print 190, 390, "!DJ"; 月 Apr.
#Print 320, 390, "!Dd"; 日 14
#Print 410, 390, "!TH:!TM"; 時間 08:30
#Print 555, 390, "!HR" ; RST
#Print 655, 390, "!Fr" ; 周波数帯
#Print 850, 390, "!MD" ; モード
#LineS, 1, 0,
#FontName="ＭＳ 明朝"
#FontSize=11
#FontColor=0
#FontStyle=2

#Print 20, 460, "Rig: !RG" ;リグ
#Print 680, 460, "INPUT !Pw W" ;入力
? Space! "!Hi"
#Print 20, 510, "Ant: !HimH !AN" ;アンテナ
? Space "!Hi"
#Print 20, 510, "Ant: !AN" ;アンテナ

#Print 20, 564, "Rmks: "
#Print 80, 625, "!Co"
#Print 200, 690, "QSL#:!NO"; QSL No.印刷

? Rcv! ;ＱＳＬカードの送受
#Print 600, 690, "QSL PSE"; QSL Pse
? Rcv
#Print 600, 690, "QSL TNX"; QSL Tnx

#Print 315, 950, "by Turbo HAMLOG/Win !Vr"

#FontName="MS ゴシック"
#FontSize=42
#FontColor=8421504
#FontStyle=0
#PrintL 20, 860, 10,"JF1AWS"
#FontColor=16711680
#PrintL 10, 850, 10,"JF1AWS"
#FontName="ＭＳ Ｐ明朝"
#FontSize=14
#FontColor=255
#FontStyle=0

#Print 0, 1080, "CQ Zone:25 ITU Zone:45 IOTA:AS007" ; Zone削除
#Print 200, 1020, "天満　道文"
#Print 0, 1140, "GL:PM95UT JCC#1324 Toda-City Saitama" ;QTH

? Space "!R2"; Remarks２に%移動先%が無かったらジャンプ
#Goto *99
#FontColor=0
#FontSize=12
#Print 20, 1180, "--------------------------------------------"
#FontSize=13
#Print 25, 1260, "!R2"
*99; ジャンプ先

? Space "!R1"; Remarks１に%移動先%が無かったらジャンプ
#Goto *100
#FontColor=0
#FontSize=12
#Print 20, 1180, "--------------------------------------------"
#FontSize=13
#Print 25, 1220, "!R1 "
*100

?RmStr "1st"
?Name　　　　　　　　　　　　　　　　；1stQSOの時で名前が有る時
#goto *120 　　　　　　　　　 　　　　　　　　　　　　　　
?RmStr"1st"
?Name!　　　　　　　　　　　　　　　　；1stQSOの時で名前が無い時
#Print 150, 560,"1st QSO TNX CU AGN"
#Goto *121
*120
#Print 150, 560, "!NA 様　1st QSO TNX CU AGN"
*121

?RmStr"1st" ;1stQSOで無い時
#Goto *123
#FontColor=0x00000000
?RmStr! "1st"
?Name　　　　　　　　　　　　　　　　　　　　　　　；名前が有る時
#Goto *81
?RmStr!"1st"
?Name!　　　　　　　　　　　　　　　　　　　　　　；名前が無い時
#Goto *80
*81
#Print 150, 560, "!NA 様 FB QSO TNX CU AGN"
#Goto *122
*80
#Print 150, 560,"FB QSO TNX CU AGN"
*122
*123


#Mov $$A = "JF1AWS" ; 自局コールサイン（ここを書き換える）
#Mov $$B = "JUN"; 自局のハンドルネーム（ここを書き換える）
#Mov $$X = 650 ; 印章の左端（ここを書き換える）
#Mov $$Y = 800 ; 印章の上端（ここを書き換える）
---------------------------
#LineS 1, 0, 255 　　　　　　　　　　　　　　　　　　;交信証明の印
#LineC $$X-7, $$Y-35, $$X+138, $$Y+110, 145, 145
#FontName="ＭＳ 明朝"
#FontSize=8
#FontColor=255
#FontStyle=1
#Print $$X+0 , $$Y-0, "ア"
#Print $$X+10, $$Y-17, "マ"
#Print $$X+30, $$Y-24, "チ"
#Print $$X+46, $$Y-28, "ュ"
#Print $$X+65, $$Y-28, "ア"

#FontSize=6
#Print $$X+69, $$Y-27, ""
#Print $$X+89, $$Y-16, "無"
#Print $$X+102, $$Y+7, "線"
#FontSize=7
#Print $$X+9, $$Y+54, "交"
#Print $$X+35, $$Y+75, "信"
#Print $$X+66, $$Y+75, "証"
#Print $$X+95, $$Y+54, "明"
#FontSize=6
#FontColor=25591
#Print $$X+43, $$Y-1, "局"
#Print $$X+67, $$Y-1, "長"
#Print $$X+43, $$Y+53, "之"
#Print $$X+67, $$Y+53, "印"
#FontSize=10
#FontColor=255
#FontStyle=1
#Print $$X+7, $$Y+20, "JF1AWS"
;

【2017/03/29(Wed) 14:52:33 投稿者により修正されました。】

> ３）Rmksに常に相手方のお名前が入るように又は、お名前がわからない時の
> 　　印刷をしたいです。Rｍｋｓが空欄になる事が有ります。

Remarks1あるいはRemarks2に”１ｓｔ”の記述が抜けているのでは。

> > ３）Rmksに常に相手方のお名前が入るように又は、お名前がわからない時の
> > 　　印刷をしたいです。Rｍｋｓが空欄になる事が有ります。
>
> Remarks1あるいはRemarks2に”１ｓｔ”の記述が抜けているのでは。

色々とお手数かけ有難うございました。
左上のTo Radio が印刷できません。
印刷位置補正で#SetXY -40, -30とすると、相手局のコールサインが
何故か２つとも赤文字で印刷されてしまいます。
宜しくお願い致します。

> 左上のTo Radio が印刷できません。
#FontSize=13
#FontColor=0
#FontStyle=3
#Print 80, 80, "To Radio"
を追加してください。

; 既成の白紙カードに直接印刷する by JG1MOU
#SetXY 10, -30
#FontName="Osaka−等幅"
#FontSize=13
#FontColor=0
#FontStyle=3
#Print 80, 80, "To Radio"
#FontSize=14
#FontStyle=0
#Print 90, 150, "!cp"; To Radio
、
、
、
、

> 印刷位置補正で#SetXY -40, -30とすると、相手局のコールサインが何故か２つとも赤文字で印刷されてしまいます。
・こちらでは再現しませんが、#FontColor=0 が抜けていた性かも知れません。
上の『左上のTo Radio が印刷できません』の件で #FontColor=0 を追加したのでそれで確認お願いします。

【2017/03/29(Wed) 20:51:30 投稿者により修正されました。】

> > 左上のTo Radio が印刷できません。
> #FontSize=13
> #FontColor=0
> #FontStyle=3
> #Print 80, 80, "To Radio"
> を追加してください。
>
> ; 既成の白紙カードに直接印刷する by JG1MOU
> #SetXY 10, -30
> #FontName="Osaka−等幅"
> #FontSize=13
> #FontColor=0
> #FontStyle=3
> #Print 80, 80, "To Radio"
> #FontSize=14
> #FontStyle=0
> #Print 90, 150, "!cp"; To Radio
> 、
> 、
> 、
> 、
>
> > 印刷位置補正で#SetXY -40, -30とすると、相手局のコールサインが何故か２つとも赤文字で印刷されてしまいます。
> ・こちらでは再現しませんが、#FontColor=0 が抜けていた性かも知れません。
> 上の『左上のTo Radio が印刷できません』の件で #FontColor=0 を追加したので
それで確認お願いします。

お世話になっております。
転送枠内でOsaka-等幅にすると斜体文字によっては、はみ出してしまうので
下記のようにさせていただきました。
; 既成の白紙カードに直接印刷する by JG1MOU
#SetXY -40, -30
#FontName="ＭＳ ゴシック"
#FontSize=14
#FontColor=0
#FontStyle=1
#FontSize=13
#FontColor=0
#FontStyle=1
#Print 80, 80, "To Radio"
#Print 90, 150, "!cp"; To Radio
#LineS 1, 0, 0
#LineX 50, 200, 270; To Radioにアンダーラインを引く

尚MHz欄でイメージでは、1295.040と表示されるのですが、印刷すると1295.04 0や
144.295が14 4. 295 の様に又、
QSL#3064 4の様に隙間が開いて印刷されてしまいます。
直すすべを、ご教授ねがいます。

> 転送枠内でOsaka-等幅にすると斜体文字によっては、はみ出してしまうので
> 下記のようにさせていただきました。

・それは下記でも同じ結果になるはずです。
; 既成の白紙カードに直接印刷する by JG1MOU
#SetXY -40, -30
#FontName="ＭＳ ゴシック"
#FontSize=13
#FontColor=0
#FontStyle=1
#Print 80, 80, "To Radio"
#Print 90, 150, "!cp"; To Radio
#LineS 1, 0, 0
#LineX 50, 200, 270; To Radioにアンダーラインを引く

> 隙間が開いて印刷されてしまいます。
・考えてみます。

【2017/03/30(Thu) 20:18:47 投稿者により修正されました。】

> > 隙間が開いて印刷されてしまいます。
> ・考えてみます。

これで如何でしょうか。
#FontName="Osaka"
#FontSize=10
#FontColor=0
#FontStyle=0
#Print 45, 390, "!DY"; 年 97
#Print 190, 390, "!DJ"; 月 Apr.
#Print 320, 390, "!Dd"; 日 14
#Print 410, 390, "!TH:!TM"; 時間 08:30
#Print 555, 390, "!HR" ; RST
#Print 655, 390, "!Fr" ; 周波数帯
#Print 850, 390, "!MD" ; モード

> > > 隙間が開いて印刷されてしまいます。
> > ・考えてみます。
>
> これで如何でしょうか。
> #FontName="Osaka"
> #FontSize=10
> #FontColor=0
> #FontStyle=0
> #Print 45, 390, "!DY"; 年 97
> #Print 190, 390, "!DJ"; 月 Apr.
> #Print 320, 390, "!Dd"; 日 14
> #Print 410, 390, "!TH:!TM"; 時間 08:30
> #Print 555, 390, "!HR" ; RST
> #Print 655, 390, "!Fr" ; 周波数帯
> #Print 850, 390, "!MD" ; モード

大変お手数をおかけしまして有難うございました。
周波数も必要数きっちりと印刷できました。
特定のカード印刷（試し刷り）だけQSL#3064 4(Osaka-等幅文字）一桁空白になりますが、
連続印刷をしてみて再発するか、結果をお知らせ出来ればと思います。

> > > > 隙間が開いて印刷されてしまいます。

> 特定のカード印刷（試し刷り）だけQSL#3064 4(Osaka-等幅文字）一桁空白になりますが、
> 連続印刷をしてみて再発するか、結果をお知らせ出来ればと思います。

・Osaka-等幅　では潜在的にこの問題がありそうですので、他のフォントをお勧めします。
　例えば　#FontName="Osaka" ならば今の所は良さそうです。

> > > > > 隙間が開いて印刷されてしまいます。
>
> > 特定のカード印刷（試し刷り）だけQSL#3064 4(Osaka-等幅文字）一桁空白になりますが、
> > 連続印刷をしてみて再発するか、結果をお知らせ出来ればと思います。
>
> ・Osaka-等幅　では潜在的にこの問題がありそうですので、他のフォントをお勧めします。
> 　例えば　#FontName="Osaka" ならば今の所は良さそうです。

有難う御座います。
ITU Zone:4 5とLog入力Rmks1で%固定埼玉43%としたものが固定埼玉4 3と
一桁空白が印刷されるのが、気になりますがその他は、
問題なく連続印刷出来ました。

有難う御座いました。自己解決できました。