Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
- [->+>+<<]>>[<<+>>-]>
- ++++++++++[>++++++++++[>++++++++++[>++++++++++[>++++++++++<-]<-]<-]<-]>>>>[<<<<+>>>>-]<<<<
- [->+>+<<]>>[<<+>>-]>>+>>>>>>>>>>
- >>>+>+>+>+>+>+>+>>++++++
- [
- <<<<<<<<<<<<<<[-]+ ;Set base flag to 1
- [
- <<<<<<<<<<<<<
- [->>>>>>>>+<<<<<<<<] ;Copy v1{2} to v1c
- >>>
- [->>>>>>+<<<<<<] ;Copy v2{2} to v2c
- <[->+>+<<]>>[<<+>>-] ;Copy v2{1} to v2{2}
- >>>>
- [>[-<->>>+<]<<]<[>] ;Clever Subtract v1c from v2c
- >>>>>+< ;Add 1 to basebuff
- [-<<<<<<<<->>>>>>>>] ;Subtract divbuff from v2{2}
- <<<<<<<
- [[-]>>>>>>>>>->-<<<<<<<<<<] ;if v2{2} isn't empty subtract 1 from basebuff and clear v2{2} and set baseflag to 0
- <[->+>+<<]>>[<<+>>-] ;copy v2{1} to v2{2}
- >>>>>>>>>+- ;if basebuff is 0 end loop
- ]
- <[->>+>+<<<]>> ;copy basebuff to basebuffr and basebuffr2
- +[->>>>>>>>>>>[<]<+>> ;clever byte fill from basebuffr to rx
- [>]<<<<<<<<<<<<]>>>>>>>>>>>
- [<]>[-]>[>]<<<<<<<<<<<
- [-<<<<<<<<<<<<[-] ;if basebuffr2 isnt empty copy v2 and multiply basebuffr2 by v2{2}
- <[->+>+<<]>>[<<+>>-]<
- [->>>>>>>>>>>>>+<<<<<<<<<<<<<]
- >>>>>>>>>>>>]>
- [-<<<<<<<<<<<<<<<<<- ;subtract v1neg from v1{1}
- >>>>>>>>>>>>>>>>>]
- <<<<<<<<<<<<<<<<[-] ;clear v1{2}
- <[->+>+<<]>>[<<+>>-]>> ;copy v1
- [-]<[>>++++++++++[-<<->>]<+<]> ;divide v2 by 10 and re-set v2{1} and v2{2}
- [->+<<+>]>[-<+>]
- >>>>>>>>>>>>>>>>>>>>>>>- ;subtract 1 from 6
- ]
- <<<<<<<<<<<
- +++++++++++++++++++++++++++++++++++++++++++++++
- [->+>+>+>+>+>+<<<<<<]
- >.>.>.>.>.>.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement