INSTRUCCIONES DE PROGRAMACION DE MACROS5

 

ACCION
DESCRIPCION BREVE
ACCION
CATEGORIA
INIVARS
Inicializacion de variables
90
PROGRAM
# COMENTARIO
Linea de comentario
11
PROGRAM
END
Fin de ejecucion
PROGRAM
IF {valor1} EQ {valor2} END
EQ es" igual"
410
PROGRAM
IF {valor1} LE {valor2} END
LE es "menor o igual"
0410
PROGRAM
IF {valor1} GE {valor2} END
GE es "mayor o igual"
410
PROGRAM
IF {valor1} LT {valor2} END
LT es "menor"
410
PROGRAM
IF {valor1} GT {valor2} END
GT es "mayor"
410
PROGRAM
IF {valor1} NE {valor2} END
NE es "distinto"
410
PROGRAM
PAUSA
Parada programada
10
PROGRAM
P0 x1 y1
PUNTO VIRTUAL
51
2D
L0 x1 y1 x2 y2
RECTA VIRTUAL
52
2D
A0 x1 y1 x2 y2 x3 y3
ARCO VIRTUAL
53
2D
C0 x1 y1 x2 y2 x3 y3
CIRCUNFERENCIA VIRTUAL
63
2D
C3 x y radio
CIRCUNFERENCIA VIRTUAL
63
2D
PP0 radio angulo
PUNTO VIRTUAL. POLARES
2D
@P0 {x1}{y1}
PUNTO VIRTUAL
250
2D
@L0 {x1}{y1}
LINEA VIRTUAL
251
2D
@A0 {x1}{y1}{x2}{y2}{x3}{y3}
ARCO VIRTUAL
252
2D
@C0 {x1}{y1}{x2}{y2}{x3}{y3}
CIRCUNFERENCIA VIRTUAL
253
2D
@C3 {x}{y}{radio}
CIRCUNFERENCIA VIRTUAL
253
2D
@PP0 {radio}{angulo}
PUNTO VIRTUAL POLARES
2D
P1 x1 y1
DIBUJAR PUNTO FIJO
1
2D
L1 x1 y1 x2 y2
DIBUJAR LINEA FIJA
2
2D
A1 x1 y1 x2 y2 x3 y3
DIBUJAR ARCO FIJO
3
2D
C1 x1 y1 x2 y2 x3 y3
DIBUJAR CIRCULO FIJO
13
2D
E0 x1 y1 x2 y2 x3 y3
ELIPSE VIRTUAL
614
2D
E1 x1 y1 x2 y2 x3 y3
ELIPSE
614
2D
PP1 radio angulo
PUNTO CORRD. POLARES
3008
2D
O0 x1 y1 x2 y3 x3 y3
OVALO VIRTUAL
714
2D
O1 x1 y1 x2 y3 x3 y3
OVALO
714
2D
@P1 {x1}{y1}
PUNTO FIJO POR VARIABLES
200
2D
@L1 {x1}{y1}{x2}{y2}
LINEA FIJA POR VARIABLES
201
2D
@A1 {x1}{y1}{x2}{y2}{x3}{y3}
ARCO FIJO POR VARIABLES
202
2D
@C1 {x1}{y1}{x2}{y2}{x3}{y3}
CIRCULO FIJO POR VARIABLES
203
2D
@C2 {x}{y}{radio}
CIRCULO FIJO POR VARIABLES
203
2D
@E0 {x1}{y1}{x2}{y2}{x3}{y3}
ELIPSE VIRTUAL POR VARIABLES
514
2D
@E1 {x1}{y1}{x2}{y2}{x3}{y3}
ELIPSE FIJA POR VARIABLES
514
2D
@PP1 {radio}{angulo}
PUNTO EN POLARES VARIABLES
3009
2D
@O0 {x1}{y1}{x2}{y2}{x3}{y3}
OVALO VIRTUAL POR VARIABLES
715
2D
@O1 {x1}{y1}{x2}{y2}{x3}{y3}
OVALOFIJO POR VARIABLES
715
2D
TXT_R0 {x}{y}{valor}{nº decimales}
dibuja un nª real virtual en las coord x y
150
TEXTO
TXT_R1 {x}{y}{valor}{nº decimales}
dibuja un nª real en las coord x y
150
TEXTO
TXT_I0 {x}{y}{valor}
dibuja un nª entero virtual en las coord x y
151
TEXTO
TXT_I1 {x}{y}{valor}
dibuja un nª entero en las coord x y
151
TEXTO
TXT_W0 {x}{y}cadena
dibuja un texto virtual sin espacios en xy
152
TEXTO
TXT_W1 {x}{y}cadena
dibuja un texto sin espacios en xy
152
TEXTO
TXT_T0 {x}{y}texto
dibuja un texto virtual en xy
153
TEXTO
TXT_T1 {x}{y}texto
dibuja un texto en xy
153
TEXTO

 

 

