> ---------------引言---------------------
> 想學forth有很長一段時間了，也從網上取得不少資料，但是一直無法完全了解，每隔一段時間就會想再學學看。
> 這次看到了HH51W238.F 想從中再次學學看。
> 我在google的符式協會 上，得到HH51w238.f 的相關資料，

> 也進行到了按 H, HH, HHH可看到訊息了。
> 但是因為是個初學者，不知該如何踏出下一步。
> 有看了HH51W238.f 的程式內容，想從其中學習，但是目前它對我來說就像是天書一樣，還無法理解。

> 不知是否能有個教學程式，如做led的閃爍(port0.0 delay 500 ms ON OFF)。
> 還有如何將這個教學程式compiler 成hex file的步驟。(如何利用 >HEX)。

> 不好意思，提出這個不情之請。

> 謝謝!!!
> -----------------------------------------------------

> \  首先加
> HEX  80 4000   SETMAXCOLROW     \     使DISPLAY CONSOLE 加到最大
> \  ( 或  :  expand.console.size   80 ffff  xcall   drop ;
> expand.console.size  )
> \  然後:
> \  在tetherred Forth51中,  做法如下:
> hex
> \     insert{       9876 ORG            \ 插在9876位址
> t:  500.ms   ` dpl=12     ` dph=34   \ adjust  12 and 34 to get exact
> 500 ms
>                 begin'        dp+    ` a=dph    ` AnDPL
>                 until'a=0    ret
> t:  led.on     ` _90=1   ret    ( port0.0=90  )
> t:  led.off     ` _90=0   ret
> t: test.led     led.on    500.ms    led.off   500.ms    ret
> \      }insert
> 0  here'  >hex

> 用  Mark all text (ctrl+A)   和 Copy Highlighted Text (ctrl+C)  將  .hex檔存
> 起來作為燒錄之用.

> Hi holi您好，
>        感謝您的回答，我趕快來試試看。
>        再次謝謝您的指導。

> 謝謝!!!

> On 9月29日, 下午5時42分, holi <holin...@yahoo.com.tw> wrote:

> > ---------------引言---------------------
> > 想學forth有很長一段時間了，也從網上取得不少資料，但是一直無法完全了解，每隔一段時間就會想再學學看。
> > 這次看到了HH51W238.F 想從中再次學學看。
> > 我在google的符式協會 上，得到HH51w238.f 的相關資料，

> > 也進行到了按 H, HH, HHH可看到訊息了。
> > 但是因為是個初學者，不知該如何踏出下一步。
> > 有看了HH51W238.f 的程式內容，想從其中學習，但是目前它對我來說就像是天書一樣，還無法理解。

> > 不知是否能有個教學程式，如做led的閃爍(port0.0 delay 500 ms ON OFF)。
> > 還有如何將這個教學程式compiler 成hex file的步驟。(如何利用 >HEX)。

> > 不好意思，提出這個不情之請。

> > 謝謝!!!
> > -----------------------------------------------------

> > \  首先加
> > HEX  80 4000   SETMAXCOLROW     \     使DISPLAY CONSOLE 加到最大
> > \  ( 或  :  expand.console.size   80 ffff  xcall   drop ;
> > expand.console.size  )
> > \  然後:
> > \  在tetherred Forth51中,  做法如下:
> > hex
> > \     insert{       9876 ORG            \ 插在9876位址
> > t:  500.ms   ` dpl=12     ` dph=34   \ adjust  12 and 34 to get exact
> > 500 ms
> >                 begin'        dp+    ` a=dph    ` AnDPL
> >                 until'a=0    ret
> > t:  led.on     ` _90=1   ret    ( port0.0=90  )
> > t:  led.off     ` _90=0   ret
> > t: test.led     led.on    500.ms    led.off   500.ms    ret
> > \      }insert
> > 0  here'  >hex

> > 用  Mark all text (ctrl+A)   和 Copy Highlighted Text (ctrl+C)  將  .hex檔存
> > 起來作為燒錄之用.- 隱藏被引用文字 -

> - 顯示被引用文字 -

> 如要更多有關資料如: 單晶片多核心  ARMFORTH,...請進入
> groups.yahoo.com/group/armForth

> On 9月29日, 下午10時01分, "lu.albert" <lu.alb...@gmail.com> wrote:

> > Hi holi您好，
> >        感謝您的回答，我趕快來試試看。
> >        再次謝謝您的指導。

> > 謝謝!!!

> > On 9月29日, 下午5時42分, holi <holin...@yahoo.com.tw> wrote:

> > > ---------------引言---------------------
> > > 想學forth有很長一段時間了，也從網上取得不少資料，但是一直無法完全了解，每隔一段時間就會想再學學看。
> > > 這次看到了HH51W238.F 想從中再次學學看。
> > > 我在google的符式協會 上，得到HH51w238.f 的相關資料，

> > > 也進行到了按 H, HH, HHH可看到訊息了。
> > > 但是因為是個初學者，不知該如何踏出下一步。
> > > 有看了HH51W238.f 的程式內容，想從其中學習，但是目前它對我來說就像是天書一樣，還無法理解。

> > > 不知是否能有個教學程式，如做led的閃爍(port0.0 delay 500 ms ON OFF)。
> > > 還有如何將這個教學程式compiler 成hex file的步驟。(如何利用 >HEX)。

> > > 不好意思，提出這個不情之請。

> > > 謝謝!!!
> > > -----------------------------------------------------

> > > \  首先加
> > > HEX  80 4000   SETMAXCOLROW     \     使DISPLAY CONSOLE 加到最大
> > > \  ( 或  :  expand.console.size   80 ffff  xcall   drop ;
> > > expand.console.size  )
> > > \  然後:
> > > \  在tetherred Forth51中,  做法如下:
> > > hex
> > > \     insert{       9876 ORG            \ 插在9876位址
> > > t:  500.ms   ` dpl=12     ` dph=34   \ adjust  12 and 34 to get exact
> > > 500 ms
> > >                 begin'        dp+    ` a=dph    ` AnDPL
> > >                 until'a=0    ret
> > > t:  led.on     ` _90=1   ret    ( port0.0=90  )
> > > t:  led.off     ` _90=0   ret
> > > t: test.led     led.on    500.ms    led.off   500.ms    ret
> > > \      }insert
> > > 0  here'  >hex

> > > 用  Mark all text (ctrl+A)   和 Copy Highlighted Text (ctrl+C)  將  .hex檔存
> > > 起來作為燒錄之用.- 隱藏被引用文字 -

> > - 顯示被引用文字 -- 隱藏被引用文字 -

> - 顯示被引用文字 -

> 進入groups.yahoo.com/group/armForth 的  files  區,下載   ef51v364.exe 即可立即執
> 行  tetherred forth51.

> On 9月29日, 下午10時55分, holi <holin...@yahoo.com.tw> wrote:

> > 如要更多有關資料如: 單晶片多核心  ARMFORTH,...請進入
> > groups.yahoo.com/group/armForth

> > On 9月29日, 下午10時01分, "lu.albert" <lu.alb...@gmail.com> wrote:

> > > Hi holi您好，
> > >        感謝您的回答，我趕快來試試看。
> > >        再次謝謝您的指導。

> > > 謝謝!!!

> > > On 9月29日, 下午5時42分, holi <holin...@yahoo.com.tw> wrote:

> > > > ---------------引言---------------------
> > > > 想學forth有很長一段時間了，也從網上取得不少資料，但是一直無法完全了解，每隔一段時間就會想再學學看。
> > > > 這次看到了HH51W238.F 想從中再次學學看。
> > > > 我在google的符式協會 上，得到HH51w238.f 的相關資料，

> > > > 也進行到了按 H, HH, HHH可看到訊息了。
> > > > 但是因為是個初學者，不知該如何踏出下一步。
> > > > 有看了HH51W238.f 的程式內容，想從其中學習，但是目前它對我來說就像是天書一樣，還無法理解。

> > > > 不知是否能有個教學程式，如做led的閃爍(port0.0 delay 500 ms ON OFF)。
> > > > 還有如何將這個教學程式compiler 成hex file的步驟。(如何利用 >HEX)。

> > > > 不好意思，提出這個不情之請。

> > > > 謝謝!!!
> > > > -----------------------------------------------------

> > > > \  首先加
> > > > HEX  80 4000   SETMAXCOLROW     \     使DISPLAY CONSOLE 加到最大
> > > > \  ( 或  :  expand.console.size   80 ffff  xcall   drop ;
> > > > expand.console.size  )
> > > > \  然後:
> > > > \  在tetherred Forth51中,  做法如下:
> > > > hex
> > > > \     insert{       9876 ORG            \ 插在9876位址
> > > > t:  500.ms   ` dpl=12     ` dph=34   \ adjust  12 and 34 to get exact
> > > > 500 ms
> > > >                 begin'        dp+    ` a=dph    ` AnDPL
> > > >                 until'a=0    ret
> > > > t:  led.on     ` _90=1   ret    ( port0.0=90  )
> > > > t:  led.off     ` _90=0   ret
> > > > t: test.led     led.on    500.ms    led.off   500.ms    ret
> > > > \      }insert
> > > > 0  here'  >hex

> > > > 用  Mark all text (ctrl+A)   和 Copy Highlighted Text (ctrl+C)  將  .hex檔存
> > > > 起來作為燒錄之用.- 隱藏被引用文字 -

> > > - 顯示被引用文字 -- 隱藏被引用文字 -

> > - 顯示被引用文字 -- 隱藏被引用文字 -

> - 顯示被引用文字 -

> 進入groups.yahoo.com/group/armForth 的  files  區,下載   ef51v364.exe 即可立即執
> 行  tetherred forth51.

> On 9月29日, 下午10時55分, holi <holin...@yahoo.com.tw> wrote:

> > 如要更多有關資料如: 單晶片多核心  ARMFORTH,...請進入
> > groups.yahoo.com/group/armForth

> > On 9月29日, 下午10時01分, "lu.albert" <lu.alb...@gmail.com> wrote:

> > > Hi holi您好，
> > >        感謝您的回答，我趕快來試試看。
> > >        再次謝謝您的指導。

> > > 謝謝!!!

> > > On 9月29日, 下午5時42分, holi <holin...@yahoo.com.tw> wrote:

> > > > ---------------引言---------------------
> > > > 想學forth有很長一段時間了，也從網上取得不少資料，但是一直無法完全了解，每隔一段時間就會想再學學看。
> > > > 這次看到了HH51W238.F 想從中再次學學看。
> > > > 我在google的符式協會 上，得到HH51w238.f 的相關資料，

> > > > 也進行到了按 H, HH, HHH可看到訊息了。
> > > > 但是因為是個初學者，不知該如何踏出下一步。
> > > > 有看了HH51W238.f 的程式內容，想從其中學習，但是目前它對我來說就像是天書一樣，還無法理解。

> > > > 不知是否能有個教學程式，如做led的閃爍(port0.0 delay 500 ms ON OFF)。
> > > > 還有如何將這個教學程式compiler 成hex file的步驟。(如何利用 >HEX)。

> > > > 不好意思，提出這個不情之請。

> > > > 謝謝!!!
> > > > -----------------------------------------------------

> > > > \  首先加
> > > > HEX  80 4000   SETMAXCOLROW     \     使DISPLAY CONSOLE 加到最大
> > > > \  ( 或  :  expand.console.size   80 ffff  xcall   drop ;
> > > > expand.console.size  )
> > > > \  然後:
> > > > \  在tetherred Forth51中,  做法如下:
> > > > hex
> > > > \     insert{       9876 ORG            \ 插在9876位址
> > > > t:  500.ms   ` dpl=12     ` dph=34   \ adjust  12 and 34 to get exact
> > > > 500 ms
> > > >                 begin'        dp+    ` a=dph    ` AnDPL
> > > >                 until'a=0    ret
> > > > t:  led.on     ` _90=1   ret    ( port0.0=90  )
> > > > t:  led.off     ` _90=0   ret
> > > > t: test.led     led.on    500.ms    led.off   500.ms    ret
> > > > \      }insert
> > > > 0  here'  >hex

> > > > 用  Mark all text (ctrl+A)   和 Copy Highlighted Text (ctrl+C)  將  .hex檔存
> > > > 起來作為燒錄之用.- 隱藏被引用文字 -

> > > - 顯示被引用文字 -- 隱藏被引用文字 -

> > - 顯示被引用文字 -- 隱藏被引用文字 -

> - 顯示被引用文字 -

