~ubuntu-branches/ubuntu/hardy/vice/hardy

« back to all changes in this revision

Viewing changes to src/arch/amigaos/mui/uivideocbm2pet.c

  • Committer: Bazaar Package Importer
  • Author(s): Laszlo Boszormenyi (GCS)
  • Date: 2007-10-07 07:05:46 UTC
  • mfrom: (1.1.5 upstream)
  • Revision ID: james.westby@ubuntu.com-20071007070546-81yy0twlka7p2t0e
Tags: 1.22-1
* New upstream version (closes: #428280).
* Correct link to HTML documentation in manpage (closes: #409567).
* Fix most packaging mistakes.

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
1
/*
 
2
 * uivideocbm2pet.c
 
3
 *
 
4
 * Written by
 
5
 *  Marco van den Heuvel <blackystardust68@yahoo.com>
 
6
 *
 
7
 * This file is part of VICE, the Versatile Commodore Emulator.
 
8
 * See README for copyright notice.
 
9
 *
 
10
 *  This program is free software; you can redistribute it and/or modify
 
11
 *  it under the terms of the GNU General Public License as published by
 
12
 *  the Free Software Foundation; either version 2 of the License, or
 
13
 *  (at your option) any later version.
 
14
 *
 
15
 *  This program is distributed in the hope that it will be useful,
 
16
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 
17
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 
18
 *  GNU General Public License for more details.
 
19
 *
 
20
 *  You should have received a copy of the GNU General Public License
 
21
 *  along with this program; if not, write to the Free Software
 
22
 *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
 
23
 *  02111-1307  USA.
 
24
 *
 
25
 */
 
26
 
 
27
#include "vice.h"
 
28
#ifdef AMIGA_M68K
 
29
#define _INLINE_MUIMASTER_H
 
30
#endif
 
31
#include "mui.h"
 
32
 
 
33
#include "uivideocbm2pet.h"
 
34
#include "intl.h"
 
35
#include "translate.h"
 
36
 
 
37
static video_canvas_t *video_canvas;
 
38
 
 
39
static ui_to_from_t ui_to_from[] = {
 
40
  { NULL, MUI_TYPE_FILENAME, "CrtcPaletteFile", NULL, NULL },
 
41
  UI_END /* mandatory */
 
42
};
 
43
 
 
44
static ULONG Browse( struct Hook *hook, Object *obj, APTR arg )
 
45
{
 
46
  char *fname=NULL;
 
47
 
 
48
  fname=BrowseFile(translate_text(IDS_EXTERNAL_PALETTE_SELECT), "#?.vpl", video_canvas);
 
49
 
 
50
  if (fname!=NULL)
 
51
    set(ui_to_from[0].object, MUIA_String_Contents, fname);
 
52
 
 
53
  return 0;
 
54
}
 
55
 
 
56
static APTR build_gui(void)
 
57
{
 
58
  APTR app, ui, ok, browse_button, cancel;
 
59
 
 
60
#ifdef AMIGA_MORPHOS
 
61
  static const struct Hook BrowseFileHook = { { NULL,NULL },(VOID *)HookEntry,(VOID *)Browse, NULL};
 
62
#else
 
63
  static const struct Hook BrowseFileHook = { { NULL,NULL },(VOID *)Browse,NULL,NULL };
 
64
#endif
 
65
 
 
66
  app = mui_get_app();
 
67
 
 
68
  ui = GroupObject,
 
69
    FILENAME(ui_to_from[0].object, translate_text(IDS_PALETTE_FILENAME), browse_button)
 
70
    OK_CANCEL_BUTTON
 
71
  End;
 
72
 
 
73
  if (ui != NULL) {
 
74
    DoMethod(cancel,
 
75
      MUIM_Notify, MUIA_Pressed, FALSE,
 
76
      app, 2, MUIM_Application_ReturnID, MUIV_Application_ReturnID_Quit);
 
77
 
 
78
    DoMethod(ok, MUIM_Notify, MUIA_Pressed, FALSE,
 
79
      app, 2, MUIM_Application_ReturnID, BTN_OK);
 
80
 
 
81
    DoMethod(browse_button, MUIM_Notify, MUIA_Pressed, FALSE,
 
82
      app, 2, MUIM_CallHook, &BrowseFileHook);
 
83
  }
 
84
 
 
85
  return ui;
 
86
}
 
87
 
 
88
void ui_video_cbm2pet_settings_dialog(video_canvas_t *canvas)
 
89
{
 
90
  APTR window;
 
91
 
 
92
  video_canvas=canvas;
 
93
 
 
94
  window = mui_make_simple_window(build_gui(), translate_text(IDS_VIDEO_SETTINGS));
 
95
 
 
96
  if (window != NULL) {
 
97
    mui_add_window(window);
 
98
    ui_get_to(ui_to_from);
 
99
    set(window, MUIA_Window_Open, TRUE);
 
100
    if (mui_run() == BTN_OK) {
 
101
      ui_get_from(ui_to_from);
 
102
    }
 
103
    set(window, MUIA_Window_Open, FALSE);
 
104
    mui_rem_window(window);
 
105
    MUI_DisposeObject(window);
 
106
  }
 
107
}