ACCION
DESCRIPCION BREVE
ACCION
CATEGORIA
PIDE A[{indice}] {longitud} comentario
15
INPUT
PIDE R[{indice}] {longitud} comentario
16
INPUT
PIDE {variable} {longitud} comentario
17
INPUT
ENTRADA X {x}{y}{longitud} comentario
30
INPUT
ENTRADA Y {x}{y}{longitud} comentario
30
INPUT
ENTRADA Z {x}{y}{longitud} comentario
30
INPUT
ENTRADA I {x}{y}{longitud} comentario
30
INPUT
ENTRADA J {x}{y}{longitud} comentario
30
INPUT
ENTRADA K {x}{y}{longitud} comentario
30
INPUT
ENTRADA L {x}{y}{longitud} comentario
30
INPUT
ENTRADA R [{indice}]{x}{y}{longitud} cadena
31
INPUT
ENTRADA A [{indice}]{x}{y}{longitud} cadena
32
INPUT
? {valor}
14
OUTPUT
MENSAJE {x}{y} comentario
23
OUTPUT
PRESENTAR {y}{x}{valor real}comentario
24
OUTPUT
PRESENTAI {y}{x}{valor entero}comentario
84
OUTPUT
C color
4
DISPLAY
T tipo
5
DISPLAY
N nivel
6
DISPLAY
@C {color}
34
DISPLAY
@T {tipo}
35
DISPLAY
@N {nivel}
36
DISPLAY
TXT_A {alfa}
154
PARAM
TXT_B {beta}
155
PARAM
TXT_H {altura}
156
PARAM
TXT_C {anchura}
157
PARAM
TXT_S {separacion}
158
PARAM
Z zoom
7
DISPLAY
V x1 y1 x2 y2
8
DISPLAY
TR incremento_x incremento_y
9
DISPLAY
@Z {zoom}
37
DISPLAY
@V {x1}{y1}{x2}{y2}
38
DISPLAY
@TR {incremento_x}{incremento_y}
39
DISPLAY
E
12
DISPLAY
RAYA {x1}{y1}{x2}{y2}{color}
25
PAINT
LOSA {x1}{y1}{x2}{y2}{color}
26
PAINT
CUADRO {x1}{y1}{x2}{y2}{color}
27
PAINT
MARCO {x1}{y1}{x2}{y2}{grosor}{color}
28
PAINT
MOSV {opcion } nombre del mosasico
70
PAINT
MOSC nombre del mosaico
71
PAINT
ICONOV {x}{y} nombre del icono
72
PAINT
ICONOC {x1}{y1}{x2}{y2} nombre del icono
73
PAINT
GETPIXEL {x}{y}{indice}
29
PAINT
SETPIXEL {x}{y}{color}
30
PAINT
X= numero
Asignacion a la variables X
100
PROGRAMA
Y= numero
Asignacion a la variables Y
101
PROGRAMA
Z= numero
Asignacion a la variables Z
102
PROGRAMA
I= numero
Asignacion a la variables I
103
PROGRAMA
J= numero
Asignacion a la variables J
104
PROGRAMA

 