>   用 ｈｈ５１ｗ３６４。ｅｘｅ
> 首先你要能透過rs232與pc交談. ok?
> 開兩個相同的win32for工作檔一個作rs232<--->-pc用,一個作查看程式用,如
> 0 u
> words'
> see main
> see forth'
> see   test.led
> 在此可以看出 test.led 程式位址
> -------------------------------------------------------
> 切換至rs232<--->-pc工作檔畫面,接上rs232  cable
> 打 38.4k1   \  or 38.4k2 .........38.4k7    baud rate speed=38.4k,   com
> port 1
> 或 57.6k1   \  or 57.6k2  ........57.6k7
> 或 115.2k1 \  or 115.2k2  or 115.2k3  or 115.2k4 .....115.2k7
> .....  9.6k1 ..... 19.2k1
> .......................
> 現在8051應該可以和pc交談了.
> 按<enter>會有反應
> command>
> command>
> ......
> 按  f
> 則進入 forth51   會顯示
> f>
> 按<enter>會有反應
> ｆ＞
> ｆ＞
> ｆ＞
> ....
> 到此表示一切順利，恭喜！
> 按 Ｅ１１＜ｅｎｔｅｒ＞ ＼ ｅｎｔｅｒ ｎｕｍｂｅｒ １１
> 按 Ｅ１１＜ｅｎｔｅｒ＞
> 按 Ｅ２２＜ｅｎｔｅｒ＞
> 按 Ｅ３３＜ｅｎｔｅｒ＞
> 按 ｃ ＼ ｓｈｏｗ ｓｔａｃｋ ｃｏｎｔｅｎｔ
> 按 １２ ＼ ｔｅｓｔ。ｌｅｄ 的ｈｉｇｈ ｂｙｔｅ ａｄｄｒ
> 按 ３４ ＼ ｔｅｓｔ。ｌｅｄ 的 ｌｏｗ ｂｙｔｅ ａｄｄｒ。
> 按 ｂ ＼ 執行ｔｅｓｔ。ｌｅｄ程式
> 至此大功告成，恭喜啦。

> Ｇｏｄ ｂｌｅｓｓ ｙｏｕ！

> --------------------------------------------------------

> --- *09/9/30 (三)，lu.albert <lu.alb...@gmail.com>* 寫道：

> 寄件者: lu.albert <lu.alb...@gmail.com>
> 主旨: [符式協會:594] Re: 有關eForth51
> 收件者: "符式協會" <figtaiwan@googlegroups.com>
> 日期: 2009年9月30日,三,下午10:04

> 哇!!!
> 謝謝 holi 提供的資料，像是突然尋到了超大的寶庫。
> 單晶片多核心  ARMFORTH,... 這麼多都想要。可得好好努力了。

> 不過還是要一步一步來。
> 之前holi 給的 test.led ，我還沒成功呢。
> 0 here' >hex 是有產生了HEX 檔所產生的資料，我把HEX加進了AT89c51。但結果led並沒有亮。
> 目前還不知道問題出在哪。
> 我試著將
> t: test.led     led.on    500.ms    led.off   500.ms    ret
> 改為
> t: test.led  begin'   led.on    500.ms    led.off   500.ms  again'
> ret

> 還是不行。

> 想請問一下，這個程式是如何執行 test.led 的 ?

> On 9月30日, 上午1時14分, holi <holin...@yahoo.com.tw<http://tw.mc734.mail.yahoo.com/mc/compose?to=holin...@yahoo.com.tw>>
> wrote:
> > 進入groups.yahoo.com/group/armForth 的  files  區,下載   ef51v364.exe 即可立即執
> > 行  tetherred forth51.

> > On 9月29日, 下午10時55分, holi <holin...@yahoo.com.tw<http://tw.mc734.mail.yahoo.com/mc/compose?to=holin...@yahoo.com.tw>>
> wrote:

> > > 如要更多有關資料如: 單晶片多核心  ARMFORTH,...請進入
> > > groups.yahoo.com/group/armForth

> > > On 9月29日, 下午10時01分, "lu.albert" <lu.alb...@gmail.com<http://tw.mc734.mail.yahoo.com/mc/compose?to=lu.alb...@gmail.com>>
> wrote:

> > > > Hi holi您好，
> > > >        感謝您的回答，我趕快來試試看。
> > > >        再次謝謝您的指導。

> > > > 謝謝!!!

> > > > On 9月29日, 下午5時42分, holi <holin...@yahoo.com.tw<http://tw.mc734.mail.yahoo.com/mc/compose?to=holin...@yahoo.com.tw>>
> wrote:

> > > > > ---------------引言---------------------
> > > > > 想學forth有很長一段時間了，也從網上取得不少資料，但是一直無法完全了解，每隔一段時間就會想再學學看。
> > > > > 這次看到了HH51W238.F 想從中再次學學看。
> > > > > 我在google的符式協會 上，得到HH51w238.f 的相關資料，

> > > > > 也進行到了按 H, HH, HHH可看到訊息了。
> > > > > 但是因為是個初學者，不知該如何踏出下一步。
> > > > > 有看了HH51W238.f 的程式內容，想從其中學習，但是目前它對我來說就像是天書一樣，還無法理解。

> > > > > 不知是否能有個教學程式，如做led的閃爍(port0.0 delay 500 ms ON OFF)。
> > > > > 還有如何將這個教學程式compiler 成hex file的步驟。(如何利用 >HEX)。

> > > > > 不好意思，提出這個不情之請。

> > > > > 謝謝!!!
> > > > > -----------------------------------------------------

> > > > > \  首先加
> > > > > HEX  80 4000   SETMAXCOLROW     \     使DISPLAY CONSOLE 加到最大
> > > > > \  ( 或  :  expand.console.size   80 ffff  xcall   drop ;
> > > > > expand.console.size  )
> > > > > \  然後:
> > > > > \  在tetherred Forth51中,  做法如下:
> > > > > hex
> > > > > \     insert{       9876 ORG            \ 插在9876位址
> > > > > t:  500.ms   ` dpl=12     ` dph=34   \ adjust  12 and 34 to get
> exact
> > > > > 500 ms
> > > > >                 begin'        dp+    ` a=dph    ` AnDPL
> > > > >                 until'a=0    ret
> > > > > t:  led.on     ` _90=1   ret    ( port0.0=90  )
> > > > > t:  led.off     ` _90=0   ret
> > > > > t: test.led     led.on    500.ms    led.off   500.ms    ret
> > > > > \      }insert
> > > > > 0  here'  >hex

> > > > > 用  Mark all text (ctrl+A)   和 Copy Highlighted Text (ctrl+C)  將
> .hex檔存
> > > > > 起來作為燒錄之用.- 隱藏被引用文字 -

> > > > - 顯示被引用文字 -- 隱藏被引用文字 -

> > > - 顯示被引用文字 -- 隱藏被引用文字 -

> > - 顯示被引用文字 -

> ___________________________________________________
> 您的生活即時通 － 溝通、娛樂、生活、工作一次搞定！
> http://messenger.yahoo.com.tw

> 進入groups.yahoo.com/group/armForth 的  files  區,下載   ef51v364.exe 即可立即執
> 行  tetherred forth51.

> On 9月29日, 下午10時55分, holi <holin...@yahoo.com.tw> wrote:

> > 如要更多有關資料如: 單晶片多核心  ARMFORTH,...請進入
> > groups.yahoo.com/group/armForth

> > On 9月29日, 下午10時01分, "lu.albert" <lu.alb...@gmail.com> wrote:

> > > Hi holi您好，
> > >        感謝您的回答，我趕快來試試看。
> > >        再次謝謝您的指導。

> > > 謝謝!!!

> > > On 9月29日, 下午5時42分, holi <holin...@yahoo.com.tw> wrote:

> > > > ---------------引言---------------------
> > > > 想學forth有很長一段時間了，也從網上取得不少資料，但是一直無法完全了解，每隔一段時間就會想再學學看。
> > > > 這次看到了HH51W238.F 想從中再次學學看。
> > > > 我在google的符式協會 上，得到HH51w238.f 的相關資料，

> > > > 也進行到了按 H, HH, HHH可看到訊息了。
> > > > 但是因為是個初學者，不知該如何踏出下一步。
> > > > 有看了HH51W238.f 的程式內容，想從其中學習，但是目前它對我來說就像是天書一樣，還無法理解。

> > > > 不知是否能有個教學程式，如做led的閃爍(port0.0 delay 500 ms ON OFF)。
> > > > 還有如何將這個教學程式compiler 成hex file的步驟。(如何利用 >HEX)。

> > > > 不好意思，提出這個不情之請。

> > > > 謝謝!!!
> > > > -----------------------------------------------------

> > > > \  首先加
> > > > HEX  80 4000   SETMAXCOLROW     \     使DISPLAY CONSOLE 加到最大
> > > > \  ( 或  :  expand.console.size   80 ffff  xcall   drop ;
> > > > expand.console.size  )
> > > > \  然後:
> > > > \  在tetherred Forth51中,  做法如下:
> > > > hex
> > > > \     insert{       9876 ORG            \ 插在9876位址
> > > > t:  500.ms   ` dpl=12     ` dph=34   \ adjust  12 and 34 to get exact
> > > > 500 ms
> > > >                 begin'        dp+    ` a=dph    ` AnDPL
> > > >                 until'a=0    ret
> > > > t:  led.on     ` _90=1   ret    ( port0.0=90  )
> > > > t:  led.off     ` _90=0   ret
> > > > t: test.led     led.on    500.ms    led.off   500.ms    ret
> > > > \      }insert
> > > > 0  here'  >hex

> > > > 用  Mark all text (ctrl+A)   和 Copy Highlighted Text (ctrl+C)  將  .hex檔存
> > > > 起來作為燒錄之用.- 隱藏被引用文字 -

> > > - 顯示被引用文字 -- 隱藏被引用文字 -

> > - 顯示被引用文字 -- 隱藏被引用文字 -

> - 顯示被引用文字 -

