From 69d201c94ba9f4f518ebfa037eed80799f1ec9f2 Mon Sep 17 00:00:00 2001 From: spotlessmind1975 Date: Wed, 11 Oct 2023 19:33:44 +0000 Subject: [PATCH] Fixed manual. --- ugbc/src/targets/atari/put_image.c | 3 -- ugbc/src/targets/atari/randomize.c | 4 -- ugbc/src/targets/c128/put_image.c | 3 -- ugbc/src/targets/c128/random.c | 31 +------------- ugbc/src/targets/c128/random_heigth.c | 2 +- ugbc/src/targets/c128/random_width.c | 2 +- ugbc/src/targets/c128/randomize.c | 2 +- ugbc/src/targets/c128z/get_image.c | 15 ------- ugbc/src/targets/c128z/put_image.c | 3 -- ugbc/src/targets/c128z/random.c | 5 --- ugbc/src/targets/c128z/random_height.c | 5 --- ugbc/src/targets/c128z/random_width.c | 5 --- ugbc/src/targets/c128z/randomize.c | 5 --- ugbc/src/targets/c64/put_image.c | 6 +-- ugbc/src/targets/c64/random.c | 50 ----------------------- ugbc/src/targets/c64/random_heigth.c | 15 ------- ugbc/src/targets/c64/random_width.c | 15 ------- ugbc/src/targets/c64/randomize.c | 15 ------- ugbc/src/targets/coco/put_image.c | 3 -- ugbc/src/targets/coco/random.c | 5 --- ugbc/src/targets/coco/random_heigth.c | 5 --- ugbc/src/targets/coco/random_width.c | 5 --- ugbc/src/targets/coco/randomize.c | 5 --- ugbc/src/targets/coco3/put_image.c | 3 -- ugbc/src/targets/coco3/random.c | 5 --- ugbc/src/targets/coco3/random_heigth.c | 5 --- ugbc/src/targets/coco3/random_width.c | 5 --- ugbc/src/targets/coco3/randomize.c | 5 --- ugbc/src/targets/coleco/put_image.c | 3 -- ugbc/src/targets/coleco/random.c | 5 --- ugbc/src/targets/coleco/random_height.c | 5 --- ugbc/src/targets/coleco/random_width.c | 5 --- ugbc/src/targets/coleco/randomize.c | 5 --- ugbc/src/targets/common/begin_procedure.c | 10 ++--- ugbc/src/targets/common/call.c | 2 +- ugbc/src/targets/common/end_proc.c | 1 - ugbc/src/targets/common/put_tilemap.c | 8 +++- ugbc/src/targets/cpc/get_image.c | 15 ------- ugbc/src/targets/cpc/put_image.c | 3 -- ugbc/src/targets/cpc/random.c | 5 --- ugbc/src/targets/cpc/random_height.c | 5 --- ugbc/src/targets/cpc/random_width.c | 5 --- ugbc/src/targets/cpc/randomize.c | 5 --- ugbc/src/targets/d32/put_image.c | 3 -- ugbc/src/targets/d32/random.c | 5 --- ugbc/src/targets/d32/random_heigth.c | 5 --- ugbc/src/targets/d32/random_width.c | 5 --- ugbc/src/targets/d32/randomize.c | 5 --- ugbc/src/targets/d64/put_image.c | 3 -- ugbc/src/targets/d64/random.c | 5 --- ugbc/src/targets/d64/random_heigth.c | 5 --- ugbc/src/targets/d64/random_width.c | 5 --- ugbc/src/targets/d64/randomize.c | 5 --- ugbc/src/targets/mo5/put_image.c | 3 -- ugbc/src/targets/mo5/random.c | 5 --- ugbc/src/targets/mo5/random_heigth.c | 5 --- ugbc/src/targets/mo5/random_width.c | 5 --- ugbc/src/targets/mo5/randomize.c | 5 --- ugbc/src/targets/msx1/put_image.c | 4 +- ugbc/src/targets/msx1/random.c | 5 --- ugbc/src/targets/msx1/random_height.c | 5 --- ugbc/src/targets/msx1/random_width.c | 5 --- ugbc/src/targets/msx1/randomize.c | 5 --- ugbc/src/targets/pc128op/put_image.c | 3 -- ugbc/src/targets/pc128op/random.c | 5 --- ugbc/src/targets/pc128op/random_heigth.c | 5 --- ugbc/src/targets/pc128op/random_width.c | 5 --- ugbc/src/targets/pc128op/randomize.c | 5 --- ugbc/src/targets/plus4/put_image.c | 3 -- ugbc/src/targets/plus4/random.c | 5 --- ugbc/src/targets/plus4/random_heigth.c | 5 --- ugbc/src/targets/plus4/random_width.c | 5 --- ugbc/src/targets/plus4/randomize.c | 15 ------- ugbc/src/targets/sc3000/put_image.c | 3 -- ugbc/src/targets/sc3000/random.c | 5 --- ugbc/src/targets/sc3000/random_height.c | 5 --- ugbc/src/targets/sc3000/random_width.c | 5 --- ugbc/src/targets/sc3000/randomize.c | 5 --- ugbc/src/targets/sg1000/put_image.c | 3 -- ugbc/src/targets/sg1000/random.c | 5 --- ugbc/src/targets/sg1000/random_height.c | 5 --- ugbc/src/targets/sg1000/random_width.c | 5 --- ugbc/src/targets/sg1000/randomize.c | 5 --- ugbc/src/targets/vg5000/put_image.c | 3 -- ugbc/src/targets/vg5000/random.c | 5 --- ugbc/src/targets/vg5000/random_height.c | 5 --- ugbc/src/targets/vg5000/random_width.c | 5 --- ugbc/src/targets/vg5000/randomize.c | 5 --- ugbc/src/targets/vic20/put_image.c | 3 -- ugbc/src/targets/vic20/random.c | 5 --- ugbc/src/targets/vic20/random_heigth.c | 15 ------- ugbc/src/targets/vic20/random_width.c | 15 ------- ugbc/src/targets/vic20/randomize.c | 15 ------- ugbc/src/targets/zx/put_image.c | 3 -- ugbc/src/targets/zx/random.c | 5 --- ugbc/src/targets/zx/random_height.c | 5 --- ugbc/src/targets/zx/random_width.c | 5 --- ugbc/src/targets/zx/randomize.c | 5 --- 98 files changed, 22 insertions(+), 586 deletions(-) diff --git a/ugbc/src/targets/atari/put_image.c b/ugbc/src/targets/atari/put_image.c index 1e3f5d18d..a00831d14 100755 --- a/ugbc/src/targets/atari/put_image.c +++ b/ugbc/src/targets/atari/put_image.c @@ -50,9 +50,6 @@ extern char DATATYPE_AS_STRING[][16]; * @param _x Abscissa of the point to draw * @param _y Ordinate of the point */ -/* -@keyword PUT IMAGE - */ void put_image( Environment * _environment, char * _image, char * _x, char * _y, char * _frame, char * _sequence, int _flags ) { Variable * image = variable_retrieve( _environment, _image ); diff --git a/ugbc/src/targets/atari/randomize.c b/ugbc/src/targets/atari/randomize.c index 4c127a3ab..d40513494 100755 --- a/ugbc/src/targets/atari/randomize.c +++ b/ugbc/src/targets/atari/randomize.c @@ -45,10 +45,6 @@ * * @param _environment Current calling environment */ -/* -@keyword RANDOMIZE -@target atari - */ void randomize( Environment * _environment, char * _ext_seed ) { Variable * seed = variable_retrieve( _environment, "CPURANDOM_SEED" ); diff --git a/ugbc/src/targets/c128/put_image.c b/ugbc/src/targets/c128/put_image.c index e49437f60..ba013971c 100755 --- a/ugbc/src/targets/c128/put_image.c +++ b/ugbc/src/targets/c128/put_image.c @@ -50,9 +50,6 @@ extern char DATATYPE_AS_STRING[][16]; * @param _x Abscissa of the point to draw * @param _y Ordinate of the point */ -/* -@keyword PUT IMAGE - */ void put_image( Environment * _environment, char * _image, char * _x, char * _y, char * _frame, char * _sequence, int _flags ) { MAKE_LABEL diff --git a/ugbc/src/targets/c128/random.c b/ugbc/src/targets/c128/random.c index e97bdf078..38009c3b8 100755 --- a/ugbc/src/targets/c128/random.c +++ b/ugbc/src/targets/c128/random.c @@ -65,40 +65,13 @@ This function allows you to calculate a random number, in the range that can be represented by the type of data indicated as a parameter, or as data type conversion. -The supported data types are as follows: - -^ DATA TYPE ^ MINIMUM ^ MAXIMUM ^ -| ''BYTE'' | 0 | 255 | -| ''SIGNED BYTE'' | -127 | 127 | -| ''COLOR'' | 0 | ''COLOR COUNT'' | -| ''WORD'' | 0 | 65.535 | -| ''SIGNED WORD'' | -32.767 | 32.767 | -| ''ADDRESS'' | 0 | 65.535 | -| ''POSITION'' | 0 | 65.535 | -| ''DWORD'' | 0 | 4.294.967.295 | -| ''SIGNED DWORD''| -2.147.483.647 | 2.147.483.647 | - @italian Questa funzione permette di calcolare un numero casuale, compreso tra 0 e il massimo numero rappresentabile dal tipo di dato indicato come parametro, or come conversione di tipo. -I tipi di dato supportati sono: - -^ DATA TYPE ^ MINIMUM ^ MAXIMUM ^ -| ''BYTE'' | 0 | 255 | -| ''SIGNED BYTE'' | -127 | 127 | -| ''COLOR'' | 0 | ''COLOR COUNT'' | -| ''WORD'' | 0 | 65.535 | -| ''SIGNED WORD'' | -32.767 | 32.767 | -| ''ADDRESS'' | 0 | 65.535 | -| ''POSITION'' | 0 | 65.535 | -| ''DWORD'' | 0 | 4.294.967.295 | -| ''SIGNED DWORD''| -2.147.483.647 | 2.147.483.647 | - - -@syntax = RANDOM [datatype] -@syntax = ([datatype]) RANDOM +@syntax = RANDOM type +@syntax = (type) RANDOM @example randomScore = RANDOM BYTE @example randomColor = (COLOR) RANDOM diff --git a/ugbc/src/targets/c128/random_heigth.c b/ugbc/src/targets/c128/random_heigth.c index 40527f5b7..79c4c0fc9 100755 --- a/ugbc/src/targets/c128/random_heigth.c +++ b/ugbc/src/targets/c128/random_heigth.c @@ -55,7 +55,7 @@ Calcola un valore di altezza casuale. @example POINT AT (RANDOM WIDTH, RANDOM HEIGHT) -@target c128 +@target all */ Variable * random_height( Environment * _environment ) { diff --git a/ugbc/src/targets/c128/random_width.c b/ugbc/src/targets/c128/random_width.c index 94a331059..a6d5bf11a 100755 --- a/ugbc/src/targets/c128/random_width.c +++ b/ugbc/src/targets/c128/random_width.c @@ -59,7 +59,7 @@ Calcola un valore di larghezza casuale. @example POINT AT (RANDOM WIDTH, RANDOM HEIGHT) -@target c128 +@target all */ Variable * random_width( Environment * _environment ) { diff --git a/ugbc/src/targets/c128/randomize.c b/ugbc/src/targets/c128/randomize.c index 60752a837..f4678ba2b 100755 --- a/ugbc/src/targets/c128/randomize.c +++ b/ugbc/src/targets/c128/randomize.c @@ -54,7 +54,7 @@ Initialize the random seed. @italian Inizializza il seme casuale. -@syntax RANDOMIZE {[seed]} +@syntax RANDOMIZE seed @example RANDOMIZE diff --git a/ugbc/src/targets/c128z/get_image.c b/ugbc/src/targets/c128z/get_image.c index 384293e2c..53fdb4830 100755 --- a/ugbc/src/targets/c128z/get_image.c +++ b/ugbc/src/targets/c128z/get_image.c @@ -50,21 +50,6 @@ extern char DATATYPE_AS_STRING[][16]; * @param _x Abscissa of the point to draw * @param _y Ordinate of the point */ -/* -@keyword PUT IMAGE - -@english -This function draws an image at a specific position on the screen. - -@italian -Questa funzione disegna una immagine in una specifica posizione dello schermo. - -@syntax PUT IMAGE [image] AT [x],[y] - -@example PUT IMAGE airplane AT 10,10 - -@target all - */ void get_image( Environment * _environment, char * _image, char * _x, char * _y, int _palette ) { Variable * image = variable_retrieve( _environment, _image ); diff --git a/ugbc/src/targets/c128z/put_image.c b/ugbc/src/targets/c128z/put_image.c index 5f2ec626b..d85c75e3a 100755 --- a/ugbc/src/targets/c128z/put_image.c +++ b/ugbc/src/targets/c128z/put_image.c @@ -50,9 +50,6 @@ extern char DATATYPE_AS_STRING[][16]; * @param _x Abscissa of the point to draw * @param _y Ordinate of the point */ -/* -@keyword PUT IMAGE - */ void put_image( Environment * _environment, char * _image, char * _x, char * _y, char * _frame, char * _sequence, int _flags ) { Variable * image = variable_retrieve( _environment, _image ); diff --git a/ugbc/src/targets/c128z/random.c b/ugbc/src/targets/c128z/random.c index 769292424..f09b53a92 100755 --- a/ugbc/src/targets/c128z/random.c +++ b/ugbc/src/targets/c128z/random.c @@ -57,11 +57,6 @@ * @param _type Type of random number to generate * @return Variable* The random value calculated */ -/* -@keyword RANDOM - -@target c128z - */ Variable * random_value( Environment * _environment, VariableType _type ) { Variable * seed = variable_retrieve( _environment, "CPURANDOM_SEED" ); diff --git a/ugbc/src/targets/c128z/random_height.c b/ugbc/src/targets/c128z/random_height.c index e61afc4f7..93b802802 100755 --- a/ugbc/src/targets/c128z/random_height.c +++ b/ugbc/src/targets/c128z/random_height.c @@ -46,11 +46,6 @@ * @param _environment Current calling environment * @return Variable* The random value calculated */ -/* -@keyword RANDOM HEIGHT - -@target c128z - */ Variable * random_height( Environment * _environment ) { Variable * result = random_value( _environment, VT_POSITION ); diff --git a/ugbc/src/targets/c128z/random_width.c b/ugbc/src/targets/c128z/random_width.c index 088844d3e..562b0abd2 100755 --- a/ugbc/src/targets/c128z/random_width.c +++ b/ugbc/src/targets/c128z/random_width.c @@ -46,11 +46,6 @@ * @param _environment Current calling environment * @return Variable* The random value calculated */ -/* -@keyword RANDOM WIDTH - -@target c128z - */ Variable * random_width( Environment * _environment ) { Variable * result1 = random_value( _environment, VT_POSITION ); diff --git a/ugbc/src/targets/c128z/randomize.c b/ugbc/src/targets/c128z/randomize.c index bad4b2b60..e5c71fed7 100755 --- a/ugbc/src/targets/c128z/randomize.c +++ b/ugbc/src/targets/c128z/randomize.c @@ -45,11 +45,6 @@ * * @param _environment Current calling environment */ -/* -@keyword RANDOMIZE - -@target c128z - */ void randomize( Environment * _environment, char * _other_seed ) { Variable * seed = variable_retrieve( _environment, "CPURANDOM_SEED" ); diff --git a/ugbc/src/targets/c64/put_image.c b/ugbc/src/targets/c64/put_image.c index a079c3e76..8e7f37f67 100755 --- a/ugbc/src/targets/c64/put_image.c +++ b/ugbc/src/targets/c64/put_image.c @@ -67,9 +67,9 @@ Il programmatore può disegnare sullo schermo una singola immagine un frame di una posa di una sequenza di immagini (''SEQUENCES''). In tutti i casi la sintassi cambia leggermente. -@syntax PUT IMAGE [image] AT [x],[y] -@syntax PUT IMAGE [image] FRAME [frame] AT [x],[y] -@syntax PUT IMAGE [image] SEQUENCE [sequence] FRAME [frame] AT [x],[y] +@syntax PUT IMAGE resource AT [x],[y] +@syntax PUT IMAGE resource FRAME frame AT [x],[y] +@syntax PUT IMAGE resource SEQUENCE sequence FRAME frame AT [x],[y] @example PUT IMAGE airplane AT 10,10 diff --git a/ugbc/src/targets/c64/random.c b/ugbc/src/targets/c64/random.c index b0fe2e7a9..591e0f8d1 100755 --- a/ugbc/src/targets/c64/random.c +++ b/ugbc/src/targets/c64/random.c @@ -57,56 +57,6 @@ * @param _type Type of random number to generate * @return Variable* The random value calculated */ -/* -@keyword RANDOM - -@english -This function allows you to calculate a random number, in the range -that can be represented by the type of data indicated as a parameter, -or as data type conversion. - -The supported data types are as follows: - -^ DATA TYPE ^ MINIMUM ^ MAXIMUM ^ -| ''BYTE'' | 0 | 255 | -| ''SIGNED BYTE'' | -127 | 127 | -| ''COLOR'' | 0 | ''COLOR COUNT'' | -| ''WORD'' | 0 | 65.535 | -| ''SIGNED WORD'' | -32.767 | 32.767 | -| ''ADDRESS'' | 0 | 65.535 | -| ''POSITION'' | 0 | 65.535 | -| ''DWORD'' | 0 | 4.294.967.295 | -| ''SIGNED DWORD''| -2.147.483.647 | 2.147.483.647 | - -@italian -Questa funzione permette di calcolare un numero casuale, compreso tra 0 e -il massimo numero rappresentabile dal tipo di dato indicato come parametro, -or come conversione di tipo. - -I tipi di dato supportati sono: - -^ DATA TYPE ^ MINIMUM ^ MAXIMUM ^ -| ''BYTE'' | 0 | 255 | -| ''SIGNED BYTE'' | -127 | 127 | -| ''COLOR'' | 0 | ''COLOR COUNT'' | -| ''WORD'' | 0 | 65.535 | -| ''SIGNED WORD'' | -32.767 | 32.767 | -| ''ADDRESS'' | 0 | 65.535 | -| ''POSITION'' | 0 | 65.535 | -| ''DWORD'' | 0 | 4.294.967.295 | -| ''SIGNED DWORD''| -2.147.483.647 | 2.147.483.647 | - - -@syntax = RANDOM [datatype] -@syntax = ([datatype]) RANDOM - -@example randomScore = RANDOM BYTE -@example randomColor = (COLOR) RANDOM - -@seeAlso RND - -@target all - */ Variable * random_value( Environment * _environment, VariableType _type ) { Variable * seed = variable_retrieve( _environment, "CPURANDOM_SEED" ); diff --git a/ugbc/src/targets/c64/random_heigth.c b/ugbc/src/targets/c64/random_heigth.c index 2aa7fe5c7..fc672497a 100755 --- a/ugbc/src/targets/c64/random_heigth.c +++ b/ugbc/src/targets/c64/random_heigth.c @@ -42,21 +42,6 @@ * @param _environment Current calling environment * @return Variable* The random value calculated */ -/* -@keyword RANDOM HEIGHT - -@english -Calculate a random height. - -@italian -Calcola un valore di altezza casuale. - -@syntax = RANDOM HEIGHT - -@example POINT AT (RANDOM WIDTH, RANDOM HEIGHT) - -@target c64 - */ Variable * random_height( Environment * _environment ) { Variable * result = random_value( _environment, VT_POSITION ); diff --git a/ugbc/src/targets/c64/random_width.c b/ugbc/src/targets/c64/random_width.c index bb08e6b2a..7a263fe6b 100755 --- a/ugbc/src/targets/c64/random_width.c +++ b/ugbc/src/targets/c64/random_width.c @@ -46,21 +46,6 @@ * @param _environment Current calling environment * @return Variable* The random value calculated */ -/* -@keyword RANDOM WIDTH - -@english -Calculate a random width. - -@italian -Calcola un valore di larghezza casuale. - -@syntax = RANDOM WIDTH - -@example POINT AT (RANDOM WIDTH, RANDOM HEIGHT) - -@target c64 - */ Variable * random_width( Environment * _environment ) { Variable * result1 = random_value( _environment, VT_POSITION ); diff --git a/ugbc/src/targets/c64/randomize.c b/ugbc/src/targets/c64/randomize.c index a8ab9d617..d40513494 100755 --- a/ugbc/src/targets/c64/randomize.c +++ b/ugbc/src/targets/c64/randomize.c @@ -45,21 +45,6 @@ * * @param _environment Current calling environment */ -/* -@keyword RANDOMIZE - -@english -Initialize the random seed. - -@italian -Inizializza il seme casuale. - -@syntax RANDOMIZE {[seed]} - -@example RANDOMIZE - -@target c64 - */ void randomize( Environment * _environment, char * _ext_seed ) { Variable * seed = variable_retrieve( _environment, "CPURANDOM_SEED" ); diff --git a/ugbc/src/targets/coco/put_image.c b/ugbc/src/targets/coco/put_image.c index 74b0bfa09..d8014de56 100755 --- a/ugbc/src/targets/coco/put_image.c +++ b/ugbc/src/targets/coco/put_image.c @@ -50,9 +50,6 @@ extern char DATATYPE_AS_STRING[][16]; * @param _x Abscissa of the point to draw * @param _y Ordinate of the point */ -/* -@keyword PUT IMAGE - */ void put_image( Environment * _environment, char * _image, char * _x, char * _y, char * _frame, char * _sequence, int _flags ) { MAKE_LABEL diff --git a/ugbc/src/targets/coco/random.c b/ugbc/src/targets/coco/random.c index ffaeb2a49..6effd2b61 100755 --- a/ugbc/src/targets/coco/random.c +++ b/ugbc/src/targets/coco/random.c @@ -57,11 +57,6 @@ * @param _type Type of random number to generate * @return Variable* The random value calculated */ -/* -@keyword RANDOM - -@target coco - */ Variable * random_value( Environment * _environment, VariableType _type ) { Variable * result = variable_temporary( _environment, _type, "(random value)" ); diff --git a/ugbc/src/targets/coco/random_heigth.c b/ugbc/src/targets/coco/random_heigth.c index d7db4bcf5..6e9f9eca3 100755 --- a/ugbc/src/targets/coco/random_heigth.c +++ b/ugbc/src/targets/coco/random_heigth.c @@ -42,11 +42,6 @@ * @param _environment Current calling environment * @return Variable* The random value calculated */ -/* -@keyword RANDOM HEIGHT - -@target coco - */ Variable * random_height( Environment * _environment ) { Variable * result = random_value( _environment, VT_POSITION ); diff --git a/ugbc/src/targets/coco/random_width.c b/ugbc/src/targets/coco/random_width.c index 68007602b..348eb0455 100755 --- a/ugbc/src/targets/coco/random_width.c +++ b/ugbc/src/targets/coco/random_width.c @@ -46,11 +46,6 @@ * @param _environment Current calling environment * @return Variable* The random value calculated */ -/* -@keyword RANDOM WIDTH - -@target coco - */ Variable * random_width( Environment * _environment ) { Variable * result = random_value( _environment, VT_POSITION ); diff --git a/ugbc/src/targets/coco/randomize.c b/ugbc/src/targets/coco/randomize.c index 1de93871a..064e033f6 100755 --- a/ugbc/src/targets/coco/randomize.c +++ b/ugbc/src/targets/coco/randomize.c @@ -45,11 +45,6 @@ * * @param _environment Current calling environment */ -/* -@keyword RANDOMIZE - -@target coco - */ void randomize( Environment * _environment, char * _ext_seed ) { Variable * seed = variable_retrieve( _environment, "CPURANDOM_SEED" ); diff --git a/ugbc/src/targets/coco3/put_image.c b/ugbc/src/targets/coco3/put_image.c index 8e803a9e8..dc3918d9a 100755 --- a/ugbc/src/targets/coco3/put_image.c +++ b/ugbc/src/targets/coco3/put_image.c @@ -50,9 +50,6 @@ extern char DATATYPE_AS_STRING[][16]; * @param _x Abscissa of the point to draw * @param _y Ordinate of the point */ -/* -@keyword PUT IMAGE - */ void put_image( Environment * _environment, char * _image, char * _x, char * _y, char * _frame, char * _sequence, int _flags ) { MAKE_LABEL diff --git a/ugbc/src/targets/coco3/random.c b/ugbc/src/targets/coco3/random.c index 648133f7e..6effd2b61 100755 --- a/ugbc/src/targets/coco3/random.c +++ b/ugbc/src/targets/coco3/random.c @@ -57,11 +57,6 @@ * @param _type Type of random number to generate * @return Variable* The random value calculated */ -/* -@keyword RANDOM - -@target coco3 - */ Variable * random_value( Environment * _environment, VariableType _type ) { Variable * result = variable_temporary( _environment, _type, "(random value)" ); diff --git a/ugbc/src/targets/coco3/random_heigth.c b/ugbc/src/targets/coco3/random_heigth.c index 6eb4f13a2..6e9f9eca3 100755 --- a/ugbc/src/targets/coco3/random_heigth.c +++ b/ugbc/src/targets/coco3/random_heigth.c @@ -42,11 +42,6 @@ * @param _environment Current calling environment * @return Variable* The random value calculated */ -/* -@keyword RANDOM HEIGHT - -@target coco3 - */ Variable * random_height( Environment * _environment ) { Variable * result = random_value( _environment, VT_POSITION ); diff --git a/ugbc/src/targets/coco3/random_width.c b/ugbc/src/targets/coco3/random_width.c index 9e54c354b..348eb0455 100755 --- a/ugbc/src/targets/coco3/random_width.c +++ b/ugbc/src/targets/coco3/random_width.c @@ -46,11 +46,6 @@ * @param _environment Current calling environment * @return Variable* The random value calculated */ -/* -@keyword RANDOM WIDTH - -@target coco3 - */ Variable * random_width( Environment * _environment ) { Variable * result = random_value( _environment, VT_POSITION ); diff --git a/ugbc/src/targets/coco3/randomize.c b/ugbc/src/targets/coco3/randomize.c index c6b06e864..064e033f6 100755 --- a/ugbc/src/targets/coco3/randomize.c +++ b/ugbc/src/targets/coco3/randomize.c @@ -45,11 +45,6 @@ * * @param _environment Current calling environment */ -/* -@keyword RANDOMIZE - -@target coco3 - */ void randomize( Environment * _environment, char * _ext_seed ) { Variable * seed = variable_retrieve( _environment, "CPURANDOM_SEED" ); diff --git a/ugbc/src/targets/coleco/put_image.c b/ugbc/src/targets/coleco/put_image.c index 8dfb652e0..aff1cdd45 100755 --- a/ugbc/src/targets/coleco/put_image.c +++ b/ugbc/src/targets/coleco/put_image.c @@ -50,9 +50,6 @@ extern char DATATYPE_AS_STRING[][16]; * @param _x Abscissa of the point to draw * @param _y Ordinate of the point */ -/* -@keyword PUT IMAGE - */ void put_image( Environment * _environment, char * _image, char * _x, char * _y, char * _frame, char * _sequence, int _flags ) { Variable * image = variable_retrieve( _environment, _image ); diff --git a/ugbc/src/targets/coleco/random.c b/ugbc/src/targets/coleco/random.c index a4463c4be..b48a43c78 100755 --- a/ugbc/src/targets/coleco/random.c +++ b/ugbc/src/targets/coleco/random.c @@ -57,11 +57,6 @@ * @param _type Type of random number to generate * @return Variable* The random value calculated */ -/* -@keyword RANDOM - -@target coleco - */ Variable * random_value( Environment * _environment, VariableType _type ) { Variable * seed = variable_retrieve( _environment, "CPURANDOM_SEED" ); diff --git a/ugbc/src/targets/coleco/random_height.c b/ugbc/src/targets/coleco/random_height.c index eb4ec3507..93b802802 100755 --- a/ugbc/src/targets/coleco/random_height.c +++ b/ugbc/src/targets/coleco/random_height.c @@ -46,11 +46,6 @@ * @param _environment Current calling environment * @return Variable* The random value calculated */ -/* -@keyword RANDOM HEIGHT - -@target coleco - */ Variable * random_height( Environment * _environment ) { Variable * result = random_value( _environment, VT_POSITION ); diff --git a/ugbc/src/targets/coleco/random_width.c b/ugbc/src/targets/coleco/random_width.c index e3e23e0b6..562b0abd2 100755 --- a/ugbc/src/targets/coleco/random_width.c +++ b/ugbc/src/targets/coleco/random_width.c @@ -46,11 +46,6 @@ * @param _environment Current calling environment * @return Variable* The random value calculated */ -/* -@keyword RANDOM WIDTH - -@target coleco - */ Variable * random_width( Environment * _environment ) { Variable * result1 = random_value( _environment, VT_POSITION ); diff --git a/ugbc/src/targets/coleco/randomize.c b/ugbc/src/targets/coleco/randomize.c index 30419fb07..e5c71fed7 100755 --- a/ugbc/src/targets/coleco/randomize.c +++ b/ugbc/src/targets/coleco/randomize.c @@ -45,11 +45,6 @@ * * @param _environment Current calling environment */ -/* -@keyword RANDOMIZE - -@target coleco - */ void randomize( Environment * _environment, char * _other_seed ) { Variable * seed = variable_retrieve( _environment, "CPURANDOM_SEED" ); diff --git a/ugbc/src/targets/common/begin_procedure.c b/ugbc/src/targets/common/begin_procedure.c index 0253cfd86..c2ece592f 100755 --- a/ugbc/src/targets/common/begin_procedure.c +++ b/ugbc/src/targets/common/begin_procedure.c @@ -86,14 +86,14 @@ chiamata di procedura. Questo sistema funziona altrettanto bene con costanti e variabili, ma anche array. Se è necessario immettere più di un parametro, i parametri devono essere separate da virgole. -@syntax PROCEDURE [name] [ [parameter] {, [parameter { [, ...]]]}}] +@syntax PROCEDURE name[ par1[, par2[, ... ]]] ] @syntax ... -@syntax END PROC{ [expression] } +@syntax END PROC[ expression ] -@example PROCEDURE test -@example DEBUG "HELLO WORLD!" +@example PROCEDURE test[ a, b ] +@example DEBUG "HELLO WORLD! "; (a+b) @example END PROC -@example   +@example @example PROCEDURE sumOf( x, y ) @example END PROC[x+y] diff --git a/ugbc/src/targets/common/call.c b/ugbc/src/targets/common/call.c index 6b30afba7..a48de91b8 100755 --- a/ugbc/src/targets/common/call.c +++ b/ugbc/src/targets/common/call.c @@ -94,7 +94,7 @@ This keyword will invoke a procedure. @italian Questa parola chiave invoca una funzione. -@syntax PROC [name][{[parameter],{[parameter],....}}] +@syntax PROC name [(par1[, par2[, ... ]])] @example PROC factorial[42] diff --git a/ugbc/src/targets/common/end_proc.c b/ugbc/src/targets/common/end_proc.c index f1f8b2a51..197cd72ff 100755 --- a/ugbc/src/targets/common/end_proc.c +++ b/ugbc/src/targets/common/end_proc.c @@ -59,7 +59,6 @@ della procedura. Il valore va indicato tra parentesi quadre. Il valore sarà, quindi, copiato nella variable ''PARAM'' e restituito dalla chiamata, se la chiamata è stata fatta nel contesto di una espressione. -@example   @example PROCEDURE hundred @example END PROC[100] diff --git a/ugbc/src/targets/common/put_tilemap.c b/ugbc/src/targets/common/put_tilemap.c index 6c0fd1a8a..58b5127d4 100755 --- a/ugbc/src/targets/common/put_tilemap.c +++ b/ugbc/src/targets/common/put_tilemap.c @@ -53,9 +53,15 @@ extern char DATATYPE_AS_STRING[][16]; @english +The command ''PUT TILEMAP'' can be used to draw a map on the screen. Note how the same map draws the +same way on different screens. The map is however within the available screen size. If the +map is bigger than the screen, the comamnd only draws a part of the map. To scroll the map you +can use the ''FROM'' parameter with the offsets (in terms of tiles) starting from which the map will +have to be drawn on the screen. + @italian -@syntax PUT TILEMAP [tilemap] +@syntax PUT TILEMAP resource [ FROM x, y ] @example PUT TILEMAP map diff --git a/ugbc/src/targets/cpc/get_image.c b/ugbc/src/targets/cpc/get_image.c index cdcc50b73..0148a14c5 100755 --- a/ugbc/src/targets/cpc/get_image.c +++ b/ugbc/src/targets/cpc/get_image.c @@ -50,21 +50,6 @@ extern char DATATYPE_AS_STRING[][16]; * @param _x Abscissa of the point to draw * @param _y Ordinate of the point */ -/* -@keyword PUT IMAGE - -@english -This function draws an image at a specific position on the screen. - -@italian -Questa funzione disegna una immagine in una specifica posizione dello schermo. - -@syntax PUT IMAGE [image] AT [x],[y] - -@example PUT IMAGE airplane AT 10,10 - -@target all - */ void get_image( Environment * _environment, char * _image, char * _x, char * _y, int _palette ) { Variable * image = variable_retrieve( _environment, _image ); diff --git a/ugbc/src/targets/cpc/put_image.c b/ugbc/src/targets/cpc/put_image.c index 0be8f1951..45a755164 100755 --- a/ugbc/src/targets/cpc/put_image.c +++ b/ugbc/src/targets/cpc/put_image.c @@ -50,9 +50,6 @@ extern char DATATYPE_AS_STRING[][16]; * @param _x Abscissa of the point to draw * @param _y Ordinate of the point */ -/* -@keyword PUT IMAGE - */ void put_image( Environment * _environment, char * _image, char * _x, char * _y, char * _frame, char * _sequence, int _flags ) { Variable * image = variable_retrieve( _environment, _image ); diff --git a/ugbc/src/targets/cpc/random.c b/ugbc/src/targets/cpc/random.c index 03bacbba4..30808575a 100755 --- a/ugbc/src/targets/cpc/random.c +++ b/ugbc/src/targets/cpc/random.c @@ -57,11 +57,6 @@ * @param _type Type of random number to generate * @return Variable* The random value calculated */ -/* -@keyword RANDOM - -@target cpc - */ Variable * random_value( Environment * _environment, VariableType _type ) { Variable * seed = variable_retrieve( _environment, "CPURANDOM_SEED" ); diff --git a/ugbc/src/targets/cpc/random_height.c b/ugbc/src/targets/cpc/random_height.c index 4c96216da..93b802802 100755 --- a/ugbc/src/targets/cpc/random_height.c +++ b/ugbc/src/targets/cpc/random_height.c @@ -46,11 +46,6 @@ * @param _environment Current calling environment * @return Variable* The random value calculated */ -/* -@keyword RANDOM HEIGHT - -@target cpc - */ Variable * random_height( Environment * _environment ) { Variable * result = random_value( _environment, VT_POSITION ); diff --git a/ugbc/src/targets/cpc/random_width.c b/ugbc/src/targets/cpc/random_width.c index bb7040c46..562b0abd2 100755 --- a/ugbc/src/targets/cpc/random_width.c +++ b/ugbc/src/targets/cpc/random_width.c @@ -46,11 +46,6 @@ * @param _environment Current calling environment * @return Variable* The random value calculated */ -/* -@keyword RANDOM WIDTH - -@target cpc - */ Variable * random_width( Environment * _environment ) { Variable * result1 = random_value( _environment, VT_POSITION ); diff --git a/ugbc/src/targets/cpc/randomize.c b/ugbc/src/targets/cpc/randomize.c index 63551abe8..e5c71fed7 100755 --- a/ugbc/src/targets/cpc/randomize.c +++ b/ugbc/src/targets/cpc/randomize.c @@ -45,11 +45,6 @@ * * @param _environment Current calling environment */ -/* -@keyword RANDOMIZE - -@target cpc - */ void randomize( Environment * _environment, char * _other_seed ) { Variable * seed = variable_retrieve( _environment, "CPURANDOM_SEED" ); diff --git a/ugbc/src/targets/d32/put_image.c b/ugbc/src/targets/d32/put_image.c index 74b0bfa09..d8014de56 100755 --- a/ugbc/src/targets/d32/put_image.c +++ b/ugbc/src/targets/d32/put_image.c @@ -50,9 +50,6 @@ extern char DATATYPE_AS_STRING[][16]; * @param _x Abscissa of the point to draw * @param _y Ordinate of the point */ -/* -@keyword PUT IMAGE - */ void put_image( Environment * _environment, char * _image, char * _x, char * _y, char * _frame, char * _sequence, int _flags ) { MAKE_LABEL diff --git a/ugbc/src/targets/d32/random.c b/ugbc/src/targets/d32/random.c index 16627bd2d..6effd2b61 100755 --- a/ugbc/src/targets/d32/random.c +++ b/ugbc/src/targets/d32/random.c @@ -57,11 +57,6 @@ * @param _type Type of random number to generate * @return Variable* The random value calculated */ -/* -@keyword RANDOM - -@target d32 - */ Variable * random_value( Environment * _environment, VariableType _type ) { Variable * result = variable_temporary( _environment, _type, "(random value)" ); diff --git a/ugbc/src/targets/d32/random_heigth.c b/ugbc/src/targets/d32/random_heigth.c index dfe330a87..6e9f9eca3 100755 --- a/ugbc/src/targets/d32/random_heigth.c +++ b/ugbc/src/targets/d32/random_heigth.c @@ -42,11 +42,6 @@ * @param _environment Current calling environment * @return Variable* The random value calculated */ -/* -@keyword RANDOM HEIGHT - -@target d32 - */ Variable * random_height( Environment * _environment ) { Variable * result = random_value( _environment, VT_POSITION ); diff --git a/ugbc/src/targets/d32/random_width.c b/ugbc/src/targets/d32/random_width.c index 3204601a0..348eb0455 100755 --- a/ugbc/src/targets/d32/random_width.c +++ b/ugbc/src/targets/d32/random_width.c @@ -46,11 +46,6 @@ * @param _environment Current calling environment * @return Variable* The random value calculated */ -/* -@keyword RANDOM WIDTH - -@target d32 - */ Variable * random_width( Environment * _environment ) { Variable * result = random_value( _environment, VT_POSITION ); diff --git a/ugbc/src/targets/d32/randomize.c b/ugbc/src/targets/d32/randomize.c index bc8a246ba..064e033f6 100755 --- a/ugbc/src/targets/d32/randomize.c +++ b/ugbc/src/targets/d32/randomize.c @@ -45,11 +45,6 @@ * * @param _environment Current calling environment */ -/* -@keyword RANDOMIZE - -@target d32 - */ void randomize( Environment * _environment, char * _ext_seed ) { Variable * seed = variable_retrieve( _environment, "CPURANDOM_SEED" ); diff --git a/ugbc/src/targets/d64/put_image.c b/ugbc/src/targets/d64/put_image.c index 5821270c2..c05a022a2 100755 --- a/ugbc/src/targets/d64/put_image.c +++ b/ugbc/src/targets/d64/put_image.c @@ -50,9 +50,6 @@ extern char DATATYPE_AS_STRING[][16]; * @param _x Abscissa of the point to draw * @param _y Ordinate of the point */ -/* -@keyword PUT IMAGE - */ void put_image( Environment * _environment, char * _image, char * _x, char * _y, char * _frame, char * _sequence, int _flags ) { MAKE_LABEL diff --git a/ugbc/src/targets/d64/random.c b/ugbc/src/targets/d64/random.c index b2226c31d..8e02cea3f 100755 --- a/ugbc/src/targets/d64/random.c +++ b/ugbc/src/targets/d64/random.c @@ -57,11 +57,6 @@ * @param _type Type of random number to generate * @return Variable* The random value calculated */ -/* -@keyword RANDOM - -@target atari - */ Variable * random_value( Environment * _environment, VariableType _type ) { Variable * seed = variable_retrieve( _environment, "CPURANDOM_SEED" ); diff --git a/ugbc/src/targets/d64/random_heigth.c b/ugbc/src/targets/d64/random_heigth.c index a6554b0ba..6e9f9eca3 100755 --- a/ugbc/src/targets/d64/random_heigth.c +++ b/ugbc/src/targets/d64/random_heigth.c @@ -42,11 +42,6 @@ * @param _environment Current calling environment * @return Variable* The random value calculated */ -/* -@keyword RANDOM HEIGHT - -@target d64 - */ Variable * random_height( Environment * _environment ) { Variable * result = random_value( _environment, VT_POSITION ); diff --git a/ugbc/src/targets/d64/random_width.c b/ugbc/src/targets/d64/random_width.c index 0f96f6429..348eb0455 100755 --- a/ugbc/src/targets/d64/random_width.c +++ b/ugbc/src/targets/d64/random_width.c @@ -46,11 +46,6 @@ * @param _environment Current calling environment * @return Variable* The random value calculated */ -/* -@keyword RANDOM WIDTH - -@target d64 - */ Variable * random_width( Environment * _environment ) { Variable * result = random_value( _environment, VT_POSITION ); diff --git a/ugbc/src/targets/d64/randomize.c b/ugbc/src/targets/d64/randomize.c index 73ebd0fa7..d79b27971 100755 --- a/ugbc/src/targets/d64/randomize.c +++ b/ugbc/src/targets/d64/randomize.c @@ -45,11 +45,6 @@ * * @param _environment Current calling environment */ -/* -@keyword RANDOMIZE - -@target d64 - */ void randomize( Environment * _environment, char * _ext_seed ) { Variable * seed = variable_retrieve( _environment, "CPURANDOM_SEED" ); diff --git a/ugbc/src/targets/mo5/put_image.c b/ugbc/src/targets/mo5/put_image.c index 7c76f2d4c..1733912a8 100755 --- a/ugbc/src/targets/mo5/put_image.c +++ b/ugbc/src/targets/mo5/put_image.c @@ -50,9 +50,6 @@ extern char DATATYPE_AS_STRING[][16]; * @param _x Abscissa of the point to draw * @param _y Ordinate of the point */ -/* -@keyword PUT IMAGE - */ void put_image( Environment * _environment, char * _image, char * _x, char * _y, char * _frame, char * _sequence, int _flags ) { Variable * image = variable_retrieve( _environment, _image ); diff --git a/ugbc/src/targets/mo5/random.c b/ugbc/src/targets/mo5/random.c index 3f411cea9..76ce7bc5d 100755 --- a/ugbc/src/targets/mo5/random.c +++ b/ugbc/src/targets/mo5/random.c @@ -57,11 +57,6 @@ * @param _type Type of random number to generate * @return Variable* The random value calculated */ -/* -@keyword RANDOM - -@target mo5 - */ Variable * random_value( Environment * _environment, VariableType _type ) { Variable * seed = variable_retrieve( _environment, "CPURANDOM_SEED" ); diff --git a/ugbc/src/targets/mo5/random_heigth.c b/ugbc/src/targets/mo5/random_heigth.c index b9fb58699..6e9f9eca3 100755 --- a/ugbc/src/targets/mo5/random_heigth.c +++ b/ugbc/src/targets/mo5/random_heigth.c @@ -42,11 +42,6 @@ * @param _environment Current calling environment * @return Variable* The random value calculated */ -/* -@keyword RANDOM HEIGHT - -@target mo5 - */ Variable * random_height( Environment * _environment ) { Variable * result = random_value( _environment, VT_POSITION ); diff --git a/ugbc/src/targets/mo5/random_width.c b/ugbc/src/targets/mo5/random_width.c index f5a2f06f9..348eb0455 100755 --- a/ugbc/src/targets/mo5/random_width.c +++ b/ugbc/src/targets/mo5/random_width.c @@ -46,11 +46,6 @@ * @param _environment Current calling environment * @return Variable* The random value calculated */ -/* -@keyword RANDOM WIDTH - -@target mo5 - */ Variable * random_width( Environment * _environment ) { Variable * result = random_value( _environment, VT_POSITION ); diff --git a/ugbc/src/targets/mo5/randomize.c b/ugbc/src/targets/mo5/randomize.c index 34e0c2d7c..d79b27971 100755 --- a/ugbc/src/targets/mo5/randomize.c +++ b/ugbc/src/targets/mo5/randomize.c @@ -45,11 +45,6 @@ * * @param _environment Current calling environment */ -/* -@keyword RANDOMIZE - -@target mo5 - */ void randomize( Environment * _environment, char * _ext_seed ) { Variable * seed = variable_retrieve( _environment, "CPURANDOM_SEED" ); diff --git a/ugbc/src/targets/msx1/put_image.c b/ugbc/src/targets/msx1/put_image.c index 1b5a88387..2e4ca2361 100755 --- a/ugbc/src/targets/msx1/put_image.c +++ b/ugbc/src/targets/msx1/put_image.c @@ -50,9 +50,7 @@ extern char DATATYPE_AS_STRING[][16]; * @param _x Abscissa of the point to draw * @param _y Ordinate of the point */ -/* -@keyword PUT IMAGE - */ + void put_image( Environment * _environment, char * _image, char * _x, char * _y, char * _frame, char * _sequence, int _flags ) { MAKE_LABEL diff --git a/ugbc/src/targets/msx1/random.c b/ugbc/src/targets/msx1/random.c index f8351899a..905dab4d7 100755 --- a/ugbc/src/targets/msx1/random.c +++ b/ugbc/src/targets/msx1/random.c @@ -57,11 +57,6 @@ * @param _type Type of random number to generate * @return Variable* The random value calculated */ -/* -@keyword RANDOM - -@target msx1 - */ Variable * random_value( Environment * _environment, VariableType _type ) { Variable * seed = variable_retrieve( _environment, "CPURANDOM_SEED" ); diff --git a/ugbc/src/targets/msx1/random_height.c b/ugbc/src/targets/msx1/random_height.c index bf8cf86de..93b802802 100755 --- a/ugbc/src/targets/msx1/random_height.c +++ b/ugbc/src/targets/msx1/random_height.c @@ -46,11 +46,6 @@ * @param _environment Current calling environment * @return Variable* The random value calculated */ -/* -@keyword RANDOM HEIGHT - -@target msx1 - */ Variable * random_height( Environment * _environment ) { Variable * result = random_value( _environment, VT_POSITION ); diff --git a/ugbc/src/targets/msx1/random_width.c b/ugbc/src/targets/msx1/random_width.c index 623de619b..562b0abd2 100755 --- a/ugbc/src/targets/msx1/random_width.c +++ b/ugbc/src/targets/msx1/random_width.c @@ -46,11 +46,6 @@ * @param _environment Current calling environment * @return Variable* The random value calculated */ -/* -@keyword RANDOM WIDTH - -@target msx1 - */ Variable * random_width( Environment * _environment ) { Variable * result1 = random_value( _environment, VT_POSITION ); diff --git a/ugbc/src/targets/msx1/randomize.c b/ugbc/src/targets/msx1/randomize.c index 6eef7735c..e5c71fed7 100755 --- a/ugbc/src/targets/msx1/randomize.c +++ b/ugbc/src/targets/msx1/randomize.c @@ -45,11 +45,6 @@ * * @param _environment Current calling environment */ -/* -@keyword RANDOMIZE - -@target msx1 - */ void randomize( Environment * _environment, char * _other_seed ) { Variable * seed = variable_retrieve( _environment, "CPURANDOM_SEED" ); diff --git a/ugbc/src/targets/pc128op/put_image.c b/ugbc/src/targets/pc128op/put_image.c index ddf456195..936888373 100755 --- a/ugbc/src/targets/pc128op/put_image.c +++ b/ugbc/src/targets/pc128op/put_image.c @@ -50,9 +50,6 @@ extern char DATATYPE_AS_STRING[][16]; * @param _x Abscissa of the point to draw * @param _y Ordinate of the point */ -/* -@keyword PUT IMAGE - */ void put_image( Environment * _environment, char * _image, char * _x, char * _y, char * _frame, char * _sequence, int _flags ) { MAKE_LABEL diff --git a/ugbc/src/targets/pc128op/random.c b/ugbc/src/targets/pc128op/random.c index 232c239d3..52713c717 100755 --- a/ugbc/src/targets/pc128op/random.c +++ b/ugbc/src/targets/pc128op/random.c @@ -57,11 +57,6 @@ * @param _type Type of random number to generate * @return Variable* The random value calculated */ -/* -@keyword RANDOM - -@target pc128op - */ Variable * random_value( Environment * _environment, VariableType _type ) { Variable * seed = variable_retrieve( _environment, "CPURANDOM_SEED" ); diff --git a/ugbc/src/targets/pc128op/random_heigth.c b/ugbc/src/targets/pc128op/random_heigth.c index 545c671e6..6e9f9eca3 100755 --- a/ugbc/src/targets/pc128op/random_heigth.c +++ b/ugbc/src/targets/pc128op/random_heigth.c @@ -42,11 +42,6 @@ * @param _environment Current calling environment * @return Variable* The random value calculated */ -/* -@keyword RANDOM HEIGHT - -@target pc128op - */ Variable * random_height( Environment * _environment ) { Variable * result = random_value( _environment, VT_POSITION ); diff --git a/ugbc/src/targets/pc128op/random_width.c b/ugbc/src/targets/pc128op/random_width.c index 8c6b08524..348eb0455 100755 --- a/ugbc/src/targets/pc128op/random_width.c +++ b/ugbc/src/targets/pc128op/random_width.c @@ -46,11 +46,6 @@ * @param _environment Current calling environment * @return Variable* The random value calculated */ -/* -@keyword RANDOM WIDTH - -@target pc128op - */ Variable * random_width( Environment * _environment ) { Variable * result = random_value( _environment, VT_POSITION ); diff --git a/ugbc/src/targets/pc128op/randomize.c b/ugbc/src/targets/pc128op/randomize.c index 794e8f0f7..6dd6adc08 100755 --- a/ugbc/src/targets/pc128op/randomize.c +++ b/ugbc/src/targets/pc128op/randomize.c @@ -45,11 +45,6 @@ * * @param _environment Current calling environment */ -/* -@keyword RANDOMIZE - -@target pc128op - */ void randomize( Environment * _environment, char * _ext_seed ) { Variable * seed = variable_retrieve( _environment, "CPURANDOM_SEED" ); diff --git a/ugbc/src/targets/plus4/put_image.c b/ugbc/src/targets/plus4/put_image.c index a8794c2f9..4a47583fb 100755 --- a/ugbc/src/targets/plus4/put_image.c +++ b/ugbc/src/targets/plus4/put_image.c @@ -50,9 +50,6 @@ extern char DATATYPE_AS_STRING[][16]; * @param _x Abscissa of the point to draw * @param _y Ordinate of the point */ -/* -@keyword PUT IMAGE - */ void put_image( Environment * _environment, char * _image, char * _x, char * _y, char * _frame, char * _sequence, int _flags) { Variable * image = variable_retrieve( _environment, _image ); diff --git a/ugbc/src/targets/plus4/random.c b/ugbc/src/targets/plus4/random.c index 0d15804cd..1c2599649 100755 --- a/ugbc/src/targets/plus4/random.c +++ b/ugbc/src/targets/plus4/random.c @@ -57,11 +57,6 @@ * @param _type Type of random number to generate * @return Variable* The random value calculated */ -/* -@keyword RANDOM - -@target plus4 - */ Variable * random_value( Environment * _environment, VariableType _type ) { Variable * seed = variable_retrieve( _environment, "CPURANDOM_SEED" ); diff --git a/ugbc/src/targets/plus4/random_heigth.c b/ugbc/src/targets/plus4/random_heigth.c index 53a77736e..fc672497a 100755 --- a/ugbc/src/targets/plus4/random_heigth.c +++ b/ugbc/src/targets/plus4/random_heigth.c @@ -42,11 +42,6 @@ * @param _environment Current calling environment * @return Variable* The random value calculated */ -/* -@keyword RANDOM HEIGHT - -@target plus4 - */ Variable * random_height( Environment * _environment ) { Variable * result = random_value( _environment, VT_POSITION ); diff --git a/ugbc/src/targets/plus4/random_width.c b/ugbc/src/targets/plus4/random_width.c index 1782dd401..7a263fe6b 100755 --- a/ugbc/src/targets/plus4/random_width.c +++ b/ugbc/src/targets/plus4/random_width.c @@ -46,11 +46,6 @@ * @param _environment Current calling environment * @return Variable* The random value calculated */ -/* -@keyword RANDOM WIDTH - -@target plus4 - */ Variable * random_width( Environment * _environment ) { Variable * result1 = random_value( _environment, VT_POSITION ); diff --git a/ugbc/src/targets/plus4/randomize.c b/ugbc/src/targets/plus4/randomize.c index a8ab9d617..d40513494 100755 --- a/ugbc/src/targets/plus4/randomize.c +++ b/ugbc/src/targets/plus4/randomize.c @@ -45,21 +45,6 @@ * * @param _environment Current calling environment */ -/* -@keyword RANDOMIZE - -@english -Initialize the random seed. - -@italian -Inizializza il seme casuale. - -@syntax RANDOMIZE {[seed]} - -@example RANDOMIZE - -@target c64 - */ void randomize( Environment * _environment, char * _ext_seed ) { Variable * seed = variable_retrieve( _environment, "CPURANDOM_SEED" ); diff --git a/ugbc/src/targets/sc3000/put_image.c b/ugbc/src/targets/sc3000/put_image.c index 8dfb652e0..aff1cdd45 100755 --- a/ugbc/src/targets/sc3000/put_image.c +++ b/ugbc/src/targets/sc3000/put_image.c @@ -50,9 +50,6 @@ extern char DATATYPE_AS_STRING[][16]; * @param _x Abscissa of the point to draw * @param _y Ordinate of the point */ -/* -@keyword PUT IMAGE - */ void put_image( Environment * _environment, char * _image, char * _x, char * _y, char * _frame, char * _sequence, int _flags ) { Variable * image = variable_retrieve( _environment, _image ); diff --git a/ugbc/src/targets/sc3000/random.c b/ugbc/src/targets/sc3000/random.c index 7905c9f83..0953d5935 100755 --- a/ugbc/src/targets/sc3000/random.c +++ b/ugbc/src/targets/sc3000/random.c @@ -57,11 +57,6 @@ * @param _type Type of random number to generate * @return Variable* The random value calculated */ -/* -@keyword RANDOM - -@target sc3000 - */ Variable * random_value( Environment * _environment, VariableType _type ) { Variable * seed = variable_retrieve( _environment, "CPURANDOM_SEED" ); diff --git a/ugbc/src/targets/sc3000/random_height.c b/ugbc/src/targets/sc3000/random_height.c index 987bd209c..93b802802 100755 --- a/ugbc/src/targets/sc3000/random_height.c +++ b/ugbc/src/targets/sc3000/random_height.c @@ -46,11 +46,6 @@ * @param _environment Current calling environment * @return Variable* The random value calculated */ -/* -@keyword RANDOM HEIGHT - -@target sc3000 - */ Variable * random_height( Environment * _environment ) { Variable * result = random_value( _environment, VT_POSITION ); diff --git a/ugbc/src/targets/sc3000/random_width.c b/ugbc/src/targets/sc3000/random_width.c index b138f6131..562b0abd2 100755 --- a/ugbc/src/targets/sc3000/random_width.c +++ b/ugbc/src/targets/sc3000/random_width.c @@ -46,11 +46,6 @@ * @param _environment Current calling environment * @return Variable* The random value calculated */ -/* -@keyword RANDOM WIDTH - -@target sc3000 - */ Variable * random_width( Environment * _environment ) { Variable * result1 = random_value( _environment, VT_POSITION ); diff --git a/ugbc/src/targets/sc3000/randomize.c b/ugbc/src/targets/sc3000/randomize.c index b88e1a11e..e5c71fed7 100755 --- a/ugbc/src/targets/sc3000/randomize.c +++ b/ugbc/src/targets/sc3000/randomize.c @@ -45,11 +45,6 @@ * * @param _environment Current calling environment */ -/* -@keyword RANDOMIZE - -@target sc3000 - */ void randomize( Environment * _environment, char * _other_seed ) { Variable * seed = variable_retrieve( _environment, "CPURANDOM_SEED" ); diff --git a/ugbc/src/targets/sg1000/put_image.c b/ugbc/src/targets/sg1000/put_image.c index 8dfb652e0..aff1cdd45 100755 --- a/ugbc/src/targets/sg1000/put_image.c +++ b/ugbc/src/targets/sg1000/put_image.c @@ -50,9 +50,6 @@ extern char DATATYPE_AS_STRING[][16]; * @param _x Abscissa of the point to draw * @param _y Ordinate of the point */ -/* -@keyword PUT IMAGE - */ void put_image( Environment * _environment, char * _image, char * _x, char * _y, char * _frame, char * _sequence, int _flags ) { Variable * image = variable_retrieve( _environment, _image ); diff --git a/ugbc/src/targets/sg1000/random.c b/ugbc/src/targets/sg1000/random.c index 660c36060..c85e0bfb3 100755 --- a/ugbc/src/targets/sg1000/random.c +++ b/ugbc/src/targets/sg1000/random.c @@ -57,11 +57,6 @@ * @param _type Type of random number to generate * @return Variable* The random value calculated */ -/* -@keyword RANDOM - -@target sg1000 - */ Variable * random_value( Environment * _environment, VariableType _type ) { Variable * seed = variable_retrieve( _environment, "CPURANDOM_SEED" ); diff --git a/ugbc/src/targets/sg1000/random_height.c b/ugbc/src/targets/sg1000/random_height.c index 50041a02d..93b802802 100755 --- a/ugbc/src/targets/sg1000/random_height.c +++ b/ugbc/src/targets/sg1000/random_height.c @@ -46,11 +46,6 @@ * @param _environment Current calling environment * @return Variable* The random value calculated */ -/* -@keyword RANDOM HEIGHT - -@target sg1000 - */ Variable * random_height( Environment * _environment ) { Variable * result = random_value( _environment, VT_POSITION ); diff --git a/ugbc/src/targets/sg1000/random_width.c b/ugbc/src/targets/sg1000/random_width.c index 87f99d9a2..562b0abd2 100755 --- a/ugbc/src/targets/sg1000/random_width.c +++ b/ugbc/src/targets/sg1000/random_width.c @@ -46,11 +46,6 @@ * @param _environment Current calling environment * @return Variable* The random value calculated */ -/* -@keyword RANDOM WIDTH - -@target sg1000 - */ Variable * random_width( Environment * _environment ) { Variable * result1 = random_value( _environment, VT_POSITION ); diff --git a/ugbc/src/targets/sg1000/randomize.c b/ugbc/src/targets/sg1000/randomize.c index 1559240ed..e5c71fed7 100755 --- a/ugbc/src/targets/sg1000/randomize.c +++ b/ugbc/src/targets/sg1000/randomize.c @@ -45,11 +45,6 @@ * * @param _environment Current calling environment */ -/* -@keyword RANDOMIZE - -@target sg1000 - */ void randomize( Environment * _environment, char * _other_seed ) { Variable * seed = variable_retrieve( _environment, "CPURANDOM_SEED" ); diff --git a/ugbc/src/targets/vg5000/put_image.c b/ugbc/src/targets/vg5000/put_image.c index fa7ffc0db..705d06184 100755 --- a/ugbc/src/targets/vg5000/put_image.c +++ b/ugbc/src/targets/vg5000/put_image.c @@ -50,9 +50,6 @@ extern char DATATYPE_AS_STRING[][16]; * @param _x Abscissa of the point to draw * @param _y Ordinate of the point */ -/* -@keyword PUT IMAGE - */ void put_image( Environment * _environment, char * _image, char * _x, char * _y, char * _frame, char * _sequence, int _flags ) { MAKE_LABEL diff --git a/ugbc/src/targets/vg5000/random.c b/ugbc/src/targets/vg5000/random.c index 7a2e9ae5f..cc13c8c07 100755 --- a/ugbc/src/targets/vg5000/random.c +++ b/ugbc/src/targets/vg5000/random.c @@ -57,11 +57,6 @@ * @param _type Type of random number to generate * @return Variable* The random value calculated */ -/* -@keyword RANDOM - -@target vg5000 - */ Variable * random_value( Environment * _environment, VariableType _type ) { Variable * seed = variable_retrieve( _environment, "CPURANDOM_SEED" ); diff --git a/ugbc/src/targets/vg5000/random_height.c b/ugbc/src/targets/vg5000/random_height.c index d7684a720..93b802802 100755 --- a/ugbc/src/targets/vg5000/random_height.c +++ b/ugbc/src/targets/vg5000/random_height.c @@ -46,11 +46,6 @@ * @param _environment Current calling environment * @return Variable* The random value calculated */ -/* -@keyword RANDOM HEIGHT - -@target vg5000 - */ Variable * random_height( Environment * _environment ) { Variable * result = random_value( _environment, VT_POSITION ); diff --git a/ugbc/src/targets/vg5000/random_width.c b/ugbc/src/targets/vg5000/random_width.c index 703e6b671..562b0abd2 100755 --- a/ugbc/src/targets/vg5000/random_width.c +++ b/ugbc/src/targets/vg5000/random_width.c @@ -46,11 +46,6 @@ * @param _environment Current calling environment * @return Variable* The random value calculated */ -/* -@keyword RANDOM WIDTH - -@target vg5000 - */ Variable * random_width( Environment * _environment ) { Variable * result1 = random_value( _environment, VT_POSITION ); diff --git a/ugbc/src/targets/vg5000/randomize.c b/ugbc/src/targets/vg5000/randomize.c index 07feaad85..e5c71fed7 100755 --- a/ugbc/src/targets/vg5000/randomize.c +++ b/ugbc/src/targets/vg5000/randomize.c @@ -45,11 +45,6 @@ * * @param _environment Current calling environment */ -/* -@keyword RANDOMIZE - -@target vg5000 - */ void randomize( Environment * _environment, char * _other_seed ) { Variable * seed = variable_retrieve( _environment, "CPURANDOM_SEED" ); diff --git a/ugbc/src/targets/vic20/put_image.c b/ugbc/src/targets/vic20/put_image.c index fd3856b67..7ddb2743b 100755 --- a/ugbc/src/targets/vic20/put_image.c +++ b/ugbc/src/targets/vic20/put_image.c @@ -50,9 +50,6 @@ extern char DATATYPE_AS_STRING[][16]; * @param _x Abscissa of the point to draw * @param _y Ordinate of the point */ -/* -@keyword PUT IMAGE - */ void put_image( Environment * _environment, char * _image, char * _x, char * _y, char * _frame, char * _sequence, int _flags ) { Variable * image = variable_retrieve( _environment, _image ); diff --git a/ugbc/src/targets/vic20/random.c b/ugbc/src/targets/vic20/random.c index 5ccd2897e..d7a6b5228 100755 --- a/ugbc/src/targets/vic20/random.c +++ b/ugbc/src/targets/vic20/random.c @@ -57,11 +57,6 @@ * @param _type Type of random number to generate * @return Variable* The random value calculated */ -/* -@keyword RANDOM - -@target vic20 - */ Variable * random_value( Environment * _environment, VariableType _type ) { Variable * seed = variable_retrieve( _environment, "CPURANDOM_SEED" ); diff --git a/ugbc/src/targets/vic20/random_heigth.c b/ugbc/src/targets/vic20/random_heigth.c index b1e426a47..fc672497a 100755 --- a/ugbc/src/targets/vic20/random_heigth.c +++ b/ugbc/src/targets/vic20/random_heigth.c @@ -42,21 +42,6 @@ * @param _environment Current calling environment * @return Variable* The random value calculated */ -/* -@keyword RANDOM HEIGHT - -@english -Calculate a random height. - -@italian -Calcola un valore di altezza casuale. - -@syntax = RANDOM HEIGHT - -@example POINT AT (RANDOM WIDTH, RANDOM HEIGHT) - -@target vic20 - */ Variable * random_height( Environment * _environment ) { Variable * result = random_value( _environment, VT_POSITION ); diff --git a/ugbc/src/targets/vic20/random_width.c b/ugbc/src/targets/vic20/random_width.c index 532dd29be..7a263fe6b 100755 --- a/ugbc/src/targets/vic20/random_width.c +++ b/ugbc/src/targets/vic20/random_width.c @@ -46,21 +46,6 @@ * @param _environment Current calling environment * @return Variable* The random value calculated */ -/* -@keyword RANDOM WIDTH - -@english -Calculate a random width. - -@italian -Calcola un valore di larghezza casuale. - -@syntax = RANDOM WIDTH - -@example POINT AT (RANDOM WIDTH, RANDOM HEIGHT) - -@target vic20 - */ Variable * random_width( Environment * _environment ) { Variable * result1 = random_value( _environment, VT_POSITION ); diff --git a/ugbc/src/targets/vic20/randomize.c b/ugbc/src/targets/vic20/randomize.c index 9bd5e5f40..d40513494 100755 --- a/ugbc/src/targets/vic20/randomize.c +++ b/ugbc/src/targets/vic20/randomize.c @@ -45,21 +45,6 @@ * * @param _environment Current calling environment */ -/* -@keyword RANDOMIZE - -@english -Initialize the random seed. - -@italian -Inizializza il seme casuale. - -@syntax RANDOMIZE {[seed]} - -@example RANDOMIZE - -@target vic20 - */ void randomize( Environment * _environment, char * _ext_seed ) { Variable * seed = variable_retrieve( _environment, "CPURANDOM_SEED" ); diff --git a/ugbc/src/targets/zx/put_image.c b/ugbc/src/targets/zx/put_image.c index 2bcc0cfc3..ce8404184 100755 --- a/ugbc/src/targets/zx/put_image.c +++ b/ugbc/src/targets/zx/put_image.c @@ -50,9 +50,6 @@ extern char DATATYPE_AS_STRING[][16]; * @param _x Abscissa of the point to draw * @param _y Ordinate of the point */ -/* -@keyword PUT IMAGE - */ void put_image( Environment * _environment, char * _image, char * _x, char * _y, char * _frame, char * _sequence, int _flags ) { Variable * image = variable_retrieve( _environment, _image ); diff --git a/ugbc/src/targets/zx/random.c b/ugbc/src/targets/zx/random.c index 0d283d8bd..5ef06a1c8 100755 --- a/ugbc/src/targets/zx/random.c +++ b/ugbc/src/targets/zx/random.c @@ -57,11 +57,6 @@ * @param _type Type of random number to generate * @return Variable* The random value calculated */ -/* -@keyword RANDOM - -@target zx - */ Variable * random_value( Environment * _environment, VariableType _type ) { Variable * seed = variable_retrieve( _environment, "CPURANDOM_SEED" ); diff --git a/ugbc/src/targets/zx/random_height.c b/ugbc/src/targets/zx/random_height.c index 0e0bdaa58..93b802802 100755 --- a/ugbc/src/targets/zx/random_height.c +++ b/ugbc/src/targets/zx/random_height.c @@ -46,11 +46,6 @@ * @param _environment Current calling environment * @return Variable* The random value calculated */ -/* -@keyword RANDOM HEIGHT - -@target zx - */ Variable * random_height( Environment * _environment ) { Variable * result = random_value( _environment, VT_POSITION ); diff --git a/ugbc/src/targets/zx/random_width.c b/ugbc/src/targets/zx/random_width.c index cab08dfeb..562b0abd2 100755 --- a/ugbc/src/targets/zx/random_width.c +++ b/ugbc/src/targets/zx/random_width.c @@ -46,11 +46,6 @@ * @param _environment Current calling environment * @return Variable* The random value calculated */ -/* -@keyword RANDOM WIDTH - -@target zx - */ Variable * random_width( Environment * _environment ) { Variable * result1 = random_value( _environment, VT_POSITION ); diff --git a/ugbc/src/targets/zx/randomize.c b/ugbc/src/targets/zx/randomize.c index 1983f985d..e5c71fed7 100755 --- a/ugbc/src/targets/zx/randomize.c +++ b/ugbc/src/targets/zx/randomize.c @@ -45,11 +45,6 @@ * * @param _environment Current calling environment */ -/* -@keyword RANDOMIZE - -@target zx - */ void randomize( Environment * _environment, char * _other_seed ) { Variable * seed = variable_retrieve( _environment, "CPURANDOM_SEED" );