Solicitud de programa de utilidad de puente de carretera FX-5800 para computadora

La fórmula integral generalizada del elemento de una sola línea es la siguiente: M= (1.0/Re-1.0/Rs)/Ls

x=∫｛cos (Ta L/Rs; 0.5*M * L*L), 0, L｝;

y=∫｛sin(Ta L/Rs 0.5*M *L*L), 0, L};

a( i)= Ta L/Rs 0.5*M*L*L

Rs: Radio del punto inicial de la curva de transición

Re: Radio del punto final de la curva de transición

Rs, Re (en el sistema de coordenadas NE, la desviación hacia la derecha es positiva y la desviación hacia la izquierda es negativa)

Ta: el ángulo de azimut del norte verdadero del punto inicial de la curva de transición

Ls: la longitud de la curva de transición incompleta.

Esta fórmula es una fórmula integral general para la curva de transición en cualquier posición en el sistema de coordenadas. Se puede adaptar completamente a la desviación izquierda, desviación derecha, Rs gt, Rs lt, etc. de la curva de transición y no requiere compilar primero la curva de transición completa para reducir la complejidad del algoritmo. Aunque esta fórmula se deriva de curvas de transición, también se puede utilizar en líneas rectas y curvas circulares, lo que puede reducir la complejidad de la programación informática.

Programa de ordenador Fx-5800

Programa principal QXJS-000

Línea 4: "1.SZ=gt;NE": "2.NE= gt ;SZ":?Q:?S Prog "QXJS-SUB0"↙

Lbl 0: Q=1 =gt; Ir a1: Q=2 =gt; Ir a2: ↙

Lbl 1：?Z：Prog "QXJS-SUB1 "： "N="：N◢"E="：E◢"F="：F◢：Goto4↙

Lbl 2：?" N =":?B: "E=":?C:B→N:C→E:Prog "QXJS-SUB2":"S=":S◢"Z=":S◢"E=":E ◢ ：Goto4↙

Lbl 2."：S◢ "Z="：Z◢ Goto4↙ subrutina de base de datos QXJS-SUB0

Goto1↙ Puntero al guardar múltiples curvas al mismo tiempo

Lbl 1↙

IF Slt; *** (kilometraje final del elemento de línea) IF Slt; ***→A (acimut inicial del elemento de línea): ***→ O (línea kilometraje del punto inicial del elemento): ***→U (punto inicial del elemento lineal X): ***→V (punto inicial del elemento lineal Y): ***→P (radio de curvatura del punto inicial del elemento lineal): ***→ R (Radio de curvatura del punto final del elemento de línea): ***→L (longitud del punto inicial al punto final del elemento de línea): Retorno: IfEnd ↙

IF Slt ***: Entonces*** → A : *** →O:***→U:***→V:***→P:***→R:***→L:Return:IfEnd↙

.. .... ....................Para facilitar la explicación, agregue una línea de declaración para cada elemento de línea, un Lbl para cada curva y uno para cada elemento. . documento.

Subrutina aritmética positiva QXJS-SUB1

0.5(1÷R-1÷P)÷L→D: S-O→X↙

U ∫( cos (A (X÷P DX cuadrado)×180÷π,0,X)→N↙

V ∫(sin(A (X÷P DX cuadrado)×180÷π,0,X ) )→E↙

A (X÷P DX cuadrado)×180÷π→F↙

N Zcos(F 90) →N：E Zsin(F 90) → EQXJS -SUB2 subrutina de cálculo inverso

Lbl 1：0→Z：1→Q：Prog "QXJS-SUB0 "： Prog "QXJS-SUB1"↙

Pol(N-B 10 ^( -46), E-C 10^(-46)): Isin(F-90-J) →W: S W→S↙

Abs(W)gt.0.0001 =gt; >

Lbl 2: 0→Z: Prog "QXJS-SUB1": (C-E)÷sin(F 90)→Z

3 Instrucciones de uso

1, regulaciones

(1) Utilice la línea central de la carretera como dirección de avance (es decir, la dirección en la que aumenta el kilometraje) para distinguir la izquierda y la derecha cuando el radio de la curva está a la izquierda, P y R; tome valores negativos, y cuando el radio de la curva esté a la derecha Cuando el radio de la curva sea infinito (es decir, una línea recta), P y R se reemplazan por 10 elevado a 45

(2) Cuando el. el punto requerido está en la línea central Cuando, Z=0; cuando el punto deseado está en el lado izquierdo de la línea central, Z toma un valor negativo; cuando el punto deseado está en el lado derecho de la línea central, Z toma un valor positivo. >

(3) Cuando el elemento de línea es una curva de arco, no importa a qué elemento de línea estén conectados su punto inicial y su punto final, el radio de curvatura es igual al radio del arco. >