>   進入 hh51w364.exe
> see  +
>                          T:  +
>   ( 3067  26         )                              A+(0)
>   ( 3068  08         )                           `  R0  +
>   ( 3069  22         )                              RET
> 得知  +  的位址是   3067
> ...........
> 打  0 run  就進入  forth51 模擬了.
> 按 s <enter>
> 按 c <enter>
> 按 e11 <enter>
> 按 e22 <enter>
> 按 e33 <enter>
> 按 e44 <enter>
> 按 c       =======>  Content
> stack(04)  11 22 33 44
> ...............
> 按 e30 <enter>
> 按 e67 <enter>
> 按 c
> stack(06)  11 22 33 44 30 67
> 按 b         =====>  Branch
> 按 c
> stack(03)  11 22 77    =====>  33+44=77
> 以上是軟體模擬8051跑FORTH51.不必要硬體即可學習程式設計了.

> HAPPY WITH FORTH LEARNING.

> --- *09/10/1 (四)，lu albert <lu.alb...@gmail.com>* 寫道：

> 寄件者: lu albert <lu.alb...@gmail.com>
> 主旨: [符式協會:597] Re: RE： [符式協會:594] Re: 有關eForth51
> 收件者: figtaiwan@googlegroups.com
> 日期: 2009年10月1日,四,上午10:24

>  謝謝加感恩。

> 原先我是用PROTEUS模擬AT89C51系統的。
> 看來是不行了，先找個硬體板再試試。
> 再次謝謝您的指導。

> 2009/10/1 chang luke <holin...@yahoo.com.tw<http://tw.mc734.mail.yahoo.com/mc/compose?to=holin...@yahoo.com.tw>

>>   用 ｈｈ５１ｗ３６４。ｅｘｅ
>> 首先你要能透過rs232與pc交談. ok?
>> 開兩個相同的win32for工作檔一個作rs232<--->-pc用,一個作查看程式用,如
>> 0 u
>> words'
>> see main
>> see forth'
>> see   test.led
>> 在此可以看出 test.led 程式位址
>> -------------------------------------------------------
>> 切換至rs232<--->-pc工作檔畫面,接上rs232  cable
>> 打 38.4k1   \  or 38.4k2 .........38.4k7    baud rate speed=38.4k,   com
>> port 1
>> 或 57.6k1   \  or 57.6k2  ........57.6k7
>> 或 115.2k1 \  or 115.2k2  or 115.2k3  or 115.2k4 .....115.2k7
>> .....  9.6k1 ..... 19.2k1
>> .......................
>> 現在8051應該可以和pc交談了.
>> 按<enter>會有反應
>> command>
>> command>
>> ......
>> 按  f
>> 則進入 forth51   會顯示
>> f>
>> 按<enter>會有反應
>> ｆ＞
>> ｆ＞
>> ｆ＞
>> ....
>> 到此表示一切順利，恭喜！
>> 按 Ｅ１１＜ｅｎｔｅｒ＞ ＼ ｅｎｔｅｒ ｎｕｍｂｅｒ １１
>> 按 Ｅ１１＜ｅｎｔｅｒ＞
>> 按 Ｅ２２＜ｅｎｔｅｒ＞
>> 按 Ｅ３３＜ｅｎｔｅｒ＞
>> 按 ｃ ＼ ｓｈｏｗ ｓｔａｃｋ ｃｏｎｔｅｎｔ
>> 按 １２ ＼ ｔｅｓｔ。ｌｅｄ 的ｈｉｇｈ ｂｙｔｅ ａｄｄｒ
>> 按 ３４ ＼ ｔｅｓｔ。ｌｅｄ 的 ｌｏｗ ｂｙｔｅ ａｄｄｒ。
>> 按 ｂ ＼ 執行ｔｅｓｔ。ｌｅｄ程式
>> 至此大功告成，恭喜啦。

>> Ｇｏｄ ｂｌｅｓｓ ｙｏｕ！

>> --------------------------------------------------------

>> --- *09/9/30 (三)，lu.albert <lu.alb...@gmail.com<http://tw.mc734.mail.yahoo.com/mc/compose?to=lu.alb...@gmail.com>
>> >* 寫道：

>> 寄件者: lu.albert <lu.alb...@gmail.com<http://tw.mc734.mail.yahoo.com/mc/compose?to=lu.alb...@gmail.com>

>> 主旨: [符式協會:594] Re: 有關eForth51
>> 收件者: "符式協會" <figtaiwan@googlegroups.com<http://tw.mc734.mail.yahoo.com/mc/compose?to=figtaiwan@googlegroups.com>

>> 日期: 2009年9月30日,三,下午10:04

>> 哇!!!
>> 謝謝 holi 提供的資料，像是突然尋到了超大的寶庫。
>> 單晶片多核心  ARMFORTH,... 這麼多都想要。可得好好努力了。

>> 不過還是要一步一步來。
>> 之前holi 給的 test.led ，我還沒成功呢。
>> 0 here' >hex 是有產生了HEX 檔所產生的資料，我把HEX加進了AT89c51。但結果led並沒有亮。
>> 目前還不知道問題出在哪。
>> 我試著將
>> t: test.led     led.on    500.ms    led.off   500.ms    ret
>> 改為
>> t: test.led  begin'   led.on    500.ms    led.off   500.ms  again'
>> ret

>> 還是不行。

>> 想請問一下，這個程式是如何執行 test.led 的 ?

>> On 9月30日, 上午1時14分, holi <holin...@yahoo.com.tw<http://tw.mc734.mail.yahoo.com/mc/compose?to=holin...@yahoo.com.tw>>
>> wrote:
>> > 進入groups.yahoo.com/group/armForth 的  files  區,下載   ef51v364.exe 即可立即執
>> > 行  tetherred forth51.

>> > On 9月29日, 下午10時55分, holi <holin...@yahoo.com.tw<http://tw.mc734.mail.yahoo.com/mc/compose?to=holin...@yahoo.com.tw>>
>> wrote:

>> > > 如要更多有關資料如: 單晶片多核心  ARMFORTH,...請進入
>> > > groups.yahoo.com/group/armForth

>> > > On 9月29日, 下午10時01分, "lu.albert" <lu.alb...@gmail.com<http://tw.mc734.mail.yahoo.com/mc/compose?to=lu.alb...@gmail.com>>
>> wrote:

>> > > > Hi holi您好，
>> > > >        感謝您的回答，我趕快來試試看。
>> > > >        再次謝謝您的指導。

>> > > > 謝謝!!!

>> > > > On 9月29日, 下午5時42分, holi <holin...@yahoo.com.tw<http://tw.mc734.mail.yahoo.com/mc/compose?to=holin...@yahoo.com.tw>>
>> wrote:

>> > > > > ---------------引言---------------------
>> > > > > 想學forth有很長一段時間了，也從網上取得不少資料，但是一直無法完全了解，每隔一段時間就會想再學學看。
>> > > > > 這次看到了HH51W238.F 想從中再次學學看。
>> > > > > 我在google的符式協會 上，得到HH51w238.f 的相關資料，

>> > > > > 也進行到了按 H, HH, HHH可看到訊息了。
>> > > > > 但是因為是個初學者，不知該如何踏出下一步。
>> > > > > 有看了HH51W238.f 的程式內容，想從其中學習，但是目前它對我來說就像是天書一樣，還無法理解。

>> > > > > 不知是否能有個教學程式，如做led的閃爍(port0.0 delay 500 ms ON OFF)。
>> > > > > 還有如何將這個教學程式compiler 成hex file的步驟。(如何利用 >HEX)。

>> > > > > 不好意思，提出這個不情之請。

>> > > > > 謝謝!!!
>> > > > > -----------------------------------------------------

>> > > > > \  首先加
>> > > > > HEX  80 4000   SETMAXCOLROW     \     使DISPLAY CONSOLE 加到最大
>> > > > > \  ( 或  :  expand.console.size   80 ffff  xcall   drop ;
>> > > > > expand.console.size  )
>> > > > > \  然後:
>> > > > > \  在tetherred Forth51中,  做法如下:
>> > > > > hex
>> > > > > \     insert{       9876 ORG            \ 插在9876位址
>> > > > > t:  500.ms   ` dpl=12     ` dph=34   \ adjust  12 and 34 to get
>> exact
>> > > > > 500 ms
>> > > > >                 begin'        dp+    ` a=dph    ` AnDPL
>> > > > >                 until'a=0    ret
>> > > > > t:  led.on     ` _90=1   ret    ( port0.0=90  )
>> > > > > t:  led.off     ` _90=0   ret
>> > > > > t: test.led     led.on    500.ms    led.off   500.ms    ret
>> > > > > \      }insert
>> > > > > 0  here'  >hex

>> > > > > 用  Mark all text (ctrl+A)   和 Copy Highlighted Text (ctrl+C)  將
>> .hex檔存
>> > > > > 起來作為燒錄之用.- 隱藏被引用文字 -

>> > > > - 顯示被引用文字 -- 隱藏被引用文字 -

>> > > - 顯示被引用文字 -- 隱藏被引用文字 -

>> > - 顯示被引用文字 -

>> ___________________________________________________
>> 您的生活即時通 － 溝通、娛樂、生活、工作一次搞定！
>> http://messenger.yahoo.com.tw

> ___________________________________________________
> 您的生活即時通 － 溝通、娛樂、生活、工作一次搞定！
> http://messenger.yahoo.com.tw

> 進入groups.yahoo.com/group/armForth 的  files  區,下載   ef51v364.exe 即可立即執
> 行  tetherred forth51.

> On 9月29日, 下午10時55分, holi <holin...@yahoo.com.tw> wrote:

> > 如要更多有關資料如: 單晶片多核心  ARMFORTH,...請進入
> > groups.yahoo.com/group/armForth

> > On 9月29日, 下午10時01分, "lu.albert" <lu.alb...@gmail.com> wrote:

> > > Hi holi您好，
> > >        感謝您的回答，我趕快來試試看。
> > >        再次謝謝您的指導。

> > > 謝謝!!!

> > > On 9月29日, 下午5時42分, holi <holin...@yahoo.com.tw> wrote:

> > > > ---------------引言---------------------
> > > > 想學forth有很長一段時間了，也從網上取得不少資料，但是一直無法完全了解，每隔一段時間就會想再學學看。
> > > > 這次看到了HH51W238.F 想從中再次學學看。
> > > > 我在google的符式協會 上，得到HH51w238.f 的相關資料，

> > > > 也進行到了按 H, HH, HHH可看到訊息了。
> > > > 但是因為是個初學者，不知該如何踏出下一步。
> > > > 有看了HH51W238.f 的程式內容，想從其中學習，但是目前它對我來說就像是天書一樣，還無法理解。

> > > > 不知是否能有個教學程式，如做led的閃爍(port0.0 delay 500 ms ON OFF)。
> > > > 還有如何將這個教學程式compiler 成hex file的步驟。(如何利用 >HEX)。

> > > > 不好意思，提出這個不情之請。

> > > > 謝謝!!!
> > > > -----------------------------------------------------

> > > > \  首先加
> > > > HEX  80 4000   SETMAXCOLROW     \     使DISPLAY CONSOLE 加到最大
> > > > \  ( 或  :  expand.console.size   80 ffff  xcall   drop ;
> > > > expand.console.size  )
> > > > \  然後:
> > > > \  在tetherred Forth51中,  做法如下:
> > > > hex
> > > > \     insert{       9876 ORG            \ 插在9876位址
> > > > t:  500.ms   ` dpl=12     ` dph=34   \ adjust  12 and 34 to get exact
> > > > 500 ms
> > > >                 begin'        dp+    ` a=dph    ` AnDPL
> > > >                 until'a=0    ret
> > > > t:  led.on     ` _90=1   ret    ( port0.0=90  )
> > > > t:  led.off     ` _90=0   ret
> > > > t: test.led     led.on    500.ms    led.off   500.ms    ret
> > > > \      }insert
> > > > 0  here'  >hex

> > > > 用  Mark all text (ctrl+A)   和 Copy Highlighted Text (ctrl+C)  將  .hex檔存
> > > > 起來作為燒錄之用.- 隱藏被引用文字 -

> > > - 顯示被引用文字 -- 隱藏被引用文字 -

> > - 顯示被引用文字 -- 隱藏被引用文字 -

> - 顯示被引用文字 -

>   使用新竹在地國產的 cpu megawin 的 mpc82e52 ( 16k flash rom, 25mhz, 1T, 20 pin,
> 30nt$ )或
> mpc89e515 ( 64k flash rom, 48mhz, 6t/12T, 40pin dip, or 48pin
> qfpn...45nt$)或
> mpc89g515 ( 64k flash rom, 48mhz,      1T, 40pin dip, or 48pin
> qfpn...55nt$)
> 俗又大碗.
> 使用手冊有待前面使用者以使用者角度過河摸石投地一步步建立為佳.

> 想必可以模擬eForth51 base system 及  eForth51 full system  和 tetherred forth51 了吧

> --- *09/10/2 (五)，lu albert <lu.alb...@gmail.com>* 寫道：

> 寄件者: lu albert <lu.alb...@gmail.com>
> 主旨: [符式協會:599] Re: RE： [符式協會:597] Re: RE： [符式協會:594] Re: 有關eForth51
> 收件者: figtaiwan@googlegroups.com
> 日期: 2009年10月2日,五,下午9:55

>  太好了，不用硬體也可以。謝謝。真神。
> 如果有使用手冊的話就更好，但這也可以有種探險的樂趣，
> 可以一直有新發現也不錯。

> 找了片板子，AT89S52的系統。想試一下程式，
> 結果發現 0 here'  >hex 所產生出來的程式大小有12k左右，
> 已超過AT89S52的8k flash。還是不能試。

> 不曉得該如何縮小程式?

> 2009/10/1 chang luke <holin...@yahoo.com.tw<http://tw.mc734.mail.yahoo.com/mc/compose?to=holin...@yahoo.com.tw>

>>   進入 hh51w364.exe
>> see  +
>>                          T:  +
>>   ( 3067  26         )                              A+(0)
>>   ( 3068  08         )                           `  R0  +
>>   ( 3069  22         )                              RET
>> 得知  +  的位址是   3067
>> ...........
>> 打  0 run  就進入  forth51 模擬了.
>> 按 s <enter>
>> 按 c <enter>
>> 按 e11 <enter>
>> 按 e22 <enter>
>> 按 e33 <enter>
>> 按 e44 <enter>
>> 按 c       =======>  Content
>> stack(04)  11 22 33 44
>> ...............
>> 按 e30 <enter>
>> 按 e67 <enter>
>> 按 c
>> stack(06)  11 22 33 44 30 67
>> 按 b         =====>  Branch
>> 按 c
>> stack(03)  11 22 77    =====>  33+44=77
>> 以上是軟體模擬8051跑FORTH51.不必要硬體即可學習程式設計了.

>> HAPPY WITH FORTH LEARNING.

>> --- *09/10/1 (四)，lu albert <lu.alb...@gmail.com<http://tw.mc734.mail.yahoo.com/mc/compose?to=lu.alb...@gmail.com>
>> >* 寫道：

>> 寄件者: lu albert <lu.alb...@gmail.com<http://tw.mc734.mail.yahoo.com/mc/compose?to=lu.alb...@gmail.com>

>> 主旨: [符式協會:597] Re: RE： [符式協會:594] Re: 有關eForth51
>> 收件者: figtaiwan@googlegroups.com<http://tw.mc734.mail.yahoo.com/mc/compose?to=figtaiwan@googlegroups.com>
>> 日期: 2009年10月1日,四,上午10:24

>>  謝謝加感恩。

>> 原先我是用PROTEUS模擬AT89C51系統的。
>> 看來是不行了，先找個硬體板再試試。
>> 再次謝謝您的指導。

>> 2009/10/1 chang luke <holin...@yahoo.com.tw<http://tw.mc734.mail.yahoo.com/mc/compose?to=holin...@yahoo.com.tw>

