home *** CD-ROM | disk | FTP | other *** search
/ 17 Bit Software 4: Phase Four / 17Bit_Phase_Four.iso / files / 3224.dms / 3224.adf / shape-ed / gadlist2 < prev    next >
Encoding:
Text File  |  1978-02-07  |  782 b   |  33 lines
  1.  
  2. Borders On:BorderPens 1,2:Borders 4,2
  3. StringGadget 4,80,56,0,4,4,25
  4. GadgetJam 0:GadgetPens 1,0
  5. TextGadget 4,9,73,0,1,"OK"
  6. StringGadget 4,80,44,0,3,4,25
  7. StringGadget 4,80,32,0,8,4,25
  8. StringGadget 4,186,56,0,6,4,25
  9. StringGadget 4,186,44,0,9,4,25
  10. StringGadget 4,186,32,0,5,4,25
  11. TextGadget 4,175,73,0,7,"Cancel"
  12.  
  13. Screen 0,0,0,320,256,3,0,"Blitz Shape Maker V1.0",1,2
  14. RGB 0,6,6,6:RGB 1,15,15,15:RGB 2,0,0,0:RGB 3,0,4,8
  15. RGB 4,0,6,15:RGB 5,15,0,15:RGB 6,0,15,15:RGB 7,15,15,15
  16.  
  17. SizeLimits 32,32,-1,-1
  18. Window 1,20,14,241,91,$100E,"Scale Shape",1,2,4
  19. WLocate 40,23:WJam 0:WColour 1,0
  20. Print "X% :"
  21. WLocate 16,35
  22. Print "X Old :"
  23. WLocate 123,47
  24. Print "Y New :"
  25. WLocate 147,23
  26. Print "Y% :"
  27. WLocate 123,35
  28. Print "Y Old :"
  29. WLocate 16,47
  30. Print "X New :"
  31. WLocate 30,9
  32. Print "Stretch Current Shape"
  33.