[Forth.js]透過AJAX取得中文筆劃資料

Forth.js現在也可透過AJAX取得JSON資料,所以藉由善心網友提供測試的Chinese Character Web API(http://ccdb.hemiola.com/),Forth.js也可取得中文筆劃資料

c" http://ccdb.hemiola.com/characters/string/" value url
c" ?fields=kTotalStrokes" value urlp

create 姓氏表 c" 陳" , c" 王" , c" 劉" , c" 周" , c" 何" , 
 
: 姓氏表轉字串
c" "
5 for 
  5 r@ - 姓氏表 + @ strconcat 
next 
;

: 雲端取資料 ajax ;
 
: 變json物件 { 資料區域變數 }
 資料區域變數 >json 
;

url 姓氏表轉字串 strconcat  urlp strconcat false tick 變json物件 雲端取資料 

姓氏表 0 + @ . dup 0 json@ kTotalStrokes . .( 劃)  跳行
姓氏表 1 + @ . dup 1 json@ kTotalStrokes . .( 劃)  跳行
姓氏表 2 + @ . dup 2 json@ kTotalStrokes . .( 劃)  跳行
姓氏表 3 + @ . dup 3 json@ kTotalStrokes . .( 劃)  跳行
姓氏表 4 + @ . dup 4 json@ kTotalStrokes . .( 劃)  跳行

可將以上的符式程式碼貼到forthjs.appspot.com測測看,執行結果如下