>>>   用 ｈｈ５１ｗ３６４。ｅｘｅ
>>> 首先你要能透過rs232與pc交談. ok?
>>> 開兩個相同的win32for工作檔一個作rs232<--->-pc用,一個作查看程式用,如
>>> 0 u
>>> words'
>>> see main
>>> see forth'
>>> see   test.led
>>> 在此可以看出 test.led 程式位址
>>> -------------------------------------------------------
>>> 切換至rs232<--->-pc工作檔畫面,接上rs232  cable
>>> 打 38.4k1   \  or 38.4k2 .........38.4k7    baud rate speed=38.4k,   com
>>> port 1
>>> 或 57.6k1   \  or 57.6k2  ........57.6k7
>>> 或 115.2k1 \  or 115.2k2  or 115.2k3  or 115.2k4 .....115.2k7
>>> .....  9.6k1 ..... 19.2k1
>>> .......................
>>> 現在8051應該可以和pc交談了.
>>> 按<enter>會有反應
>>> command>
>>> command>
>>> ......
>>> 按  f
>>> 則進入 forth51   會顯示
>>> f>
>>> 按<enter>會有反應
>>> ｆ＞
>>> ｆ＞
>>> ｆ＞
>>> ....
>>> 到此表示一切順利，恭喜！
>>> 按 Ｅ１１＜ｅｎｔｅｒ＞ ＼ ｅｎｔｅｒ ｎｕｍｂｅｒ １１
>>> 按 Ｅ１１＜ｅｎｔｅｒ＞
>>> 按 Ｅ２２＜ｅｎｔｅｒ＞
>>> 按 Ｅ３３＜ｅｎｔｅｒ＞
>>> 按 ｃ ＼ ｓｈｏｗ ｓｔａｃｋ ｃｏｎｔｅｎｔ
>>> 按 １２ ＼ ｔｅｓｔ。ｌｅｄ 的ｈｉｇｈ ｂｙｔｅ ａｄｄｒ
>>> 按 ３４ ＼ ｔｅｓｔ。ｌｅｄ 的 ｌｏｗ ｂｙｔｅ ａｄｄｒ。
>>> 按 ｂ ＼ 執行ｔｅｓｔ。ｌｅｄ程式
>>> 至此大功告成，恭喜啦。

>>> Ｇｏｄ ｂｌｅｓｓ ｙｏｕ！

>>> --------------------------------------------------------

>>> --- *09/9/30 (三)，lu.albert <lu.alb...@gmail.com<http://tw.mc734.mail.yahoo.com/mc/compose?to=lu.alb...@gmail.com>
>>> >* 寫道：

>>> 寄件者: lu.albert <lu.alb...@gmail.com<http://tw.mc734.mail.yahoo.com/mc/compose?to=lu.alb...@gmail.com>

>>> 主旨: [符式協會:594] Re: 有關eForth51
>>> 收件者: "符式協會" <figtaiwan@googlegroups.com<http://tw.mc734.mail.yahoo.com/mc/compose?to=figtaiwan@googlegroups.com>

>>> 日期: 2009年9月30日,三,下午10:04

>>> 哇!!!
>>> 謝謝 holi 提供的資料，像是突然尋到了超大的寶庫。
>>> 單晶片多核心  ARMFORTH,... 這麼多都想要。可得好好努力了。

>>> 不過還是要一步一步來。
>>> 之前holi 給的 test.led ，我還沒成功呢。
>>> 0 here' >hex 是有產生了HEX 檔所產生的資料，我把HEX加進了AT89c51。但結果led並沒有亮。
>>> 目前還不知道問題出在哪。
>>> 我試著將
>>> t: test.led     led.on    500.ms    led.off   500.ms    ret
>>> 改為
>>> t: test.led  begin'   led.on    500.ms    led.off   500.ms  again'
>>> ret

>>> 還是不行。

>>> 想請問一下，這個程式是如何執行 test.led 的 ?

>>> On 9月30日, 上午1時14分, holi <holin...@yahoo.com.tw<http://tw.mc734.mail.yahoo.com/mc/compose?to=holin...@yahoo.com.tw>>
>>> wrote:
>>> > 進入groups.yahoo.com/group/armForth 的  files  區,下載   ef51v364.exe 即可立即執
>>> > 行  tetherred forth51.

>>> > On 9月29日, 下午10時55分, holi <holin...@yahoo.com.tw<http://tw.mc734.mail.yahoo.com/mc/compose?to=holin...@yahoo.com.tw>>
>>> wrote:

>>> > > 如要更多有關資料如: 單晶片多核心  ARMFORTH,...請進入
>>> > > groups.yahoo.com/group/armForth

>>> > > On 9月29日, 下午10時01分, "lu.albert" <lu.alb...@gmail.com<http://tw.mc734.mail.yahoo.com/mc/compose?to=lu.alb...@gmail.com>>
>>> wrote:

>>> > > > Hi holi您好，
>>> > > >        感謝您的回答，我趕快來試試看。
>>> > > >        再次謝謝您的指導。

>>> > > > 謝謝!!!

>>> > > > On 9月29日, 下午5時42分, holi <holin...@yahoo.com.tw<http://tw.mc734.mail.yahoo.com/mc/compose?to=holin...@yahoo.com.tw>>
>>> wrote:

>>> > > > > ---------------引言---------------------
>>> > > > > 想學forth有很長一段時間了，也從網上取得不少資料，但是一直無法完全了解，每隔一段時間就會想再學學看。
>>> > > > > 這次看到了HH51W238.F 想從中再次學學看。
>>> > > > > 我在google的符式協會 上，得到HH51w238.f 的相關資料，

>>> > > > > 也進行到了按 H, HH, HHH可看到訊息了。
>>> > > > > 但是因為是個初學者，不知該如何踏出下一步。
>>> > > > > 有看了HH51W238.f 的程式內容，想從其中學習，但是目前它對我來說就像是天書一樣，還無法理解。

>>> > > > > 不知是否能有個教學程式，如做led的閃爍(port0.0 delay 500 ms ON OFF)。
>>> > > > > 還有如何將這個教學程式compiler 成hex file的步驟。(如何利用 >HEX)。

>>> > > > > 不好意思，提出這個不情之請。

>>> > > > > 謝謝!!!
>>> > > > > -----------------------------------------------------

>>> > > > > \  首先加
>>> > > > > HEX  80 4000   SETMAXCOLROW     \     使DISPLAY CONSOLE 加到最大
>>> > > > > \  ( 或  :  expand.console.size   80 ffff  xcall   drop ;
>>> > > > > expand.console.size  )
>>> > > > > \  然後:
>>> > > > > \  在tetherred Forth51中,  做法如下:
>>> > > > > hex
>>> > > > > \     insert{       9876 ORG            \ 插在9876位址
>>> > > > > t:  500.ms   ` dpl=12     ` dph=34   \ adjust  12 and 34 to get
>>> exact
>>> > > > > 500 ms
>>> > > > >                 begin'        dp+    ` a=dph    ` AnDPL
>>> > > > >                 until'a=0    ret
>>> > > > > t:  led.on     ` _90=1   ret    ( port0.0=90  )
>>> > > > > t:  led.off     ` _90=0   ret
>>> > > > > t: test.led     led.on    500.ms    led.off   500.ms    ret
>>> > > > > \      }insert
>>> > > > > 0  here'  >hex

>>> > > > > 用  Mark all text (ctrl+A)   和 Copy Highlighted Text (ctrl+C)  將
>>> .hex檔存
>>> > > > > 起來作為燒錄之用.- 隱藏被引用文字 -

>>> > > > - 顯示被引用文字 -- 隱藏被引用文字 -

>>> > > - 顯示被引用文字 -- 隱藏被引用文字 -

>>> > - 顯示被引用文字 -

>>> ___________________________________________________
>>> 您的生活即時通 － 溝通、娛樂、生活、工作一次搞定！
>>> http://messenger.yahoo.com.tw

>> ___________________________________________________
>> 您的生活即時通 － 溝通、娛樂、生活、工作一次搞定！
>> http://messenger.yahoo.com.tw

> 溝通、娛樂、生活、工作一次搞定！
> http://messenger.yahoo.com.tw

>  謝謝!!! 試了您所提的用軟體模擬8051跑FORTH51。ok了。

> 找到了一塊MPC82G516AE的板子，試著燒入0 here'  >hex 所產生出來的程式。
> 但是硬體FORTH51還沒成功, 板子上晶體是11.0592MHz，baud rate speed不知要設多少才可以?

> 還無法成功出現
> 您所說的:
> 按<enter>會有反應
> command>
> command>

> 待成功時再來報告。

> 謝謝!!!

> 2009/10/3 chang luke <holin...@yahoo.com.tw>

>    使用新竹在地國產的 cpu megawin 的 mpc82e52 ( 16k flash rom, 25mhz, 1T, 20 pin,
>> 30nt$ )或
>> mpc89e515 ( 64k flash rom, 48mhz, 6t/12T, 40pin dip, or 48pin
>> qfpn...45nt$)或
>> mpc89g515 ( 64k flash rom, 48mhz,      1T, 40pin dip, or 48pin
>> qfpn...55nt$)
>> 俗又大碗.
>> 使用手冊有待前面使用者以使用者角度過河摸石投地一步步建立為佳.

>> 想必可以模擬eForth51 base system 及  eForth51 full system  和 tetherred forth51 了吧

>> --- *09/10/2 (五)，lu albert <lu.alb...@gmail.com>* 寫道：

>> 寄件者: lu albert <lu.alb...@gmail.com>
>> 主旨: [符式協會:599] Re: RE： [符式協會:597] Re: RE： [符式協會:594] Re: 有關eForth51
>> 收件者: figtaiwan@googlegroups.com
>> 日期: 2009年10月2日,五,下午9:55

>>  太好了，不用硬體也可以。謝謝。真神。
>> 如果有使用手冊的話就更好，但這也可以有種探險的樂趣，
>> 可以一直有新發現也不錯。

>> 找了片板子，AT89S52的系統。想試一下程式，
>> 結果發現 0 here'  >hex 所產生出來的程式大小有12k左右，
>> 已超過AT89S52的8k flash。還是不能試。

>> 不曉得該如何縮小程式?

>> 2009/10/1 chang luke <holin...@yahoo.com.tw<http://tw.mc734.mail.yahoo.com/mc/compose?to=holin...@yahoo.com.tw>

