;-------- 変数を使って交信データ欄を任意の場所に表示 By JS1BRX #Size 1024,652,0x00E3F1FF ;hQSLのサイズと背景色を指定 ;----------- 基準 --------- #Mov $$X=0 #Mov $$Y=0 ;★★★ 交信データ欄表示色設定 #FillBox $$X+0, $$Y+0,510,80, 0x00FFFFFF ;データ項目欄全体の塗りつぶし 白 #FillBox $$X+0, $$Y+0,510,23, 0x00FFFFAA ;データ項目欄の塗りつぶし 水色 ;★★★ 交信データ欄枠組み #LineS 1,0,0x004F4F00 #LineR $$X+0, $$Y+0,$$X+510,$$Y+80 ;データ欄枠組 ;date #LineY $$X+141, $$Y+0, 80 ;縦罫線 ;time #LineY $$X+215, $$Y+0, 80 ;縦罫線 ;rs #LineY $$X+325, $$Y+0, 80 ;縦罫線 ;band #LineY $$X+435, $$Y+0, 80 ;縦罫線 ;mode #LineX $$X+0, $$Y+23, 510 ;★★★ データ欄見出し #FontSize=11 #FontStyle=0 #Print $$X+5, $$Y+5, "DATE" ;交信年月日 #Print $$X+146, $$Y+5, "TIME" ;交信開始時刻 #Mov $$D = "FT8,FT4,JT65,JT9" ;デジタルモード ? nData7 "!$$D" ;デジタルの場合 #Print $$X+220, $$Y+5,"dB" #Mov $$B="dB" #Goto *456 ? End ? nData7 "CW" ;電信の場合 #Print $$X+220, $$Y+5,"RST" #Mov $$B="RST" #Goto *456 ? End ? nData7 "DR" ;D-STAR DR Mode #Print $$X+220, $$Y+5,"MERIT" #Mov $$B="MERIT" #Goto *456 ? End #Print $$X+220, $$Y+5,"RS" ;FM SSB D-STAR DV Mode #Mov $$B="RS" *456 #Print $$X+331, $$Y+5, "BAND/freq" ;運用帯/運用周波数    #Print $$X+441, $$Y+5, "MODE" ;モード ;★★★ 通信データ欄の補助項目 #FontSize=12 #FontStyle=2 #FontColor=0x00000000 #PrintC $$X+0,$$Y+25,141, "Year/!DJ/Day" #PrintC $$X+215,$$Y+25,110, "Your/My" #PrintR $$X+429,$$Y+25, "MHz" #PrintR $$X+504,$$Y+25, "2Way" ? UTC! #PrintR $$X+212, $$Y+25, "(JST)" ? UTC #PrintR $$X+212, $$Y+25, "(UTC)" ? End ;★★★ 交信データ #FontSize=17 #FontColor=0x00000000 #FontStyle=1 #PrintC $$X+0,$$Y+55,145, "!DY/!DM/!DD" ;年月日 #PrintC $$X+143,$$Y+55,72, "!TH:!TM" ;交信開始時刻 #PrintC $$X+215,$$Y+55,110, "!HR/!MR" ;信号強度等 #PrintC $$X+325,$$Y+55,110, "!F8" ;運用周波数帯 #PrintC $$X+435,$$Y+55,75, "!MD" ;電波形式 ;----------- シフト1 --------- #Mov $$X=185 #Mov $$Y=250 ;★★★ 交信データ欄表示色設定 #FillBox $$X+0, $$Y+0,510,80, 0x00FFFFFF ;データ項目欄全体の塗りつぶし 白 #FillBox $$X+0, $$Y+0,510,23, 0x00FFFFAA ;データ項目欄の塗りつぶし 水色 ;★★★ 交信データ欄枠組み #LineS 1,0,0x004F4F00 #LineR $$X+0, $$Y+0,$$X+510,$$Y+80 ;データ欄枠組 ;date #LineY $$X+141, $$Y+0, 80 ;縦罫線 ;time #LineY $$X+215, $$Y+0, 80 ;縦罫線 ;rs #LineY $$X+325, $$Y+0, 80 ;縦罫線 ;band #LineY $$X+435, $$Y+0, 80 ;縦罫線 ;mode #LineX $$X+0, $$Y+23, 510 ;★★★ データ欄見出し #FontSize=11 #FontStyle=0 #Print $$X+5, $$Y+5, "DATE" ;交信年月日 #Print $$X+146, $$Y+5, "TIME" ;交信開始時刻 #Mov $$D = "FT8,FT4,JT65,JT9" ;デジタルモード ? nData7 "!$$D" ;デジタルの場合 #Print $$X+220, $$Y+5,"dB" #Mov $$B="dB" #Goto *456 ? End ? nData7 "CW" ;電信の場合 #Print $$X+220, $$Y+5,"RST" #Mov $$B="RST" #Goto *456 ? End ? nData7 "DR" ;D-STAR DR Mode #Print $$X+220, $$Y+5,"MERIT" #Mov $$B="MERIT" #Goto *456 ? End #Print $$X+220, $$Y+5,"RS" ;FM SSB D-STAR DV Mode #Mov $$B="RS" *456 #Print $$X+331, $$Y+5, "BAND/freq" ;運用帯/運用周波数    #Print $$X+441, $$Y+5, "MODE" ;モード ;★★★ 通信データ欄の補助項目 #FontSize=12 #FontStyle=2 #FontColor=0x00000000 #PrintC $$X+0,$$Y+25,141, "Year/!DJ/Day" #PrintC $$X+215,$$Y+25,110, "Your/My" #PrintR $$X+429,$$Y+25, "MHz" #PrintR $$X+504,$$Y+25, "2Way" ? UTC! #PrintR $$X+212, $$Y+25, "(JST)" ? UTC #PrintR $$X+212, $$Y+25, "(UTC)" ? End ;★★★ 交信データ #FontSize=17 #FontColor=0x00000000 #FontStyle=1 #PrintC $$X+0,$$Y+55,145, "!DY/!DM/!DD" ;年月日 #PrintC $$X+143,$$Y+55,72, "!TH:!TM" ;交信開始時刻 #PrintC $$X+215,$$Y+55,110, "!HR/!MR" ;信号強度等 #PrintC $$X+325,$$Y+55,110, "!F8" ;運用周波数帯 #PrintC $$X+435,$$Y+55,75, "!MD" ;電波形式 ;----------- シフト2 --------- #Mov $$X=185 #Mov $$Y=450 ;★★★ 交信データ欄表示色設定 #FillBox $$X+0, $$Y+0,510,80, 0x00FFFFFF ;データ項目欄全体の塗りつぶし 白 #FillBox $$X+0, $$Y+0,510,23, 0x00FFFFAA ;データ項目欄の塗りつぶし 水色 ;★★★ 交信データ欄枠組み #LineS 1,0,0x004F4F00 #LineR $$X+0, $$Y+0,$$X+510,$$Y+80 ;データ欄枠組 ;date #LineY $$X+141, $$Y+0, 80 ;縦罫線 ;time #LineY $$X+215, $$Y+0, 80 ;縦罫線 ;rs #LineY $$X+325, $$Y+0, 80 ;縦罫線 ;band #LineY $$X+435, $$Y+0, 80 ;縦罫線 ;mode #LineX $$X+0, $$Y+23, 510 ;★★★ データ欄見出し #FontSize=11 #FontStyle=0 #Print $$X+5, $$Y+5, "DATE" ;交信年月日 #Print $$X+146, $$Y+5, "TIME" ;交信開始時刻 #Mov $$D = "FT8,FT4,JT65,JT9" ;デジタルモード ? nData7 "!$$D" ;デジタルの場合 #Print $$X+220, $$Y+5,"dB" #Mov $$B="dB" #Goto *456 ? End ? nData7 "CW" ;電信の場合 #Print $$X+220, $$Y+5,"RST" #Mov $$B="RST" #Goto *456 ? End ? nData7 "DR" ;D-STAR DR Mode #Print $$X+220, $$Y+5,"MERIT" #Mov $$B="MERIT" #Goto *456 ? End #Print $$X+220, $$Y+5,"RS" ;FM SSB D-STAR DV Mode #Mov $$B="RS" *456 #Print $$X+331, $$Y+5, "BAND/freq" ;運用帯/運用周波数    #Print $$X+441, $$Y+5, "MODE" ;モード ;★★★ 通信データ欄の補助項目 #FontSize=12 #FontStyle=2 #FontColor=0x00000000 #PrintC $$X+0,$$Y+25,141, "Year/!DJ/Day" #PrintC $$X+215,$$Y+25,110, "Your/My" #PrintR $$X+429,$$Y+25, "MHz" #PrintR $$X+504,$$Y+25, "2Way" ? UTC! #PrintR $$X+212, $$Y+25, "(JST)" ? UTC #PrintR $$X+212, $$Y+25, "(UTC)" ? End ;★★★ 交信データ #FontSize=17 #FontColor=0x00000000 #FontStyle=1 #PrintC $$X+0,$$Y+55,145, "!DY/!DM/!DD" ;年月日 #PrintC $$X+143,$$Y+55,72, "!TH:!TM" ;交信開始時刻 #PrintC $$X+215,$$Y+55,110, "!HR/!MR" ;信号強度等 #PrintC $$X+325,$$Y+55,110, "!F8" ;運用周波数帯 #PrintC $$X+435,$$Y+55,75, "!MD" ;電波形式 #Exit