; 縦長の電子QSL。 by JG1MOU ; 他の写真を使う場合は、#Alpha命令の座標指定を写真のオリジナルサイズに ; 合わせておくこと。若しくは事前に408x640にリサイズしておくこと。 #Size 418,640 #Mov $$C="GL:PM85HF" #Mov $$H="ZONE 25" #Mov $$E=" Naoto Matsuoka" #Mov $$G="OP: " #Mov $$D="FT8,FT4,JT65" ;#Jpg -100,0,640,0,"C:\MailQSL\IMG_3725.JPG" ;#Jpg -50,0,640,0,"C:\MailQSL\IMG_3747.JPG" ;#Jpg -100,0,640,0,"C:\MailQSL\IMG_3850.JPG" ;#Jpg -120,0,640,0,"C:\MailQSL\IMG_3874.JPG" #Jpg -100,0,640,0,"C:\MailQSL\IMG_3857.JPG" ;#Jpg -50,0,640,0,"C:\MailQSL\IMG_3892.JPG" ;#Jpg -150,0,640,0,"C:\MailQSL\IMG_3906.JPG" ;#Jpg -100,0,640,0,"C:\MailQSL\IMG_3937.JPG" #FillBox 0,425,488,640,0x00FF0000 #FontName="Meiryo UI" #FontSize=28 #FontStyle=3 ;#FontColor=0x00000000 ;黒 #FontColor=0x00FFFFFF  ;白 #Mov $$X=250 ;     コールサインの左端 #Mov $$Y=425 ;      コールサインの上端4 260 #Print $$X+2,$$Y,"!Ca" ; 自局コールサイン #FontSize=14 #Mov $$F="/2" ;自局が移動時3エリアなら/3 ? RmStr "!$$F " #Print $$X+136,$$Y+20,"/2"   #FontSize=28 ;#FontColor=0x00FF00FF #FontColor=0x000000FF #Print $$X,$$Y-4,"!Ca" #FontSize=14 #Mov $$F="/2"      ? RmStr "!$$F " #Print $$X+134,$$Y+18,"/2" ;#FontName="MS Pゴシック" ;#FontSize=28 ;#Print $$X-400,$$Y+200,"h-QSL再発行お願いいたします" ;OP #FontSize=10 #FontStyle=1 ;#FontColor=0x00000080    ;小豆色 #FontColor=0x00FFFFFF ;GLとZONEの色 白 #Print $$X+60,$$Y+46,"!$$C" ; GL #Print $$X+80,$$Y+61,"!$$H" ;ZONE #FontName="Embassy JS" #FontSize=14 #FontColor=0x0000FFFF ;オペレータ名の色 #Print $$X+20,$$Y+76,"!$$E" ; オペレータ名 #FontStyle=1 #FontName="MS Pゴシック" #Print $$X-10,$$Y+80,"!$$G" ;OP #FontSize=10 #FontColor=0x0080FFFF #Print$$X+70,$$Y+105, "No:!No" +8 ? Rcv! #Print$$X+85,$$Y+120, "QSL:Pse" ? Rcv #Print $$X+85,$$Y+120, "QSL:Tnx" ? End #FontStyle=1 #FontSize=10 ;データの文字サイズ #FontName="MS Pゴシック" ;#FontColor=0x00FFFFCA    ;To Radioの文字色水色 #FontColor=0x0000FFFF    ;黄色 ;#FontColor=0x00FF0000    ;青色 ;#FontColor=0x000000FF    ;赤色 ;#FontColor=0x00FFFFFF ;白 ;#FontColor=0x00000080    ;小豆色 ;#FontColor=0x00FFFFCA  データの色 :#FontColor=0x00008000 ;緑 #FontStyle=1 #FontSize=10 #Mov $$Y = 450 ; データ欄の縦座標 20 280 #Mov $$X = 4 ; データ欄の横座標 20 #Print $$X,$$Y, "To Radio: " #FontSize=14 #FontStyle=1 ;#FontColor=0x0080FFFF ;白色 ;#FontColor=0x00000080    ;小豆色 ;#FontColor=0x000000FF ;赤 ;#FontColor=0x00FFFFCA :水色 データ色 ;#FontColor=0x00FFFF80 ;水色 ;#FontColor=0x004839FB ;明るい赤 #FontColor=0x00FF00FF     ;ピンク  #Print -1000,$$Y-1, "!cp " ;相手のコールサインだけ違う文字 #FontSize=10 #FontColor=0x00FFFFCA :水色 データ色 ;#FontColor=0x00FF0000    ;青色 ;#FontColor=0x00FFFFFF ;白 ;#FontColor=0x00000080    ;小豆色 ;#FontColor=0x000000FF ;赤 ;#FontColor=0x00000000 ;黒 ;#FontColor=0x00008000 ;緑 ;#FontColor=0x0000FF00 ;黄緑 ;#Print -1000,$$Y, "!QT" #Print $$X,$$Y-15, "Confirming Our QSO" #Mov $$Y = $$Y+15 ? RmStr "/2" #Print $$X,$$Y+3, "From:!Ca!R1" ; Remarks1の%移動地% ? RmStr "/2" #Print $$X,$$Y+105, "From:!Ca" ; Remarks2の%移動地% ? RmStr "/2" #Print $$X,$$Y+120, "!R2" ? RmStr! "/2" #Print $$X,$$Y+3, "From:!Ca!LC" ; メイン画面から ? UTC #Mov $$A = "Date&Time:!DY/!DM/!DD !TH:!TMUTC" ? UTC! #Mov $$A = "Date&Time:!DY/!DM/!DD !TH:!TMJST" #Mov $$K = "Freq:!Fr 2Way:!MD" ? nData7 "!$$D" #Mov $$K = "!$$K dB:!HR" ; デジタル #Goto *456 ? End ? nData7 "CW,RTTY" #Mov $$K = "!$$K RST:!HR" #Goto *456 ? End #Mov $$K = "!$$K RS:!HR" ; フォーン *456 #Mov $$Y = $$Y+20 #Print $$X,$$Y-2, "!$$A" #Print $$X,$$Y+10, "!$$K" ;#Print $$X,$$Y+10, "Freq:!Fr 2Way:!MD" ? Space! "!RG" ; リグの設定あり #Mov $$Y = $$Y+20 #Print $$X,$$Y+5, "Rig:!RG" ? End ? Space! "!AN" ;アンテナの設定あり #Mov $$Y = $$Y+20 #Print $$X,$$Y,"Ant:!AN !HimH" #Mov $$Y = $$Y+10 #Print $$X,$$Y+5," Power:!PwW" ? End #FontColor=0x00FFFFCA #Mov $$Y = $$Y+20 ;#FontColor=0x000000FF ;赤Remarksの色 #FontColor=0x0000FFFF ;黄色 ;#FontColor=0x00FF0000    ;青色 #Print $$X,$$Y, "Remarks:!Co" ;#FontColor=0x0080FFFF #FontColor=0x00FFFF80 ;#FontColor=0x00000000 #Mov $$Y = 120 ; コメント欄の縦座標 20 #Mov $$X = 4 ; コメント欄の横座標 20 #Print $$X,$$Y+480, "藩-岐阜県247,248,249 PK-166脇野白山公園" #Print $$X,$$Y+500, "福19-9,美濃松山 QRA松岡が代用に使えます" ;#Print $$X+350,$$Y+270, "JE2NLE作テーブル モービルシャック" #Jpg 10,265,80,80,"C:\MailQSL\0000058_2M.jpg" ;280 130 90 280 ;======= 交信証明の印 ============== #Mov $$X=6 ; 印章の左端 536 6 #Mov $$Y=-170 ; 印章の上端 300 150 #LineS 3, 0, 255 #Ellipse $$X, $$Y,98,0 ; 148 #FontName="MS 明朝" #FontSize=12 #FontColor=255 #FontStyle=1 #LineS 1, 0, 255 #Ellipse $$X+19, $$Y+21,60,0 ;84 #LineS 5, 0, 0xFFFFFF #LineS 1, 0, 255 #LineX $$X+2,$$Y+41, 94 ;142 #LineX $$X+2,$$Y+60, 94 ;142 #PrintL $$X+ 5, $$Y+ 40, 72,"ア" #PrintL $$X+ 8, $$Y+ 28, 54, "マ" #PrintL $$X+ 16, $$Y+ 16, 36, "チ" #PrintL $$X+ 27, $$Y+ 10, 18, "ュ" #Print $$X+ 41, $$Y+ 5, "ア" #PrintL $$X+57, $$Y+ 5,340, "無" #PrintL $$X+75, $$Y+12,315, "線" #PrintL $$X+88, $$Y+25,290, "局" #PrintL $$X+18, $$Y+61,310, "交" #PrintL $$X+30, $$Y+74,335, "信" #PrintL $$X+44, $$Y+82, 25, "証" #PrintL $$X+66, $$Y+76, 45, "明" #Print $$X+34, $$Y+25, "局" #Print $$X+50, $$Y+25, "長" #Print $$X+34, $$Y+62, "之" #Print $$X+50, $$Y+62, "印" #FontName="MS ゴシック" #FontSize=15 ;#FontColor=255 #FontColor=0x00FFFFFF #FontStyle=1 #Print $$X+13, $$Y+42, "!Ca" ;======= 交信証明の印 ============== #Mov $$X=506 ; 印章の左端 536 6 556 #Mov $$Y=280 ; 印章の上端 300 150 280 320 130 #LineS 5, 0, 255 #LineC $$X, $$Y, $$X+74, $$Y+80, 20, 20 #LineX $$X, $$Y+25, 73 #LineX $$X, $$Y+43, 73 #LineX $$X, $$Y+62, 73 #FontName="MS ゴシック" #FontSize=8 #FontColor=255 ;#FontColor=0x00FFFFFF #Print $$X+6,$$Y+3,"アマチュア" #Print $$X+22,$$Y+13,"無線局" #FontSize=10 #Print $$X+6,$$Y+28,"局長之印" #Print $$X+6,$$Y+64,"交信証明" #FontSize=12 ;#FontColor=255 #FontColor=0x00FFFFFF #Print $$X+10,$$Y+44,"!Ca" ; 自局コールサイン ;======= 交信証明の印 Tnx JO6XMM ============== #Mov $$X=10 ; 印章の左端 #Mov $$Y=350 ; 印章の上端 #LineS 3, 0, 255 ;赤 #FontColor=0x00FFFF00 ;水色 #LineS 1, 0, 0x00FFFFFF,   ;白 #LineS 3, 0, 0x00FF0000,   ;青 #LineS 1, 0, 0x00000000,   ;黒 #FontColor=0x000000FF ;赤 #LineS 1, 0, 0x0000FF00,   ;緑 #LineS 1, 0, 0x0000FFFF,   ;黄 #LineS 1, 0, 0x00FF00FF, ;桃色 #LineS 3, 0, 0x00000080,   ;こげ茶 #LineS 3, 0, 0x00004080 :茶 #Ellipse $$X, $$Y,120,72,     ; 148 外円 #EllipsF $$X, $$Y,120,72,0x0000FF00,   ;白 外円 #FontName="MS 明朝" #FontStyle=1 #LineS 1, 0, 255 ;Confirming Our QSO #Ellipse $$X+19, $$Y+21,60,0 ;84 #LineX $$X+20,$$Y+35, 80 ;横線 28 #LineX $$X+20,$$Y+54, 80    ;横線 47 #FontSize=9 #FontColor=0x00FFFF00 ;水色 #FontColor=0x00FFFFFF   ;白  #FontColor=0x000000FF   ;赤  #FontColor=0x00000000   ;黒 #FontColor=0x000000FF ;赤  #FontColor=0x00FF0000   ;青  #FontColor=0x0000FF00   ;緑 #FontColor=0x00408000 ;濃緑  #FontColor=0x0000FFFF   ;黄  #FontColor=0x00FF00FF ;桃色 #FontColor=0x00000080   ;茶 #PrintL $$X-0, $$Y+40, 85, "C" $$X左端から, $$Y上から, 傾き, #PrintL $$X-1, $$Y+30, 68, "o" $$X+ 3, $$Y+ 28, 54, #PrintL $$X+6, $$Y+20, 50, "n" $$X+14, $$Y+ 16, 36, #PrintL $$X+12, $$Y+15, 40, "f" $$X+ 27, $$Y+ 10, 18, #PrintL $$X+19, $$Y+11, 31, "i" #PrintL $$X+25, $$Y+6, 27, "r" #PrintL $$X+33, $$Y+4, 20, "m" $$X+ 41, $$Y+ 5, #PrintL $$X+41, $$Y+1, 8, "i" $$X+57, $$Y+ 5,340, #PrintL $$X+49, $$Y-0, 5, "n" $$X+75, $$Y+12,315, #PrintL $$X+58, $$Y+0, 0, "g" $$X+88, $$Y+25,290, #PrintL $$X+74, $$Y +1, 350, "O" #PrintL $$X+83, $$Y +3, 340, "u" #PrintL $$X+91, $$Y +4, 330, "r" #PrintL $$X+105, $$Y+12, 320, "Q" #PrintL $$X+112, $$Y+19, 300, "S" #PrintL $$X+117, $$Y+28, 290, "O" #FontName="HG正楷書体-PRO" #FontSize=9 #FontColor=0x00FFFF00 ;水色 #FontColor=0x00FFFFFF   ;白  #FontColor=0x000000FF   ;赤 #FontColor=0x00000000   ;黒 #FontColor=0x000000FF ;赤 #FontColor=0x00FF0000   ;青 #FontColor=0x0000FF00   ;緑 #FontColor=0x0000FFFF   ;黄 #FontColor=0x00FF00FF ;桃色 #FontColor=0x00000080   ;茶 #PrintL $$X+30, $$Y+55, 0, "★" ;$$X+66, $$Y+76, 40 #PrintL $$X+77, $$Y+55, 0, "★" ;$$X+66, $$Y+76, 50  #FontColor=0x00FFFF00 ;水色 #FontColor=0x00FFFFFF   ;白  #FontColor=0x000000FF   ;赤  #FontColor=0x00000000   ;黒 #FontColor=0x000000FF ;赤  #FontColor=0x00FF0000   ;青 #FontColor=0x0000FF00   ;緑  #FontColor=0x0000FFFF   ;黄  #FontColor=0x00FF00FF ;桃色 #FontColor=0x00000080   ;茶 #FontName="MS Pゴシック" #FontSize=12 #FontStyle=1 #PrintL $$X+40, $$Y+52,360, " nao" ; Handle Name!$$H #FontName="MS Pゴシック" #FontName="MS 明朝" #FontName="HG正楷書体-PRO" #FontSize=8 #FontStyle=1 #FontColor=0x00FFFF00 ;水色 #FontColor=0x00FFFFFF   ;白  #FontColor=0x000000FF   ;赤 #FontColor=0x00000000   ;黒 #FontColor=0x000000FF ;赤 #FontColor=0x00FF0000   ;青  #FontColor=0x0000FF00   ;緑  #FontColor=0x00408000 ;濃緑 #FontColor=0x0000FFFF   ;黄 #FontColor=0x00FF00FF ;桃色 #FontColor=0x00000080   ;茶 #Print $$X+40, $$Y+17, "Amateur" #Print $$X+25, $$Y+25, "Radio Station" #FontName="MS ゴシック" #FontName="Modern No. 20" #FontSize=14  #FontColor=0x00FFFF00 ;水色 #FontColor=0x00FFFFFF   ;白  #FontColor=0x000000FF   ;赤  #FontColor=0x00000000   ;黒 #FontColor=0x00FF0000   ;青 #FontColor=0x0000FF00   ;緑  #FontColor=0x0000FFFF   ;黄 #FontColor=0x00FF00FF ;桃色 #FontColor=0x00000080   ;茶 #FontStyle=3 #Print $$X+17, $$Y+34, "!Ca"     ;$$X+左端から, $$Y+上から, $$X+17, $$Y+27 +15 +30