From 9f09e9c370214f4b9bed4d261c0a9f4b9308c6f5 Mon Sep 17 00:00:00 2001
From: TomW <TomW@localhost>
Date: Sun, 21 Jun 2015 16:03:33 +0100
Subject: [PATCH] Added PS/1 model 2011 emulation.

---
 ibmps1_2011.nvr    | Bin 0 -> 128 bytes
 src/Makefile.mingw |   2 +-
 src/fdc.c          |  17 ++++-
 src/fdc.h          |   1 +
 src/ibm.h          |   1 +
 src/mem.c          |  25 ++++++++
 src/model.c        |  74 +++++++++++++---------
 src/nvr.c          |  82 ++++++++++++------------
 src/ps1.c          | 152 +++++++++++++++++++++++++++++++++++++++++++++
 src/ps1.h          |   1 +
 src/vid_vga.c      |  31 +++++++++
 src/vid_vga.h      |   1 +
 src/video.c        |   4 ++
 13 files changed, 320 insertions(+), 71 deletions(-)
 create mode 100644 ibmps1_2011.nvr
 create mode 100644 src/ps1.c
 create mode 100644 src/ps1.h

diff --git a/ibmps1_2011.nvr b/ibmps1_2011.nvr
new file mode 100644
index 0000000000000000000000000000000000000000..2029c7bf3088e975f104d454b17c43532bd871d7
GIT binary patch
literal 128
zcmXq>$uv`JCW9iIs2W2+0|SE#0|O&N0}}%a13F*<NwNHy|JX`^fkiSD3jR|F0J6nN
At^fc4

literal 0
HcmV?d00001

diff --git a/src/Makefile.mingw b/src/Makefile.mingw
index ab95bd7..e2bc6c1 100644
--- a/src/Makefile.mingw
+++ b/src/Makefile.mingw
@@ -8,7 +8,7 @@ OBJ = 386.o 386_dynarec.o 386_dynarec_ops.o 808x.o acer386sx.o ali1429.o amstrad
 	device.o disc.o disc_fdi.o disc_img.o dma.o fdc.o fdi2raw.o gameport.o headland.o i430lx.o i430fx.o \
 	i430vx.o ide.o intel.o intel_flash.o io.o jim.o keyboard.o keyboard_amstrad.o keyboard_at.o \
 	keyboard_olim24.o keyboard_pcjr.o keyboard_xt.o lpt.o mcr.o mem.o model.o mouse.o mouse_ps2.o \
-	mouse_serial.o neat.o nmi.o nvr.o olivetti_m24.o opti.o pc.o pci.o pic.o piix.o pit.o ppi.o rom.o \
+	mouse_serial.o neat.o nmi.o nvr.o olivetti_m24.o opti.o pc.o pci.o pic.o piix.o pit.o ppi.o ps1.o rom.o \
 	serial.o sis496.o sound.o sound_ad1848.o sound_adlib.o sound_adlibgold.o sound_cms.o sound_dbopl.o \
 	sound_emu8k.o sound_gus.o sound_mpu401_uart.o sound_opl.o sound_pas16.o sound_resid.o \
 	sound_sb.o sound_sb_dsp.o sound_sn76489.o sound_speaker.o sound_ssi2001.o sound_wss.o \
diff --git a/src/fdc.c b/src/fdc.c
index 04d82d3..b6552da 100644
--- a/src/fdc.c
+++ b/src/fdc.c
@@ -38,6 +38,8 @@ typedef struct FDC
 
         int data_ready;
         int inread;
+        
+        int dskchg_activelow;
 } FDC;
 
 static FDC fdc;
