diff --git a/src/samplesrc/rod.pla b/src/samplesrc/rod.pla
index 3b4bdf4..d754adb 100644
--- a/src/samplesrc/rod.pla
+++ b/src/samplesrc/rod.pla
@@ -4,7 +4,7 @@ include "inc/conio.plh"
 // Rod's Colors
 //
 def rod
-  var i, j, k, w, fmi, fmk, color
+  byte i, j, k, w, fmi, fmk, color
 
   while TRUE
     for w = 3 to 50