>>>   進入 hh51w364.exe
>>> see  +
>>>                          T:  +
>>>   ( 3067  26         )                              A+(0)
>>>   ( 3068  08         )                           `  R0  +
>>>   ( 3069  22         )                              RET
>>> 得知  +  的位址是   3067
>>> ...........
>>> 打  0 run  就進入  forth51 模擬了.
>>> 按 s <enter>
>>> 按 c <enter>
>>> 按 e11 <enter>
>>> 按 e22 <enter>
>>> 按 e33 <enter>
>>> 按 e44 <enter>
>>> 按 c       =======>  Content
>>> stack(04)  11 22 33 44
>>> ...............
>>> 按 e30 <enter>
>>> 按 e67 <enter>
>>> 按 c
>>> stack(06)  11 22 33 44 30 67
>>> 按 b         =====>  Branch
>>> 按 c
>>> stack(03)  11 22 77    =====>  33+44=77
>>> 以上是軟體模擬8051跑FORTH51.不必要硬體即可學習程式設計了.

>>> HAPPY WITH FORTH LEARNING.

>>> --- *09/10/1 (四)，lu albert <lu.alb...@gmail.com<http://tw.mc734.mail.yahoo.com/mc/compose?to=lu.alb...@gmail.com>
>>> >* 寫道：

>>> 寄件者: lu albert <lu.alb...@gmail.com<http://tw.mc734.mail.yahoo.com/mc/compose?to=lu.alb...@gmail.com>

>>> 主旨: [符式協會:597] Re: RE： [符式協會:594] Re: 有關eForth51
>>> 收件者: figtaiwan@googlegroups.com<http://tw.mc734.mail.yahoo.com/mc/compose?to=figtaiwan@googlegroups.com>
>>> 日期: 2009年10月1日,四,上午10:24

>>>  謝謝加感恩。

>>> 原先我是用PROTEUS模擬AT89C51系統的。
>>> 看來是不行了，先找個硬體板再試試。
>>> 再次謝謝您的指導。

>>> 2009/10/1 chang luke <holin...@yahoo.com.tw<http://tw.mc734.mail.yahoo.com/mc/compose?to=holin...@yahoo.com.tw>

>>>>   用 ｈｈ５１ｗ３６４。ｅｘｅ
>>>> 首先你要能透過rs232與pc交談. ok?
>>>> 開兩個相同的win32for工作檔一個作rs232<--->-pc用,一個作查看程式用,如
>>>> 0 u
>>>> words'
>>>> see main
>>>> see forth'
>>>> see   test.led
>>>> 在此可以看出 test.led 程式位址
>>>> -------------------------------------------------------
>>>> 切換至rs232<--->-pc工作檔畫面,接上rs232  cable
>>>> 打 38.4k1   \  or 38.4k2 .........38.4k7    baud rate speed=38.4k,   com
>>>> port 1
>>>> 或 57.6k1   \  or 57.6k2  ........57.6k7
>>>> 或 115.2k1 \  or 115.2k2  or 115.2k3  or 115.2k4 .....115.2k7
>>>> .....  9.6k1 ..... 19.2k1
>>>> .......................
>>>> 現在8051應該可以和pc交談了.
>>>> 按<enter>會有反應
>>>> command>
>>>> command>
>>>> ......
>>>> 按  f
>>>> 則進入 forth51   會顯示
>>>> f>
>>>> 按<enter>會有反應
>>>> ｆ＞
>>>> ｆ＞
>>>> ｆ＞
>>>> ....
>>>> 到此表示一切順利，恭喜！
>>>> 按 Ｅ１１＜ｅｎｔｅｒ＞ ＼ ｅｎｔｅｒ ｎｕｍｂｅｒ １１
>>>> 按 Ｅ１１＜ｅｎｔｅｒ＞
>>>> 按 Ｅ２２＜ｅｎｔｅｒ＞
>>>> 按 Ｅ３３＜ｅｎｔｅｒ＞
>>>> 按 ｃ ＼ ｓｈｏｗ ｓｔａｃｋ ｃｏｎｔｅｎｔ
>>>> 按 １２ ＼ ｔｅｓｔ。ｌｅｄ 的ｈｉｇｈ ｂｙｔｅ ａｄｄｒ
>>>> 按 ３４ ＼ ｔｅｓｔ。ｌｅｄ 的 ｌｏｗ ｂｙｔｅ ａｄｄｒ。
>>>> 按 ｂ ＼ 執行ｔｅｓｔ。ｌｅｄ程式
>>>> 至此大功告成，恭喜啦。

>>>> Ｇｏｄ ｂｌｅｓｓ ｙｏｕ！

>>>> --------------------------------------------------------

>>>> --- *09/9/30 (三)，lu.albert <lu.alb...@gmail.com<http://tw.mc734.mail.yahoo.com/mc/compose?to=lu.alb...@gmail.com>
>>>> >* 寫道：

>>>> 寄件者: lu.albert <lu.alb...@gmail.com<http://tw.mc734.mail.yahoo.com/mc/compose?to=lu.alb...@gmail.com>

>>>> 主旨: [符式協會:594] Re: 有關eForth51
>>>> 收件者: "符式協會" <figtaiwan@googlegroups.com<http://tw.mc734.mail.yahoo.com/mc/compose?to=figtaiwan@googlegroups.com>

>>>> 日期: 2009年9月30日,三,下午10:04

>>>> 哇!!!
>>>> 謝謝 holi 提供的資料，像是突然尋到了超大的寶庫。
>>>> 單晶片多核心  ARMFORTH,... 這麼多都想要。可得好好努力了。

>>>> 不過還是要一步一步來。
>>>> 之前holi 給的 test.led ，我還沒成功呢。
>>>> 0 here' >hex 是有產生了HEX 檔所產生的資料，我把HEX加進了AT89c51。但結果led並沒有亮。
>>>> 目前還不知道問題出在哪。
>>>> 我試著將
>>>> t: test.led     led.on    500.ms    led.off   500.ms    ret
>>>> 改為
>>>> t: test.led  begin'   led.on    500.ms    led.off   500.ms  again'
>>>> ret

>>>> 還是不行。

>>>> 想請問一下，這個程式是如何執行 test.led 的 ?

>>>> On 9月30日, 上午1時14分, holi <holin...@yahoo.com.tw<http://tw.mc734.mail.yahoo.com/mc/compose?to=holin...@yahoo.com.tw>>
>>>> wrote:
>>>> > 進入groups.yahoo.com/group/armForth 的  files  區,下載   ef51v364.exe 即可立即執
>>>> > 行  tetherred forth51.

>>>> > On 9月29日, 下午10時55分, holi <holin...@yahoo.com.tw<http://tw.mc734.mail.yahoo.com/mc/compose?to=holin...@yahoo.com.tw>>
>>>> wrote:

>>>> > > 如要更多有關資料如: 單晶片多核心  ARMFORTH,...請進入
>>>> > > groups.yahoo.com/group/armForth

>>>> > > On 9月29日, 下午10時01分, "lu.albert" <lu.alb...@gmail.com<http://tw.mc734.mail.yahoo.com/mc/compose?to=lu.alb...@gmail.com>>
>>>> wrote:

>>>> > > > Hi holi您好，
>>>> > > >        感謝您的回答，我趕快來試試看。
>>>> > > >        再次謝謝您的指導。

>>>> > > > 謝謝!!!

>>>> > > > On 9月29日, 下午5時42分, holi <holin...@yahoo.com.tw<http://tw.mc734.mail.yahoo.com/mc/compose?to=holin...@yahoo.com.tw>>
>>>> wrote:

>>>> > > > > ---------------引言---------------------
>>>> > > > > 想學forth有很長一段時間了，也從網上取得不少資料，但是一直無法完全了解，每隔一段時間就會想再學學看。
>>>> > > > > 這次看到了HH51W238.F 想從中再次學學看。
>>>> > > > > 我在google的符式協會 上，得到HH51w238.f 的相關資料，

>>>> > > > > 也進行到了按 H, HH, HHH可看到訊息了。
>>>> > > > > 但是因為是個初學者，不知該如何踏出下一步。
>>>> > > > > 有看了HH51W238.f 的程式內容，想從其中學習，但是目前它對我來說就像是天書一樣，還無法理解。

>>>> > > > > 不知是否能有個教學程式，如做led的閃爍(port0.0 delay 500 ms ON OFF)。
>>>> > > > > 還有如何將這個教學程式compiler 成hex file的步驟。(如何利用 >HEX)。

>>>> > > > > 不好意思，提出這個不情之請。

>>>> > > > > 謝謝!!!
>>>> > > > > -----------------------------------------------------

>>>> > > > > \  首先加
>>>> > > > > HEX  80 4000   SETMAXCOLROW     \     使DISPLAY CONSOLE 加到最大
>>>> > > > > \  ( 或  :  expand.console.size   80 ffff  xcall   drop ;
>>>> > > > > expand.console.size  )
>>>> > > > > \  然後:
>>>> > > > > \  在tetherred Forth51中,  做法如下:
>>>> > > > > hex
>>>> > > > > \     insert{       9876 ORG            \ 插在9876位址
>>>> > > > > t:  500.ms   ` dpl=12     ` dph=34   \ adjust  12 and 34 to get
>>>> exact
>>>> > > > > 500 ms
>>>> > > > >                 begin'        dp+    ` a=dph    ` AnDPL
>>>> > > > >                 until'a=0    ret
>>>> > > > > t:  led.on     ` _90=1   ret    ( port0.0=90  )
>>>> > > > > t:  led.off     ` _90=0   ret
>>>> > > > > t: test.led     led.on    500.ms    led.off   500.ms    ret
>>>> > > > > \      }insert
>>>> > > > > 0  here'  >hex

>>>> > > > > 用  Mark all text (ctrl+A)   和 Copy Highlighted Text (ctrl+C)  將
>>>> .hex檔存
>>>> > > > > 起來作為燒錄之用.- 隱藏被引用文字 -

>>>> > > > - 顯示被引用文字 -- 隱藏被引用文字 -

>>>> > > - 顯示被引用文字 -- 隱藏被引用文字

> 進入groups.yahoo.com/group/armForth 的  files  區,下載   ef51v364.exe 即可立即執
> 行  tetherred forth51.

> On 9月29日, 下午10時55分, holi <holin...@yahoo.com.tw> wrote:
> > 如要更多有關資料如: 單晶片多核心  ARMFORTH,...請進入
> > groups.yahoo.com/group/armForth

> > On 9月29日, 下午10時01分, "lu.albert" <lu.alb...@gmail.com> wrote:

> > > Hi holi您好，
> > >        感謝您的回答，我趕快來試試看。
> > >        再次謝謝您的指導。

> > > 謝謝!!!

> > > On 9月29日, 下午5時42分, holi <holin...@yahoo.com.tw> wrote:

> > > > ---------------引言---------------------
> > > > 想學forth有很長一段時間了，也從網上取得不少資料，但是一直無法完全了解，每隔一段時間就會想再學學看。
> > > > 這次看到了HH51W238.F 想從中再次學學看。
> > > > 我在google的符式協會 上，得到HH51w238.f 的相關資料，

> > > > 也進行到了按 H, HH, HHH可看到訊息了。
> > > > 但是因為是個初學者，不知該如何踏出下一步。
> > > > 有看了HH51W238.f 的程式內容，想從其中學習，但是目前它對我來說就像是天書一樣，還無法理解。

> > > > 不知是否能有個教學程式，如做led的閃爍(port0.0 delay 500 ms ON OFF)。
> > > > 還有如何將這個教學程式compiler 成hex file的步驟。(如何利用 >HEX)。

> > > > 不好意思，提出這個不情之請。

> > > > 謝謝!!!
> > > > -----------------------------------------------------

> > > > \  首先加
> > > > HEX  80 4000   SETMAXCOLROW     \     使DISPLAY CONSOLE 加到最大
> > > > \  ( 或  :  expand.console.size   80 ffff  xcall   drop ;
> > > > expand.console.size  )
> > > > \  然後:
> > > > \  在tetherred Forth51中,  做法如下:
> > > > hex
> > > > \     insert{       9876 ORG            \ 插在9876位址
> > > > t:  500.ms   ` dpl=12     ` dph=34   \ adjust  12 and 34 to get
> exact
> > > > 500 ms
> > > >                 begin'        dp+    ` a=dph    ` AnDPL
> > > >                 until'a=0    ret
> > > > t:  led.on     ` _90=1   ret    ( port0.0=90  )
> > > > t:  led.off     ` _90=0   ret
> > > > t: test.led     led.on    500.ms    led.off   500.ms    ret
> > > > \      }insert
> > > > 0  here'  >hex

> > > > 用  Mark all text (ctrl+A)   和 Copy Highlighted Text (ctrl+C)  將
>  .hex檔存
> > > > 起來作為燒錄之用.- 隱藏被引用文字 -

> > > - 顯示被引用文字 -- 隱藏被引用文字 -

> > - 顯示被引用文字 -

> 如要更多有關資料如: 單晶片多核心  ARMFORTH,...請進入
> groups.yahoo.com/group/armForth

> On 9月29日, 下午10時01分, "lu.albert" <lu.alb...@gmail.com> wrote:

> > Hi holi您好，
> >        感謝您的回答，我趕快來試試看。
> >        再次謝謝您的指導。

> > 謝謝!!!

> > On 9月29日, 下午5時42分, holi <holin...@yahoo.com.tw> wrote:

> > > ---------------引言---------------------
> > > 想學forth有很長一段時間了，也從網上取得不少資料，但是一直無法完全了解，每隔一段時間就會想再學學看。
> > > 這次看到了HH51W238.F 想從中再次學學看。
> > > 我在google的符式協會 上，得到HH51w238.f 的相關資料，

> > > 也進行到了按 H, HH, HHH可看到訊息了。
> > > 但是因為是個初學者，不知該如何踏出下一步。
> > > 有看了HH51W238.f 的程式內容，想從其中學習，但是目前它對我來說就像是天書一樣，還無法理解。

> > > 不知是否能有個教學程式，如做led的閃爍(port0.0 delay 500 ms ON OFF)。
> > > 還有如何將這個教學程式compiler 成hex file的步驟。(如何利用 >HEX)。

> > > 不好意思，提出這個不情之請。

> > > 謝謝!!!
> > > -----------------------------------------------------

> > > \  首先加
> > > HEX  80 4000   SETMAXCOLROW     \     使DISPLAY CONSOLE 加到最大
> > > \  ( 或  :  expand.console.size   80 ffff  xcall   drop ;
> > > expand.console.size  )
> > > \  然後:
> > > \  在tetherred Forth51中,  做法如下:
> > > hex
> > > \     insert{       9876 ORG            \ 插在9876位址
> > > t:  500.ms   ` dpl=12     ` dph=34   \ adjust  12 and 34 to get exact
> > > 500 ms
> > >                 begin'        dp+    ` a=dph    ` AnDPL
> > >                 until'a=0    ret
> > > t:  led.on     ` _90=1   ret    ( port0.0=90  )
> > > t:  led.off     ` _90=0   ret
> > > t: test.led     led.on    500.ms    led.off   500.ms    ret
> > > \      }insert
> > > 0  here'  >hex

> > > 用  Mark all text (ctrl+A)   和 Copy Highlighted Text (ctrl+C)  將  .hex檔存
> > > 起來作為燒錄之用.- 隱藏被引用文字 -

> > - 顯示被引用文字 -- 隱藏被引用文字 -

> - 顯示被引用文字 -

>   0 run   就進入模擬tetherred forth51了.
> 按c  ====  stack Content
> 按e11    ==== enter number 11
> 按e22   ==== enter number 22
> 按e33
> 按e30
> 按e67
> 按b
> 按c
> 按s
> 按<esc> 離開
> ================
> 在模擬tetherred forth51下只用四個指令b,c,e,s 交談以簡化操作..
> ================
> 在真實cpu執行下也有如上的功能.,這時可以透過rs232與pc交談控制真實的i/o功能及測試所有指令.這是tetherred forth
> 的威力所在.
> 作法如下:
> 115.2k1  ==== 連線
> 確定程式有在運作如以上 模擬狀態下的那些功能..按c即知有否回應.
> e11
> e22
> e33
> e44
> e55
> 按c
> 按c
> 按c
> .......
> 按<esc> === 這時進入pc 與 tetherred forth51 互動狀態.
> 按  g      +     =====  就會執行+ 的動作
> 按  g'     +     =====  就會執行+ 的動作,且顯示stack 的內容
> ========================
> 這樣就如同8051的os在運作了.

> --- *09/10/7 (三)，lu albert <lu.alb...@gmail.com>* 寫道：

> 寄件者: lu albert <lu.alb...@gmail.com>
> 主旨: [符式協會:606] Re: 有關eForth51
> 收件者: figtaiwan@googlegroups.com
> 日期: 2009年10月7日,三,上午11:11

>  Hi holi您好，
>     請問，我直接執行EF51V364.exe 後是不是就是tetherred forth51 了，還是需要下什麼指令才會進入tetherred
> forth51 ?

> 謝謝!!!

> 2009/9/30 holi <holin...@yahoo.com.tw<http://tw.mc734.mail.yahoo.com/mc/compose?to=holin...@yahoo.com.tw>

>> 進入groups.yahoo.com/group/armForth 的  files  區,下載   ef51v364.exe 即可立即執
>> 行  tetherred forth51.

>> On 9月29日, 下午10時55分, holi <holin...@yahoo.com.tw<http://tw.mc734.mail.yahoo.com/mc/compose?to=holin...@yahoo.com.tw>>
>> wrote:
>> > 如要更多有關資料如: 單晶片多核心  ARMFORTH,...請進入
>> > groups.yahoo.com/group/armForth

>> > On 9月29日, 下午10時01分, "lu.albert" <lu.alb...@gmail.com<http://tw.mc734.mail.yahoo.com/mc/compose?to=lu.alb...@gmail.com>>
>> wrote:

>> > > Hi holi您好，
>> > >        感謝您的回答，我趕快來試試看。
>> > >        再次謝謝您的指導。

>> > > 謝謝!!!

>> > > On 9月29日, 下午5時42分, holi <holin...@yahoo.com.tw<http://tw.mc734.mail.yahoo.com/mc/compose?to=holin...@yahoo.com.tw>>
>> wrote:

>> > > > ---------------引言---------------------
>> > > > 想學forth有很長一段時間了，也從網上取得不少資料，但是一直無法完全了解，每隔一段時間就會想再學學看。
>> > > > 這次看到了HH51W238.F 想從中再次學學看。
>> > > > 我在google的符式協會 上，得到HH51w238.f 的相關資料，

>> > > > 也進行到了按 H, HH, HHH可看到訊息了。
>> > > > 但是因為是個初學者，不知該如何踏出下一步。
>> > > > 有看了HH51W238.f 的程式內容，想從其中學習，但是目前它對我來說就像是天書一樣，還無法理解。

>> > > > 不知是否能有個教學程式，如做led的閃爍(port0.0 delay 500 ms ON OFF)。
>> > > > 還有如何將這個教學程式compiler 成hex file的步驟。(如何利用 >HEX)。

>> > > > 不好意思，提出這個不情之請。

>> > > > 謝謝!!!
>> > > > -----------------------------------------------------

>> > > > \  首先加
>> > > > HEX  80 4000   SETMAXCOLROW     \     使DISPLAY CONSOLE 加到最大
>> > > > \  ( 或  :  expand.console.size   80 ffff  xcall   drop ;
>> > > > expand.console.size  )
>> > > > \  然後:
>> > > > \  在tetherred Forth51中,  做法如下:
>> > > > hex
>> > > > \     insert{       9876 ORG            \ 插在9876位址
>> > > > t:  500.ms   ` dpl=12     ` dph=34   \ adjust  12 and 34 to get
>> exact
>> > > > 500 ms
>> > > >                 begin'        dp+    ` a=dph    ` AnDPL
>> > > >                 until'a=0    ret
>> > > > t:  led.on     ` _90=1   ret    ( port0.0=90  )
>> > > > t:  led.off     ` _90=0   ret
>> > > > t: test.led     led.on    500.ms    led.off   500.ms    ret
>> > > > \      }insert
>> > > > 0  here'  >hex

>> > > > 用  Mark all text (ctrl+A)   和 Copy Highlighted Text (ctrl+C)  將
>>  .hex檔存
>> > > > 起來作為燒錄之用.- 隱藏被引用文字 -

>> > > - 顯示被引用文字 -- 隱藏被引用文字 -

>> > - 顯示被引用文字 -

> ___________________________________________________
> 您的生活即時通 － 溝通、娛樂、生活、工作一次搞定！
> http://messenger.yahoo.com.tw

> 如要更多有關資料如: 單晶片多核心  ARMFORTH,...請進入
> groups.yahoo.com/group/armForth

> On 9月29日, 下午10時01分, "lu.albert" <lu.alb...@gmail.com> wrote:

> > Hi holi您好，
> >        感謝您的回答，我趕快來試試看。
> >        再次謝謝您的指導。

> > 謝謝!!!

> > On 9月29日, 下午5時42分, holi <holin...@yahoo.com.tw> wrote:

> > > ---------------引言---------------------
> > > 想學forth有很長一段時間了，也從網上取得不少資料，但是一直無法完全了解，每隔一段時間就會想再學學看。
> > > 這次看到了HH51W238.F 想從中再次學學看。
> > > 我在google的符式協會 上，得到HH51w238.f 的相關資料，

> > > 也進行到了按 H, HH, HHH可看到訊息了。
> > > 但是因為是個初學者，不知該如何踏出下一步。
> > > 有看了HH51W238.f 的程式內容，想從其中學習，但是目前它對我來說就像是天書一樣，還無法理解。

> > > 不知是否能有個教學程式，如做led的閃爍(port0.0 delay 500 ms ON OFF)。
> > > 還有如何將這個教學程式compiler 成hex file的步驟。(如何利用 >HEX)。

> > > 不好意思，提出這個不情之請。

> > > 謝謝!!!
> > > -----------------------------------------------------

> > > \  首先加
> > > HEX  80 4000   SETMAXCOLROW     \     使DISPLAY CONSOLE 加到最大
> > > \  ( 或  :  expand.console.size   80 ffff  xcall   drop ;
> > > expand.console.size  )
> > > \  然後:
> > > \  在tetherred Forth51中,  做法如下:
> > > hex
> > > \     insert{       9876 ORG            \ 插在9876位址
> > > t:  500.ms   ` dpl=12     ` dph=34   \ adjust  12 and 34 to get exact
> > > 500 ms
> > >                 begin'        dp+    ` a=dph    ` AnDPL
> > >                 until'a=0    ret
> > > t:  led.on     ` _90=1   ret    ( port0.0=90  )
> > > t:  led.off     ` _90=0   ret
> > > t: test.led     led.on    500.ms    led.off   500.ms    ret
> > > \      }insert
> > > 0  here'  >hex

> > > 用  Mark all text (ctrl+A)   和 Copy Highlighted Text (ctrl+C)  將  .hex檔存
> > > 起來作為燒錄之用.- 隱藏被引用文字 -

> > - 顯示被引用文字 -- 隱藏被引用文字 -

> - 顯示被引用文字 -

>   執行hh51w364.exe.
> 首先看一看東西
> see SETMAXCOLROW
> : SETMAXCOLROW          lit "0x4000" MIN lit "0x14" MAX SWAP lit "0x100"
> MIN lit "0x1A" MAX SWAP lit "0x36"
>                 XCALL DROP ;
> 然後
> 80 4000  see SETMAXCOLROW
> hex  0 3f00 >hex
> 最後將它paste到一個  .hex  的檔名

> --- *09/10/10 (六)，lu albert <lu.alb...@gmail.com>* 寫道：

> 寄件者: lu albert <lu.alb...@gmail.com>
> 主旨: [符式協會:611] Re: RE： [符式協會:606] Re: 有關eForth51
> 收件者: figtaiwan@googlegroups.com
> 日期: 2009年10月10日,六,下午9:21

>  謝謝您的回覆。進入tetherred forth51的模擬已可順利進行，謝謝。
> 但是在硬體的rs232上連接還無法正常動作。
> 目前我已用 keil c51
> 試了一下板子的RS232功能，是正常的，可以用RS232和pc的終端機正常連接了，所以硬體上的RS232是ok的。有可能是我所產生的HEX
> FILE有問題。
> 不知能否請您將您所產生的HEX file MAIL給我，讓我試試。

> 謝謝!!!

> 2009/10/7 chang luke <holin...@yahoo.com.tw<http://tw.mc734.mail.yahoo.com/mc/compose?to=holin...@yahoo.com.tw>

>>   0 run   就進入模擬tetherred forth51了.
>> 按c  ====  stack Content
>> 按e11    ==== enter number 11
>> 按e22   ==== enter number 22
>> 按e33
>> 按e30
>> 按e67
>> 按b
>> 按c
>> 按s
>> 按<esc> 離開
>> ================
>> 在模擬tetherred forth51下只用四個指令b,c,e,s 交談以簡化操作..
>> ================
>> 在真實cpu執行下也有如上的功能.,這時可以透過rs232與pc交談控制真實的i/o功能及測試所有指令.這是tetherred forth
>> 的威力所在.
>> 作法如下:
>> 115.2k1  ==== 連線
>> 確定程式有在運作如以上 模擬狀態下的那些功能..按c即知有否回應.
>> e11
>> e22
>> e33
>> e44
>> e55
>> 按c
>> 按c
>> 按c
>> .......
>> 按<esc> === 這時進入pc 與 tetherred forth51 互動狀態.
>> 按  g      +     =====  就會執行+ 的動作
>> 按  g'     +     =====  就會執行+ 的動作,且顯示stack 的內容
>> ========================
>> 這樣就如同8051的os在運作了.

>> --- *09/10/7 (三)，lu albert <lu.alb...@gmail.com<http://tw.mc734.mail.yahoo.com/mc/compose?to=lu.alb...@gmail.com>
>> >* 寫道：

>> 寄件者: lu albert <lu.alb...@gmail.com<http://tw.mc734.mail.yahoo.com/mc/compose?to=lu.alb...@gmail.com>

>> 主旨: [符式協會:606] Re: 有關eForth51
>> 收件者: figtaiwan@googlegroups.com<http://tw.mc734.mail.yahoo.com/mc/compose?to=figtaiwan@googlegroups.com>
>> 日期: 2009年10月7日,三,上午11:11

>>  Hi holi您好，
>>     請問，我直接執行EF51V364.exe 後是不是就是tetherred forth51 了，還是需要下什麼指令才會進入tetherred
>> forth51 ?

>> 謝謝!!!

>> 2009/9/30 holi <holin...@yahoo.com.tw<http://tw.mc734.mail.yahoo.com/mc/compose?to=holin...@yahoo.com.tw>

>>> 進入groups.yahoo.com/group/armForth 的  files  區,下載   ef51v364.exe 即可立即執
>>> 行  tetherred forth51.

>>> On 9月29日, 下午10時55分, holi <holin...@yahoo.com.tw<http://tw.mc734.mail.yahoo.com/mc/compose?to=holin...@yahoo.com.tw>>
>>> wrote:
>>> > 如要更多有關資料如: 單晶片多核心  ARMFORTH,...請進入
>>> > groups.yahoo.com/group/armForth

>>> > On 9月29日, 下午10時01分, "lu.albert" <lu.alb...@gmail.com<http://tw.mc734.mail.yahoo.com/mc/compose?to=lu.alb...@gmail.com>>
>>> wrote:

>>> > > Hi holi您好，
>>> > >        感謝您的回答，我趕快來試試看。
>>> > >        再次謝謝您的指導。

>>> > > 謝謝!!!

>>> > > On 9月29日, 下午5時42分, holi <holin...@yahoo.com.tw<http://tw.mc734.mail.yahoo.com/mc/compose?to=holin...@yahoo.com.tw>>
>>> wrote:

>>> > > > ---------------引言---------------------
>>> > > > 想學forth有很長一段時間了，也從網上取得不少資料，但是一直無法完全了解，每隔一段時間就會想再學學看。
>>> > > > 這次看到了HH51W238.F 想從中再次學學看。
>>> > > > 我在google的符式協會 上，得到HH51w238.f 的相關資料，

>>> > > > 也進行到了按 H, HH, HHH可看到訊息了。
>>> > > > 但是因為是個初學者，不知該如何踏出下一步。
>>> > > > 有看了HH51W238.f 的程式內容，想從其中學習，但是目前它對我來說就像是天書一樣，還無法理解。

>>> > > > 不知是否能有個教學程式，如做led的閃爍(port0.0 delay 500 ms ON OFF)。
>>> > > > 還有如何將這個教學程式compiler 成hex file的步驟。(如何利用 >HEX)。

>>> > > > 不好意思，提出這個不情之請。

>>> > > > 謝謝!!!
>>> > > > -----------------------------------------------------

>>> > > > \  首先加
>>> > > > HEX  80 4000   SETMAXCOLROW     \     使DISPLAY CONSOLE 加到最大
>>> > > > \  ( 或  :  expand.console.size   80 ffff  xcall   drop ;
>>> > > > expand.console.size  )
>>> > > > \  然後:
>>> > > > \  在tetherred Forth51中,  做法如下:
>>> > > > hex
>>> > > > \     insert{       9876 ORG            \ 插在9876位址
>>> > > > t:  500.ms   ` dpl=12     ` dph=34   \ adjust  12 and 34 to get
>>> exact
>>> > > > 500 ms
>>> > > >                 begin'        dp+    ` a=dph    ` AnDPL
>>> > > >                 until'a=0    ret
>>> > > > t:  led.on     ` _90=1   ret    ( port0.0=90  )
>>> > > > t:  led.off     ` _90=0   ret
>>> > > > t: test.led     led.on    500.ms    led.off   500.ms    ret
>>> > > > \      }insert
>>> > > > 0  here'  >hex

>>> > > > 用  Mark all text (ctrl+A)   和 Copy Highlighted Text (ctrl+C)  將
>>>  .hex檔存
>>> > > > 起來作為燒錄之用.- 隱藏被引用文字 -

>>> > > - 顯示被引用文字 -- 隱藏被引用文字 -

>>> > - 顯示被引用文字 -

>> ___________________________________________________
>> 您的生活即時通 － 溝通、娛樂、生活、工作一次搞定！
>> http://messenger.yahoo.com.tw

> ___________________________________________________
> 您的生活即時通 － 溝通、娛樂、生活、工作一次搞定！
> http://messenger.yahoo.com.tw

> 如要更多有關資料如: 單晶片多核心  ARMFORTH,...請進入
> groups.yahoo.com/group/armForth

> On 9月29日, 下午10時01分, "lu.albert" <lu.alb...@gmail.com> wrote:

> > Hi holi您好，
> >        感謝您的回答，我趕快來試試看。
> >        再次謝謝您的指導。

> > 謝謝!!!

> > On 9月29日, 下午5時42分, holi <holin...@yahoo.com.tw> wrote:

> > > ---------------引言---------------------
> > > 想學forth有很長一段時間了，也從網上取得不少資料，但是一直無法完全了解，每隔一段時間就會想再學學看。
> > > 這次看到了HH51W238.F 想從中再次學學看。
> > > 我在google的符式協會 上，得到HH51w238.f 的相關資料，

> > > 也進行到了按 H, HH, HHH可看到訊息了。
> > > 但是因為是個初學者，不知該如何踏出下一步。
> > > 有看了HH51W238.f 的程式內容，想從其中學習，但是目前它對我來說就像是天書一樣，還無法理解。

> > > 不知是否能有個教學程式，如做led的閃爍(port0.0 delay 500 ms ON OFF)。
> > > 還有如何將這個教學程式compiler 成hex file的步驟。(如何利用 >HEX)。

> > > 不好意思，提出這個不情之請。

> > > 謝謝!!!
> > > -----------------------------------------------------

> > > \  首先加
> > > HEX  80 4000   SETMAXCOLROW     \     使DISPLAY CONSOLE 加到最大
> > > \  ( 或  :  expand.console.size   80 ffff  xcall   drop ;
> > > expand.console.size  )
> > > \  然後:
> > > \  在tetherred Forth51中,  做法如下:
> > > hex
> > > \     insert{       9876 ORG            \ 插在9876位址
> > > t:  500.ms   ` dpl=12     ` dph=34   \ adjust  12 and 34 to get exact
> > > 500 ms
> > >                 begin'        dp+    ` a=dph    ` AnDPL
> > >                 until'a=0    ret
> > > t:  led.on     ` _90=1   ret    ( port0.0=90  )
> > > t:  led.off     ` _90=0   ret
> > > t: test.led     led.on    500.ms    led.off   500.ms    ret
> > > \      }insert
> > > 0  here'  >hex

> > > 用  Mark all text (ctrl+A)   和 Copy Highlighted Text (ctrl+C)  將  .hex檔存
> > > 起來作為燒錄之用.- 隱藏被引用文字 -

> > - 顯示被引用文字 -- 隱藏被引用文字 -

> - 顯示被引用文字 -

>   22.1184MHz ====  115.2k1
> 11.0592MHz ====  57.6k1
> 按c 應該會有反應
> ======================
> 對了,你的模擬器會動了吧.如是的話cpu 是 MPC89e515 或 MPC82e54 對嗎?

> 我自己洗了百片pcb, 裝了幾片跑mpc89e515沒有問題哩.

> --- *09/10/11 (日)，lu albert <lu.alb...@gmail.com>* 寫道：

> 寄件者: lu albert <lu.alb...@gmail.com>
> 主旨: [符式協會:614] Re: RE： [符式協會:611] Re: RE： [符式協會:606] Re: 有關eForth51
> 收件者: figtaiwan@googlegroups.com
> 日期: 2009年10月11日,日,上午7:13

>  chang luke 謝謝，
> 再請問，51板子上的振盪晶體要用多少的?我的是11.0592Mhz，結果輸入
> 9.6k1
> Initializing Serial Port to:
> COM1 : baud=19200  parity=N data=8 stop=1
> Press ESC to stop talking.
> 19.2k1
> Initializing Serial Port to:
> COM1 : baud=19200  parity=N data=8 stop=1
> Press ESC to stop talking.

> 38.4k1
> Initializing Serial Port to:
> COM1 : baud=38400  parity=N data=8 stop=1
> Press ESC to stop talking.
> *** BE SURE TO REMOVE ISP CONNECTORS FROM P1.4~7 ***

> 57.6k1
> Initializing Serial Port to:
> COM1 : baud=57600  parity=N data=8 stop=1
> Press ESC to stop talking.

> 115.2k1
> Initializing Serial Port to:
> COM1 : baud=115200  parity=N data=8 stop=1
> Press ESC to stop talking.

> 皆無法和forth8051連接，按了"Enter"都沒任何回應。

> 謝謝!!!

> 2009/10/10 chang luke <holin...@yahoo.com.tw<http://tw.mc734.mail.yahoo.com/mc/compose?to=holin...@yahoo.com.tw>

>>   執行hh51w364.exe.
>> 首先看一看東西
>> see SETMAXCOLROW
>> : SETMAXCOLROW          lit "0x4000" MIN lit "0x14" MAX SWAP lit "0x100"
>> MIN lit "0x1A" MAX SWAP lit "0x36"
>>                 XCALL DROP ;
>> 然後
>> 80 4000  see SETMAXCOLROW
>> hex  0 3f00 >hex
>> 最後將它paste到一個  .hex  的檔名

>> --- *09/10/10 (六)，lu albert <lu.alb...@gmail.com<http://tw.mc734.mail.yahoo.com/mc/compose?to=lu.alb...@gmail.com>
>> >* 寫道：

>> 寄件者: lu albert <lu.alb...@gmail.com<http://tw.mc734.mail.yahoo.com/mc/compose?to=lu.alb...@gmail.com>

>> 主旨: [符式協會:611] Re: RE： [符式協會:606] Re: 有關eForth51
>> 收件者: figtaiwan@googlegroups.com<http://tw.mc734.mail.yahoo.com/mc/compose?to=figtaiwan@googlegroups.com>
>> 日期: 2009年10月10日,六,下午9:21

>>  謝謝您的回覆。進入tetherred forth51的模擬已可順利進行，謝謝。
>> 但是在硬體的rs232上連接還無法正常動作。
>> 目前我已用 keil c51
>> 試了一下板子的RS232功能，是正常的，可以用RS232和pc的終端機正常連接了，所以硬體上的RS232是ok的。有可能是我所產生的HEX
>> FILE有問題。
>> 不知能否請您將您所產生的HEX file MAIL給我，讓我試試。

>> 謝謝!!!

>> 2009/10/7 chang luke <holin...@yahoo.com.tw<http://tw.mc734.mail.yahoo.com/mc/compose?to=holin...@yahoo.com.tw>

>>>   0 run   就進入模擬tetherred forth51了.
>>> 按c  ====  stack Content
>>> 按e11    ==== enter number 11
>>> 按e22   ==== enter number 22
>>> 按e33
>>> 按e30
>>> 按e67
>>> 按b
>>> 按c
>>> 按s
>>> 按<esc> 離開
>>> ================
>>> 在模擬tetherred forth51下只用四個指令b,c,e,s 交談以簡化操作..
>>> ================
>>> 在真實cpu執行下也有如上的功能.,這時可以透過rs232與pc交談控制真實的i/o功能及測試所有指令.這是tetherred forth
>>> 的威力所在.
>>> 作法如下:
>>> 115.2k1  ==== 連線
>>> 確定程式有在運作如以上 模擬狀態下的那些功能..按c即知有否回應.
>>> e11
>>> e22
>>> e33
>>> e44
>>> e55
>>> 按c
>>> 按c
>>> 按c
>>> .......
>>> 按<esc> === 這時進入pc 與 tetherred forth51 互動狀態.
>>> 按  g      +     =====  就會執行+ 的動作
>>> 按  g'     +     =====  就會執行+ 的動作,且顯示stack 的內容
>>> ========================
>>> 這樣就如同8051的os在運作了.

>>> --- *09/10/7 (三)，lu albert <lu.alb...@gmail.com<http://tw.mc734.mail.yahoo.com/mc/compose?to=lu.alb...@gmail.com>
>>> >* 寫道：

>>> 寄件者: lu albert <lu.alb...@gmail.com<http://tw.mc734.mail.yahoo.com/mc/compose?to=lu.alb...@gmail.com>

>>> 主旨: [符式協會:606] Re: 有關eForth51
>>> 收件者: figtaiwan@googlegroups.com<http://tw.mc734.mail.yahoo.com/mc/compose?to=figtaiwan@googlegroups.com>
>>> 日期: 2009年10月7日,三,上午11:11

>>>  Hi holi您好，
>>>     請問，我直接執行EF51V364.exe 後是不是就是tetherred forth51 了，還是需要下什麼指令才會進入tetherred
>>> forth51 ?

>>> 謝謝!!!

>>> 2009/9/30 holi <holin...@yahoo.com.tw<http://tw.mc734.mail.yahoo.com/mc/compose?to=holin...@yahoo.com.tw>

>>>> 進入groups.yahoo.com/group/armForth 的  files  區,下載   ef51v364.exe 即可立即執
>>>> 行  tetherred forth51.

>>>> On 9月29日, 下午10時55分, holi <holin...@yahoo.com.tw<http://tw.mc734.mail.yahoo.com/mc/compose?to=holin...@yahoo.com.tw>>
>>>> wrote:
>>>> > 如要更多有關資料如: 單晶片多核心  ARMFORTH,...請進入
>>>> > groups.yahoo.com/group/armForth

>>>> > On 9月29日, 下午10時01分, "lu.albert" <lu.alb...@gmail.com<http://tw.mc734.mail.yahoo.com/mc/compose?to=lu.alb...@gmail.com>>
>>>> wrote:

>>>> > > Hi holi您好，
>>>> > >        感謝您的回答，我趕快來試試看。
>>>> > >        再次謝謝您的指導。

>>>> > > 謝謝!!!

>>>> > > On 9月29日, 下午5時42分, holi <holin...@yahoo.com.tw<http://tw.mc734.mail.yahoo.com/mc/compose?to=holin...@yahoo.com.tw>>
>>>> wrote:

>>>> > > > ---------------引言---------------------
>>>> > > > 想學forth有很長一段時間了，也從網上取得不少資料，但是一直無法完全了解，每隔一段時間就會想再學學看。
>>>> > > > 這次看到了HH51W238.F 想從中再次學學看。
>>>> > > > 我在google的符式協會 上，得到HH51w238.f 的相關資料，

>>>> > > > 也進行到了按 H, HH, HHH可看到訊息了。
>>>> > > > 但是因為是個初學者，不知該如何踏出下一步。
>>>> > > > 有看了HH51W238.f 的程式內容，想從其中學習，但是目前它對我來說就像是天書一樣，還無法理解。

>>>> > > > 不知是否能有個教學程式，如做led的閃爍(port0.0 delay 500 ms ON OFF)。
>>>> > > > 還有如何將這個教學程式compiler 成hex file的步驟。(如何利用 >HEX)。

>>>> > > > 不好意思，提出這個不情之請。

>>>> > > > 謝謝!!!
>>>> > > > -----------------------------------------------------

>>>> > > > \  首先加
>>>> > > > HEX  80 4000   SETMAXCOLROW     \     使DISPLAY CONSOLE 加到最大
>>>> > > > \  ( 或  :  expand.console.size   80 ffff  xcall   drop ;
>>>> > > > expand.console.size  )
>>>> > > > \  然後:
>>>> > > > \  在tetherred Forth51中,  做法如下:
>>>> > > > hex
>>>> > > > \     insert{       9876 ORG            \ 插在9876位址
>>>> > > > t:  500.ms   ` dpl=12     ` dph=34   \ adjust  12 and 34 to get
>>>> exact
>>>> > > > 500 ms
>>>> > > >                 begin'        dp+    ` a=dph    ` AnDPL
>>>> > > >                 until'a=0    ret
>>>> > > > t:  led.on     ` _90=1   ret    ( port0.0=90  )
>>>> > > > t:  led.off     ` _90=0   ret
>>>> > > > t: test.led     led.on    500.ms    led.off   500.ms    ret
>>>> > > > \      }insert
>>>> > > > 0  here'  >hex

>>>> > > > 用  Mark all text (ctrl+A)   和 Copy Highlighted Text (ctrl+C)  將
>>>>  .hex檔存
>>>> > > > 起來作為燒錄之用.- 隱藏被引用文字 -

>>>> > > - 顯示被引用文字 -- 隱藏被引用文字 -

>>>> > - 顯示被引用文字 -

>>> ___________________________________________________
>>> 您的生活即時通 － 溝通、娛樂、生活、工作一次搞定！
>>> http://messenger.yahoo.com.tw

>> ___________________________________________________
>> 您的生活即時通 － 溝通、娛樂、生活、工作一次搞定！
>> http://messenger.yahoo.com.tw

> 溝通、娛樂、生活、工作一次搞定！
> http://messenger.yahoo.com.tw

>再請問，當我連線成功後，按h，出現<command>，這時有什麼command可用嗎?
>我只能按esc回到ok。

> main 是純組語( assembly  language )下的互動程式.
> 開始時是想將forth附身在其下的一個命令.
> 進入main後,按 f 就進入tetherred forth51.
> ................
> 再main之下如何和  8051 的 subroutine互傳資料,一直百思無解,各位看官可有妙招?
> 最終只好放棄main.  =====>  legacy.
> 惟有forth才能很方便自然地透過stack互傳資料,  How is C?
>  >再請問，當我連線成功後，按h，出現<command>，這時有什麼command可用嗎?
> >我只能按esc回到ok。

>  
>  

> ___________________________________________________
>  您的生活即時通 － 溝通、娛樂、生活、工作一次搞定！
>  http://messenger.yahoo.com.tw/

>      恭喜了,其實你高興,我更高興.因這証明我沒有在瞎掰.thanks.
> PREFIX? ON   \   or  OFF
> 100 U
>   ( 0100  02  08  D3 )                              JMP   ADDR'    \  A
>   ( 0103  02  24  74 )                              JMP   'EXECUTE   \ B
>   ( 0106  02  27  9A )                              JMP
> SEND.OUT.DATA.STACK.CONTENT  \ C
>   ( 0109  02  08  CE )                              JMP   DATA'   \ D
>   ( 010C  02  08  50 )                              JMP
> ENTER.NUMBER+echo  \ E
>   ( 010F  02  28  CF )                              JMP   FORTH'  \ F
>   ( 0112  02  23  9B )                              JMP   GO.TO.R2~   \ G
>   ( 0115  02  23  48 )                              JMP   MAIN    \ 當你按 H
> 時就進入 MAIN
>   ( 0118  02  29  CD )                              JMP
> DATA+JMP_ADDR.PC>8051(DJ)
>   ( 011B  02  29  B4 )                              JMP
> ADDR+JMP_ADDR.PC>8051(AJ)
>   ( 011E  02  07  77 )                              JMP   .DATA
>   ( 0121  02  29  DC )                              JMP
> JMP_ADDR.PC>8051(J)
>   ( 0124  02  23  48 )                              JMP   MAIN
>   ( 0127  02  08  90 )                              JMP
> ENTER.NUMBER.no.echo
>   ( 012A  02  09  7D )                              JMP   C!.CPU.0~7F
>   ( 012D  02  24  11 )                              JMP
> READ.PROGRAM.FROM.PC.TO.R50~R7F
>   ( 0130  02  24  83 )                              JMP
> READ.PROGRAM.FROM.PC.TO.xRAM00~FF
>   ( 0133  02  06  14 )                              JMP
> TOGGLE.REFRESH.D/A
>   ( 0136  02  26  ED )                              JMP   SHOW.CPU   \ 按 S
> 時
>   ( 0139  02  29  A5 )                              JMP
> ADDR+DATA+JMP_ADDR.PC>8051(ADJ)
>   ( 013C  02  29  6E )                              JMP   DATA>TX  \ U
>   ( 013F  02  29  64 )                              JMP   DATA.L>TX  \ V
>   ( 0142  02  29  FE )                              JMP
> PC>8051.buffer(8051.side)  \ W
>   ( 0145  02  24  69 )                              JMP   'XCUTE  \ X
>   ( 0148  02  29  EB )                              JMP   PC>8051.R5E~6F  \
> Y
>   ( 014B  02  27  DF )                              JMP   SHOW.ROM/RAM  \
> Z
>   ( 014E  22         )                              RET
>   ( 014F  22         )                              RET
>   ( 0150  22         )                              RET
> ...................

> SEE MAIN
>   \
> --------------------------------------------------------------------------- -----
>                          T:  MAIN
>   ( 2348  75  81  2F )                           `  R81  =2F        \ SP
>   ( 234B  12  22  9B )                              INIT.51
>   ( 234E  D2  09     )                           `  _9  =1          \
> INTERACTIVE.MESSAGE
>   ( 2350  20  97  0E )         ` IF'_97=0                           \
> P1.7                      \ 2350 --> 2361 *****
>   ( 2353  20  96  05 )            ` IF'_96=0                        \
> P1.6                      \ 2353 --> 235B ====
>   ( 2356  12  0B  5D )
> Pulse.High(Addr*256)+Low(Data)(82E54)
>   ( 2359  80   3     )
> ELSE'                                                       \ 2359 --> 235E
> ====
>   ( 235B  12  0C  2B )
> 0.4uS~45uS(82E54)P1.0~1.VR
>   ( 235E             )
> ENDIF'                                      \               \ 2359 --> 235E
> ====
>   ( 235E  00         )                              NOP
>   ( 235F  80   6     )
> ELSE'                                                          \ 235F -->
> 2367 *****
>   ( 2361  20  96  03 )            ` IF'_96=0                        \
> P1.6                      \ 2361 --> 2367 ====
>   ( 2364  12  0C  71 )
> 2uS~100uS(82E54)P1.0~1.VR
>   ( 2367             )
> ENDIF'                                      \               \ 235F --> 2367
> ====
>   ( 2367             )
> ENDIF'                                         \               \ 2361 -->
> 2367 *****
>   ( 2367  12  07  8D )                              PRINT" HH51W361'72"
>   ( 2376             )
> BEGIN'                                         \               \ 238C -->
> 2376 *****
>   ( 2376  12  07  50 )                              CR'
>   ( 2379  12  07  8D )                              PRINT" command>"
>   ( 2385  12  22  39 )                              GET.COMMAND+echo
>   ( 2388  12  22  75 )                              EXECUTE.COMMAND
>   ( 238B  E4         )                              A=0
>   ( 238C  60  E8     )           UNTIL'A<>0