@@ -374,7 +376,12 @@ uint8_t fdc_read(uint16_t addr, void *priv)
         switch (addr&7)
         {
                 case 1: /*???*/
-                temp=0x50;
+//                temp=0x50;
+                temp = 0x70;
+                if (fdc.dor & 1)
+                        temp &= ~0x40;
+                else
+                        temp &= ~0x20;
                 break;
                 case 3:
                 temp = 0x20;
@@ -426,7 +433,7 @@ uint8_t fdc_read(uint16_t addr, void *priv)
                    temp = (disc_changed[fdc.dor & 1] || drive_empty[fdc.dor & 1])?0x80:0;
                 else
                    temp = 0;
-                if (AMSTRADIO)  /*PC2086/3086 seem to reverse this bit*/
+                if (fdc.dskchg_activelow)  /*PC2086/3086 seem to reverse this bit*/
                    temp ^= 0x80;
 //                printf("- DC %i %02X %02X %i %i - ",fdc.dor & 1, fdc.dor, 0x10 << (fdc.dor & 1), discchanged[fdc.dor & 1], driveempty[fdc.dor & 1]);
 //                discchanged[fdc.dor&1]=0;
@@ -942,6 +949,7 @@ void fdc_indexpulse()
 void fdc_init()
 {
 	timer_add(fdc_callback, &disctime, &disctime, NULL);
+	fdc.dskchg_activelow = 0;
 }
 
 void fdc_add()
@@ -968,3 +976,8 @@ void fdc_discchange_clear(int drive)
 {
         disc_changed[drive] = 0;
 }
+
+void fdc_set_dskchg_activelow()
+{
+        fdc.dskchg_activelow = 1;
+}
diff --git a/src/fdc.h b/src/fdc.h
index de1b1ae..c40251f 100644
--- a/src/fdc.h
+++ b/src/fdc.h
@@ -6,3 +6,4 @@ void fdc_reset();
 void fdc_poll();
 void fdc_abort();
 void fdc_discchange_clear(int drive);
+void fdc_set_dskchg_activelow();
diff --git a/src/ibm.h b/src/ibm.h
index 7e1e214..245e9d1 100644
--- a/src/ibm.h
+++ b/src/ibm.h
@@ -321,6 +321,7 @@ enum
         ROM_430VX,
         ROM_ENDEAVOR,
         ROM_REVENGE,
+        ROM_IBMPS1_2011,
         
         ROM_MAX
 };
diff --git a/src/mem.c b/src/mem.c
index 4b086b8..77e692a 100644
--- a/src/mem.c
+++ b/src/mem.c
@@ -452,6 +452,31 @@ int loadbios()
                 biosmask = 0x1ffff;
                 //is486=1;
                 return 1;
+
+                case ROM_IBMPS1_2011:
+#if 0
+                f=romfopen("roms/ibmps1es/ibm_1057757_24-05-90.bin","rb");
+                ff=romfopen("roms/ibmps1es/ibm_1057757_29-15-90.bin","rb");
+                fseek(f, 0x10000, SEEK_SET);
+                fseek(ff, 0x10000, SEEK_SET);
+                if (!f || !ff) break;
+                for (c = 0x0000; c < 0x20000; c += 2)
+                {
+                        rom[c] = getc(f);
+                        rom[c+1] = getc(ff);
+                }
+                fclose(ff);
+                fclose(f);
+#endif
+//#if 0
+                f = romfopen("roms/ibmps1es/f80000.bin", "rb");
+                if (!f) break;
+                fseek(f, 0x60000, SEEK_SET);
+                fread(rom, 0x20000, 1, f);                
+                fclose(f);
+//#endif
+                biosmask = 0x1ffff;
+                return 1;
         }
         printf("Failed to load ROM!\n");
         if (f) fclose(f);
diff --git a/src/model.c b/src/model.c
index 21b0ffe..ae9139e 100644
--- a/src/model.c
+++ b/src/model.c
@@ -34,6 +34,7 @@
 #include "pic.h"
 #include "piix.h"
 #include "pit.h"
+#include "ps1.h"
 #include "serial.h"
 #include "sis496.h"
 #include "sound_sn76489.h"
@@ -49,6 +50,7 @@ void           ams_init();
 void        europc_init();
 void        olim24_init();
 void            at_init();
+void           ps1_init();
 void       at_neat_init();
 void  at_acer386sx_init();
 void    at_wd76c10_init();
