fix(computer-use): scale scroll amounts in TypeScript

Author: matthewjmarangoni

templates/typescript/computer-use/tools/computer.ts

@@ -190,11 +190,19 @@ export class ComputerTool implements BaseAnthropicTool {
         await this.page.waitForTimeout(100);
       }
 
-      const amount = scrollAmountValue || 100;
+      const pageDimensions = await this.page.evaluate(() => {
+	      return { h: window.innerHeight, w: window.innerWidth };
+      });
+      const pagePartitions = 25;
+      const scrollFactor = (scrollAmountValue || 10) / pagePartitions;
 
       if (scrollDirection === 'down' || scrollDirection === 'up') {
+        const amount = pageDimensions.h * scrollFactor;
+        console.log(`Scrolling ${amount / pageDimensions.h * 100}% ${scrollDirection}`);
         await this.page.mouse.wheel(0, scrollDirection === 'down' ? amount : -amount);
       } else {
+        const amount = pageDimensions.w * scrollFactor;
+        console.log(`Scrolling ${amount / pageDimensions.w * 100}% ${scrollDirection}`);
         await this.page.mouse.wheel(scrollDirection === 'right' ? amount : -amount, 0);
       }