+++ /dev/null
-;;; 「五」を表す16 x 16のpbm画像を出力する
-;;; 呼び出し方:
-;;; casl2 out_pbm.casl pbm16.casl
-MAIN START
- LAD GR1,GRAPH
- CALL PBM16
- RET
-GRAPH DC #FFFC
- DC #FFFC
- DC #FFFC
- DC #0700
- DC #0700
- DC #0700
- DC #FFFC
- DC #FFFC
- DC #FFFC
- DC #071C
- DC #071C
- DC #071C
- DC #FFFF
- DC #FFFF
- DC #FFFF
- DC #0000
- END