Advertisement
Guest User

Next big programming language

a guest
Jul 23rd, 2017
62
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. package  {
  2.  
  3. import flash.events.*;
  4. import flash.display.*;
  5.  
  6.  
  7. public class Test extends MovieClip
  8. {
  9.    
  10.     var filecontents;
  11.     var tokens = [];
  12.     var Data;
  13.     var toks;
  14.     var parse;
  15.     var State
  16.    
  17.     public function Test()
  18.     {
  19.         init();
  20.     }
  21.    
  22.     function init():void
  23.     {
  24.     compileCode_Btn.addEventListener(MouseEvent.MOUSE_DOWN, compiler);
  25.     }
  26.    
  27.     function compiler(e:MouseEvent):void
  28.     {
  29.         var tok = "";
  30.         State = 0;
  31.         var string = "";
  32.         Data = String(code_Area.text);
  33.         var filecontents:Array = Data.split("");
  34.         for (var i:Number = 0; i < filecontents.length; i++)
  35.         {
  36.             var char = filecontents[i];
  37.             //trace(State);
  38.             tok += char;
  39.              trace(tok);
  40.              if (tok == "\r")
  41.                  {
  42.                      trace("new line found");
  43.                      tok = "";
  44.                  }
  45.              else if(tok == "print")
  46.              {
  47.                  //trace("Found a print");
  48.                  tokens.push("Print");
  49.                  tok = "";
  50.              }
  51.              else if(tok == '"')
  52.              {
  53.                  if(State == 0){
  54.                      State = 1;
  55.                      tok = "";
  56.                  }
  57.                 else if(State == 1)
  58.                  {
  59.                      //trace("Found string: "  + string);
  60.                      tokens.push("String:" + string);
  61.                      tok = ""
  62.                      string = "";
  63.                      State = 0;
  64.                       //trace(tokens);
  65.                  }
  66.             }
  67.               else if(State == 1)
  68.                  {
  69.                      string += tok;
  70.                      tok = ""
  71.             }
  72.              else if(tok == " ")
  73.              {
  74.                  if(State == 0)
  75.                  {
  76.                  tok = "";
  77.                  }
  78.                  else
  79.                  tok = " ";
  80.                  }
  81.                  trace(tokens);
  82.              }
  83.         }
  84.     }
  85. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement