Execute SNUSP/Java

From Rosetta Code
< Execute SNUSP(Redirected from RCSNUSP/Java)
Jump to: navigation, search
Execute SNUSP/Java is an implementation of SNUSP. Other implementations of SNUSP.
Execute SNUSP/Java is part of RCSNUSP. You may find other members of RCSNUSP at Category:RCSNUSP.

This Java implementation has all of the basic characters plus '%', '@', and '#' (characters from modular and bloated SNUSP found on esolangs). The memory space grows to the right as needed, and the memory pointer cannot go negative. The program will exit if the memory pointer moves to a negative value or if the code pointer leaves the code space. The input ignores return characters because of the way BufferedReader is set up. The random command places a random ASCII value (code 0 through the value in the cell inclusive) in the current memory space.

The implementation comes in two classes: the main program and a code pointer class. The separation is for the easier addition of '&' (split) which could come in the future (the code pointer class would only need to extend Thread and code would need to be added to deal with the command). The main class decides on the input method (file or std in), reads the code, and starts the code pointer. It also figures out where the starting point in the code is ('$' or 0,0).

Works with: Java version 1.5+

The main class:

import java.awt.Point;
import java.io.BufferedReader;
import java.io.FileNotFoundException;
import java.io.FileReader;
import java.io.IOException;
import java.io.InputStreamReader;
import java.util.ArrayList;
 
public class SNUSP{
static Point start;
public static void main(String[] args){
try{
start= new Point(0,0);
BufferedReader in;
ArrayList<String> code = new ArrayList<String>();
if(args.length > 0){
in= new BufferedReader(new FileReader(args[0]));
}else{
in= new BufferedReader(new InputStreamReader(System.in));
}
code= parse(in);
CodePtr cp = new CodePtr(code, start);
cp.run();
}catch(FileNotFoundException e){
e.printStackTrace();
}catch(IOException e){
e.printStackTrace();
}
}
 
private static ArrayList<String> parse(BufferedReader in)
throws IOException{
String line;
ArrayList<String> code= new ArrayList<String>();
while((line= in.readLine())!=null){
code.add(line);
if(line.contains("$")){
start = new Point(line.indexOf('$'), code.size() - 1);
}
}
return code;
}
}

The code pointer class:

import java.awt.Point;
import java.io.BufferedReader;
import java.io.IOException;
import java.io.InputStreamReader;
import java.util.ArrayList;
import java.util.LinkedList;
import java.util.Random;
 
public class CodePtr{
static final String instChars= "><.,/\\+-#@$%!?";//valid chars
static final Random rand = new Random();
ArrayList<String> code;//code array
Direction dir;//current direction
ArrayList<Character> mem;//memory space
int memPtr;//memory pointer
Point place;//code pointer
LinkedList<Point> pStack;//code pointer stack
LinkedList<Direction> dStack;//direction stack
//input stream
BufferedReader input= new BufferedReader(new InputStreamReader(System.in));
 
public CodePtr(ArrayList<String> code, Point place){
this.code= code;
dir= Direction.RIGHT;
this.place= place;
mem = new ArrayList<Character>();
mem.add('\0');//initial memory
memPtr= 0;
dStack= new LinkedList<Direction>();
pStack= new LinkedList<Point>();
}
 
public CodePtr(Point place, Direction dir){
//This constructor is left over from attempts at '&'
this.dir= dir;
this.place= place;
}
 
public void run(){
for(;execute(code.get(place.y).charAt(place.x));place= moveCP());
}
 
private boolean execute(char inst){
//ignore char and keep going
if(!instChars.contains("" + inst)) return true;
switch(inst){
case '.'://print
System.out.print(mem.get(memPtr));
break;
case ','://input
try{
int in;
while((in= input.read()) == '\n' || in == '\r');//skip return chars
mem.set(memPtr, (char)in);
}catch(final IOException e){
e.printStackTrace();
}
break;
case '!'://skip
place= moveCP();
break;
case '?'://conditional skip
if(mem.get(memPtr) == '\0') place= moveCP();
break;
case '>'://move pointer right
memPtr++;
while(mem.size() <= memPtr){
mem.add('\0');//add more memory cells if necessary
}
break;
case '<'://move memory pointer left
memPtr--;
if(memPtr < 0){//no negative values
System.err.println("memory pointer out of range (negative)");
return false;//stop executing
}
break;
case '/'://mirror
switch(dir){
case RIGHT:
dir= Direction.UP;
break;
case DOWN:
dir= Direction.LEFT;
break;
case LEFT:
dir= Direction.DOWN;
break;
case UP:
dir= Direction.RIGHT;
break;
default:
}
break;
case '\\'://mirror
switch(dir){
case RIGHT:
dir= Direction.DOWN;
break;
case DOWN:
dir= Direction.RIGHT;
break;
case LEFT:
dir= Direction.UP;
break;
case UP:
dir= Direction.LEFT;
break;
default:
}
break;
case '+'://inc
mem.set(memPtr, (char)(mem.get(memPtr) + 1));
break;
case '-'://dec
mem.set(memPtr, (char)(mem.get(memPtr) - 1));
break;
case '#'://pop
if(dStack.size() > 0){
Direction oldDir= dStack.pop();
Point oldPlace= pStack.pop();
place= oldPlace;
dir= oldDir;
return true;
}
return false;
case '@'://push
//protect the reference with a new object
pStack.push(new Point(place));
dStack.push(dir);
place= moveCP();//skip
break;
case '%':
mem.set(memPtr, (char)rand.nextInt(mem.get(memPtr) + 1));
break;
default:
}
return true;
}
 
private Point moveCP(){
final Point retVal= new Point(place);
switch(dir){
case RIGHT:
retVal.x++;
break;
case DOWN:
retVal.y++;
break;
case LEFT:
retVal.x--;
break;
case UP:
retVal.y--;
break;
default:
}
if(retVal.x<0 || retVal.y<0 ||
retVal.y >= code.size() || retVal.x >= code.get(0).length()){
System.err.println("Code pointer has left the code space");
System.exit(-1);
}
return retVal;
}
private enum Direction{
UP,DOWN,LEFT,RIGHT;
}
}
Personal tools
Namespaces

Variants
Actions
Community
Explore
Misc
Toolbox