24.01.2015 Views

C - U-netSURF

C - U-netSURF

C - U-netSURF

SHOW MORE
SHOW LESS
  • No tags were found...

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

* Copyright (C) 1998-2002 by Project HOS */<br />

/* http://sourceforge.jp/projects/hos/ */<br />

/* ------------------------------------------------------------------------ */<br />

/* Copyright (C) 2009 by TOYO-LINX Co.,Ltd.*/<br />

/* http://www2.u-netsurf.ne.jp/~toyolinx */<br />

/* ------------------------------------------------------------------------ */<br />

#include "kernel.h"<br />

#include "kernel_id.h"<br />

//#include "h83664f.h"<br />

#include "iodefine.h"<br />

#include "h8t_sci.h"<br />

#include "binary.h"<br />

//Cで2 進 数 表 示 をを 使 う(00000000-11111111)<br />

/* メ゜ンル 関 数 */<br />

int main()<br />

{<br />

/* SCIの 初 期 化 */<br />

// Sci_Initialize(SCI_19200);<br />

Sci_Initialize(SCI_38400);<br />

/* 開 始 メッセセーヴジ */<br />

Sci_PutChar('H');<br />

Sci_PutChar('O');<br />

Sci_PutChar('S');<br />

Sci_PutChar('\r');<br />

Sci_PutChar('\n');<br />

sta_hos();<br />

}<br />

return 0;<br />

/* 初 期 化 デンルチラ */<br />

void Initialize(VP_INT exinf)<br />

{<br />

/* act_tsk(TSKID_SAMPLE1);*/<br />

ポート 5 とポート 6 のイニシャライズ。<br />

アプリケーションのイニシャライズは 初 期曋<br />

化 ハンドラに 記 述 する。<br />

}<br />

// I/Oポーヴダの゜ニッシホラ゜ズ<br />

IO.PCR5 = _11111111B;<br />

//P50-57<br />

57 出 力<br />

IO.PCR6 = _11111111B;<br />

//P60-67<br />

67 出 力<br />

/* サキンルハルタスク */<br />

void Task1(VP_INT exinf)<br />

{<br />

SYSTIM st;<br />

for ( ; ; )<br />

{<br />

/* タ゜マ 値 取 得 */<br />

get_tim(&st);<br />

/* タ゜マ 値 出 力 */<br />

137<br />

TK-3687mini ユーザーズマニュアル C 言 語 版

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!