Exemple #1
0
 private void PerformSplit(int lines)
 {
     if (lines > 0)
     {
         if (upperWin.IsNull)
         {
             upperWin = Glk.glk_window_open(lowerWin, WinMethod.Above | WinMethod.Fixed,
                                            (uint)lines, WinType.TextGrid, 0);
         }
         else
         {
             Glk.glk_window_set_arrangement(Glk.glk_window_get_parent(upperWin),
                                            WinMethod.Above | WinMethod.Fixed, (uint)lines, winid_t.Null);
         }
     }
     else
     {
         if (!upperWin.IsNull)
         {
             stream_result_t dummy;
             Glk.glk_window_close(upperWin, out dummy);
             upperWin   = winid_t.Null;
             currentWin = lowerWin;
         }
     }
 }
Exemple #2
0
        void IZMachineIO.SelectWindow(short num)
        {
            if (num == 0)
            {
                currentWin = lowerWin;
            }
            else if (num == 1)
            {
                /* work around a bug in some Inform games where the screen is erased,
                 * destroying the split, but the split isn't restored before drawing
                 * the status line. */
                if (upperWin.IsNull)
                {
                    ((IZMachineIO)this).SplitWindow(1);
                }

                currentWin = upperWin;
            }

            Glk.glk_set_window(currentWin);
        }
Exemple #3
0
        void IZMachineIO.EraseWindow(short num)
        {
            switch (num)
            {
            case 0:
                // lower only
                Glk.glk_window_clear(lowerWin);
                break;

            case 1:
                // upper only
                if (!upperWin.IsNull)
                {
                    Glk.glk_window_clear(upperWin);
                }
                break;

            case -1:
                // erase both and unsplit
                if (!upperWin.IsNull)
                {
                    stream_result_t dummy;
                    Glk.glk_window_close(upperWin, out dummy);
                    upperWin = winid_t.Null;
                }
                goto case -2;

            case -2:
                // erase both but keep split
                if (!upperWin.IsNull)
                {
                    Glk.glk_window_clear(upperWin);
                }
                Glk.glk_window_clear(lowerWin);
                currentWin = lowerWin;
                xpos       = 0; ypos = 0;
                break;
            }
        }
Exemple #4
0
 public static extern void glk_window_move_cursor(winid_t win, uint xpos, uint ypos);
Exemple #5
0
 public static extern void glk_cancel_mouse_event(winid_t win);
Exemple #6
0
 public static extern void glk_cancel_line_event(winid_t win, out event_t @event);
Exemple #7
0
 public static extern void glk_request_char_event_uni(winid_t win);
Exemple #8
0
 public static extern bool glk_style_measure(winid_t win, Style styl, StyleHint hint,
                                             out int result);
Exemple #9
0
 public static extern void glk_set_window(winid_t win);
Exemple #10
0
 public static extern void glk_window_get_arrangement(winid_t win, out WinMethod method,
                                                      out uint sizeptr, out winid_t keywinptr);
Exemple #11
0
 public static extern void glk_window_set_arrangement(winid_t win, WinMethod method,
                                                      uint size, winid_t keywin);
Exemple #12
0
 public static extern void glk_window_get_size(winid_t win, out uint width,
                                               out uint height);
Exemple #13
0
 public static extern void glk_window_close(winid_t win, out stream_result_t result);
Exemple #14
0
 public static extern winid_t glk_window_open(winid_t split, WinMethod method, uint size,
                                              WinType wintype, uint rock);
Exemple #15
0
 public static extern void glk_window_set_echo_stream(winid_t win, strid_t str);
Exemple #16
0
 public static extern winid_t glk_window_iterate(winid_t win, out uint rockptr);
Exemple #17
0
 public static extern strid_t glk_window_get_echo_stream(winid_t win);
Exemple #18
0
 public static extern uint glk_window_get_rock(winid_t win);
Exemple #19
0
 public static extern bool glk_style_distinguish(winid_t win, Style styl1, Style styl2);
Exemple #20
0
 public static extern WinType glk_window_get_type(winid_t win);
Exemple #21
0
 public static extern void glk_request_line_event_uni(winid_t win, IntPtr buf, uint maxlen,
                                                      uint initlen);
Exemple #22
0
 public static extern winid_t glk_window_get_parent(winid_t win);
Exemple #23
0
 public static extern void glk_request_mouse_event(winid_t win);
Exemple #24
0
 public static extern winid_t glk_window_get_sibling(winid_t win);
Exemple #25
0
 public static extern void glk_cancel_char_event(winid_t win);
Exemple #26
0
 public static extern void glk_window_clear(winid_t win);
Exemple #27
0
 public static extern void garglk_set_line_terminators(winid_t win, [In] KeyCode[] keycodes, uint numkeycodes);
Exemple #28
0
        public GlkIO(string[] args, string storyName)
        {
            // initialize Glk
            // first, add the application's path to the beginning of the arg list
            string[] newArgs = new string[args.Length + 1];
            newArgs[0] = Application.ExecutablePath;
            Array.Copy(args, 0, newArgs, 1, args.Length);
            args = newArgs;

            // now, GarGlk keeps pointers into argv, so we have to copy the args into unmanaged memory
            argv        = Marshal.AllocHGlobal(4 * (args.Length + 1));
            argvStrings = new IntPtr[args.Length];
            for (int i = 0; i < args.Length; i++)
            {
                IntPtr str = Marshal.StringToHGlobalAnsi(args[i]);
                argvStrings[i] = str;
                Marshal.WriteIntPtr(argv, 4 * i, str);
            }
            Marshal.WriteIntPtr(argv, 4 * args.Length, IntPtr.Zero);
            Glk.gli_startup(args.Length, argv);

            Glk.garglk_set_program_name("Demona");
            Glk.garglk_set_program_info("Demona by Jesse McGrew\nA Glk interface for ZLR\nVersion " + ZMachine.ZLR_VERSION);
            Glk.garglk_set_story_name(storyName);

            // set style hints
            Glk.glk_stylehint_set(WinType.AllTypes, Style.User1, StyleHint.ReverseColor, 1);

            Glk.glk_stylehint_set(WinType.AllTypes, Style.User2, StyleHint.Weight, 1);
            Glk.glk_stylehint_set(WinType.AllTypes, Style.User2, StyleHint.Proportional, 0);

            // figure out how big the screen is
            winid_t tempWin = Glk.glk_window_open(winid_t.Null, 0, 0, WinType.TextGrid, 0);

            if (tempWin.IsNull)
            {
                screenWidth  = 80;
                screenHeight = 25;
            }
            else
            {
                Glk.glk_window_get_size(tempWin, out screenWidth, out screenHeight);
                stream_result_t dummy;
                Glk.glk_window_close(tempWin, out dummy);
            }

            // open the lower window
            lowerWin = Glk.glk_window_open(winid_t.Null, 0, 0, WinType.TextBuffer, 0);
            if (lowerWin.IsNull)
            {
                throw new Exception("glk_window_open failed");
            }

            Glk.glk_set_window(lowerWin);
            currentWin = lowerWin;

            xpos = 0;
            ypos = 0;

            unicode = (Glk.glk_gestalt(Gestalt.Unicode, 0) != 0);
        }