home *** CD-ROM | disk | FTP | other *** search
/ Rooie Oortjes 4 / RO4_CD.bin / contest.dxr / 00032.ls < prev    next >
Encoding:
Text File  |  1998-09-18  |  3.1 KB  |  76 lines

  1. on exitFrame
  2.   openXLib("pmatic.dll")
  3.   set printer to printomatic(mnew)
  4.   printer(mnewpage)
  5.   set x1 to 180
  6.   set y1 to 8
  7.   printer(mpicture, the picture of member "image", x1, y1)
  8.   set x1 to the left of sprite 7
  9.   set y1 to the top of sprite 7
  10.   set x2 to the right of sprite 7
  11.   set y2 to the bottom of sprite 7
  12.   printer(mtextbox, x1, y1, x2, y2, 0)
  13.   printer(msettextfont, the textFont of member "field1")
  14.   printer(msettextstyle, the textStyle of member "field1")
  15.   printer(msettextsize, the textSize of member "field1")
  16.   printer(mSetText, the text of member "field1")
  17.   set x1 to the left of sprite 8
  18.   set y1 to the top of sprite 8
  19.   set x2 to the right of sprite 8
  20.   set y2 to the bottom of sprite 8
  21.   printer(mtextbox, x1, y1, x2, y2, 0)
  22.   printer(msettextfont, the textFont of member "field2")
  23.   printer(msettextstyle, the textStyle of member "field2")
  24.   printer(msettextsize, the textSize of member "field2")
  25.   printer(mSetText, the text of member "field2")
  26.   set x1 to the left of sprite 9
  27.   set y1 to the top of sprite 9
  28.   set x2 to the right of sprite 9
  29.   set y2 to the bottom of sprite 9
  30.   printer(mtextbox, x1, y1, x2, y2, 0)
  31.   printer(msettextfont, the textFont of member "user_name")
  32.   printer(msettextstyle, the textStyle of member "user_name")
  33.   printer(msettextsize, the textSize of member "user_name")
  34.   printer(mSetText, the text of member "user_name")
  35.   set x1 to the left of sprite 10
  36.   set y1 to the top of sprite 10
  37.   set x2 to the right of sprite 10
  38.   set y2 to the bottom of sprite 10
  39.   printer(mtextbox, x1, y1, x2, y2, 0)
  40.   printer(msettextfont, the textFont of member "user_straat")
  41.   printer(msettextstyle, the textStyle of member "user_straat")
  42.   printer(msettextsize, the textSize of member "user_straat")
  43.   printer(mSetText, the text of member "user_straat")
  44.   set x1 to the left of sprite 11
  45.   set y1 to the top of sprite 11
  46.   set x2 to the right of sprite 11
  47.   set y2 to the bottom of sprite 11
  48.   printer(mtextbox, x1, y1, x2, y2, 0)
  49.   printer(msettextfont, the textFont of member "user_postcode")
  50.   printer(msettextstyle, the textStyle of member "user_postcode")
  51.   printer(msettextsize, the textSize of member "user_postcode")
  52.   printer(mSetText, the text of member "user_postcode")
  53.   set x1 to the left of sprite 12
  54.   set y1 to the top of sprite 12
  55.   set x2 to the right of sprite 12
  56.   set y2 to the bottom of sprite 12
  57.   printer(mtextbox, x1, y1, x2, y2, 0)
  58.   printer(msettextfont, the textFont of member "user_stad")
  59.   printer(msettextstyle, the textStyle of member "user_stad")
  60.   printer(msettextsize, the textSize of member "user_stad")
  61.   printer(mSetText, the text of member "user_stad")
  62.   set x1 to the left of sprite 13
  63.   set y1 to the top of sprite 13
  64.   set x2 to the right of sprite 13
  65.   set y2 to the bottom of sprite 13
  66.   printer(mtextbox, x1, y1, x2, y2, 0)
  67.   printer(msettextfont, the textFont of member "user_land")
  68.   printer(msettextstyle, the textStyle of member "user_land")
  69.   printer(msettextsize, the textSize of member "user_land")
  70.   printer(mSetText, the text of member "user_land")
  71.   printer(mprint)
  72.   printer(mdispose)
  73.   closeXLib("pmatic.dll")
  74.   go("print_done")
  75. end
  76.