This website works better with JavaScript.
首頁
探索
lain.church
說明
註冊
登入
izaya
/
collapseos
镜像来自
https://github.com/hsoft/collapseos.git
關註
1
收藏
1
複製
0
程式碼
問題管理
0
版本發佈
0
Wiki
Activity
瀏覽代碼
forth: slightly improve assembler
pull/95/head
Virgil Dupras
4 年之前
父節點
ab98e9bcd1
當前提交
8d8e1d93da
共有
2 個文件被更改
,包括
2 次插入
和
3 次删除
分割檢視
Diff Options
Show Stats
Download Patch File
Download Diff File
二進制
emul/forth/z80c.bin
+2
-3
forth/z80a.fs
二進制
emul/forth/z80c.bin
查看文件
+ 2
- 3
forth/z80a.fs
查看文件
@@ -2,8 +2,7 @@
( Splits word into msb/lsb, lsb being on TOS )
: SPLITB
DUP 0x100 /
SWAP 0xff AND
256 /MOD SWAP
;
( To debug, change C, to .X )
@@ -166,7 +165,7 @@
: OP2r
CREATE ,
DOES>
@
256 /MOD
( r lsb msb )
@
SPLITB SWAP
( r lsb msb )
A, ( r lsb )
SWAP 8 * ( lsb r<<3 )
OR A,
Write
Preview
Loading…
取消
儲存