�C実習　プログラムによる8255ａ制御
 ＊ ｂｕｓｙの確認：
　　                           
ｉ／ｏアドレス（＄ｈ４２）を読み込み         
２ビット目を調べる 
                               
ｂｕｓｙがｈ（５ｖ）であれば "０"となり
ｌ（０ｖ）であれば "１"となる。  　　　　　　     

 



＊ ｐａ０〜ｐａ７(ｄａ０〜ｄａ７)の確認
                                 
  ｉ／ｏアドレス（＆ｈ４０）にデータを
   書き込む。                                       
  







   　例　ｍｏｖ ａｌ，３　ｏｕｔ　＄４０，ａｌ      
       　  １ビット目と２ビット目がｈ（５ｖ）になる。                                   

   　例　モニタｌｅｄの点灯
          ｏｕｔ命令とモニタｌｅｄの関係から１０進数，２進数，１６進数の関係が
　　　　　 わかる。
                    表　モニタｌｅｄの点灯とデータの書き込み

              



＊　ボタンを押すとモニタｌｅｄが全部つく(消える)プログラム
              開発言語 delphi

   unit unit1;
interface
uses
  windows, messages, sysutils, classes, graphics, controls, forms, dialogs;
type
  tform1 = class(tform)
    button1: tbutton;
    procedure button1click(sender: tobject);
  private
    { private 宣言 }
  public
    { public 宣言 }
  end;
　var
  form1: tform1;
implementation
{$r *.dfm}
　procedure tform1.button1click(sender: tobject);
begin
asm                 {アセンブラの始まり}
   mov al,$ff       ｛$ffの代わりに$00とすると全部消える}
   out $40,al        {ポート４０にalつまり$ffを出力する}
 end;                {アセンブラの終わり}
end;
end.

        

               プログラムの起動画面


   次へ進む       前に戻る   理科におけるコンピュータの活用へ