nhc4_SomeQso.QSL
; 既成の白紙カードに直接印刷する by JG1MOU ; 1枚のカードに同一局との複数のデータを印字する ; ただし、JARL指定順かJARL指定逆順で印字すること #FontName="MS ゴシック" #FontSize=13 #FontColor=0 #FontStyle=3 #Print 80, 80, "To Radio" #FontName="HAM ゴシック Light" #FontSize=13 #FontColor=0x00000000 #FontStyle=0 #Print 80, 155, "!cp" ; To Radio #LineS 1, 0, 0 #LineX 50, 200, 270 ; To Radioにアンダーラインを引く #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 #FontName="MS ゴシック" #FontSize = 20 #Print 394, 125, "!C1" ; JARL転送枠1文字目 #Print 484, 125, "!C2" #Print 574, 125, "!C3" #Print 664, 125, "!C4" #Print 754, 125, "!C5" #Print 844, 125, "!C6" #FontName="MS 明朝" #FontSize=10 #FontColor=0 #FontStyle=2 ? Potbl ;ポータブルの否か #Print 180,210, "移動地!cp!QT" ;コールサイン/エリヤ 移動地 #Print 10, 250, "Confirming Our QSO" #FontName="MS ゴシック" #FontSize=11 #FontColor=0 #FontStyle=0 #Print 140, 300, "Date" #Print 375, 300, "Time" #Print 560, 300, "RST" #Print 680, 300, "MHz" #Print 810, 300, "2Way" #FontName="Century Oldstyle Bold" #FontSize=7 #Print 50, 350, "Year" #Print 150, 350, "Month" #Print 270, 350, "Day" ? UTC! #Print 390,350,"JST" ? UTC #Print 390,350,"UTC" #FontName="MS 明朝" #FontSize=12 #FontColor=0 #FontStyle=0 #Print 30, 390, "'!Dy" ; 年 '99 #Print 150, 390, "!DJ" ; 月 Apr. #Print 265, 390, "!Dd" ; 日 14 #Print 360, 390, "!TH:!TM" ; 時間 08:30 #Print 555, 390, "!HR" ; RST #Print 680, 390, "!FR" ; 周波数帯 #Print 820, 390, "!MD" ; モード #FontSize=10 #Print 60, 430, "!R1 !R2" #FontName="MS 明朝" #FontSize=11 #FontColor=0 #FontStyle=2 #Print 60, 900, "Rig: !RG" ;リグ #Print 680, 900, "INPUT !Pw W"; 入力 ? Space! "!Hi" #Print 60, 950, "Ant: !HimH !AN" ;アンテナ ? Space "!Hi" #Print 60, 950, "Ant: !AN" ;アンテナ #Print 60, 1000, "Rmks: !Co" ;備考 #Print 200, 1050, "QSL#:!NO" ; QSL No.印刷 ? Rcv! ;QSLカードの送受 #Print 700, 1050, "QSL PSE" ; QSL Pse ? Rcv #Print 700, 1050, "QSL TNX" ; QSL Tnx #FontName="HGep043" #FontSize=30 #FontColor=0x000000FF #FontStyle=3 #Print 100, 1120, "JE4NHC/4" #FontName="MS 明朝" #FontSize=12 #FontColor=0 #FontStyle=0 --------------------------------------------------------- #Readj *992 ; 同じコールサインでなければ*992へ #Print 30, 480, "'!Dy" ; 年 '99 #Print 150, 480, "!DJ" ; 月 Apr. #Print 265, 480, "!Dd" ; 日 14 #Print 360, 480, "!TH:!TM" ; 時間 08:30 #Print 555, 480, "!HR" ; RST #Print 680, 480, "!FR" ; 周波数帯 #Print 820, 480, "!MD" ; モード #FontSize=10 #Print 60, 520, "!R1 !R2" #FontSize=12 #Goto *993 *992 #Print 180, 520, "--- End of QSO-DATA(1) ---" #Exit *993 #Readj *992 #Print 30, 570, "'!Dy" #Print 150, 570, "!DJ" #Print 265, 570, "!Dd" #Print 360, 570, "!TH:!TM" #Print 555, 570, "!HR" #Print 680, 570, "!FR" #Print 820, 570, "!MD" #FontSize=10 #Print 60, 610, "!R1 !R2" #FontSize=12 #Goto *993 *992 #Print 180, 610, "--- End of QSO-DATA(2) ---" #Exit *993 #Readj *992 #Print 30, 660, "'!Dy" #Print 150, 660, "!DJ" #Print 265, 660, "!Dd" #Print 360, 660, "!TH:!TM" #Print 555, 660, "!HR" #Print 680, 660, "!FR" #Print 820, 660, "!MD" #FontSize=10 #Print 60, 700, "!R1" #Print 500, 700, "!R2" #FontSize=12 #Goto *993 *992 #Print 180, 700, "--- End of QSO-DATA(3) ---" #Exit *993 #Readj *992 #Print 30, 750, "'!Dy" #Print 150, 750, "!DJ" #Print 265, 750, "!Dd" #Print 360, 750, "!TH:!TM" #Print 555, 750, "!HR" #Print 680, 750, "!FR" #Print 820, 750, "!MD" #FontSize=10 #Print 60, 790, "!R1 !R2" #FontSize=12 #Goto *993 *992 #Print 180, 790, "--- End of QSO-DATA(4) ---" *993 |
|