spieleprogrammierer.de - Forum und Wiki zur Spieleprogrammierung und Spieleentwicklung

C-/C++-Quelltext

#include "PHS.h"                    //Includedatei für PHScript

#include <iostream>


//Das Script soll über die Konsole Zahlen Ein- und Ausgeben können.

//Dafür werden zwei Funktionen bereitgestellt.


//Die Funktionen erhalten jeweils als ersten Parameter eine Struktur

//namens PHSParameter. In ihr liegen als double-Werte die eigentlichen

//Parameter der Funktion.

//Der zweite Parameter ist ein Pointer, der auf Daten des Hauptprogramms zeigt,

//die dadurch durch das Script manipuliert werden können.

//Der dritte Parameter ist der "Arbeitsspeicher" des Programms

void Eingabe(PHSParameter *Params, char *Pointer, double *Memory)
{
    std::cin>>Memory[(int)Params->Param[0]];    //Der erste Parameter ist die Adresse

                                                //der Variablen, die eingelesen werden soll.

                                                //Weil alle Parameter als double vorliegen

                                                //casten wir zu int und lesen mit std::cin

                                                //eine Zahl in Memory an die entsprechende Adresse.

}
void Ausgabe(PHSParameter *Params, char *Pointer, double *Memory)
{
    std::cout<<Params->Param[0]<<std::endl;     //Der Parameter wird ausgegeben.

}

int main()
{
    PHSFunctions Functions;                     //Befehle, über die das Script verfügt

    PHSGetFunctions(&Functions);                //Standartbefehle einlesen(z.B. Addition,

                                                //Subtraktion, Kosinus, Sinus, new, free)

    PHSAddFunction(&Functions, "get", Eingabe); //Eingabe und Ausgabe unter den Namen

                                                //"get" und "print" eintragen

    PHSAddFunction(&Functions, "print", Ausgabe);

    char filename[100];
    std::cout<<"Bitte geben sie die Scriptdatei an"<<std::endl;
    std::cin>>filename;

    PHSProgram Program;                         //Das Script

    PHSCompile(filename, &Program);             //Laden des Scripts

    char *Bytecode;                             //Repräsentiert das Fertige Scriptprogramm

    PHSAssemble(&Program, &Bytecode, &Functions);
    PHSExecute(Bytecode, &Functions, PHSPARSE_ALL, NULL);
    system("PAUSE");
    return 0;
}

Quellcode

function main(void)
  get(.a)
  b=1;
  i=1; while((i<a)|(i~a))
   b=b*i
   i=i+1
  end
  print(b)
return(0)