ACCION
DESCRIPCION BREVE
ACCION
CATEGORIA
K= numero
105
PROGRAMA
L= numero
106
PROGRAMA
R[ indice ]= numero
110
PROGRAMA
A[ indice ]= numero
120
PROGRAMA
@X= {valor}
125
PROGRAMA
@Y= {valor}
125
PROGRAMA
@Z= {valor}
125
PROGRAMA
@I= {valor}
125
PROGRAMA
@J= {valor}
125
PROGRAMA
@K= {valor}
125
PROGRAMA
@L= {valor}
125
PROGRAMA
@R{ {indice} ]= {valor}
126
PROGRAMA
@A[ {indice} ]= {valor}
126
PROGRAMA
DATA_R {indice}:{dato_1}:{dato_2}:..{dato_n}
PROGRAMA
DATA_A {indice}:{dato_1}:{dato_2}:..{dato_n}
PROGRAMA
&{variable}= operacion aritmetica sistema polaco +-*/
PROGRAMA
{+-*/} {XYZIJKL}= {valor1}{+-*/} {valor2}
300..315
PROGRAMA
{+-*/}R[ {indice} ]= {valo2} {+-*/} {valor3}
300..315
PROGRAMA
{+-*/}A[ {indice} ]= {valo2} {+-*/} {valor3}
300..315
PROGRAMA
SIN {XY} {valor1}
seno de valor(radianes) en xy
320
FUNCION
SIN R[ {indice} ] {valor2}
320
FUNCION
SIN A[ {indice} ] {valor2}
320
FUNCION
COS {XY} {valor1}
seno de valor(radianes) en xy
320
FUNCION
COS[ {indice} ] {valor2}
320
FUNCION
COS A[ {indice} ] {valor2}
320
FUNCION
TAN {XY} {valor1}
seno de valor(radianes) en xy
320
FUNCION
TAN R[ {indice} ] {valor2}
320
FUNCION
TAN A[ {indice} ] {valor2}
320
FUNCION
SQR {XY} {valor1}
seno de valor(radianes) en xy
320
FUNCION
SQR R[ {indice} ] {valor2}
320
FUNCION
SQR A[ {indice} ] {valor2}
320
FUNCION
ELEV {XY} {valor1}
seno de valor(radianes) en xy
320
FUNCION
ELEV R[ {indice} ] {valor2}
320
FUNCION
ELEV A[ {indice} ] {valor2}
320
FUNCION
GOTO etiqueta
400
PROGRAMA
SALTO {valor}
405
PROGRAMA
RFLAG {valor}
406
PROGRAMA
AVAN etiqueta
418
PROGRAMA
GOSUB etiqueta
430
PROGRAMA
RETURN
431
PROGRAMA
IF {valor1}EQ {valor2} GOTO etiqueta
410
PROGRAMA
IF {valor1}LE {valor2} GOTO etiqueta
410
PROGRAMA
IF {valor1}GE {valor2} GOTO etiqueta
410
PROGRAMA
IF {valor1}LT {valor2} GOTO etiqueta
410
PROGRAMA
IF {valor1}GT {valor2} GOTO etiqueta
410
PROGRAMA
IF {valor1}NE {valor2} GOTO etiqueta
410
PROGRAMA
IF {valor1}EQ {valor2} SALTO {valor3}
410
PROGRAMA
IF {valor1}LE {valor2} SALTO {valor3}
410
PROGRAMA
IF {valor1}GE {valor2} SALTO {valor3}
410
PROGRAMA
IF {valor1}LT {valor2} SALTO {valor3}
410
PROGRAMA
IF {valor1}GT {valor2} SALTO {valor3}
410
PROGRAMA
IF {valor1}NE {valor2} SALTO {valor3}
410
PROGRAMA
IF {valor1}EQ {valor2} AVAN etiqueta
410
PROGRAMA
IF {valor1}LE {valor2} AVAN etiqueta
410
PROGRAMA
IF {valor1}GE {valor2} AVAN etiqueta
410
PROGRAMA
IF {valor1}LT {valor2} AVAN etiqueta
410
PROGRAMA
IF {valor1}GT {valor2} AVAN etiqueta
410
PROGRAMA
IF {valor1}NE {valor2} AVAN etiqueta
410
PROGRAMA

 