@@ -64,37 +66,38 @@ int model;
 
 MODEL models[] =
 {
-        {"IBM PC",              ROM_IBMPC,     { "",      cpus_8088,    "",    NULL,         "",      NULL},         0,      xt_init},
-        {"IBM XT",              ROM_IBMXT,     { "",      cpus_8088,    "",    NULL,         "",      NULL},         0,      xt_init},
-        {"IBM PCjr",            ROM_IBMPCJR,   { "",      cpus_pcjr,    "",    NULL,         "",      NULL},         1,    pcjr_init},
-        {"Generic XT clone",    ROM_GENXT,     { "",      cpus_8088,    "",    NULL,         "",      NULL},         0,      xt_init},
-        {"DTK XT clone",        ROM_DTKXT,     { "",      cpus_8088,    "",    NULL,         "",      NULL},         0,      xt_init},        
-        {"Tandy 1000",          ROM_TANDY,     { "",      cpus_8088,    "",    NULL,         "",      NULL},         1, tandy1k_init},
-        {"Amstrad PC1512",      ROM_PC1512,    { "",      cpus_pc1512,  "",    NULL,         "",      NULL},         1,     ams_init},
-        {"Sinclair PC200",      ROM_PC200,     { "",      cpus_8086,    "",    NULL,         "",      NULL},         1,     ams_init},
-        {"Euro PC",             ROM_EUROPC,    { "",      cpus_8086,    "",    NULL,         "",      NULL},         0,  europc_init},
-        {"Olivetti M24",        ROM_OLIM24,    { "",      cpus_8086,    "",    NULL,         "",      NULL},         1,  olim24_init},        
-        {"Amstrad PC1640",      ROM_PC1640,    { "",      cpus_8086,    "",    NULL,         "",      NULL},         1,     ams_init},
-        {"Amstrad PC2086",      ROM_PC2086,    { "",      cpus_8086,    "",    NULL,         "",      NULL},         1,     ams_init},        
-        {"Amstrad PC3086",      ROM_PC3086,    { "",      cpus_8086,    "",    NULL,         "",      NULL},         1,     ams_init},
-        {"IBM AT",              ROM_IBMAT,     { "",      cpus_ibmat,   "",    NULL,         "",      NULL},         0,      at_init},
-        {"Commodore PC 30 III", ROM_CMDPC30,   { "",      cpus_286,     "",    NULL,         "",      NULL},         0,      at_init},        
-        {"AMI 286 clone",       ROM_AMI286,    { "",      cpus_286,     "",    NULL,         "",      NULL},         0,      at_neat_init},        
-        {"DELL System 200",     ROM_DELL200,   { "",      cpus_286,     "",    NULL,         "",      NULL},         0,           at_init},
-        {"Acer 386SX25/N",      ROM_ACER386,   { "Intel", cpus_acer,    "",    NULL,         "",      NULL},         1, at_acer386sx_init},
-        {"Amstrad MegaPC",      ROM_MEGAPC,    { "Intel", cpus_i386,    "AMD", cpus_Am386,   "Cyrix", cpus_486SDLC}, 1,   at_wd76c10_init},
-        {"AMI 386 clone",       ROM_AMI386,    { "Intel", cpus_i386,    "AMD", cpus_Am386,   "Cyrix", cpus_486SDLC}, 0,  at_headland_init},
-        {"AMI 486 clone",       ROM_AMI486,    { "Intel", cpus_i486,    "AMD", cpus_Am486,   "Cyrix", cpus_Cx486},   0,   at_ali1429_init},
-        {"AMI WinBIOS 486",     ROM_WIN486,    { "Intel", cpus_i486,    "AMD", cpus_Am486,   "Cyrix", cpus_Cx486},   0,   at_ali1429_init},
+        {"IBM PC",              ROM_IBMPC,       { "",      cpus_8088,    "",    NULL,         "",      NULL},         0,      xt_init},
+        {"IBM XT",              ROM_IBMXT,       { "",      cpus_8088,    "",    NULL,         "",      NULL},         0,      xt_init},
+        {"IBM PCjr",            ROM_IBMPCJR,     { "",      cpus_pcjr,    "",    NULL,         "",      NULL},         1,    pcjr_init},
+        {"Generic XT clone",    ROM_GENXT,       { "",      cpus_8088,    "",    NULL,         "",      NULL},         0,      xt_init},
+        {"DTK XT clone",        ROM_DTKXT,       { "",      cpus_8088,    "",    NULL,         "",      NULL},         0,      xt_init},        
+        {"Tandy 1000",          ROM_TANDY,       { "",      cpus_8088,    "",    NULL,         "",      NULL},         1, tandy1k_init},
+        {"Amstrad PC1512",      ROM_PC1512,      { "",      cpus_pc1512,  "",    NULL,         "",      NULL},         1,     ams_init},
+        {"Sinclair PC200",      ROM_PC200,       { "",      cpus_8086,    "",    NULL,         "",      NULL},         1,     ams_init},
+        {"Euro PC",             ROM_EUROPC,      { "",      cpus_8086,    "",    NULL,         "",      NULL},         0,  europc_init},
+        {"Olivetti M24",        ROM_OLIM24,      { "",      cpus_8086,    "",    NULL,         "",      NULL},         1,  olim24_init},        
+        {"Amstrad PC1640",      ROM_PC1640,      { "",      cpus_8086,    "",    NULL,         "",      NULL},         1,     ams_init},
+        {"Amstrad PC2086",      ROM_PC2086,      { "",      cpus_8086,    "",    NULL,         "",      NULL},         1,     ams_init},        
+        {"Amstrad PC3086",      ROM_PC3086,      { "",      cpus_8086,    "",    NULL,         "",      NULL},         1,     ams_init},
+        {"IBM AT",              ROM_IBMAT,       { "",      cpus_ibmat,   "",    NULL,         "",      NULL},         0,      at_init},
+        {"Commodore PC 30 III", ROM_CMDPC30,     { "",      cpus_286,     "",    NULL,         "",      NULL},         0,      at_init},        
+        {"AMI 286 clone",       ROM_AMI286,      { "",      cpus_286,     "",    NULL,         "",      NULL},         0,      at_neat_init},        
+        {"DELL System 200",     ROM_DELL200,     { "",      cpus_286,     "",    NULL,         "",      NULL},         0,           at_init},
+        {"IBM PS/1 model 2011", ROM_IBMPS1_2011, { "",      cpus_286,     "",    NULL,         "",      NULL},         1,          ps1_init},
+        {"Acer 386SX25/N",      ROM_ACER386,     { "Intel", cpus_acer,    "",    NULL,         "",      NULL},         1, at_acer386sx_init},
+        {"Amstrad MegaPC",      ROM_MEGAPC,      { "Intel", cpus_i386,    "AMD", cpus_Am386,   "Cyrix", cpus_486SDLC}, 1,   at_wd76c10_init},
+        {"AMI 386 clone",       ROM_AMI386,      { "Intel", cpus_i386,    "AMD", cpus_Am386,   "Cyrix", cpus_486SDLC}, 0,  at_headland_init},
+        {"AMI 486 clone",       ROM_AMI486,      { "Intel", cpus_i486,    "AMD", cpus_Am486,   "Cyrix", cpus_Cx486},   0,   at_ali1429_init},
+        {"AMI WinBIOS 486",     ROM_WIN486,      { "Intel", cpus_i486,    "AMD", cpus_Am486,   "Cyrix", cpus_Cx486},   0,   at_ali1429_init},
 /*        {"AMI WinBIOS 486 PCI", ROM_PCI486,    { "Intel", cpus_i486,    "AMD", cpus_Am486, "Cyrix", cpus_Cx486},   0,   at_um8881f_init},*/
-        {"Award SiS 496/497",   ROM_SIS496,    { "Intel", cpus_i486,    "AMD", cpus_Am486,   "Cyrix", cpus_Cx486},   0,    at_sis496_init},
+        {"Award SiS 496/497",   ROM_SIS496,      { "Intel", cpus_i486,    "AMD", cpus_Am486,   "Cyrix", cpus_Cx486},   0,    at_sis496_init},
 #ifdef DYNAREC
-        {"Intel Premiere/PCI",  ROM_REVENGE,   { "Intel", cpus_Pentium5V, "",  NULL,         "",      NULL},         0,    at_batman_init},
-        {"Intel Advanced/EV",   ROM_ENDEAVOR,  { "Intel", cpus_Pentium, "IDT", cpus_WinChip, "",      NULL},         0,  at_endeavor_init},
-        {"Award 430VX PCI",     ROM_430VX,     { "Intel", cpus_Pentium, "IDT", cpus_WinChip, "",      NULL},         0,    at_i430vx_init},
+        {"Intel Premiere/PCI",  ROM_REVENGE,     { "Intel", cpus_Pentium5V, "",  NULL,         "",      NULL},         0,    at_batman_init},
+        {"Intel Advanced/EV",   ROM_ENDEAVOR,    { "Intel", cpus_Pentium, "IDT", cpus_WinChip, "",      NULL},         0,  at_endeavor_init},
+        {"Award 430VX PCI",     ROM_430VX,       { "Intel", cpus_Pentium, "IDT", cpus_WinChip, "",      NULL},         0,    at_i430vx_init},
 #else
-        {"Intel Advanced/EV",   ROM_ENDEAVOR,  { "IDT", cpus_WinChip,   "",    NULL,         "",      NULL},         0,  at_endeavor_init},
-        {"Award 430VX PCI",     ROM_430VX,     { "IDT", cpus_WinChip,   "",    NULL,         "",      NULL},         0,    at_i430vx_init},
+        {"Intel Advanced/EV",   ROM_ENDEAVOR,    { "IDT", cpus_WinChip,   "",    NULL,         "",      NULL},         0,  at_endeavor_init},
+        {"Award 430VX PCI",     ROM_430VX,       { "IDT", cpus_WinChip,   "",    NULL,         "",      NULL},         0,    at_i430vx_init},
 #endif
         {"", -1, {"", 0, "", 0, "", 0}, 0}
 };