> 按 H  <enter>  看最後一行,這是執行 tetherred forth51 時 pc side 的指令.

>   ( OO <esc>  .S'  M>51  CPU  CPU'  DM  M>EE  2 EE>M  3 new.block  >S  >s'
> G execute''  G'' TEST''  4 dump.eeprom )
> .................................................
> **********  善用 H 及 SEE ****************
> SEE  OO
> see   >s
> see   >s'
> .......
> ==============================
> 57.6k1   \   or  115.2k1
> <esc>  回到 pc side 透過 rs232 下指令給 8051 .  這是tetherred forth 威力所在.
> 1   2    3    4    5    >s
> g    +
> g'    +
> 11  22 33 44  55  g'  -
> ..................................
> 到此你已完全進入pc <---> tetherred forth51 互動式的模式,可以測試所有forth51的指令了.
> .................................
> 試著將  words'  所list出來的東西  存成 f51list.f  供以後參考.

> --- *09/10/12 (一)，lu albert <lu.alb...@gmail.com>* 寫道：

> 寄件者: lu albert <lu.alb...@gmail.com>
> 主旨: [符式協會:621] Re: RE： [符式協會:614] Re: RE： [符式協會:611] Re: RE： [符式協會:606] Re:
> 有關eForth51
> 收件者: figtaiwan@googlegroups.com
> 日期: 2009年10月12日,一,下午8:44

