1 files changed, 170 insertions, 0 deletions

diff --git a/apps/plugins/xrick/scr_imain.c b/apps/plugins/xrick/scr_imain.c
new file mode 100644
index 0000000000..6851cd0cca
--- /dev/null
+++ b/apps/plugins/xrick/scr_imain.c
@@ -0,0 +1,170 @@
+/*
+ * xrick/scr_imain.c
+ *
+ * Copyright (C) 1998-2002 BigOrno (bigorno@bigorno.net).
+ * Copyright (C) 2008-2014 Pierluigi Vicinanza.
+ * All rights reserved.
+ *
+ * The use and distribution terms for this software are contained in the file
+ * named README, which can be found in the root of this distribution. By
+ * using this software in any fashion, you are agreeing to be bound by the
+ * terms of this license.
+ *
+ * You must not remove this notice, or any other, from this software.
+ */
+
+#include "xrick/screens.h"
+
+#include "xrick/game.h"
+#include "xrick/draw.h"
+#include "xrick/control.h"
+#ifdef GFXST
+#include "xrick/data/pics.h"
+#endif
+#include "xrick/system/system.h"
+
+/*
+ * Main introduction
+ *
+ * return: SCREEN_RUNNING, SCREEN_DONE, SCREEN_EXIT
+ */
+U8
+screen_introMain(void)
+{
+    static U8 seq = 0;
+    static U8 seen = 0;
+    static bool first = true;
+    static U8 period = 0;
+    static U32 tm = 0;
+
+    if (seq == 0) {
+        draw_tilesBank = 0;
+        if (first)
+            seq = 1;
+        else
+            seq = 4;
+        period = game_period;
+        game_period = 50;
+        game_rects = &draw_SCREENRECT;
+#ifdef ENABLE_SOUND
+        game_setmusic(soundTune5, -1);
+#endif
+    }
+
+    switch (seq)
+    {
+        case 1:  /* display Rick Dangerous title and Core Design copyright */
+        {
+            sysvid_clear();
+            tm = sys_gettime();
+#ifdef GFXPC
+            /* Rick Dangerous title */
+            draw_tllst = (U8 *)screen_imainrdt;
+            draw_setfb(32, 16);
+            draw_filter = 0xaaaa;
+            draw_tilesList();
+
+            /* Core Design copyright + press space to start */
+            draw_tllst = (U8 *)screen_imaincdc;
+            draw_setfb(64, 80);
+            draw_filter = 0x5555;
+            draw_tilesList();
+#endif
+#ifdef GFXST
+            draw_pic(pic_splash);
+#endif
+            seq = 2;
+            break;
+        }
+        case 2:  /* wait for key pressed or timeout */
+        {
+            if (control_test(Control_FIRE))
+                seq = 3;
+            else if (sys_gettime() - tm > SCREEN_TIMEOUT) {
+                seen++;
+                seq = 4;
+            }
+            break;
+        }
+        case 3:  /* wait for key released */
+        {
+            if (!(control_test(Control_FIRE))) {
+                if (seen++ == 0)
+                    seq = 4;
+                else
+                    seq = 7;
+            }
+            break;
+        }
+        case 4:  /* dispay hall of fame */
+        {
+            U8 s[32];
+            size_t i;
+
+            sysvid_clear();
+            tm = sys_gettime();
+            /* hall of fame title */
+#ifdef GFXPC
+            draw_tllst = (U8 *)screen_imainhoft;
+            draw_setfb(32, 0);
+            draw_filter = 0xaaaa;
+            draw_tilesList();
+#endif
+#ifdef GFXST
+            draw_pic(pic_haf);
+#endif
+            /* hall of fame content */
+            draw_setfb(56, 48);
+#ifdef GFXPC
+            draw_filter = 0x5555;
+#endif
+            for (i = 0; i < screen_nbr_hiscores; i++) {
+                sys_snprintf((char *)s, sizeof(s), "%06d@@@====@@@%s",
+                    screen_highScores[i].score, screen_highScores[i].name);
+                s[26] = (U8)'\377';
+                s[27] = (U8)'\377';
+                s[28] = (U8)'\376';
+                draw_tllst = s;
+                draw_tilesList();
+            }
+            seq = 5;
+            break;
+        }
+        case 5:  /* wait for key pressed or timeout */
+        {
+            if (control_test(Control_FIRE))
+                seq = 6;
+            else if (sys_gettime() - tm > SCREEN_TIMEOUT) {
+                seen++;
+                seq = 1;
+            }
+            break;
+        }
+        case 6:  /* wait for key released */
+        {
+            if (!(control_test(Control_FIRE))) {
+                if (seen++ == 0)
+                    seq = 1;
+                else
+                    seq = 7;
+            }
+            break;
+        }
+    }
+
+    if (control_test(Control_EXIT))  /* check for exit request */
+        return SCREEN_EXIT;
+
+    if (seq == 7) {  /* we're done */
+        sysvid_clear();
+        seq = 0;
+        seen = 0;
+        first = false;
+        game_period = period;
+        return SCREEN_DONE;
+    }
+    else
+        return SCREEN_RUNNING;
+}
+
+/* eof */