@@ -180,6 +183,7 @@ void ams_init()
         nvr_init();
         xtide_init();
 	nmi_init();
+	fdc_set_dskchg_activelow();
 }
 
 void europc_init()
@@ -215,6 +219,20 @@ void at_init()
         pic2_init();
 }
 
+void ps1_init()
+{
+        common_init();
+        pit_set_out_func(1, pit_refresh_timer_at);
+        dma16_init();
+        ide_init();
+        keyboard_at_init();
+        mouse_ps2_init();
+        nvr_init();
+        pic2_init();
+        ps1mb_init();
+        fdc_set_dskchg_activelow();
+}
+
 void at_neat_init()
 {
         at_init();
diff --git a/src/nvr.c b/src/nvr.c
index f5d4601..54136d3 100644
--- a/src/nvr.c
+++ b/src/nvr.c
@@ -130,26 +130,27 @@ void loadnvr()
         oldromset=romset;
         switch (romset)
         {
-                case ROM_PC1512:     f = romfopen("pc1512.nvr",     "rb"); break;
-                case ROM_PC1640:     f = romfopen("pc1640.nvr",     "rb"); break;
-                case ROM_PC200:      f = romfopen("pc200.nvr",      "rb"); break;
-                case ROM_PC2086:     f = romfopen("pc2086.nvr",     "rb"); break;
-                case ROM_PC3086:     f = romfopen("pc3086.nvr",     "rb"); break;                
-                case ROM_IBMAT:      f = romfopen("at.nvr",         "rb"); break;
-                case ROM_CMDPC30:    f = romfopen("cmdpc30.nvr",    "rb"); nvrmask = 127; break;                
-                case ROM_AMI286:     f = romfopen("ami286.nvr",     "rb"); nvrmask = 127; break;
-                case ROM_DELL200:    f = romfopen("dell200.nvr",    "rb"); nvrmask = 127; break;
-                case ROM_IBMAT386:   f = romfopen("at386.nvr",      "rb"); nvrmask = 127; break;
-                case ROM_ACER386:    f = romfopen("acer386.nvr",    "rb"); nvrmask = 127; break;
-                case ROM_MEGAPC:     f = romfopen("megapc.nvr",     "rb"); nvrmask = 127; break;
-                case ROM_AMI386:     f = romfopen("ami386.nvr",     "rb"); nvrmask = 127; break;
-                case ROM_AMI486:     f = romfopen("ami486.nvr",     "rb"); nvrmask = 127; break;
-                case ROM_WIN486:     f = romfopen("win486.nvr",     "rb"); nvrmask = 127; break;
-                case ROM_PCI486:     f = romfopen("hot-433.nvr",    "rb"); nvrmask = 127; break;
-                case ROM_SIS496:     f = romfopen("sis496.nvr",     "rb"); nvrmask = 127; break;
-                case ROM_430VX:      f = romfopen("430vx.nvr",      "rb"); nvrmask = 127; break;
-                case ROM_REVENGE:    f = romfopen("revenge.nvr",    "rb"); nvrmask = 127; break;
-                case ROM_ENDEAVOR:   f = romfopen("endeavor.nvr",   "rb"); nvrmask = 127; break;
+                case ROM_PC1512:      f = romfopen("pc1512.nvr",      "rb"); break;
+                case ROM_PC1640:      f = romfopen("pc1640.nvr",      "rb"); break;
+                case ROM_PC200:       f = romfopen("pc200.nvr",       "rb"); break;
+                case ROM_PC2086:      f = romfopen("pc2086.nvr",      "rb"); break;
+                case ROM_PC3086:      f = romfopen("pc3086.nvr",      "rb"); break;                
+                case ROM_IBMAT:       f = romfopen("at.nvr",          "rb"); break;
+                case ROM_IBMPS1_2011: f = romfopen("ibmps1_2011.nvr", "rb"); /*nvrmask = 127; */break;
+                case ROM_CMDPC30:     f = romfopen("cmdpc30.nvr",     "rb"); nvrmask = 127; break;
+                case ROM_AMI286:      f = romfopen("ami286.nvr",      "rb"); nvrmask = 127; break;
+                case ROM_DELL200:     f = romfopen("dell200.nvr",     "rb"); nvrmask = 127; break;
+                case ROM_IBMAT386:    f = romfopen("at386.nvr",       "rb"); nvrmask = 127; break;
+                case ROM_ACER386:     f = romfopen("acer386.nvr",     "rb"); nvrmask = 127; break;
+                case ROM_MEGAPC:      f = romfopen("megapc.nvr",      "rb"); nvrmask = 127; break;
+                case ROM_AMI386:      f = romfopen("ami386.nvr",      "rb"); nvrmask = 127; break;
+                case ROM_AMI486:      f = romfopen("ami486.nvr",      "rb"); nvrmask = 127; break;
+                case ROM_WIN486:      f = romfopen("win486.nvr",      "rb"); nvrmask = 127; break;
+                case ROM_PCI486:      f = romfopen("hot-433.nvr",     "rb"); nvrmask = 127; break;
+                case ROM_SIS496:      f = romfopen("sis496.nvr",      "rb"); nvrmask = 127; break;
+                case ROM_430VX:       f = romfopen("430vx.nvr",       "rb"); nvrmask = 127; break;
+                case ROM_REVENGE:     f = romfopen("revenge.nvr",     "rb"); nvrmask = 127; break;
+                case ROM_ENDEAVOR:    f = romfopen("endeavor.nvr",    "rb"); nvrmask = 127; break;
                 default: return;
         }
         if (!f)
@@ -169,26 +170,27 @@ void savenvr()
         FILE *f;
         switch (oldromset)
         {
-                case ROM_PC1512:     f = romfopen("pc1512.nvr",     "wb"); break;
-                case ROM_PC1640:     f = romfopen("pc1640.nvr",     "wb"); break;
-                case ROM_PC200:      f = romfopen("pc200.nvr",      "wb"); break;
-                case ROM_PC2086:     f = romfopen("pc2086.nvr",     "wb"); break;
-                case ROM_PC3086:     f = romfopen("pc3086.nvr",     "wb"); break;
-                case ROM_IBMAT:      f = romfopen("at.nvr",         "wb"); break;
-                case ROM_CMDPC30:    f = romfopen("cmdpc30.nvr",    "wb"); break;                
-                case ROM_AMI286:     f = romfopen("ami286.nvr",     "wb"); break;
-                case ROM_DELL200:    f = romfopen("dell200.nvr",    "wb"); break;
-                case ROM_IBMAT386:   f = romfopen("at386.nvr",      "wb"); break;
-                case ROM_ACER386:    f = romfopen("acer386.nvr",    "wb"); break;
-                case ROM_MEGAPC:     f = romfopen("megapc.nvr",     "wb"); break;
-                case ROM_AMI386:     f = romfopen("ami386.nvr",     "wb"); break;
-                case ROM_AMI486:     f = romfopen("ami486.nvr",     "wb"); break;
-                case ROM_WIN486:     f = romfopen("win486.nvr",     "wb"); break;
-                case ROM_PCI486:     f = romfopen("hot-433.nvr",    "wb"); break;
-                case ROM_SIS496:     f = romfopen("sis496.nvr",     "wb"); break;
-                case ROM_430VX:      f = romfopen("430vx.nvr",      "wb"); break;
-                case ROM_REVENGE:    f = romfopen("revenge.nvr",    "wb"); break;
-                case ROM_ENDEAVOR:   f = romfopen("endeavor.nvr",   "wb"); break;
+                case ROM_PC1512:      f = romfopen("pc1512.nvr",      "wb"); break;
+                case ROM_PC1640:      f = romfopen("pc1640.nvr",      "wb"); break;
+                case ROM_PC200:       f = romfopen("pc200.nvr",       "wb"); break;
+                case ROM_PC2086:      f = romfopen("pc2086.nvr",      "wb"); break;
+                case ROM_PC3086:      f = romfopen("pc3086.nvr",      "wb"); break;
+                case ROM_IBMAT:       f = romfopen("at.nvr",          "wb"); break;
+                case ROM_IBMPS1_2011: f = romfopen("ibmps1_2011.nvr", "wb"); break;
+                case ROM_CMDPC30:     f = romfopen("cmdpc30.nvr",     "wb"); break;                
+                case ROM_AMI286:      f = romfopen("ami286.nvr",      "wb"); break;
+                case ROM_DELL200:     f = romfopen("dell200.nvr",     "wb"); break;
+                case ROM_IBMAT386:    f = romfopen("at386.nvr",       "wb"); break;
+                case ROM_ACER386:     f = romfopen("acer386.nvr",     "wb"); break;
+                case ROM_MEGAPC:      f = romfopen("megapc.nvr",      "wb"); break;
+                case ROM_AMI386:      f = romfopen("ami386.nvr",      "wb"); break;
+                case ROM_AMI486:      f = romfopen("ami486.nvr",      "wb"); break;
+                case ROM_WIN486:      f = romfopen("win486.nvr",      "wb"); break;
+                case ROM_PCI486:      f = romfopen("hot-433.nvr",     "wb"); break;
+                case ROM_SIS496:      f = romfopen("sis496.nvr",      "wb"); break;
+                case ROM_430VX:       f = romfopen("430vx.nvr",       "wb"); break;
+                case ROM_REVENGE:     f = romfopen("revenge.nvr",     "wb"); break;
+                case ROM_ENDEAVOR:    f = romfopen("endeavor.nvr",    "wb"); break;
                 default: return;
         }
         fwrite(nvrram,128,1,f);
diff --git a/src/ps1.c b/src/ps1.c
new file mode 100644
index 0000000..6470125
--- /dev/null
+++ b/src/ps1.c
@@ -0,0 +1,152 @@
+#include "ibm.h"
+#include "mem.h"
+#include "ps1.h"
+#include "rom.h"
+#include "lpt.h"
+
+static rom_t ps1_high_rom;
+static uint8_t ps1_92, ps1_94, ps1_102, ps1_103, ps1_104, ps1_105, ps1_190;
+
+static struct
+{
+        uint8_t status, int_status;
+        uint8_t attention, ctrl;
+} ps1_hd;
+
+uint8_t ps1_read(uint16_t port, void *p)
+{
+        uint8_t temp;
+
+        switch (port)
+        {
+                case 0x91:
+                return 0;
+                case 0x92:
+                return ps1_92;
+                case 0x94:
+                return ps1_94;
+                case 0x102:
+                return ps1_102 | 8;
+                case 0x103:
+                return ps1_103;
+                case 0x104:
+                return ps1_104;
+                case 0x105:
+                return ps1_105;
+                case 0x190:
+                return ps1_190;
+                
+                case 0x322:
+                temp = ps1_hd.status;
+                break;
+                case 0x324:
+                temp = ps1_hd.int_status;
+                ps1_hd.int_status &= ~0x02;
+                break;
+                
+                default:
+                temp = 0xff;
+                break;
+        }
+        
+        return temp;
+}
+
+void ps1_write(uint16_t port, uint8_t val, void *p)
+{
+        switch (port)
+        {
+                case 0x0092:
+                ps1_92 = val;    
+                mem_a20_alt = val & 2;
+                mem_a20_recalc();
+                break;
+                case 0x94:
+                ps1_94 = val;
+                break;
+                case 0x102:
+                lpt1_remove();
+                if (val & 0x04)
+                        serial1_init(0x3f8, 4);
+                else
+                        serial1_remove();
+                if (val & 0x10)
+                {
+                        switch ((val >> 5) & 3)
+                        {
+                                case 0:
+                                lpt1_init(0x3bc);
+                                break;
+                                case 1:
+                                lpt1_init(0x378);
+                                break;
+                                case 2:
+                                lpt1_init(0x278);
+                                break;
+                        }
+                }
+                ps1_102 = val;
+                break;
+                case 0x103:
+                ps1_103 = val;
+                break;
+                case 0x104:
+                ps1_104 = val;
+                break;
+                case 0x105:
+                ps1_105 = val;
+                break;
+                case 0x190:
+                ps1_190 = val;
+                break;
+                
+                case 0x322:
+                ps1_hd.ctrl = val;
+                if (val & 0x80)
+                        ps1_hd.status |= 0x02;
+                break;
+                case 0x324:
+                ps1_hd.attention = val & 0xf0;
+                if (ps1_hd.attention)
+                        ps1_hd.status = 0x14;
+                break;
+        }
+}
+
+void ps1mb_init()
+{
+        io_sethandler(0x0091, 0x0001, ps1_read, NULL, NULL, ps1_write, NULL, NULL, NULL);
+        io_sethandler(0x0092, 0x0001, ps1_read, NULL, NULL, ps1_write, NULL, NULL, NULL);
+        io_sethandler(0x0094, 0x0001, ps1_read, NULL, NULL, ps1_write, NULL, NULL, NULL);
+        io_sethandler(0x0102, 0x0004, ps1_read, NULL, NULL, ps1_write, NULL, NULL, NULL);
+        io_sethandler(0x0190, 0x0001, ps1_read, NULL, NULL, ps1_write, NULL, NULL, NULL);
+        io_sethandler(0x0320, 0x0001, ps1_read, NULL, NULL, ps1_write, NULL, NULL, NULL);
+        io_sethandler(0x0322, 0x0001, ps1_read, NULL, NULL, ps1_write, NULL, NULL, NULL);
+        io_sethandler(0x0324, 0x0001, ps1_read, NULL, NULL, ps1_write, NULL, NULL, NULL);
+        
+        rom_init(&ps1_high_rom,
+                                "roms/ibmps1es/f80000.bin",
+                                0xf80000,
+                                0x80000,
+                                0x7ffff,
+                                0,
+                                MEM_MAPPING_EXTERNAL);
+/*        rom_init_interleaved(&ps1_high_rom,
+                                "roms/ibmps1es/ibm_1057757_24-05-90.bin",
+                                "roms/ibmps1es/ibm_1057757_29-15-90.bin",
+                                0xfc0000,
+                                0x40000,
+                                0x3ffff,
+                                0,
+                                MEM_MAPPING_EXTERNAL);*/
+        ps1_190 = 0;
+        
+        lpt1_remove();
+        lpt2_remove();
+        lpt1_init(0x3bc);
+        
+        serial1_remove();
+        serial2_remove();
+        
+        memset(&ps1_hd, 0, sizeof(ps1_hd));
+}
diff --git a/src/ps1.h b/src/ps1.h
new file mode 100644
index 0000000..bfe0deb
--- /dev/null
+++ b/src/ps1.h
@@ -0,0 +1 @@
+void ps1mb_init();
diff --git a/src/vid_vga.c b/src/vid_vga.c
index 11f69b8..6f4d639 100644
--- a/src/vid_vga.c
+++ b/src/vid_vga.c
@@ -100,6 +100,26 @@ void *vga_init()
         return vga;
 }
 
