?login_element?

Subversion Repositories NedoOS

Rev

Rev 129 | Blame | Compare with Previous | Last modification | View Log | Download | RSS feed

  1.     DEVICE ZXSPECTRUMNEXT
  2.     ; check default page mapping 14, 15, 10, 11, 4, 5, 0, 1 (and ORG 0) - write markers
  3.                  DB  "EE" : ORG 0x2000 : DB "FF" : ORG 0x4000 : DB  "AA" : ORG 0x6000 : DB  "BB"
  4.     ORG 0x8000 : DB  "44" : ORG 0xA000 : DB "55" : ORG 0xC000 : DB  "00" : ORG 0xE000 : DB  "11"
  5.     ; verify defaut is slot 7
  6.     PAGE 2 : ASSERT {0xE000} == 0 : ORG 0xE000 : DB "22"
  7.     PAGE 3 : ASSERT {0xE000} == 0 : ORG 0xE000 : DB "33"
  8.     ; verify there are 8 slots and 224 pages
  9.     SLOT 8      ; error
  10.     PAGE 224    ; error
  11.     ; do few more verifications with other slots, reading previously modified pages
  12.     SLOT 1 : PAGE 0 : ASSERT {0x2000} == "00" : SLOT 2 : PAGE 1 : ASSERT {0x4000} == "11"
  13.     SLOT 1 : PAGE 2 : ASSERT {0x2000} == "22" : SLOT 2 : PAGE 3 : ASSERT {0x4000} == "33"
  14.     SLOT 1 : PAGE 4 : ASSERT {0x2000} == "44" : SLOT 2 : PAGE 5 : ASSERT {0x4000} == "55"
  15.     SLOT 1 : PAGE 10 : ASSERT {0x2000} == "AA" : SLOT 2 : PAGE 11 : ASSERT {0x4000} == "BB"
  16.     SLOT 1 : PAGE 14 : ASSERT {0x2000} == "EE" : SLOT 2 : PAGE 15 : ASSERT {0x4000} == "FF"
  17.  
  18.     ; check the Z80N instructions are enabled by the device selection
  19.     nextreg $07,2
  20.  
  21.     PAGE -1     ; error
  22.