rubenwardy
/
rufunge
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Add jump and bridge

master
rubenwardy 2016-04-04 10:27:24 +01:00
parent 687f88e9f0
commit 989dafc314
5 changed files with 32 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
examples/bridge.rf Normal file
View File

@ -0,0 +1 @@
> "b", [ 0 . ] 25*, @

1
examples/bridge.rf.txt Normal file
View File

@ -0,0 +1 @@
b

1
examples/jump.rf Normal file
View File

@ -0,0 +1 @@
> "a", #0#. 25*, @

1
examples/jump.rf.txt Normal file
View File

@ -0,0 +1 @@
a

29
src/rufunge.cpp
View File

@ -286,6 +286,29 @@ public:
}
};
class JumpSR : public Subroutine
{
public:
virtual void run(Thread *th)
{
th->move();
th->move();
}
};
class BridgeSR : public Subroutine
{
public:
virtual void run(Thread *th)
{
do {
th->move();
} while(th->getChar() != ']');
th->move();
}
};
class TemplateSR : public Subroutine
{
public:
@ -340,8 +363,10 @@ void VM::assignStandardSR(Thread *th)
c->operators['\\'] = 18;
c->operators['g'] = 19;
c->operators['p'] = 20;
c->operators['#'] = 21;
c->operators['['] = 22;
// TODO: # [ ] & ~ M P R L
// TODO: & ~ M P R L
}
void VM::init(Canvas *canvas)
@ -376,6 +401,8 @@ void VM::init(Canvas *canvas)
loadSubroutine(new SwapSR);
loadSubroutine(new GetSR);
loadSubroutine(new PutSR);
loadSubroutine(new JumpSR);
loadSubroutine(new BridgeSR);
assignStandardSR(th);
}