?login_element?

Subversion Repositories NedoOS

Rev

Blame | Last modification | View Log | Download

  1.     DEVICE AMSTRADCPC464
  2.  
  3.     ORG $1000
  4. Code:
  5.     ld  b,c
  6. Start:
  7.     ld  b,d
  8. Data:
  9.     dz  "C"
  10. End:
  11.  
  12.     DEVICE NONE
  13.     ; error about device mode
  14.     SAVEAMSDOS "saveamsdos.bin", Code, End-Code, Start
  15.  
  16.     DEVICE AMSTRADCPC464
  17.     ; check parsing errors
  18.     SAVEAMSDOS
  19.     SAVEAMSDOS "saveamsdos.bin"
  20.     SAVEAMSDOS "saveamsdos.bin",
  21.     SAVEAMSDOS "saveamsdos.bin", Code
  22.     SAVEAMSDOS "saveamsdos.bin", Code,
  23.     SAVEAMSDOS "saveamsdos.bin", Code, End-Code,
  24.     SAVEAMSDOS "saveamsdos.bin", Code, End-Code, Start,
  25.     SAVEAMSDOS "saveamsdos.bin", Code, End-Code, Start, 2,
  26.     ; check errors of main arguments
  27.     SAVEAMSDOS "", Code, End-Code
  28.     SAVEAMSDOS "saveamsdos.bin", -1, End-Code
  29.     SAVEAMSDOS "saveamsdos.bin", Code, $10001-Code
  30.     ; check "start" and "type" validity warning
  31.     SAVEAMSDOS "saveamsdos.bin", Code, End-Code, -1
  32.     SAVEAMSDOS "saveamsdos.bin", Code, End-Code, $10000
  33.     SAVEAMSDOS "saveamsdos.bin", Code, End-Code, Start, -1
  34.     SAVEAMSDOS "saveamsdos.bin", Code, End-Code, Start, 256
  35.  
  36.     ; valid line with all arguments
  37.     SAVEAMSDOS "saveamsdos.bin", Code, End-Code, Start, 0
  38.     ; valid line with default start and type
  39.     SAVEAMSDOS "saveamsdos.raw", Code, End-Code
  40.