about summary refs log tree commit diff stats
path: root/src/HTAlert.h
diff options
context:
space:
mode:
authorThomas E. Dickey <dickey@invisible-island.net>2004-01-25 02:09:48 -0500
committerThomas E. Dickey <dickey@invisible-island.net>2004-01-25 02:09:48 -0500
commita667eb0b51f7cb224924921194b4dfadfded3095 (patch)
treee3c6800a040d21880b2cb54db6a97f76049dc487 /src/HTAlert.h
parent264781cf73284efb1e6eb24c3c71d46ce36685aa (diff)
downloadlynx-snapshots-a667eb0b51f7cb224924921194b4dfadfded3095.tar.gz
snapshot of project "lynx", label v2-8-5pre_3
Diffstat (limited to 'src/HTAlert.h')
-rw-r--r--src/HTAlert.h1


1 files changed, 1 insertions, 0 deletions
diff --git a/src/HTAlert.h b/src/HTAlert.h
index 43ffd49a..49456c42 100644
--- a/src/HTAlert.h
+++ b/src/HTAlert.h
@@ -40,6 +40,7 @@ extern void HTUserMsg2 PARAMS((CONST char * Msg, CONST char * Arg));
 **      On entry,
 **              The input is a list of parameters for printf.
 */
+extern CONST char *HTProgressUnits PARAMS((int kilobytes));
 extern void HTProgress PARAMS((CONST char * Msg));
 extern void HTReadProgress PARAMS((long bytes, long total));
 #define _HTProgress(msg)	mustshow = TRUE, HTProgress(msg)

 

generated by cgit-pink 1.4.1-2-gfad0 (git 2.36.2.497.gbbea4dcf42) at 2024-12-12 13:30:29 +0000


 


tle='Blame the previous revision' href='/akkartik/mu/blame/ex7.mu?h=hlt&id=9f71d7248c908900e987c08b2ab4642dfd88eacb'>^

ec0d5bb1 ^

1a43d12b ^


328d76e4 ^

74f1512f ^

328d76e4 ^

1a43d12b ^

c1e841fc ^

328d76e4 ^


74f1512f ^

328d76e4 ^

1a43d12b ^

c1e841fc ^

328d76e4 ^


74f1512f ^

328d76e4 ^

1a43d12b ^

c1e841fc ^

328d76e4 ^


74f1512f ^

328d76e4 ^

08c55cb2 ^

1a43d12b ^

c1e841fc ^

328d76e4 ^


ec0d5bb1 ^




1
2
3

4

5

6

7

8

9
10
11
12

13

14

15

16

17
18

19

20

21

22

23

24
25

26

27

28

29

30
31

32

33

34

35

36
37

38

39

40

41

42

43
44

45
46





                        
                                                   
         
                             
     
                                                           



                                                                              
                                                                                  
                                      
                                  
   

                                          
     
                         
                 
                                                                
                        

     
                         
                 
                                                                        
                        

     
                         
                 
                                                                        
                      

     
                         
                 
                                             
                                                                
                         

        

   
# Cursor-based motions.
#
# To build a disk image:
#   ./translate ex7.mu             # emits code.img
# To run:
#   qemu-system-i386 code.img
# Or:
#   bochs -f bochsrc               # bochsrc loads code.img
#
# Expected output: an interactive game a bit like "snakes". Try pressing h, j,
# k, l.

fn main screen: (addr screen), keyboard: (addr keyboard), data-disk: (addr disk) {
  var space/eax: grapheme <- copy 0x20
  set-cursor-position screen, 0, 0
  {
    draw-cursor screen, space
    var key/eax: byte <- read-key keyboard
    {
      compare key, 0x68/h
      break-if-!=
      draw-code-point-at-cursor screen, 0x2d/dash, 0x31/fg, 0/bg
      move-cursor-left 0
    }
    {
      compare key, 0x6a/j
      break-if-!=
      draw-code-point-at-cursor screen, 0x7c/vertical-bar, 0x31/fg, 0/bg
      move-cursor-down 0
    }
    {
      compare key, 0x6b/k
      break-if-!=
      draw-code-point-at-cursor screen, 0x7c/vertical-bar, 0x31/fg, 0/bg
      move-cursor-up 0
    }
    {
      compare key, 0x6c/l
      break-if-!=
      var g/eax: code-point <- copy 0x2d/dash
      draw-code-point-at-cursor screen, 0x2d/dash, 0x31/fg, 0/bg
      move-cursor-right 0
    }
    loop
  }
}