Ретро-ЯП Millfork для Atari, Apple II, ZX Spectrum, MSX, CP/M, NES, Game Boy и MS-DOS

[Shiny]

Забавная штука
Пример на Atari(lines.mfk)

// idea @ilmenit
// https://demozoo.org/productions/280623
// for 8bit AtariXL, OS Rev 2

alias prev_x = os_OLDCOL.lo
alias cursor_x = os_COLCRS.lo
alias prev_y = os_OLDROW
alias cursor_y = os_ROWCRS
alias color = os_ATACHR

byte i

array(byte) colors = [
  $00,$55,$AA,$FF
]

asm void openmode(byte register(a) m) @ $ef9c extern
asm void drawto() @ $f9c2 extern

void main(){
  openmode(7)
//  os_COLOR4 = 2

  for i,0,to,159 {
	os_ATACHR = colors[i&3]
    cursor_x = i
    prev_x = 159-i
    prev_y = 0
    cursor_y = 79
    drawto()
  }

  while true {}
}

Компиляция(папка include в той же папке, где сам проект)

java -jar millfork.jar -I .\include\ -t A8 lines.mfk