>  謝謝!!!太感謝了!!!!
> 可以了，好高興。
> 謝謝指導。
> 原先我是在57.6k1之後就試著按"Enter", 但都沒任何回應。
> 原來是按C,  按了c之後終於看到了 stack(0) 。
> 試著e11 <enter>, e22 <enter> , e33 <enter> , e44 <enter> , c
> stack(04) 11 22 33 44 .
> 接著我將硬體reset，再按c，出現stack(0).
> 證明了剛剛的stack(04) 11 22 33 44 真的是存在硬體8051中的。真高興。
> 可以再下一步了。

> 哦對了，我用的CPU是MPC82G516AE。

> 再請問，當我連線成功後，按h，出現<command>，這時有什麼command可用嗎?
> 我只能按esc回到ok。

> 2009/10/11 chang luke <holin...@yahoo.com.tw<http://tw.mc734.mail.yahoo.com/mc/compose?to=holin...@yahoo.com.tw>

>>   22.1184MHz ====  115.2k1
>> 11.0592MHz ====  57.6k1
>> 按c 應該會有反應
>> ======================
>> 對了,你的模擬器會動了吧.如是的話cpu 是 MPC89e515 或 MPC82e54 對嗎?

>> 我自己洗了百片pcb, 裝了幾片跑mpc89e515沒有問題哩.

