Jump to content

Extend your language: Difference between revisions

m
Line 213:
 
#defn Siambassonverdaderas(_X_,_Y_) ##CODEIF,__firstop__=0;#ATOM#CMPLX;cpy(__firstop__),\
__secondop__=0;#ATOM#CMPLX;cpy(__secondop__);and;jnt(#ENDIF),
#defn Essólolaprimeraopción jmp(%%CODEIF), %ENDIF:, {__firstop__}, jnt(#ENDIF),
#defn Essólolasegundaopción jmp(%%CODEIF), %ENDIF:, {__secondop__}, jnt(#ENDIF),
#synon Else EssólolasegundaopciónNoesningunaopción?
#synon EndIf FindelSi
 
Main
TrueFalse(v), FalseTrue(w)
Si ambas son verdaderas ( v, w )
Printnl ("Son ambas opciones verdaderas")
Line 229 ⟶ 230:
Printnl ("La segunda opción es verdadera")
 
No es ninguna opción?
Printnl ("Nada se cumple")
Fin del Si
 
End
End</syntaxhighlight>
{{out}}
<pre>La primerasegunda opción es verdadera</pre>
 
<p>Ejemplo #2:
543

edits

Cookies help us deliver our services. By using our services, you agree to our use of cookies.