]> gitweb.factorcode.org Git - factor.git/blobdiff - extra/balloon-bomber/balloon-bomber.factor
use radix literals
[factor.git] / extra / balloon-bomber / balloon-bomber.factor
index c52c029c7c3525946373aa4b992848f5f5166d18..0e079e79f07f0e3b220144de62b3f1e878db5b9f 100644 (file)
@@ -17,11 +17,11 @@ TUPLE: balloon-bomber < space-invaders ;
   balloon-bomber new cpu-init ;\r
 \r
 CONSTANT: rom-info {\r
-    { HEX: 0000 "ballbomb/tn01" }\r
-    { HEX: 0800 "ballbomb/tn02" }\r
-    { HEX: 1000 "ballbomb/tn03" }\r
-    { HEX: 1800 "ballbomb/tn04" }\r
-    { HEX: 4000 "ballbomb/tn05-1" }\r
+    { 0x0000 "ballbomb/tn01" }\r
+    { 0x0800 "ballbomb/tn02" }\r
+    { 0x1000 "ballbomb/tn03" }\r
+    { 0x1800 "ballbomb/tn04" }\r
+    { 0x4000 "ballbomb/tn05-1" }\r
   }\r
 \r
 : run-balloon ( -- )  \r