upload: use A! instead of C!

It makes the tool much more versatile. I'll have adev being included
in all recipes, so it can be assumed.

recipes/rc2014/README.md

@@ -225,6 +225,7 @@ yourself. Tough love they call it.
 * `cat stage2.bin ../../forth/readln.fs ../../forth/adev.fs run.fs > stage2r.bin`
 * Don't forget `RDLN$` and `ADEV$`.
 * `RLDICT` is like `RLCORE` but with a chosen target.
+* `stripfc` can help you deal with size constraints.
 
 [rc2014]: https://rc2014.co.uk
 [romwrite]: https://github.com/hsoft/romwrite

tools/upload.c

@@ -44,7 +44,7 @@ int main(int argc, char **argv)
     set_blocking(fd, 1);
     char s[0x40];
     sprintf(s,
-        ": _ 0x%04x 0x%04x DO KEY DUP .x I C! LOOP ; _",
+        ": _ 0x%04x 0x%04x DO KEY DUP .x I A! LOOP ; _",
         memptr+bytecount, memptr);
     sendcmd(fd, s);