ugBASIC 1.18
An isomorphic BASIC language compiler for retrocomputers
Loading...
Searching...
No Matches
end_gameloop.c
Go to the documentation of this file.
1/*****************************************************************************
2 * ugBASIC - an isomorphic BASIC language compiler for retrocomputers *
3 *****************************************************************************
4 * Copyright 2021-2026 Marco Spedaletti (asimov@mclink.it)
5 *
6 * Licensed under the Apache License, Version 2.0 (the "License");
7 * you may not use this file except in compliance with the License.
8 * You may obtain a copy of the License at
9 *
10 * http://www.apache.org/licenses/LICENSE-2.0
11 *
12 * Unless required by applicable law or agreed to in writing, software
13 * distributed under the License is distributed on an "AS IS" BASIS,
14 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
15 * See the License for the specific language governing permissions and
16 * limitations under the License.
17 *----------------------------------------------------------------------------
18 * Concesso in licenza secondo i termini della Licenza Apache, versione 2.0
19 * (la "Licenza"); è proibito usare questo file se non in conformità alla
20 * Licenza. Una copia della Licenza è disponibile all'indirizzo:
21 *
22 * http://www.apache.org/licenses/LICENSE-2.0
23 *
24 * Se non richiesto dalla legislazione vigente o concordato per iscritto,
25 * il software distribuito nei termini della Licenza è distribuito
26 * "COSÌ COM'È", SENZA GARANZIE O CONDIZIONI DI ALCUN TIPO, esplicite o
27 * implicite. Consultare la Licenza per il testo specifico che regola le
28 * autorizzazioni e le limitazioni previste dalla medesima.
29 ****************************************************************************/
30
31/****************************************************************************
32 * INCLUDE SECTION
33 ****************************************************************************/
34
35#include "../../ugbc.h"
36
37/****************************************************************************
38 * CODE SECTION
39 ****************************************************************************/
40
52/* <usermanual>
53@keyword END GAMELOOP
54
55@english
56Define the ending point of a game loop.
57
58@italian
59Definisce il punto di arrivo di un loop di gioco.
60
61@syntax END GAMELOOP
62
63@example END GAMELOOP
64
65@target c64
66</usermanual> */
67void end_gameloop( Environment * _environment ) {
68
69Loop * loop = _environment->loops;
70
71 if ( ! loop ) {
73 }
74
75 if ( loop->type != LT_GAMELOOP ) {
77 }
78
79 _environment->loops = _environment->loops->next;
80
81 if ( _environment->hasGameLoop ) {
82 if ( _environment->protothread && !_environment->protothreadForbid ) {
83 run_parallel( _environment );
84 }
85 cpu_jump( _environment, loop->label );
86 unsigned char newLabel[MAX_TEMPORARY_STORAGE]; sprintf(newLabel, "%sbis", loop->label );
87 cpu_label( _environment, newLabel );
88 _environment->hasGameLoop = 0;
89 } else {
91 }
92
93}
void cpu_label(Environment *_environment, char *_label)
Definition 6309.c:356
void cpu_jump(Environment *_environment, char *_label)
Definition 6309.c:3739
void end_gameloop(Environment *_environment)
Emit ASM code for END GAMELOOP.
void run_parallel(Environment *_environment)
Emit code for RUN PARALLEL.
int protothread
Definition ugbc.h:2830
int hasGameLoop
Definition ugbc.h:2646
int protothreadForbid
Definition ugbc.h:2845
Loop * loops
Definition ugbc.h:2669
struct _Loop * next
Definition ugbc.h:1452
#define MAX_TEMPORARY_STORAGE
Definition ugbc.h:563
void loop(Environment *_environment, char *_label)
#define CRITICAL_END_GAMELOOP_WITHOUT_GAMELOOP()
Definition ugbc.h:3585
struct _Environment Environment
Structure of compilation environment.
@ LT_GAMELOOP
Definition ugbc.h:1402
struct _Loop Loop
Structure of a single loop.