izaya
/
collapseos
şunun yansıması https://github.com/hsoft/collapseos.git
1
1
Çatalla 0
Kod Konular 0 Sürümler 0 Wiki Aktivite
Mirror of CollapseOS
25'ten fazla konu seçemezsiniz Konular bir harf veya rakamla başlamalı, kısa çizgiler ('-') içerebilir ve en fazla 35 karakter uzunluğunda olabilir.
1619 İşlemeler
4 Dallar
13MB
Ağaç: 532bcc7e78
Dallar Biçim İmleri
${ item.name }
Branş ${ searchTerm } oluştur
'532bcc7e78'den
${ noResults }
collapseos/cvm/forth.fs

forth.fs 257B
Ham Normal Görünüm Geçmiş

cvm: split stage and forth xcomp units I wanted to make CVM's forth use the Grid subsystem, but doing so would break the stage binary. Hence, this split.
3 yıl önce
​
​
​
​
​
​
​
​
​
​
​
​
​
​
 123456789101112131415 
  1. : (emit) 0 PC! ;

  2. : COLS 80 ; : LINES 32 ;

  3. : AT-XY 6 PC! ( y ) 5 PC! ( x ) ;

  4. 

  5. 390 LOAD  ( xcomp core high )

  6. (entry) _

  7. ( Update LATEST )

  8. PC ORG @ 8 + !

  9. ," BLK$ "

  10. ," ' EFS@ BLK@* ! "

  11. ," ' EFS! BLK!* ! "

  12. EOT,

  13. ORG @ 256 /MOD 2 PC! 2 PC!

  14. H@ 256 /MOD 2 PC! 2 PC!

  15.