/* A small basic implementation using mostly c macros (and polymorphism in c++)

   NASZVADI, Peter, 2017, Budapest
   All rights reserved, do NOT violate the laws of author's country!

   Basic programs start with an include:

      #include "naszvbas.cc"

   Then a mandatory initializator macro follows:

      BEGINBASIC

   All lines must be numbered!

   Implemented statements, case SENSITIVE:
   - IF <condition> THEN <label>
   - GOTO <label>
   - PRINT <string constants or integer variables mixed arbitrarily, max 6>
   - INPUT <variable>
   - END
   - LET <variable=expression>

   Only 26 integer variables exist, they are all predefined, case InSeNsItIvE!

   Example codelines - all must be preceeded by the "BASIC" macro:

      BASIC 10 PRINT "Hello c++/BASIC world"
      BASIC 20 END

   Finally, the basic code must ended with

      ENDBASIC

   Caveatsː

      The conditionals in IF arguments should NOT have =, use ==
      instead for comparing numbers!

   Compiling:

      # c++ -w fibo_bas.cc && ./a.out

   Tested with:

      user@errorlevel:0:~/Work/20170914$ c++ --version
      c++ (Ubuntu 5.4.0-6ubuntu1~16.04.4) 5.4.0 20160609
      Copyright (C) 2015 Free Software Foundation, Inc.
      This is free software; see the source for copying conditions.  There is NO
      warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.

*/
#include <stdio.h>

