Took make it simple, this is the program itself, it is _insanely_ early days, and I was just using a simple string. Just to make sure that I was getting what I got from my c program on my computer. But it is saying "invalid token" at the line I've specified below. I'm trying to modify 2 bytes worth of data at once from the value at the address I specified. I'm going to make this into a subroutine and post it up on the subroutine thread once it's working 100% but it's already not working so well for me.
:.RC2
:"SILLY STRING"→Str1
:length(Str1)→L
:Disp L►Frac
:det(L)→S
:det(L)→C
:0→T
:L-1→M
:For(A,0,M)
:InData({Str1+A},T)→D
:If D≠0
:{C+D}{^r}++→{C+D){^r}
:End
:Else
:{Str1+A}→{S+A}
:0→{C}{^r}
:End
:End
:length(S)→L
:L-1→M
:For(A,0,M)
:Disp {S+A}►Frac
:Disp i,{C+A}{^r}►Dec
:End
Generated by SourceCoder (http://sc.cemetech.net)
© 2005-2012 Cemetech (http://www.cemetech.net)
Also to say why I'm doing this, instead of just using RLE or puCrunch, I like range coding, and figured it'd be a nice "first usable program" in axe.
Edit: Changed the posted thing to ascii from source coder, to hopefully make it clearer. Apparently I am the stupid today.