>> --- *09/10/11 (日)，lu albert <lu.alb...@gmail.com<http://tw.mc734.mail.yahoo.com/mc/compose?to=lu.alb...@gmail.com>
>> >* 寫道：

>> 寄件者: lu albert <lu.alb...@gmail.com<http://tw.mc734.mail.yahoo.com/mc/compose?to=lu.alb...@gmail.com>

>> 主旨: [符式協會:614] Re: RE： [符式協會:611] Re: RE： [符式協會:606] Re: 有關eForth51
>> 收件者: figtaiwan@googlegroups.com<http://tw.mc734.mail.yahoo.com/mc/compose?to=figtaiwan@googlegroups.com>
>> 日期: 2009年10月11日,日,上午7:13

>>  chang luke 謝謝，
>> 再請問，51板子上的振盪晶體要用多少的?我的是11.0592Mhz，結果輸入
>> 9.6k1
>> Initializing Serial Port to:
>> COM1 : baud=19200  parity=N data=8 stop=1
>> Press ESC to stop talking.
>> 19.2k1
>> Initializing Serial Port to:
>> COM1 : baud=19200  parity=N data=8 stop=1
>> Press ESC to stop talking.

>> 38.4k1
>> Initializing Serial Port to:
>> COM1 : baud=38400  parity=N data=8 stop=1
>> Press ESC to stop talking.
>> *** BE SURE TO REMOVE ISP CONNECTORS FROM P1.4~7 ***

>> 57.6k1
>> Initializing Serial Port to:
>> COM1 : baud=57600  parity=N data=8 stop=1
>> Press ESC to stop talking.

>> 115.2k1
>> Initializing Serial Port to:
>> COM1 : baud=115200  parity=N data=8 stop=1
>> Press ESC to stop talking.

>> 皆無法和forth8051連接，按了"Enter"都沒任何回應。

>> 謝謝!!!

>> 2009/10/10 chang luke <holin...@yahoo.com.tw<http://tw.mc734.mail.yahoo.com/mc/compose?to=holin...@yahoo.com.tw>

>>>   執行hh51w364.exe.
>>> 首先看一看東西
>>> see SETMAXCOLROW
>>> : SETMAXCOLROW          lit "0x4000" MIN lit "0x14" MAX SWAP lit "0x100"
>>> MIN lit "0x1A" MAX SWAP lit "0x36"
>>>                 XCALL DROP ;
>>> 然後
>>> 80 4000  see SETMAXCOLROW
>>> hex  0 3f00 >hex
>>> 最後將它paste到一個  .hex  的檔名

>>> --- *09/10/10 (六)，lu albert <lu.alb...@gmail.com<http://tw.mc734.mail.yahoo.com/mc/compose?to=lu.alb...@gmail.com>
>>> >* 寫道：

>>> 寄件者: lu albert <lu.alb...@gmail.com<http://tw.mc734.mail.yahoo.com/mc/compose?to=lu.alb...@gmail.com>

>>> 主旨: [符式協會:611] Re: RE： [符式協會:606] Re: 有關eForth51
>>> 收件者: figtaiwan@googlegroups.com<http://tw.mc734.mail.yahoo.com/mc/compose?to=figtaiwan@googlegroups.com>
>>> 日期: 2009年10月10日,六,下午9:21

>>>  謝謝您的回覆。進入tetherred forth51的模擬已可順利進行，謝謝。
>>> 但是在硬體的rs232上連接還無法正常動作。
>>> 目前我已用 keil c51

>see TEST1
>TEST1 DOES>     2@ ;  ok
>see test3
>TEST3 DOES>     2@ ;  ok
>see test.p2.from.0.to.ff
>TEST.P2.FROM.0.TO.FF DOES>      2@ ;  ok