'
   '  *****************************
   '  *  AQM1248A-RN-FBW-P        *
   '  *   グラフィックLCD テスト  *
   '  *    O-Family   2019. 1.15  *
   '  *****************************
   '
$regfile = "m328pdef.dat"                                   '使用するAVRを設定。
$crystal = 1000000                                          'AVRのクロックを設定。
   '
$hwstack = 64                                               'ハードウェア・スタックの容量を設定。
$swstack = 32                                               'ソフトウェア・スタックの容量を設定。
$framesize = 24                                             'フレーム領域の容量を設定。

   '
   '  * グラフィックLCDの設定 *
   '
'   Const Aqm1248a_rotate = 1                                'LCDの配置を選択する。制御ピン(コントローラ)が上側の場合 [Const Aqm1248a_rotate = 1]
$lib "glcdAQM1248A.lbx"                                     'G-LCD [AQM1248A]用のライブラリ。
   Config Graphlcd = 128 * 64eadogm , Cs1 = Portd.7 , A0 = Portd.5 , Si = Portd.3 , Sclk = Portd.4 , Rst = Portd.6       'LCDの接続ポートを設定する。
   '
   Glcdcmd &H81 : Glcdcmd 25                                'LCDのコントラストを設定する。 (0〜63)
   Cls                                                      'グラフィックLCDの全画面を消去する。
   '
   '  * 描画のテスト *
   '
   Setfont Font8x8tt                                        '8dotサイズのフォントを設定する。
   Lcdat 1 , 1 , "AQM1248A-RN Test"                         '通常の文字表示。
   Lcdat 2 , 1 , "  128x48dot 3.3V  " , 3                   '点線のアンダーライン。
   Lcdat 6 , 33 , " O-Family " , 2                          '実線のアンダーライン。
   '
   Setfont Font16x16                                        '16dotサイズのフォントを設定する。
   Lcdat 4 , 1 , "AQM"                                      '通常表示。
   Lcdat 4 , 49 , "1248A" , 1                               '反転表示。
   '
   Cls 6 , 2 , 4 , &HA3                                     'ブロック消去(描画)のテスト。
   Cls 6 , 123 , 125 , &H18
   Cls 6 , 126 , 128 , &HFF

   End

   '
   '  *フォント・データ *
   '
$include "font8x8TT.font"
$include "font16x16.font"