?login_element?

Subversion Repositories NedoOS

Rev

Rev 539 | Blame | Compare with Previous | Last modification | View Log | Download

  1.     ORG 0x8000
  2.     MODULE main             ; module "main"
  3. Main:                       ; main.Main
  4.         CALL SetScreen      ; SetScreen
  5.         CALL vdp.Cls        ; main.vdp.Cls
  6. .loop:                      ; main.Main.loop
  7.         LD A,(.event)       ; main.Main.event
  8.         CALL ProcessEvent   ; label not found: main.ProcessEvent
  9.         DJNZ .loop          ; main.Main.loop
  10.  
  11.         MODULE vdp          ; module "main.vdp"
  12. @SetScreen:                 ; SetScreen
  13. .loop:                      ; main.vdp.SetScreen.loop
  14.             RET
  15. Cls:                        ; main.vdp.Cls
  16. !KeepClsForLocal:           ; main.vdp.KeepClsForLocal (since v1.18.0)
  17. .loop:      DJNZ .loop      ; main.vdp.Cls.loop
  18.             RET
  19.         ENDMODULE
  20.  
  21. Main.event DB 0             ; main.Main.event
  22.     ENDMODULE
  23.