home *** CD-ROM | disk | FTP | other *** search
/ Gold Fish 3 / goldfish_volume_3.bin / files / dev / basic / ace / utils / a-a / a-a.dat < prev    next >
Encoding:
Text File  |  1994-10-22  |  752 b   |  49 lines
  1. Set Buffer 50
  2. Inc HELLO
  3. Dec GOODBYE
  4. Add X,Y+7
  5. A=Free
  6. major:
  7.  
  8. print : print
  9.  
  10. K=Instr(A$,B$)
  11. L=Instr(A$,B$,val(mid$(c$,k$,5)))
  12. Print Upper$("hello")
  13. Print String$("a",7)
  14. If(A+H<K)
  15. End If 
  16. Do 
  17. Rem nothing
  18. Loop 
  19. Print Rnd(5)
  20. Fix(2)
  21. Say "hello",1
  22. Open In 1,"leven.comp"
  23. Open Out 2,"levee.txt"
  24. Append 7,"killer"
  25. Print Hex$(373,2)
  26. Print Hex$(222)
  27. Print Bin$(211,9)
  28. Print Bin$(2911111)
  29. Poke 55,92
  30. Doke 22110,474
  31. Loke 20,77
  32. Print Peek(332)
  33. Print Deek(5580)
  34. Print Leek(57000)
  35. Proc HELLO[STEVE,MARK]
  36. Proc MAKER
  37. Procedure MAKER
  38. End Proc
  39. Procedure HELLO[YUK,LKW]
  40. End Proc
  41. Rem ACEcommand(1)here! 
  42. Rem ACE command(2)here!
  43. Rem Begin AMOS 
  44. Rem *** This is junk that will be deleted when going 
  45. Rem *** through the processor! 
  46. Rem End AMOS 
  47. Rename "hello" To "goodbye"
  48.  
  49.