int p2(char* s1,char* s2,char* s3,char* s4,char* s5,char* s6){printf("%s%s%s%s%s%s\n",s1,s2,s3,s4,s5,s6);}
int p2(char* s1,char* s2,char* s3,char* s4,char* s5,int s6){printf("%s%s%s%s%s%d\n",s1,s2,s3,s4,s5,s6);}
int p2(char* s1,char* s2,char* s3,char* s4,int s5,char* s6){printf("%s%s%s%s%d%s\n",s1,s2,s3,s4,s5,s6);}
int p2(char* s1,char* s2,char* s3,char* s4,int s5,int s6){printf("%s%s%s%s%d%d\n",s1,s2,s3,s4,s5,s6);}
int p2(char* s1,char* s2,char* s3,int s4,char* s5,char* s6){printf("%s%s%s%d%s%s\n",s1,s2,s3,s4,s5,s6);}
int p2(char* s1,char* s2,char* s3,int s4,char* s5,int s6){printf("%s%s%s%d%s%d\n",s1,s2,s3,s4,s5,s6);}
int p2(char* s1,char* s2,char* s3,int s4,int s5,char* s6){printf("%s%s%s%d%d%s\n",s1,s2,s3,s4,s5,s6);}
int p2(char* s1,char* s2,char* s3,int s4,int s5,int s6){printf("%s%s%s%d%d%d\n",s1,s2,s3,s4,s5,s6);}
int p2(char* s1,char* s2,int s3,char* s4,char* s5,char* s6){printf("%s%s%d%s%s%s\n",s1,s2,s3,s4,s5,s6);}
int p2(char* s1,char* s2,int s3,char* s4,char* s5,int s6){printf("%s%s%d%s%s%d\n",s1,s2,s3,s4,s5,s6);}
int p2(char* s1,char* s2,int s3,char* s4,int s5,char* s6){printf("%s%s%d%s%d%s\n",s1,s2,s3,s4,s5,s6);}
int p2(char* s1,char* s2,int s3,char* s4,int s5,int s6){printf("%s%s%d%s%d%d\n",s1,s2,s3,s4,s5,s6);}
int p2(char* s1,char* s2,int s3,int s4,char* s5,char* s6){printf("%s%s%d%d%s%s\n",s1,s2,s3,s4,s5,s6);}
int p2(char* s1,char* s2,int s3,int s4,char* s5,int s6){printf("%s%s%d%d%s%d\n",s1,s2,s3,s4,s5,s6);}
int p2(char* s1,char* s2,int s3,int s4,int s5,char* s6){printf("%s%s%d%d%d%s\n",s1,s2,s3,s4,s5,s6);}
int p2(char* s1,char* s2,int s3,int s4,int s5,int s6){printf("%s%s%d%d%d%d\n",s1,s2,s3,s4,s5,s6);}
int p2(char* s1,int s2,char* s3,char* s4,char* s5,char* s6){printf("%s%d%s%s%s%s\n",s1,s2,s3,s4,s5,s6);}
int p2(char* s1,int s2,char* s3,char* s4,char* s5,int s6){printf("%s%d%s%s%s%d\n",s1,s2,s3,s4,s5,s6);}
int p2(char* s1,int s2,char* s3,char* s4,int s5,char* s6){printf("%s%d%s%s%d%s\n",s1,s2,s3,s4,s5,s6);}
int p2(char* s1,int s2,char* s3,char* s4,int s5,int s6){printf("%s%d%s%s%d%d\n",s1,s2,s3,s4,s5,s6);}
int p2(char* s1,int s2,char* s3,int s4,char* s5,char* s6){printf("%s%d%s%d%s%s\n",s1,s2,s3,s4,s5,s6);}
int p2(char* s1,int s2,char* s3,int s4,char* s5,int s6){printf("%s%d%s%d%s%d\n",s1,s2,s3,s4,s5,s6);}
int p2(char* s1,int s2,char* s3,int s4,int s5,char* s6){printf("%s%d%s%d%d%s\n",s1,s2,s3,s4,s5,s6);}
int p2(char* s1,int s2,char* s3,int s4,int s5,int s6){printf("%s%d%s%d%d%d\n",s1,s2,s3,s4,s5,s6);}
int p2(char* s1,int s2,int s3,char* s4,char* s5,char* s6){printf("%s%d%d%s%s%s\n",s1,s2,s3,s4,s5,s6);}
int p2(char* s1,int s2,int s3,char* s4,char* s5,int s6){printf("%s%d%d%s%s%d\n",s1,s2,s3,s4,s5,s6);}
int p2(char* s1,int s2,int s3,char* s4,int s5,char* s6){printf("%s%d%d%s%d%s\n",s1,s2,s3,s4,s5,s6);}
int p2(char* s1,int s2,int s3,char* s4,int s5,int s6){printf("%s%d%d%s%d%d\n",s1,s2,s3,s4,s5,s6);}
int p2(char* s1,int s2,int s3,int s4,char* s5,char* s6){printf("%s%d%d%d%s%s\n",s1,s2,s3,s4,s5,s6);}
int p2(char* s1,int s2,int s3,int s4,char* s5,int s6){printf("%s%d%d%d%s%d\n",s1,s2,s3,s4,s5,s6);}
int p2(char* s1,int s2,int s3,int s4,int s5,char* s6){printf("%s%d%d%d%d%s\n",s1,s2,s3,s4,s5,s6);}
int p2(char* s1,int s2,int s3,int s4,int s5,int s6){printf("%s%d%d%d%d%d\n",s1,s2,s3,s4,s5,s6);}
int p2(int s1,char* s2,char* s3,char* s4,char* s5,char* s6){printf("%d%s%s%s%s%s\n",s1,s2,s3,s4,s5,s6);}
int p2(int s1,char* s2,char* s3,char* s4,char* s5,int s6){printf("%d%s%s%s%s%d\n",s1,s2,s3,s4,s5,s6);}
int p2(int s1,char* s2,char* s3,char* s4,int s5,char* s6){printf("%d%s%s%s%d%s\n",s1,s2,s3,s4,s5,s6);}
int p2(int s1,char* s2,char* s3,char* s4,int s5,int s6){printf("%d%s%s%s%d%d\n",s1,s2,s3,s4,s5,s6);}
int p2(int s1,char* s2,char* s3,int s4,char* s5,char* s6){printf("%d%s%s%d%s%s\n",s1,s2,s3,s4,s5,s6);}
int p2(int s1,char* s2,char* s3,int s4,char* s5,int s6){printf("%d%s%s%d%s%d\n",s1,s2,s3,s4,s5,s6);}
int p2(int s1,char* s2,char* s3,int s4,int s5,char* s6){printf("%d%s%s%d%d%s\n",s1,s2,s3,s4,s5,s6);}
int p2(int s1,char* s2,char* s3,int s4,int s5,int s6){printf("%d%s%s%d%d%d\n",s1,s2,s3,s4,s5,s6);}
int p2(int s1,char* s2,int s3,char* s4,char* s5,char* s6){printf("%d%s%d%s%s%s\n",s1,s2,s3,s4,s5,s6);}
int p2(int s1,char* s2,int s3,char* s4,char* s5,int s6){printf("%d%s%d%s%s%d\n",s1,s2,s3,s4,s5,s6);}
int p2(int s1,char* s2,int s3,char* s4,int s5,char* s6){printf("%d%s%d%s%d%s\n",s1,s2,s3,s4,s5,s6);}
int p2(int s1,char* s2,int s3,char* s4,int s5,int s6){printf("%d%s%d%s%d%d\n",s1,s2,s3,s4,s5,s6);}
int p2(int s1,char* s2,int s3,int s4,char* s5,char* s6){printf("%d%s%d%d%s%s\n",s1,s2,s3,s4,s5,s6);}
int p2(int s1,char* s2,int s3,int s4,char* s5,int s6){printf("%d%s%d%d%s%d\n",s1,s2,s3,s4,s5,s6);}
int p2(int s1,char* s2,int s3,int s4,int s5,char* s6){printf("%d%s%d%d%d%s\n",s1,s2,s3,s4,s5,s6);}
int p2(int s1,char* s2,int s3,int s4,int s5,int s6){printf("%d%s%d%d%d%d\n",s1,s2,s3,s4,s5,s6);}
int p2(int s1,int s2,char* s3,char* s4,char* s5,char* s6){printf("%d%d%s%s%s%s\n",s1,s2,s3,s4,s5,s6);}
int p2(int s1,int s2,char* s3,char* s4,char* s5,int s6){printf("%d%d%s%s%s%d\n",s1,s2,s3,s4,s5,s6);}
int p2(int s1,int s2,char* s3,char* s4,int s5,char* s6){printf("%d%d%s%s%d%s\n",s1,s2,s3,s4,s5,s6);}
int p2(int s1,int s2,char* s3,char* s4,int s5,int s6){printf("%d%d%s%s%d%d\n",s1,s2,s3,s4,s5,s6);}
int p2(int s1,int s2,char* s3,int s4,char* s5,char* s6){printf("%d%d%s%d%s%s\n",s1,s2,s3,s4,s5,s6);}
int p2(int s1,int s2,char* s3,int s4,char* s5,int s6){printf("%d%d%s%d%s%d\n",s1,s2,s3,s4,s5,s6);}
int p2(int s1,int s2,char* s3,int s4,int s5,char* s6){printf("%d%d%s%d%d%s\n",s1,s2,s3,s4,s5,s6);}
int p2(int s1,int s2,char* s3,int s4,int s5,int s6){printf("%d%d%s%d%d%d\n",s1,s2,s3,s4,s5,s6);}
int p2(int s1,int s2,int s3,char* s4,char* s5,char* s6){printf("%d%d%d%s%s%s\n",s1,s2,s3,s4,s5,s6);}
int p2(int s1,int s2,int s3,char* s4,char* s5,int s6){printf("%d%d%d%s%s%d\n",s1,s2,s3,s4,s5,s6);}
int p2(int s1,int s2,int s3,char* s4,int s5,char* s6){printf("%d%d%d%s%d%s\n",s1,s2,s3,s4,s5,s6);}
int p2(int s1,int s2,int s3,char* s4,int s5,int s6){printf("%d%d%d%s%d%d\n",s1,s2,s3,s4,s5,s6);}
int p2(int s1,int s2,int s3,int s4,char* s5,char* s6){printf("%d%d%d%d%s%s\n",s1,s2,s3,s4,s5,s6);}
int p2(int s1,int s2,int s3,int s4,char* s5,int s6){printf("%d%d%d%d%s%d\n",s1,s2,s3,s4,s5,s6);}
int p2(int s1,int s2,int s3,int s4,int s5,char* s6){printf("%d%d%d%d%d%s\n",s1,s2,s3,s4,s5,s6);}
int p2(int s1,int s2,int s3,int s4,int s5,int s6){printf("%d%d%d%d%d%d\n",s1,s2,s3,s4,s5,s6);}
int p2(char* s1,char* s2,char* s3,char* s4,char* s5){printf("%s%s%s%s%s\n",s1,s2,s3,s4,s5);}
int p2(char* s1,char* s2,char* s3,char* s4,int s5){printf("%s%s%s%s%d\n",s1,s2,s3,s4,s5);}
int p2(char* s1,char* s2,char* s3,int s4,char* s5){printf("%s%s%s%d%s\n",s1,s2,s3,s4,s5);}
int p2(char* s1,char* s2,char* s3,int s4,int s5){printf("%s%s%s%d%d\n",s1,s2,s3,s4,s5);}
int p2(char* s1,char* s2,int s3,char* s4,char* s5){printf("%s%s%d%s%s\n",s1,s2,s3,s4,s5);}
int p2(char* s1,char* s2,int s3,char* s4,int s5){printf("%s%s%d%s%d\n",s1,s2,s3,s4,s5);}
int p2(char* s1,char* s2,int s3,int s4,char* s5){printf("%s%s%d%d%s\n",s1,s2,s3,s4,s5);}
int p2(char* s1,char* s2,int s3,int s4,int s5){printf("%s%s%d%d%d\n",s1,s2,s3,s4,s5);}
int p2(char* s1,int s2,char* s3,char* s4,char* s5){printf("%s%d%s%s%s\n",s1,s2,s3,s4,s5);}
int p2(char* s1,int s2,char* s3,char* s4,int s5){printf("%s%d%s%s%d\n",s1,s2,s3,s4,s5);}
int p2(char* s1,int s2,char* s3,int s4,char* s5){printf("%s%d%s%d%s\n",s1,s2,s3,s4,s5);}
int p2(char* s1,int s2,char* s3,int s4,int s5){printf("%s%d%s%d%d\n",s1,s2,s3,s4,s5);}
int p2(char* s1,int s2,int s3,char* s4,char* s5){printf("%s%d%d%s%s\n",s1,s2,s3,s4,s5);}
int p2(char* s1,int s2,int s3,char* s4,int s5){printf("%s%d%d%s%d\n",s1,s2,s3,s4,s5);}
int p2(char* s1,int s2,int s3,int s4,char* s5){printf("%s%d%d%d%s\n",s1,s2,s3,s4,s5);}
int p2(char* s1,int s2,int s3,int s4,int s5){printf("%s%d%d%d%d\n",s1,s2,s3,s4,s5);}
int p2(int s1,char* s2,char* s3,char* s4,char* s5){printf("%d%s%s%s%s\n",s1,s2,s3,s4,s5);}
int p2(int s1,char* s2,char* s3,char* s4,int s5){printf("%d%s%s%s%d\n",s1,s2,s3,s4,s5);}
int p2(int s1,char* s2,char* s3,int s4,char* s5){printf("%d%s%s%d%s\n",s1,s2,s3,s4,s5);}
int p2(int s1,char* s2,char* s3,int s4,int s5){printf("%d%s%s%d%d\n",s1,s2,s3,s4,s5);}
int p2(int s1,char* s2,int s3,char* s4,char* s5){printf("%d%s%d%s%s\n",s1,s2,s3,s4,s5);}
int p2(int s1,char* s2,int s3,char* s4,int s5){printf("%d%s%d%s%d\n",s1,s2,s3,s4,s5);}
int p2(int s1,char* s2,int s3,int s4,char* s5){printf("%d%s%d%d%s\n",s1,s2,s3,s4,s5);}
int p2(int s1,char* s2,int s3,int s4,int s5){printf("%d%s%d%d%d\n",s1,s2,s3,s4,s5);}
int p2(int s1,int s2,char* s3,char* s4,char* s5){printf("%d%d%s%s%s\n",s1,s2,s3,s4,s5);}
int p2(int s1,int s2,char* s3,char* s4,int s5){printf("%d%d%s%s%d\n",s1,s2,s3,s4,s5);}
int p2(int s1,int s2,char* s3,int s4,char* s5){printf("%d%d%s%d%s\n",s1,s2,s3,s4,s5);}
int p2(int s1,int s2,char* s3,int s4,int s5){printf("%d%d%s%d%d\n",s1,s2,s3,s4,s5);}
int p2(int s1,int s2,int s3,char* s4,char* s5){printf("%d%d%d%s%s\n",s1,s2,s3,s4,s5);}
int p2(int s1,int s2,int s3,char* s4,int s5){printf("%d%d%d%s%d\n",s1,s2,s3,s4,s5);}
int p2(int s1,int s2,int s3,int s4,char* s5){printf("%d%d%d%d%s\n",s1,s2,s3,s4,s5);}
int p2(int s1,int s2,int s3,int s4,int s5){printf("%d%d%d%d%d\n",s1,s2,s3,s4,s5);}
int p2(char* s1,char* s2,char* s3,char* s4){printf("%s%s%s%s\n",s1,s2,s3,s4);}
int p2(char* s1,char* s2,char* s3,int s4){printf("%s%s%s%d\n",s1,s2,s3,s4);}
int p2(char* s1,char* s2,int s3,char* s4){printf("%s%s%d%s\n",s1,s2,s3,s4);}
int p2(char* s1,char* s2,int s3,int s4){printf("%s%s%d%d\n",s1,s2,s3,s4);}
int p2(char* s1,int s2,char* s3,char* s4){printf("%s%d%s%s\n",s1,s2,s3,s4);}
int p2(char* s1,int s2,char* s3,int s4){printf("%s%d%s%d\n",s1,s2,s3,s4);}
int p2(char* s1,int s2,int s3,char* s4){printf("%s%d%d%s\n",s1,s2,s3,s4);}
int p2(char* s1,int s2,int s3,int s4){printf("%s%d%d%d\n",s1,s2,s3,s4);}
int p2(int s1,char* s2,char* s3,char* s4){printf("%d%s%s%s\n",s1,s2,s3,s4);}
int p2(int s1,char* s2,char* s3,int s4){printf("%d%s%s%d\n",s1,s2,s3,s4);}
int p2(int s1,char* s2,int s3,char* s4){printf("%d%s%d%s\n",s1,s2,s3,s4);}
int p2(int s1,char* s2,int s3,int s4){printf("%d%s%d%d\n",s1,s2,s3,s4);}
int p2(int s1,int s2,char* s3,char* s4){printf("%d%d%s%s\n",s1,s2,s3,s4);}
int p2(int s1,int s2,char* s3,int s4){printf("%d%d%s%d\n",s1,s2,s3,s4);}
int p2(int s1,int s2,int s3,char* s4){printf("%d%d%d%s\n",s1,s2,s3,s4);}
int p2(int s1,int s2,int s3,int s4){printf("%d%d%d%d\n",s1,s2,s3,s4);}
int p2(char* s1,char* s2,char* s3){printf("%s%s%s\n",s1,s2,s3);}
int p2(char* s1,char* s2,int s3){printf("%s%s%d\n",s1,s2,s3);}
int p2(char* s1,int s2,char* s3){printf("%s%d%s\n",s1,s2,s3);}
int p2(char* s1,int s2,int s3){printf("%s%d%d\n",s1,s2,s3);}
int p2(int s1,char* s2,char* s3){printf("%d%s%s\n",s1,s2,s3);}
int p2(int s1,char* s2,int s3){printf("%d%s%d\n",s1,s2,s3);}
int p2(int s1,int s2,char* s3){printf("%d%d%s\n",s1,s2,s3);}
int p2(int s1,int s2,int s3){printf("%d%d%d\n",s1,s2,s3);}
int p2(char* s1,char* s2){printf("%s%s\n",s1,s2);}
int p2(char* s1,int s2){printf("%s%d\n",s1,s2);}
int p2(int s1,char* s2){printf("%d%s\n",s1,s2);}
int p2(int s1,int s2){printf("%d%d\n",s1,s2);}
int p2(char* s1){printf("%s\n",s1);}
int p2(int s1){printf("%d\n",s1);}

#define BASIC ):basic_label==
#define PRINT ?p2(
#define GOTO ?(basic_label=0x7FFF+
#define END ?(basic_label=-1
#define THEN )&&(basic_label=0x7FFF+
#define IF ?(
#define LET ?(
#define INPUT ?printf("? ")&scanf("%d",&
#define ENDBASIC ):1;}while(0x7FFF!=(basic_label&=0x7FFF));return(0);}
#define a A
#define b B
#define c C
#define d D
#define e E
#define f F
#define g G
#define h H
#define i I
#define j J
#define k K
#define l L
#define m M
#define n N
#define o O
#define p P
#define q Q
#define r R
#define s S
#define t T
#define u U
#define v V
#define w W
#define x X
#define y Y
#define z Z

#define BEGINBASIC int A,B,C,D,E,F,G,H,I,J,K,L,M,N,O,P,Q,R,S,T,U,V,W,X,Y,Z;\
                   int main(int argc, char* argv[]){int basic_label;\
                   basic_label=0;do{basic_label=(basic_label&0x7FFF)+1;0?(0