ACCION
DESCRIPCION BREVE
ACCION
CATEGORIA
: etiqueta
415
PROGRAMA
: {valor}
415
PROGRAMA
FLAG {valor}
416
PROGRAMA
FOR {variable} = {valor1} TO {valor2} STEP {paso}
419
PROGRAMA
NEXT {variable}
420
PROGRAMA
DETE_P1
230
INPUT
DETE_L1
231
INPUT
DETE_A1
232
INPUT
DETE_E1
239
INPUT
BORRAR {tipo_entidad}{ordinal}
290
BORRAR
READ_P1 {ordinal}{indice}
233
I/O
READ_L1 {ordinal}{indice}
234
I/O
READ_A1 {ordinal}{indice}
235
I/O
WRIT_P1 {ordinal}{indice}
236
I/O
WRIT_L1 {ordinal}{indice}
237
I/O
WRIT_A1 {ordinal}{indice}
238
I/O
OPEN nombre del archivo
195
I/O
LEER {longitud}{cantidad}{indice}
196
I/O
PLEER {ordinal}{longitud}{cantidad}{indice}
197
I/O
CLOSE
198
I/O
ETIQ {casilla} cadena
501
INTERFASE
ETIQM
500
INTERFASE
MPUNTOS
161
INTERFASE
MRECTAS
162
INTERFASE
MARCOS
163
INTERFASE
FORMXY subaccion:subaccion:...
260
2D
VFORMXY subaccion:subaccion:...
260
2D
I_R_R {x1}{y1}{x2} {y2}{x3}{y3}{x4}{y4}{indice}
600
CALCULO

I_R_A {x1}{y1}{x2}{y2}{a}{b}{r}{indice}

605
CALCULO
I_A_A {a1}{b1}{r1}{a2}{b2}{r2}{indice}
610
CALCULO
OFFS_R {offset}{x1}{y1}{x2}{y2}{x}{y}{indice}
615
2D
OFFS_A {offset}{a}{b}{direccion}{indice}
620
2D
COLOB {x}{y}{angulo}{factor}nombre del bloque
192
BLOQUES
APILA {x1}{y1}{x2}{y2}{tipo}
21
OPPILA
SEL_PILA {tipo}
224
OPPILA
DESAPILA
22
OPPILA
SIMETRIA {x1}{y1}{x2}{y2}
190
OPPILA
BLOQB {x}{y} nombre del bloque
191
BLOQUES
APILAE {orden}{tipo}
222
OPPILA
LEEP {ordeinal_pila}{indice}
221
OPPILA
APILAU {tipo}
223
OPPILA
RAYA_PILA {tipo}{angulo}{color}{distancia}
OPPILA
MOVEP{x1}{y1}{x2}{y2}{ang}{factor_x}{factor_y}
193
OPPILA
COPIAP{x1}{y1}{x2}{y2}{ang}{factor_x}{factor_y}
194
OPPILA
CURSORXY
20
PUNTOXY
160
PANTXY
170
CURSORC {color}
DISPLAY
PTOCX
171
PTOCY
172
CTOPX
173
CTOPY
174
LOAD nombre del macros
0
I/O
MENU
18
INTERBASE
ACOTA_P {indice}
700
2D
ACOTA_Q {paametro}{valor}
700
2D
ACOTA_S {opcion}
700
2D
ACOTA_H {indice}
700
2D

 

ACCION
DESCRIPCION BREVE
ACCION
CATEGORIA
ACOTA_V {indice}
700
2D
ACOTA_L {indice}
700
2D
ACOTA_Y {indice}
700
2D
ACOTA_O {indice}
700
2D
ACOTA_D {indice}
700
2D
ACOTA_R {indice}
700
2D
ACOTA_A {indice}
700
2D
 
P3{x1}{y1}{z1}
dibuja un punto en 3d
5001
3D
L3{x1}{y1}{z1}{x2}{y2}{z2}
dibuja una linea en 3d
5002
3D
A3{x1}{y1}{z1}{x2}{y2}{z2}{x3}{y3}{z3}
dibuja un arco en 3d
5003
3D
O3{x1}{y1}{z1}{x2}{y2}{z2}{x3}{y3}{z3}
dibuja un circulo en 3d
5004
3D
V3 {x1}{y1}{z1}
verttice de una poligonal 3d
5005
3D
V3D
actva/desactiva vision 3d
5006
3D
V3P
entrada de una posicion 3d
5007
3D
R3D
fuerza un redibujado
5008
3D
D3D
borra entidades 3d
5009
3D
3DCAM
convierte 3d en curvas mec.
5010
3D
DDEBP3D
borra ultimo punt3d entrado
8203
3D
PC {x1}{y1}{z1}{x2}{y2}{z2}{x3}{y3}{z3}
punto centro arco tres puntos
8002
3D
LOAD nombre completo del macro
carga y ejecuta un macro
0
I/O