Spawn Figure Collection/spawn collection cd.iso/setup/data1.cab/Program_Executable_Files/Collection.dir/00020.ls

Text File | 1998-01-19 | 481 b | 18 lines

on editablecheck s, t, g
  global lseries
  set ls to getAt(lseries, s)
  set lt to getAt(the ltitle of ls, t)
  set lg to getAt(the lgroup of lt, g)
  if the pprotect of lg = "1" then
    alert("DZÇÃÉfÅ[É^ÇÕÉvÉçÉeÉNÉgÇŽÇÍǃǢNjÇÝÅBïœçXǙǼǴNjÇþÇÒÅB")
    return 0
  end if
  return 1
end

on cleardisp
  set the text of field "Series" to EMPTY
  set the text of field "Title" to EMPTY
  set the text of field "Comment" to EMPTY
end