Internet 1996 World Exposition/park.org.s3.amazonaws.com.7z/park.org.s3.amazonaws.com/Japan/Panasonic-/funcity/tokyo/rescue.dcr/00047_ýŠ±ï-é¶.ls

Text File | 2017-09-21 | 1.0 KB | 33 lines

on dspscore
  global userid, gten, gspeed, userpm
  put userid into field "userID"
  put integer(gspeed * 10) into field "point"
  if gspeed = 9 then
    put field "addinfoText2" into field "addInfo"
    put 100 into field "label"
  else
    put field "addinfoText1" into field "addInfo"
    put integer(gspeed * 10) into field "label"
  end if
  put gspeed into char 10 of userpm
end

on _dspscore
  global gname, gten, gspeed
  put "ÉXÉRÉAÉ`ÉFÉbÉN" & RETURN & RETURN into field "SCORE"
  if gname = EMPTY then
    put "ǏÇÒÇ×Ç•" && "ÇŽÇÒÇÃ" & RETURN after field "SCORE"
  else
    put gname && "ÇŽÇÒÇÃ" & RETURN after field "SCORE"
  end if
  put "DZÇÃÉQÅ[ÉÄÇÃ" & RETURN & "ìæì_ÇÕ " after field "SCORE"
  if gten <= 0 then
    put "0 ì_ǼÇÝÅB" & RETURN & RETURN after field "SCORE"
  else
    put gten && "ì_ǼÇÝÅB" & RETURN & RETURN after field "SCORE"
  end if
  if gspeed > 0 then
    put "ÉXÉsÅ[ÉhÇ™" && gspeed && "DžǻǡÇýÅI" after field "SCORE"
  end if
end