+/*PS/1 uses a standard VGA controller, but with no option ROM*/
+void *ps1vga_init()
+{
+        vga_t *vga = malloc(sizeof(vga_t));
+        memset(vga, 0, sizeof(vga_t));
+       
+        svga_init(&vga->svga, vga, 1 << 18, /*256kb*/
+                   NULL,
+                   vga_in, vga_out,
+                   NULL,
+                   NULL);
+
+        io_sethandler(0x03c0, 0x0020, vga_in, NULL, NULL, vga_out, NULL, NULL, vga);
+
+        vga->svga.bpp = 8;
+        vga->svga.miscout = 1;
+        
+        return vga;
+}
+
 static int vga_available()
 {
         return rom_present("roms/ibm_vga.bin");
@@ -146,3 +166,14 @@ device_t vga_device =
         vga_force_redraw,
         vga_add_status_info
 };
+device_t ps1vga_device =
+{
+        "PS/1 VGA",
+        0,
+        ps1vga_init,
+        vga_close,
+        vga_available,
+        vga_speed_changed,
+        vga_force_redraw,
+        vga_add_status_info
+};
diff --git a/src/vid_vga.h b/src/vid_vga.h
index 12a65f9..3bf9459 100644
--- a/src/vid_vga.h
+++ b/src/vid_vga.h
@@ -1 +1,2 @@
 extern device_t vga_device;
+extern device_t ps1vga_device;
diff --git a/src/video.c b/src/video.c
index 19bf00c..c089c34 100644
--- a/src/video.c
+++ b/src/video.c
@@ -257,6 +257,10 @@ void video_init()
                 case ROM_ACER386:
                 device_add(&oti067_device);
                 return;
+                
+                case ROM_IBMPS1_2011:
+                device_add(&ps1vga_device);
+                return;
         }
         device_add(video_cards[video_old_to_new(gfxcard)].device);
 }