1
2 #include <gtk/gtk.h>
3 #include "turtle.h"
4
5 extern struct s_turtle my_turtle;
6
7 /** NO USED ANYMORE **/
lafontaine_init()8 void lafontaine_init()/*GtkWidget *source, GtkWidget *debug,
9 GtkWidget *field, GtkWidget *notebook,
10 GtkWidget *status, GtkWidget *filesel,
11 GtkWidget *saveassel, GtkWidget *hadj,
12 GtkWidget *vadj)*/
13 {
14 /* my_turtle.source_txt = GTK_WIDGET(source);
15 my_turtle.debug_txt = GTK_WIDGET(debug);
16 my_turtle.drawing_field = GTK_WIDGET(field);
17 my_turtle.notebook = GTK_WIDGET(notebook);
18 my_turtle.wstatus = GTK_WIDGET(status);*/
19 //NO MERE USE. see interface.c my_turtle.filesel = GTK_WIDGET(filesel);
20 //IDEM my_turtle.saveassel = GTK_WIDGET(saveassel);
21 /*
22 my_turtle.hadj = hadj;
23 my_turtle.vadj = vadj;
24 */
25
26
27 // we should place the turtle in the center of the drawing area,
28 // pointing to 0h00
29 my_turtle.x = ((my_turtle.drawing_field)->allocation).width / 2;//0;
30 my_turtle.y = ((my_turtle.drawing_field)->allocation).height / 2;//0;
31 // printf("position: %d, %d\n", my_turtle.x, my_turtle.y);
32 my_turtle.angle = BASE_CAP; //0;
33 my_turtle.virtual_heading = 0;
34
35 my_turtle.delay = 0; //50000000
36 my_turtle.trace = TRUE;
37
38 //default pen color: black
39 my_turtle.pencolor.red = 0;
40 my_turtle.pencolor.green = 0;
41 my_turtle.pencolor.blue = 0;
42 // my_turtle.language = LANG_FRENCH; //LANG_ENGLISH; //on remplacera par la locale
43
44 // my_turtle.instructions = NULL;
45 my_turtle.procedures = NULL;
46 // my_turtle.tds = NULL;
47 /* my_turtle.main_procedure = NULL;
48 my_turtle.current_procedure = NULL;*/
49 my_turtle.main_proc = NULL;
50 my_turtle.cur_proc = NULL;
51
52
53 /* chargement de la font */
54 my_turtle.font = gdk_font_load("-xxl-*-*-*-*-*-*-*-*-*-*-*-*");
55
56 my_turtle.compile = TRUE;
57 my_turtle.draw = FALSE;
58
59 // my_turtle.gc = gdk_gc_new(my_turtle.pixmap);
60 // gdk_gc_set_foreground(my_turtle.gc, &(my_turtle.pencolor));
61 }
62
63